
led var Portb.0 ;Llamamos led al puerto B2
ldr1 var Portb.1 ;Llamamos ldr1 al puerto B0
ldr2 var Portb.2 ;Llamamos ldr2 al puerto B1
b0 var BYTE
b1 var BYTE
b2 var BYTE
Inicio:
POT ldr1,255,b0
POT ldr2,255,b1
if b0 = b1 then ledon ;Si b0 es = a b1 ir a ledon
if b0 > b1 then apaga ;Si b0 es mayor que b1 ir a apaga
if b1 > b0 then apaga ;Si b1 es mayor que b0 ir a apaga
ledon:
high led ;Enciende el led
goto inicio ;Vuelve al inicio
apaga:
b2 = b0 - b1 ;Compara b0 y b1 y le da el valor a b2
b2 = b1 - b0 ;Compara b1 y b0 y le da el valor a b2
if b2 > 15 then ledoff ;Si la diferencia entre b0 y b1 es decir b2 es mayo de 15 va a ledoff
goto ledon
ledoff:
low led ;Apaga el puerto B2 (led apagado)
goto inicio ;Vuelve al inicio
end ;Fin del programa
Bueno espero que a la gente como a mi, un recien llegado a esto de los microcontroladores les sea de utilidad!
No hay comentarios :
Publicar un comentario