TANQUE DE AGUA

led var portb.0     ;etiqueta para el puerto b.0
boton1 var portb.1
boton2 var portb.2
boton3 var portb.3
boton4 var portb.4
buzzer var portb.5

high buzzer
pause 200
low buzzer

pepe:               ; subrutina pepe
    high led        ;encender la bomba
         ;esperar 1000 milisegundos (1 segundo)
if boton1 = 1 then low led  ; se paga la bomba tanque
if boton2 = 1 then high led ; se activa la bomba tanque
if boton3 = 1 then low led: high buzzer:pause 1000 ; apaga la bomba hasta que este lleno  
if boton4 = 1 then high led ; se activa la bomba para llenar el otro tanque 
goto pepe           ;
end                 ;fin de las instrucciones