SoloCodigo

este es un pequño ejemplo de hacer parpadear un led con un retardo de 1 seg pero no comete su objetivo el led se vuelve intermitente y quisiera saber que estoy haciendo mal, ahora que configuracion debo hacer en el epicwin para poder utilizar un cristal de 20Mhz
   List P=16F877A
   Include "P16F877A.INC"

PDel0   EQU   0x20
PDel1   EQU   0x21
PDel2   EQU   0x22

#Define   BANCO_H   bsf   STATUS,RP1
#Define   BANCO_L   bcf   STATUS,RP1
#Define   BANCO1   bsf   STATUS,RP0
#Define   BANCO0   bcf   STATUS,RP0


#Define   BAUD   D'100'            ; Baud Rate Deseada en kbps
#Define   FOSC   D'4000'            ; Frecuencia del oscillator en kHz

   __config      (_CP_OFF & _DEBUG_OFF & _WRT_ENABLE_OFF & _CPD_OFF & _LVP_OFF & _BODEN_ON & _PWRTE_ON & _WDT_OFF & _XT_OSC)
    no se que significa esto alguien puede ayudarme?????????
      org      0
      
      goto   INICIO
;************************************************************************************************
;               PROGRAMA PRINCIPAL
;************************************************************************************************
INICIO   BANCO_L
      BANCO1
      MOVLW   B'00000111'   
      MOVWF   ADCON1      ;SELECIONO LA OPCION DE E/S DIGITALES
      CLRF   TRISA      ;PORTA SON SALIDAS
      
      BANCO0
      CLRF   PORTA
   BUCLE   BSF   PORTA,0
      CALL   DEMORA
      BCF   PORTA,0
      CALL   DEMORA
                                GOTO        BUCLE

DEMORA  movlw     .14       ; 1 set numero de repeticion  ©
        movwf     PDel0     ; 1 |
PLoop0  movlw     .72       ; 1 set numero de repeticion  (
        movwf     PDel1     ; 1 |
PLoop1  movlw     .247      ; 1 set numero de repeticion  (A)
        movwf     PDel2     ; 1 |
PLoop2  clrwdt              ; 1 clear watchdog
        decfsz    PDel2, 1  ; 1 + (1) es el tiempo 0  ? (A)
        goto      PLoop2    ; 2 no, loop
        decfsz    PDel1,  1 ; 1 + (1) es el tiempo 0  ? (
        goto      PLoop1    ; 2 no, loop
        decfsz    PDel0,  1 ; 1 + (1) es el tiempo 0  ? ©
        goto      PLoop0    ; 2 no, loop
PDelL1  goto PDelL2         ; 2 ciclos delay
PDelL2  clrwdt              ; 1 ciclo delay
        return              ; 2+2 Fin.
      
   

      END