Led intermitente pic 16f887

;**********************************************************************************
;EJERCICIO_1.asm; LED intermitente;**********************************************************************************
LIST P=16F887 ;
;**********************************************************************************
; Registros y constantes propios del micro
F EQU 1 ; Destino F.
W EQU 0 ; DestinoW.
STATUS EQU 03 ; Dirección del registro de estado.
RP0 EQU 5 ; Bit RP0 del registro de estado.
RP1 EQU 6 ; Bit RP1 del registro de estado.
PORTA EQU 05 ; Dirección del puerto A.
INTCONEQU 0B ; Dirección del registro INTCON.
ANSEL EQU 188 ; Dirección de ANSEL.
ANSELH EQU 189 ; Dirección de ANSEL.
;Configuración de conversor A/D;**********************************************************************************
;Registros particulares del programa
CONT1 EQU 20 ; Dirección para el CONT1
CONT2 EQU 21 ; Dirección para el CONT2;**********************************************************************************
;Asignación de puertos
P_LED EQU PORTA ; Puerto del LED.
b_LED EQU 0 ; Posición, bit, del LED en el puerto.;**********************************************************************************
;**********************************************************************************
;Inicio de programa. Dirección de Reset;**********************************************************************************
;**********************************************************************************
ORG 003 ; La dirección donde empieza elprograma,(Reset)
GOTO PROGPPAL ; Salto al programa principal.
;**********************************************************************************
;Programa principal;**********************************************************************************
PROGPPAL:
;****** Inicializaciones
BSF STATUS,RP0 ; Estas dos instrucciones sirven para cambiar
BSF STATUS,RP1 ; de banco, concretamente al 3...