BSF PORTB,0 ;Pongo a 1 a RB0
BTFSS PORTA,0 ;¿RA0 es 1?
GOTO EMERGENCIA ;No, es 0. Voy a apagar los electrodomesticos
CALL DELAY_MS ;Si, es 1. Voy al retardo de 500 ms, cuando termina el retardo, vuelvo a ca por medio del RETURN
BSF PORTB,1 ;Pongo a 1 a RB1
BTFSS PORTA,0 ;¿RA0 es 1?
GOTO EMERGENCIA ;No, es 0. Voy a apagar los electrodomesticos
CALL DELAY_MS ;Si, es 1. idem anterior.
......
......