HOLA CON TODOS NUEVAMENTE. SABEN ESTE CIRCUITO LO ESTABA PROBANDO Y NO ME SALIO O FUNCIONO NO SE QUE ESTARA MAL LA PROGRAMACION O EL CIRCUITO AVER SI ME ECHAN UNA MANITO PZ OK.
ESTA ES LA PROGRAMACION, AVER SI ME LO CORRIGEN PZ OK
CMCON = %00011111 ' Pines PortA a Digital (No comparator)
trisa=%00011111 ; puertos A.0, A.1, A.2, A.3 y A.4 como entradas
trisb=%10000000 ; puerto B.7 como entrada
bot_1 var porta.0
bot_2 var porta.1
bot_3 var porta.2
bot_4 var porta.3
bot_5 var porta.4
reset var portb.7
led_1 var portb.0
led_2 var portb.1
led_3 var portb.2
led_4 var portb.3
led_5 var portb.4
soun var portb.5
inicio:
low led_1
low led_2
low led_3
low led_4
low led_5
low soun
if bot_1=0 then
high led_1
HIGH SOUN
goto bucle
endif
if bot_2=0 then
high led_2
HIGH SOUN
goto bucle
endif
if bot_3=0 then
high led_3
HIGH SOUN
goto bucle
endif
if bot_4=0 then
high led_4
HIGH SOUN
goto bucle
endif
if bot_5=0 then
high led_5
HIGH SOUN
goto bucle
endif
goto inicio
bucle:
if reset=0 then
pause 200
goto inicio
else
goto bucle
endif
ESTA ES LA PROGRAMACION, AVER SI ME LO CORRIGEN PZ OK
CMCON = %00011111 ' Pines PortA a Digital (No comparator)
trisa=%00011111 ; puertos A.0, A.1, A.2, A.3 y A.4 como entradas
trisb=%10000000 ; puerto B.7 como entrada
bot_1 var porta.0
bot_2 var porta.1
bot_3 var porta.2
bot_4 var porta.3
bot_5 var porta.4
reset var portb.7
led_1 var portb.0
led_2 var portb.1
led_3 var portb.2
led_4 var portb.3
led_5 var portb.4
soun var portb.5
inicio:
low led_1
low led_2
low led_3
low led_4
low led_5
low soun
if bot_1=0 then
high led_1
HIGH SOUN
goto bucle
endif
if bot_2=0 then
high led_2
HIGH SOUN
goto bucle
endif
if bot_3=0 then
high led_3
HIGH SOUN
goto bucle
endif
if bot_4=0 then
high led_4
HIGH SOUN
goto bucle
endif
if bot_5=0 then
high led_5
HIGH SOUN
goto bucle
endif
goto inicio
bucle:
if reset=0 then
pause 200
goto inicio
else
goto bucle
endif