Practica 8. Control con sensor de infrarrojos(distancia)

1.AUMENTO DE FRECUENCIA DE LED SEGÚN PROXIMIDAD 
1.VISUALIZADOR DE APARCAMIENTO

En esta práctica utilizamos un sensor analógico para realizar programación en función de la distancia o proximidad a un objeto. Lo aplicamos a:
- Frecuencia de parpadeo de un LED.
- Cambio de color en luz de una plaza de parking de centro comercial.

En esta práctica utilizamos un sensor analógico para realizar programación en función de la distancia o proximidad a un objeto. Lo aplicamos a:
- Frecuencia de parpadeo de un LED.
- Cambio de color en luz de una plaza de parking de centro comercial.

Código del programa "Frecuencia de parpadeo"

inicio:
readadc 0, b0
debug b0
if b0<10 goto lejos
if b0>10 and <90 goto medio
if b0>90 goto cerca

Lejos:
high B.0
pause 1000
low B.0
pause 1000
goto inicio

medio:
high B.0
pause 500
low B.0
pause 500
goto inicio

cerca:
high B.0
pause 100
low B.0
pause 100
goto inicio

Código del programa "Cambio de color en luz de una plaza de parking de centro comercial"

inicio:
readadc 0, b0
debug b0
if b0<10 goto coche 'el sensor detecta coche
if b0>10 goto nada  ' El sensor no detecta coche

nada:  'No hay coche
high B.0 'Led verde encendido
low B.1 'Led Rojo apagado
goto inicio

coche:  'Hay coche aparcado
low B.0 'Led verde apagado
high B.1 'Led Rojo encendido
goto inicio