; original File = I:\PIC\ZKOUSKA\LED1.HEX

    processor 16F84A
    #include <P16F84A.INC>
    __config _CP_OFF & _PWRTE_ON & _WDT_OFF & _XT_OSC ; 0x3FF1

; RAM-Variable
LRAM_0x30 equ 0x30
LRAM_0x31 equ 0x31
LRAM_0x32 equ 0x32

; Program

    Org 0x0000

;   Reset-Vector
    BSF STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
    BCF PORTA,0          ; !!Bank!! PORTA - TRISA
    BCF STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
LADR_0x0003
    BSF PORTA,0          ; !!Bank!! PORTA - TRISA
;   Interrupt-Vector
    CALL LADR_0x0008
    BCF PORTA,0          ; !!Bank!! PORTA - TRISA
    CALL LADR_0x0008
    GOTO LADR_0x0003
LADR_0x0008
    MOVLW 0x06
    MOVWF LRAM_0x32
LADR_0x000A
    MOVLW 0xF0
    MOVWF LRAM_0x30
LADR_0x000C
    MOVLW 0xF0
    MOVWF LRAM_0x31
LADR_0x000E
    DECFSZ LRAM_0x31,F
    GOTO LADR_0x000E
    DECFSZ LRAM_0x30,F
    GOTO LADR_0x000C
    DECFSZ LRAM_0x32,F
    GOTO LADR_0x000A
    RETURN

    End
