processor P16f88
    include   <p16f88.inc>
    __CONFIG  _CONFIG1,3F50
    __CONFIG  _CONFIG2,3FFC

    ORG     0X00
CONTVAL EQU 0x40
    GOTO    INICIO

INICIO
    BCF     STATUS,RP1
    BCF     STATUS,RP0 ;BANCO 0
    CLRF    ANSEL
    MOVLW   0X1F
    MOVWF   FSR
    CLRF    INDF
    MOVLW   .0
    MOVWF   CONTVAL



LOOP

    INCF    FSR,F
    INCF    CONTVAL,F
    MOVF    CONTVAL,W
    MOVWF   INDF
    BTFSS   CONTVAL,5
    GOTO    LOOP

    END