; Generated by WinDis84, (c) Nigel Goodwin 1998.
LIST P=16F84,
F=INHX8M
include
"P16FXX.inc"
ORG 0x0000
GOTO
Label_0001
ORG 0x0004
Label_0007 MOVLW
0xA5
BCF STATUS ,
RP1
BCF STATUS ,
RP0
MOVWF 0x4A
Label_0002 DECFSZ
0x4A ,
f
GOTO
Label_0002
NOP
NOP
RETURN
Label_0008 MOVLW
0x19
BCF STATUS ,
RP1
BCF STATUS ,
RP0
MOVWF 0x4A
Label_0003 DECFSZ
0x4A ,
f
GOTO
Label_0003
NOP
NOP
RETURN
Label_0010 MOVLW
0x10
BCF STATUS ,
RP1
BCF STATUS ,
RP0
MOVWF 0x4A
Label_0004 DECFSZ
0x4A ,
f
GOTO
Label_0004
NOP
RETURN
Label_0013
NOP
RETURN
Label_0025 BCF STATUS
, RP1
BCF STATUS ,
RP0
MOVF 0x14 ,
W
MOVWF
0x41
MOVLW
0x01
MOVWF
0x40
MOVF 0x41 ,
W
Label_0006 BTFSC STATUS ,
Z
GOTO
Label_0005
RLF 0x40 ,
f
BCF 0x40 ,
00
ORG
0x002C
GOTO Label_0006
Label_0005 MOVF
0x40 ,
W
MOVWF
0x16
COMF 0x40 ,
f
MOVF 0x40 ,
W
MOVWF
0x17
MOVF 0x13 ,
W
MOVWF
FSR
MOVF 0x40 ,
W
ANDWF INDF ,
f
BSF FSR ,
07
MOVF 0x17 ,
W
ANDWF INDF ,
f
CALL
Label_0007
MOVF 0x16 ,
W
IORWF INDF ,
f
BCF FSR ,
07
CALL
Label_0008
MOVF 0x16 ,
W
ANDWF INDF ,
W
MOVWF
0x15
CALL
Label_0007
MOVF 0x15 ,
W
MOVWF
0x40
RETURN
Label_0026 BCF STATUS
, RP1
BCF STATUS ,
RP0
MOVF 0x14 ,
W
MOVWF
0x41
MOVLW
0x01
MOVWF
0x40
MOVF 0x41 ,
W
Label_000A BTFSC STATUS ,
Z
GOTO
Label_0009
RLF 0x40 ,
f
BCF 0x40 ,
00
ORG
0x0051
GOTO Label_000A
Label_0009 MOVF
0x40 ,
W
MOVWF
0x18
COMF 0x40 ,
W
MOVWF
0x19
CLRF 0x16
Label_000F MOVF
0x16 ,
W
MOVWF
0x40
MOVF 0x15 ,
W
MOVWF
0x17
MOVF 0x40 ,
W
Label_000C BTFSC STATUS ,
Z
GOTO
Label_000B
RRF 0x17 ,
f
BCF 0x17 ,
07
ORG
0x0061
GOTO Label_000C
Label_000B MOVLW
0x01
ANDWF 0x17 ,
f
MOVF 0x13 ,
W
MOVWF
FSR
MOVF 0x19 ,
W
ANDWF INDF ,
f
BSF FSR ,
07
MOVF 0x19 ,
W
ANDWF INDF ,
f
BCF FSR ,
07
MOVF 0x17 ,
W
XORLW
0x00
BTFSC STATUS ,
Z
GOTO
Label_000D
BSF FSR ,
07
MOVF 0x18 ,
W
IORWF INDF ,
f
BCF FSR ,
07
Label_000D CALL
Label_0008
BSF FSR ,
07
MOVF 0x18 ,
W
IORWF INDF ,
f
BCF FSR ,
07
MOVF 0x16 ,
W
XORLW
0x07
BTFSC STATUS ,
Z
GOTO
Label_000E
INCF 0x16 ,
f
GOTO Label_000F
Label_000E CALL
Label_0010
CALL
Label_0010
RETURN
Label_0028 BCF STATUS
, RP1
BCF STATUS ,
RP0
CLRF
0x15
MOVF 0x14 ,
W
MOVWF
0x41
MOVLW
0x01
MOVWF
0x40
MOVF 0x41 ,
W
Label_0012 BTFSC STATUS ,
Z
GOTO
Label_0011
RLF 0x40 ,
f
BCF 0x40 ,
00
ORG
0x008F
GOTO Label_0012
Label_0011 MOVF
0x40 ,
W
MOVWF
0x17
COMF 0x40 ,
W
MOVWF
0x18
CLRF 0x16
Label_0018 MOVF
0x13 ,
W
MOVWF
FSR
MOVF 0x18 ,
W
ANDWF INDF ,
f
BSF FSR ,
07
MOVF 0x18 ,
W
ANDWF INDF ,
f
CALL
Label_0013
MOVF 0x17 ,
W
IORWF INDF ,
f
BCF FSR ,
07
CALL
Label_0013
MOVF 0x17 ,
W
ANDWF INDF ,
W
MOVWF
0x41
MOVF 0x41 ,
W
XORLW
0x00
BTFSC STATUS ,
Z
GOTO
Label_0014
MOVF 0x16 ,
W
MOVWF
0x41
MOVLW
0x01
MOVWF
0x40
MOVF 0x41 ,
W
Label_0016 BTFSC STATUS ,
Z
GOTO
Label_0015
RLF 0x40 ,
f
BCF 0x40 ,
00
ORG
0x00B2
GOTO Label_0016
Label_0015 MOVF
0x40 ,
W
IORWF 0x15 , f
Label_0014
CALL
Label_0010
CALL
Label_0010
MOVF 0x16 ,
W
XORLW
0x07
BTFSC STATUS ,
Z
GOTO
Label_0017
INCF 0x16 ,
f
GOTO Label_0018
Label_0017 MOVF
0x15 ,
W
MOVWF
0x40
RETURN
Label_0038 BCF STATUS
, RP1
BCF STATUS ,
RP0
MOVF 0x13 ,
W
XORLW
0x00
BTFSS STATUS ,
Z
GOTO
Label_0019
BCF PORTB ,
00
BCF PORTB ,
01
BCF PORTB ,
02
BCF PORTB ,
03
BCF PORTB ,
04
BCF PORTB ,
05
BSF PORTB ,
06
GOTO Label_001A
Label_0019 MOVF
0x13 ,
W
XORLW
0x01
BTFSS STATUS ,
Z
GOTO
Label_001B
BSF PORTB ,
00
BCF PORTB ,
01
BCF PORTB ,
02
BSF PORTB ,
03
BSF PORTB ,
04
BSF PORTB ,
05
BSF PORTB ,
06
GOTO Label_001A
Label_001B MOVF
0x13 ,
W
XORLW
0x02
BTFSS STATUS ,
Z
GOTO
Label_001C
BCF PORTB ,
00
BCF PORTB ,
01
BSF PORTB ,
02
BCF PORTB ,
03
BCF PORTB ,
04
BSF PORTB ,
05
BCF PORTB ,
06
GOTO Label_001A
Label_001C MOVF
0x13 ,
W
XORLW
0x03
BTFSS STATUS ,
Z
GOTO
Label_001D
BCF PORTB ,
00
BCF PORTB ,
01
BCF PORTB ,
02
BCF PORTB ,
03
BSF PORTB ,
04
BSF PORTB ,
05
BCF PORTB ,
06
GOTO Label_001A
Label_001D MOVF
0x13 ,
W
XORLW
0x04
BTFSS STATUS ,
Z
GOTO
Label_001E
BSF PORTB ,
00
BCF PORTB ,
01
BCF PORTB ,
02
BSF PORTB ,
03
BSF PORTB ,
04
BCF PORTB ,
05
BCF PORTB ,
06
GOTO Label_001A
Label_001E MOVF
0x13 ,
W
XORLW
0x05
BTFSS STATUS ,
Z
GOTO
Label_001F
BCF PORTB ,
00
BSF PORTB ,
01
BCF PORTB ,
02
BCF PORTB ,
03
BSF PORTB ,
04
BCF PORTB ,
05
BCF PORTB ,
06
GOTO Label_001A
Label_001F MOVF
0x13 ,
W
XORLW
0x06
BTFSS STATUS ,
Z
GOTO
Label_0020
BCF PORTB ,
00
BSF PORTB ,
01
BCF PORTB ,
02
BCF PORTB ,
03
BCF PORTB ,
04
BCF PORTB ,
05
BCF PORTB ,
06
GOTO Label_001A
Label_0020 MOVF
0x13 ,
W
XORLW
0x07
BTFSS STATUS ,
Z
GOTO
Label_0021
BCF PORTB ,
00
BCF PORTB ,
01
BCF PORTB ,
02
BSF PORTB ,
03
BSF PORTB ,
04
BSF PORTB ,
05
BSF PORTB ,
06
GOTO Label_001A
Label_0021 MOVF
0x13 ,
W
XORLW
0x08
BTFSS STATUS ,
Z
GOTO
Label_0022
BCF PORTB ,
00
BCF PORTB ,
01
BCF PORTB ,
02
BCF PORTB ,
03
BCF PORTB ,
04
BCF PORTB ,
05
BCF PORTB ,
06
GOTO Label_001A
Label_0022 MOVF
0x13 ,
W
XORLW
0x09
BTFSS STATUS ,
Z
GOTO
Label_001A
BCF PORTB ,
00
BCF PORTB ,
01
BCF PORTB ,
02
BCF PORTB ,
03
BSF PORTB ,
04
BCF PORTB ,
05
BCF PORTB ,
06
GOTO Label_001A
Label_001A RETURN
Label_0035
BCF STATUS ,
RP1
BCF STATUS ,
RP0
CLRF
0x48
MOVLW
0x08
MOVWF 0x4C
Label_0024 RLF
0x40 ,
W
RLF 0x48 ,
f
MOVF 0x44 ,
W
SUBWF 0x48 ,
f
BTFSC STATUS ,
C
GOTO
Label_0023
ADDWF 0x48 ,
f
BCF STATUS , C
Label_0023
RLF 0x40 ,
f
DECFSZ 0x4C ,
f
GOTO
Label_0024
RETURN
Label_0001 MOVLW
0x01
BCF STATUS ,
RP1
BSF STATUS ,
RP0
MOVWF
TRISA
CLRF
TRISB
MOVLW
0xFF
BCF STATUS ,
RP0
MOVWF
PORTB
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
CALL
Label_0025
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
MOVLW
0xCC
MOVWF
0x15
CALL
Label_0026
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
MOVLW
0x4E
MOVWF
0x15
CALL
Label_0026
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
MOVLW
0x65
MOVWF
0x15
CALL
Label_0026
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
MOVLW
0x81
MOVWF
0x15
CALL
Label_0026
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
CLRF
0x15
CALL
Label_0026
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
CALL
Label_0025
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
MOVLW
0xCC
MOVWF
0x15
CALL
Label_0026
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
MOVLW
0x48
MOVWF
0x15
CALL Label_0026
Label_0041 MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
CALL
Label_0025
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
MOVLW
0xCC
MOVWF
0x15
CALL
Label_0026
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
MOVLW
0x44
MOVWF
0x15
CALL
Label_0026
MOVLW
0x21
MOVWF 0x4A
Label_0027 DECFSZ
0x4A ,
f
GOTO
Label_0027
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
CALL
Label_0025
MOVF 0x40 ,
W
MOVWF
0x0C
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
MOVLW
0xCC
MOVWF
0x15
CALL
Label_0026
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
MOVLW
0xBE
MOVWF
0x15
CALL
Label_0026
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
CALL
Label_0028
MOVF 0x40 ,
W
MOVWF
0x0D
MOVLW
0x05
MOVWF
0x13
MOVLW
0x04
MOVWF
0x14
CALL
Label_0028
MOVF 0x40 ,
W
MOVWF
0x0E
CLRF
0x0F
CLRF
0x10
CLRF
0x11
CLRF
0x12
MOVLW
0x00
BTFSC 0x0D ,
04
MOVLW
0x01
MOVWF
0x41
MOVF 0x41 ,
W
XORLW
0x01
BTFSS STATUS ,
Z
GOTO
Label_0029
INCF 0x0F ,
f
Label_0029 MOVLW
0x00
BTFSC 0x0D ,
05
MOVLW
0x01
MOVWF
0x41
MOVF 0x41 ,
W
XORLW
0x01
BTFSS STATUS ,
Z
GOTO
Label_002A
MOVLW
0x02
ADDWF 0x0F , f
Label_002A
MOVLW
0x00
BTFSC 0x0D ,
06
MOVLW
0x01
MOVWF
0x41
MOVF 0x41 ,
W
XORLW
0x01
BTFSS STATUS ,
Z
GOTO
Label_002B
MOVLW
0x04
ADDWF 0x0F , f
Label_002B
MOVLW
0x00
BTFSC 0x0D ,
07
MOVLW
0x01
MOVWF
0x41
MOVF 0x41 ,
W
XORLW
0x01
BTFSS STATUS ,
Z
GOTO
Label_002C
MOVLW
0x08
ADDWF 0x0F , f
Label_002C
MOVLW
0x01
ANDWF 0x0E ,
W
MOVWF
0x41
MOVF 0x41 ,
W
XORLW
0x01
BTFSS STATUS ,
Z
GOTO
Label_002D
MOVLW
0x10
ADDWF 0x0F , f
Label_002D
MOVLW
0x00
BTFSC 0x0E ,
01
MOVLW
0x01
MOVWF
0x41
MOVF 0x41 ,
W
XORLW
0x01
BTFSS STATUS ,
Z
GOTO
Label_002E
MOVLW
0x20
ADDWF 0x0F , f
Label_002E
MOVLW
0x00
BTFSC 0x0E ,
02
MOVLW
0x01
MOVWF
0x41
MOVF 0x41 ,
W
XORLW
0x01
BTFSS STATUS ,
Z
GOTO
Label_002F
MOVLW
0x40
ADDWF 0x0F , f
Label_002F
MOVLW
0x00
BTFSC 0x0D ,
03
MOVLW
0x01
MOVWF
0x41
MOVF 0x41 ,
W
XORLW
0x01
BTFSS STATUS ,
Z
GOTO
Label_0030
MOVLW
0x01
MOVWF 0x10
Label_0030 MOVLW
0x00
BTFSC 0x0E ,
07
MOVLW
0x01
MOVWF
0x41
MOVF 0x41 ,
W
XORLW
0x01
BTFSS STATUS ,
Z
GOTO
Label_0031
CLRF
0x11
CLRF
0x12
GOTO Label_0032
Label_0031 MOVLW
0x0A
SUBWF 0x0F ,
W
BTFSC STATUS ,
C
GOTO
Label_0033
CLRF
0x11
MOVF 0x0F ,
W
MOVWF
0x12
GOTO Label_0032
Label_0033 MOVLW
0x64
SUBWF 0x0F ,
W
BTFSS STATUS ,
C
GOTO
Label_0034
MOVLW
0x09
MOVWF
0x11
MOVLW
0x09
MOVWF
0x12
MOVLW
0x01
MOVWF
0x10
GOTO Label_0032
Label_0034 MOVLW
0x0A
MOVWF
0x44
MOVF 0x0F ,
W
MOVWF
0x40
CALL
Label_0035
MOVF 0x40 ,
W
MOVWF
0x11
MOVLW
0x0A
MOVWF
0x44
MOVF 0x0F ,
W
MOVWF
0x40
CALL
Label_0035
MOVF 0x48 ,
W
MOVWF
0x40
MOVF 0x40 ,
W
MOVWF 0x12
Label_0032 MOVF
0x10 ,
W
XORLW
0x01
BTFSS STATUS ,
Z
GOTO
Label_0036
BCF PORTB ,
07
GOTO Label_0037
Label_0036
BSF PORTB ,
07
Label_0037 BCF PORTA
, 03
BSF PORTA ,
02
MOVF 0x11 ,
W
MOVWF
0x13
CALL
Label_0038
MOVLW
0x03
MOVWF
0x4B
MOVLW
0xFF
MOVWF 0x4A
Label_003B DECFSZ
0x4B ,
f
GOTO
Label_0039
GOTO Label_003A
Label_0039 DECFSZ
0x4A ,
f
GOTO
Label_0039
GOTO Label_003B
Label_003A MOVLW
0x96
MOVWF 0x4A
Label_003C DECFSZ
0x4A ,
f
GOTO
Label_003C
BSF PORTA ,
03
BCF PORTA ,
02
MOVF 0x12 ,
W
MOVWF
0x13
CALL
Label_0038
MOVLW
0x03
MOVWF
0x4B
MOVLW
0xFF
MOVWF 0x4A
Label_003F DECFSZ
0x4B ,
f
GOTO
Label_003D
GOTO Label_003E
Label_003D DECFSZ
0x4A ,
f
GOTO
Label_003D
GOTO Label_003F
Label_003E MOVLW
0x96
MOVWF 0x4A
Label_0040 DECFSZ
0x4A ,
f
GOTO
Label_0040
GOTO Label_0041
Label_0042 GOTO
Label_0042
ORG
0x2000
DATA
0x0F
DATA
0x0F
DATA
0x0F
DATA
0x0F
ORG
0x2007
DATA
0x1E
ORG
0x2100
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA
0xFF
DATA 0xFF
END