;PROGRAMA QUE ENCIENDE UN LED CON UN PULSADOR Y LO APAGA CON OTRO
;CONFIGURACION DE BITS
__CONFIG 3F58
;DECLARACION DE REGISTROS ESPECIALES
STATUS EQU 0X03
PORTB EQU 0X06
TRISB EQU 0X86
PORTA EQU 0X05
TRISA EQU 0X85
CMCON EQU 0X1F
;DECLARACION DE VARIABLES
;VECTOR DE INICIO
ORG 0X00
;CONFIGURACION DE PUERTOS
MOVLW D'7'
MOVWF CMCON
BSF STATUS,5
MOVLW B'00000011'
MOVWF TRISA
CLRF TRISB
BCF STATUS,5
;PROGRAMA PRINCIPAL
CLRF PORTB
INICIO:
BTFSS PORTA,1
GOTO CERO
GOTO UNO
CERO:
BTFSS PORTA,0
GOTO INICIO
GOTO ENCENDIDO
UNO:
BTFSS PORTA,0
GOTO APAGADO
GOTO INICIO
ENCENDIDO:
BSF PORTB,0
GOTO INICIO
APAGADO:
BCF PORTB,0
GOTO INICIO
END