![\"090-ULTRASONIC-RANGER-schematic[1]\"](\"http:\/\/www.pesadillo.com\/pesadillo\/wp-content\/uploads\/2014\/07\/090-ULTRASONIC-RANGER-schematic1.png\")
<\/a><\/p>\nHaga clic en esquema para agrandar<\/p>\n
C1 es un condensador de desacoplamiento<\/p>\n
El pulso PWM desde el pasador RC2 del PIC impulsa la base del transistor T1 a trav\u00e9s de la resistencia R1<\/p>\n
Un 330 \u00ce\u00bcH inductor se a\u00f1ade en paralelo al transceptor ultras\u00f3nico piezzo, para formar un resonnator LC, el diodo D1 protege T1 de tensi\u00f3n inversa.<\/p>\n
El receptor ultras\u00f3nico est\u00e1 conectado directamente a la patilla RA1 del PIC (ADC canal n\u00famero 1), con R3 en paralelo como Adaptador de impedancia.<\/p>\n
Ranger ultras\u00f3nica PIC, el lateral del componente<\/p>\n
La Placa de pruebas<\/p>\n
Tenga cuidado de alinear lo mejor possibe el transmisor con el receptor<\/p>\n EL C\u00d3DIGO FUENTE<\/p>\n Aqu\u00ed est\u00e1 el c\u00f3digo fuente mikroC:<\/p>\n [php] \/ * \/ * \/ ******************* unsigned int buf [BUFSIZE]; \/ \/ Muestras tamp\u00f3n \/ ***************************************** \/ ************ TRISC = 0; \/ \/ PORTC como salidas \/ \/ Configuraci\u00f3n Timer1 Lcd_Out (1, 1, "UltraSonicRanger"); \/ \/ Init Channel PWM: 40 Khz, el ciclo de trabajo del 50% \/ \/ Para siempre \/ \/ Preparar temporizador T1CON.TMR1ON = 1; \/ \/ Iniciar el temporizador 1 \/ \/ Enviar impulsos Delay_us (PULSELEN * 2); \/ \/ Hacer nada por el doble de la duraci\u00f3n de la longitud del pulso para evitar la salida en falso<\/p>\n while (Adc_Read (1) <1) \/ \/ mientras hay pulso detectado (no hay se\u00f1al en el canal ADC 1) T1CON.TMR1ON = 0; Temporizador \/ \/ stop 1 LCDPORT # ifdef \/ \/ Buffer circular cm = 0; \/ \/ Preparar cent\u00edmetro promediado \/ * ByteToStr (cm, str); \/ \/ Convierte a string Delay_ms (10); \/ \/ 10 milisegundos de retardo antes de la siguiente muestra INSTRUCCIONES DE USO<\/p>\n Lo he comprobado con una placa de desarrollo EasyPIC4:<\/p>\n Por supuesto, este ranger es muy b\u00e1sico y tienen algunos inconvenientes:<\/p>\n Una peque\u00f1a sorpresa para la c\u00e9lula del receptor piezzo podr\u00eda conducir a una medici\u00f3n err\u00f3nea,<\/p>\n Desde pulso ultras\u00f3nico no est\u00e1 codificado, cualquier otra fuente ultras\u00f3nica pondr\u00e1 el desorden:<\/p>\n => Desbordara por arriba o condiciones no deseadas pueden suceder<\/p>\n Este es el precio de la muy simple dise\u00f1o del guardabosques.<\/p>\n Esto es lo que debe ver en su \u00e1mbito de aplicaci\u00f3n, si usted sondea a los pines del receptor de ultrasonidos: Horizontal: 1 ms \/ div El eco mec\u00e1nica se retira por un retraso de software.<\/a><\/p>\n
\n\/ *
\n * Archivo: sonar.c
\n * Proyecto: Simple Ultras\u00f3nicas Range Finder
\n * Autor: Bruno GAVAND
\n * compilador: mikroC V6.2
\n * Fecha: 30 de septiembre 2006
\n *
\n * Descripci\u00f3n:
\n * Este es un tel\u00e9metro ultras\u00f3nico b\u00e1sico, del 30 al 200 cent\u00edmetros
\n *
\n * dispositivo de destino:
\n * PIC16F877A con 8 Mhz cristal
\n * o cualquier PIC con al menos un canal ADC y PWM
\n *
\n * bits de configuraci\u00f3n:
\n * Reloj SA
\n * no watchdog
\n timer * no encendido
\n * no brown out
\n * LVP deshabilitado
\n * datos EE proteger discapacitados
\n * ICD deshabilitado
\n *
\n * ver m\u00e1s detalles y esquem\u00e1tica en http:\/\/www.micro-examples.com\/
\n * \/ \/ ******************** * definiciones de macros ******************** \/ \/ * * longitud del pulso ultras\u00f3nico en microsegundos * \/ # define PULSELEN 300<\/p>\n
\n * tama\u00f1o del buffer circular para muestras promedio
\n * \/
\n# define BUFSIZE 10<\/p>\n
\n * LCD PUERTO
\n * EasyPic2, EasyPic3: PORTB
\n * EaspyPic4: PORTD
\n * \/
\n# define LCDPORT PORTD
\n# define LCDTRIS TRISD<\/p>\n
\n * VARIABLES GLOBALES
\n ******************* \/
\noutofrange unsigned char; \/ \/ Fuera de rango marca: establece cuando se detecta ning\u00fan eco<\/p>\n
\nunsigned char idx = 0; \/ \/ \u00cdndice de muestra actual en tamp\u00f3n<\/p>\n
\n * rutina de interrupci\u00f3n
\n * manijas Esta ISR TIMER1 desbordamiento s\u00f3lo
\n ***************************************** \/
\nvac\u00edo de interrupci\u00f3n (void)
\n {
\n if (PIR1.TMR1IF) \/ \/ desbordamiento timer1?
\n {
\n outofrange = 1; \/ \/ Establecer fuera de rango marca
\n PIR1.TMR1IF = 0; \/ \/ Claro indicador de interrupci\u00f3n
\n }
\n }<\/p>\n
\n * bucle principal
\n ************ \/
\nvoid main ()
\n {
\n ADCON1 = 0; \/ \/ Permite ADC TRISA = 0xff; \/ \/ PORTA como entradas PORTA = 0;<\/p>\n
\n PORTC = 0;<\/p>\n
\n T1CON = 0b00001100; \/ \/ Prescaler 1:1, osc. activado, no sincronizaci\u00f3n, clk interior, se detuvo # ifdef LCDPORT \/ \/ init LCD Lcd_Init (& LCDPORT); Ajustes EP2\/3\/4 \/ \/ uso Lcd_Cmd (Lcd_CLEAR); \/ \/ Claro display Lcd_Cmd (Lcd_CURSOR_OFF); \/ \/ Cursor fuera<\/p>\n
\n Lcd_Out (2, 5, "CM");
\n# endif<\/p>\n
\n PWM1_Init (40.000);
\n PWM1_Change_Duty (128); INTCON.GIE = 1; \/ \/ Habilitar las interrupciones globales INTCON.PEIE = 1; \/ \/ Habilitar las interrupciones perif\u00e9ricas PIE1.TMR1IE = 0; \/ \/ Desactivar el temporizador de interrupci\u00f3n 1 PIR1.TMR1IF = 0; \/ \/ Claro temporizador 1 flag de interrupci\u00f3n<\/p>\n
\n for (; \ud83d\ude09
\n {
\n unsigned char i; \/ \/ Byte de prop\u00f3sito general
\n unsigned long cm; \/ \/ Distancia en cent\u00edmetros
\n unsigned char str [4]; \/ \/ Cadena para visualizador gama<\/p>\n
\n T1CON.TMR1ON = 0; \/ \/ Detener el temporizador
\n outofrange = 0; \/ \/ Reposici\u00f3n de la bandera de gama
\n TMR1H = 0; \/ \/ Claro timer1
\n TMR1L = 0;<\/p>\n
\n PIE1.TMR1IE = 1; \/ \/ Habilitar el temporizador 1 interrupciones en desbordamiento<\/p>\n
\n PWM1_Start (); \/ \/ Activar la salida PWM: transductor es pulsada en frecuencia ultras\u00f3nica
\n delay_us (PULSELEN); \/ \/ Durante microsegundos PULSELEN
\n PWM1_Stop (); \/ \/ Detener PWM<\/p>\n
\n {
\n if (outofrange) break; \/ \/ A tarde, fuera de rango
\n }<\/p>\n
\n PIE1.TMR1IE = 0; \/ \/ Desactivar el temporizador 1 interrumpe en caso de desbordamiento<\/p>\n
\n if (outofrange) \/ \/ es el condtion overrange detectado?
\n {
\n Lcd_Out (2, 8, "OverRange"); Mensaje sobre rango \/ \/ display
\n }
\n else if (TMR1H <((PULSELEN * 6 * Clock_kHz ()) \/ (1000 * 4 * 256))) \/ se detecta \/ condiciones bajo rango?
\n {
\n Lcd_Out (2, 8, "UnderRnge"); Mensaje underrange \/ \/ display
\n }
\n else \/ \/ buena lectura
\n {
\n buf [idx] = TMR1H; \/ \/ Crear un valor de 16 bits de timer1
\n buf [idx] << = 8; \/ \/ MSB
\n buf [idx] + = TMR1L; \/ \/ LSB<\/p>\n
\n idx + +; \/ \/ Siguiente ubicaci\u00f3n
\n if (idx == BUFSIZE) \/ \/ se llega al final?
\n {
\n idx = 0; \/ \/ Volver a
\n }<\/p>\n
\n for (i = 0; i <BUFSIZE; i + +) \/ \/ para todas las muestras en tamp\u00f3n
\n {
\n cm + = buf [i]; \/ \/ A\u00f1adir a resumir
\n }
\n cm \/ = BUFSIZE; \/ \/ muestras promedio<\/p>\n
\n * cm contiene ahora el n\u00famero de ciclos de reloj
\n * desde el inicio de la transmisi\u00f3n de ultrasonidos
\n * hasta la primera detecci\u00f3n del eco
\n * la duraci\u00f3n en segundos es s = cm \/ (Clock_Khz () * 1000\/4)
\n * si se admite que el sonido velocidad en el aire es de 340 m \/ s
\n * la distancia en cent\u00edmetros (adelante y atr\u00e1s) es D = s * 340 * 100\/2
\n * o d = 340 * 100\/2 * cm \/ Clock_khz () \/ 1000 * 4
\n * d = 34 * 2 \/ Clock_Khz ()
\n * \/
\n cm * = 34 * 2; \/ \/ Ahora se convierte en cent\u00edmetros
\n cm \/ = Clock_Khz ();<\/p>\n
\n Lcd_Out (2, 1, str); \/ \/ Imprimir cadena
\n Lcd_Out (2, 8, ""); \/ \/ Claro mensaje de error
\n }
\n# endif<\/p>\n
\n }
\n }
\n[\/php]<\/p>\n
\n<\/a><\/p>\n
\nvertical: 5 mV \/ div<\/p>\n
\nLa onda reflejada es de alrededor de 40 mV pico a pico, se trata de alrededor de 9,5 ms despu\u00e9s de la r\u00e1faga ultras\u00f3nica, si decimos que la velocidad del sonido es 340 m \/ s significa que la distancia del objeto fue de alrededor 0,0095 \/ 2 * 340 = 1.615 metros.
\nDe hecho, fue el techo, que era de 172 cm por encima del circuito, la pantalla LCD escribi\u00f3 170 cm.<\/p>\n