LIST P=16F886
#INCLUDE <p16F886.inc>
__CONFIG _CONFIG1, _DEBUG_OFF & _LVP_OFF & _FCMEN_OFF & _IESO_OFF & _BOR_OFF & _CPD_OFF & _CP_OFF & _MCLRE_ON & _PWRTE_ON & _WDT_OFF & _INTOSCIO
__CONFIG _CONFIG2, _WRT_OFF & _BOR40V
#DEFINE RS PORTC,0
#DEFINE RW PORTC,1
#DEFINE ENABLE PORTC,2
CBLOCK 20H
BUSY_REG
CONT
ENDC
RESET ORG 00H
GOTO MAIN
ORG 04H
GOTO ISR
ORG 05H
MAIN CLRF PORTA ;BANCO 0
CLRF PORTB
CLRF PORTC
BSF STATUS,RP0 ;BANCO 3
BSF STATUS,RP1
MOVLW B'00000001'
MOVWF ANSEL ;ENTRADA RA0 COMO ANALOGICA
CLRF ANSELH
BCF STATUS,RP1 ;BANCO1
MOVLW B'00000001'
MOVWF TRISA
CLRF TRISB
CLRF TRISC
MOVLW B'00000111'
MOVWF OPTION_REG
BCF STATUS,RP0 ;BANCO 0
BCF STATUS,RP1
MOVLW D'60'
MOVWF TMR0
MOVLW B'10100000'
MOVWF INTCON
MOVLW D'20'
MOVWF CONT
LOOP NOP
GOTO LOOP
ISR DECFSZ CONT,F
GOTO FIN
MOVLW D'20'
MOVWF CONT
BTFSS PORTC,7
GOTO ON_LED
BCF PORTC,7
GOTO FIN
ON_LED BSF PORTC,7
FIN MOVLW D'60'
MOVWF TMR0
BCF INTCON,2
RETFIE
END