Tabla de contenido
7: Práctica de Módulos Contadores y Aplicaciones de Circuitos
Detección de Objetos por IR con NCO
El objeto IrObjectDetection programa una señal de 38kHz usando modo NCO. Cada que el pin de E/S
conectado al LED IR se programa a salida se transmite 38kHz. En un ciclo
permite al LED IR transmitir la señal de 38 kHz IR por 1ms, luego guarda
llamada
y lo muestra en la Terminal Serial Parallax (Figura 7-15).
state
Cargue IrObjectDetection.spin en la EEPROM (F11) e inmediatamente después presione el
botón Enable de la Terminal.
El estado debería ser 1 sin obstáculos o 0 cuando coloca su mano frente el Receptor / LED IR
'' IrObjectDetection.spin
'' Detecta objetos con LED IR y receptor y muestra en la Terminal Serial '' Parallax
CON
_clkmode = xtal1 + pll16x
_xinfreq = 5_000_000
' Constantes para la Terminal Serial Parallax.
HOME = 1, CR = 13, CLS = 16, CRSRX = 14, CLREOL = 11
OBJ
Debug
: "FullDuplexSerialPlus"
SqrWave
: "SquareWave"
PUB IrDetect | state
'Inicia 38 kHz onda cuadrada
SqrWave.Freq(0, 1, 38000)
dira[1]~
'Inicia FullDuplexSerialPlus
Debug.start(31, 30, 0, 57600)
waitcnt(clkfreq * 2 + cnt)
Debug.tx(CLS)
repeat
' Detecta objeto.
dira[1]~~
waitcnt(clkfreq/1000 + cnt)
Figura 7-15: Pantalla Detección de Objeto
' Reloj de Sistema → 80 MHz
' Señal 38 kHz → P1
' Activa pin E/S a entrada
' cuando no se necesita señal
' Inicia FullDuplexSerialPlus
' Da tiempo de presionar Enable
' Limpia Pantalla
' pin E/S → salida para
' transmitir 38 kHz
' Espera 1 ms
Kit Educativo de Practicas Propeller: Fundamentos · Página 153
el programa
repeat
en una variable
ina[0]
Tabla de contenido
