; Generated by WinDis84, (c) Nigel Goodwin 1998.

            LIST      P=16C84, F=INHX8M
            include "P16CXX.inc"
            ORG     0x0000

            GOTO    Label_0001
            ORG     0x0004
            MOVWF   0x0C
            SWAPF   STATUS    , W
            MOVWF   0x0D
            CLRWDT
            INCF    0x0E      , f
            BTFSC   STATUS    , Z
            DECF    0x0E      , f
            INCF    0x18      , f
            BTFSC   STATUS    , Z
            INCF    0x17      , f
            BTFSC   STATUS    , Z
            INCFSZ  0x16      , f
            GOTO    Label_0002
            MOVLW   0xFC
            MOVWF   0x16
            MOVLW   0x6C
            MOVWF   0x17
            MOVLW   0x79
            MOVWF   0x18
            BSF     0x11      , 01
Label_0002  SWAPF   0x0D      , W
            MOVWF   STATUS
            SWAPF   0x0C      , f
            SWAPF   0x0C      , W
            BCF     INTCON    , T0IF
            RETFIE
Label_0007  ADDWF   PCL       , f
            RETLW   0xC1
            RETLW   0xBE
            RETLW   0xBE
            RETLW   0xBE
            RETLW   0xC1
            RETLW   0xFF
            RETLW   0xDE
            RETLW   0x80
            RETLW   0xFE
            RETLW   0xFF
            RETLW   0xDE
            RETLW   0xBC
            RETLW   0xBA
            RETLW   0xB6
            RETLW   0xCE
            RETLW   0xBD
            RETLW   0xBE
            RETLW   0xAE
            RETLW   0x96
            RETLW   0xB9
            RETLW   0xF3
            RETLW   0xEB
            RETLW   0xDB
            RETLW   0x80
            RETLW   0xFB
            RETLW   0x8D
            RETLW   0xAE
            RETLW   0xAE
            RETLW   0xAE
            RETLW   0xB1
            RETLW   0xE1
            RETLW   0xD6
            RETLW   0xB6
            RETLW   0xB6
            RETLW   0xF9
            RETLW   0xBF
            RETLW   0xB8
            RETLW   0xB7
            RETLW   0xAF
            RETLW   0x9F
            RETLW   0xC9
            RETLW   0xB6
            RETLW   0xB6
            RETLW   0xB6
            RETLW   0xC9
            RETLW   0xCF
            RETLW   0xB6
            RETLW   0xB6
            RETLW   0xB5
            RETLW   0xC3
            RETLW   0xFF
            RETLW   0xC9
            RETLW   0xC9
            RETLW   0xFF
            RETLW   0xFF
Label_0011  MOVLW   0x07
            MOVWF   0x19
            MOVLW   0x12
            MOVWF   0x14
            CLRF    0x15
            CLRF    0x12
            CLRF    0x13
            MOVLW   0xFC
            MOVWF   0x16
            RETLW   0x00
Label_0012  MOVLW   0x00
            TRIS    PORTB
            MOVLW   0x17
            TRIS    PORTA
            RETLW   0x00
Label_0013  BCF     INTCON    , T0IF
            BSF     INTCON    , GIE
            BSF     INTCON    , T0IE
            CLRF    TMR0
            CLRWDT
            MOVLW   0xD8
            OPTION
            CLRF    TMR0
            RETLW   0x00
Label_0014  MOVF    PORTA     , W
            XORWF   0x11      , W
            ANDLW   0x10
            BTFSC   STATUS    , Z
            RETLW   0x00
            XORWF   0x11      , f
            BTFSC   0x11      , 04
            RETLW   0x00
            MOVF    0x0E      , W
            MOVWF   0x0F
            CLRF    0x0E
            CLRF    0x13
            CLRF    0x12
            MOVF    0x10      , W
            SUBWF   0x0F      , W
            BTFSS   STATUS    , C
            GOTO    Label_0003
            SUBLW   0x02
            BTFSS   STATUS    , C
            INCF    0x10      , f
            RETLW   0x00
Label_0003  ADDLW   0x02
            BTFSS   STATUS    , C
            DECF    0x10      , f
            RETLW   0x00
Label_0015  MOVLW   0x05
            XORWF   0x12      , W
            MOVLW   0xFF
            BTFSC   STATUS    , Z
            GOTO    Label_0004
            BCF     STATUS    , C
            RLF     0x13      , W
            ADDWF   PCL       , f
            SWAPF   0x14      , W
            GOTO    Label_0005
            MOVF    0x14      , W
            GOTO    Label_0005
            MOVLW   0x0A
            GOTO    Label_0005
            SWAPF   0x15      , W
            GOTO    Label_0005
            MOVF    0x15      , W
            GOTO    Label_0005
            RETLW   0x00
Label_0005  ANDLW   0x0F
            MOVWF   0x1A
            ADDWF   0x1A      , f
            ADDWF   0x1A      , f
            ADDWF   0x1A      , f
            ADDWF   0x1A      , f
            BTFSS   STATUS    , Z
            GOTO    Label_0006
            MOVF    0x13      , f
            MOVLW   0xFF
            BTFSC   STATUS    , Z
            GOTO    Label_0004
Label_0006  MOVF    0x12      , W
            ADDWF   0x1A      , W
            CALL    Label_0007
Label_0004  MOVWF   PORTB
            MOVLW   0x0C
            SUBWF   0x10      , W
            CALL    Label_0008
            INCF    0x12      , f
            MOVLW   0x06
            XORWF   0x12      , W
            BTFSS   STATUS    , Z
            RETLW   0x00
            CLRF    0x12
            INCF    0x13      , f
            RETLW   0x00
Label_0008  MOVWF   0x1B
Label_0009  DECFSZ  0x1B      , f
            GOTO    Label_0009
            RETURN
Label_0016  MOVF    PORTA     , W
            XORWF   0x19      , W
            ANDLW   0x07
            BTFSC   STATUS    , Z
            RETLW   0x00
            XORWF   0x19      , f
            MOVLW   0x64
            MOVWF   0x1A
Label_000A  MOVLW   0xFF
            CALL    Label_0008
            DECFSZ  0x1A      , f
            GOTO    Label_000A
            BTFSS   0x19      , 02
            GOTO    Label_000B
            BTFSS   0x19      , 01
            GOTO    Label_000C
            BTFSS   0x19      , 00
            GOTO    Label_000D
            RETLW   0x00
Label_000C  MOVLW   0x0A
            MOVWF   0x1A
Label_000E  CALL    Label_000B
            DECFSZ  0x1A      , f
            GOTO    Label_000E
            RETLW   0x00
Label_000D  MOVLW   0x12
            XORWF   0x14      , W
            BTFSC   STATUS    , Z
            GOTO    Label_000F
            MOVLW   0x07
            ADDWF   0x14      , W
            MOVLW   0x07
            BTFSS   STATUS    , DC
            MOVLW   0x01
            ADDWF   0x14      , f
            RETLW   0x00
Label_000F  MOVLW   0x01
            MOVWF   0x14
            RETLW   0x00
Label_0017  BTFSS   0x11      , 01
            RETLW   0x00
            BCF     0x11      , 01
Label_000B  MOVLW   0x07
            ADDWF   0x15      , W
            BTFSC   STATUS    , DC
            GOTO    Label_0010
            INCF    0x15      , f
            RETLW   0x00
Label_0010  MOVWF   0x15
            MOVLW   0x60
            XORWF   0x15      , W
            BTFSS   STATUS    , Z
            RETLW   0x00
            CLRF    0x15
            GOTO    Label_000D
Label_0001  CALL    Label_0011
            CALL    Label_0012
            CALL    Label_0013
Label_0018  CALL    Label_0014
            CALL    Label_0015
            CALL    Label_0016
            CALL    Label_0017
            GOTO    Label_0018
 
            ORG     0x2007
            DATA    0x15
 

            END

