            GOTO LA0F8
LA001       ADDWF 0x02,1
            GOTO LA2F7
            GOTO LA2E0
            GOTO LA133
            GOTO LB2E1
            GOTO LA2D8
            GOTO LA304
            GOTO LB2FF
            GOTO LA2ED
            GOTO LA2E5
            GOTO LA2EB
LA00C       ADDWF 0x02,1
            RETLW 0x06
            RETLW 0x10
            RETLW 0x20          ; ' '
            RETLW 0x01
            RETLW 0x08
            RETLW 0x19
            RETLW 0x1f
            RETLW 0x40          ; '@'
            RETLW 0x01
            RETLW 0x40          ; '@'
LA017       ADDWF 0x02,1
            RETLW 0x3f          ; '?'
            RETLW 0x6a          ; 'j'
            RETLW 0x05
            RETLW 0x05
            RETLW 0x01
            RETLW 0xb0
            RETLW 0x02
            RETLW 0x3b          ; ';'
            RETLW 0x34          ; '4'
            RETLW 0x4d          ; 'M'
            RETLW 0x59          ; 'Y'
            RETLW 0x02
            RETLW 0x81
            RETLW 0x80
LA026       ADDWF 0x02,1
            RETLW 0x27          ; '''
            RETLW 0x00
            RETLW 0xa1
            RETLW 0x2e          ; '.'
            RETLW 0x4a          ; 'J'
            RETLW 0x01
            RETLW 0x2c          ; ','
            RETLW 0x4f          ; 'O'
            RETLW 0x48          ; 'H'
            RETLW 0x57          ; 'W'
            RETLW 0x45          ; 'E'
            RETLW 0x49          ; 'I'
            RETLW 0x4b          ; 'K'
            RETLW 0x45          ; 'E'
            RETLW 0x49          ; 'I'
            RETLW 0x4e          ; 'N'
            RETLW 0x53          ; 'S'
            RETLW 0x4b          ; 'K'
            RETLW 0x59          ; 'Y'
            RETLW 0xf8
            RETLW 0x20          ; ' '
            RETLW 0x20          ; ' '
            RETLW 0x44          ; 'D'
            RETLW 0x4d          ; 'M'
            RETLW 0x4b          ; 'K'
            RETLW 0x2d          ; '-'
            RETLW 0x58          ; 'X'
            RETLW 0x58          ; 'X'
            RETLW 0x54          ; 'T'
            RETLW 0x56          ; 'V'
            RETLW 0x20          ; ' '
            RETLW 0x20          ; ' '
            RETLW 0x20          ; ' '
            RETLW 0x20          ; ' '
            RETLW 0x46          ; 'F'
            RETLW 0x52          ; 'R'
            RETLW 0x45          ; 'E'
            RETLW 0x45          ; 'E'
            RETLW 0x53          ; 'S'
            RETLW 0x4f          ; 'O'
            RETLW 0x46          ; 'F'
            RETLW 0x54          ; 'T'
            RETLW 0x20          ; ' '
            RETLW 0x20          ; ' '
LA053       ADDWF 0x02,1
            RETLW 0x91
            RETLW 0x61          ; 'a'
LB056       ADDWF 0x02,1
            RETLW 0xd9
            RETLW 0x45          ; 'E'
            RETLW 0x08
            RETLW 0xdb
            RETLW 0x7c          ; '|'
            RETLW 0xf9
            RETLW 0x56          ; 'V'
            RETLW 0xf7
            RETLW 0x58          ; 'X'
            RETLW 0x18
            RETLW 0x22          ; '"'
            RETLW 0x54          ; 'T'
            RETLW 0x38          ; '8'
            RETLW 0xcd
            RETLW 0x3d          ; '='
            RETLW 0x94
            RETLW 0x09
            RETLW 0xe6
            RETLW 0x8e
            RETLW 0x0d
            RETLW 0x9a
            RETLW 0x86
            RETLW 0xfc
            RETLW 0x1c
            RETLW 0xa0
            RETLW 0x19
            RETLW 0x8f
            RETLW 0xbc
            RETLW 0xfd
            RETLW 0x8d
            RETLW 0xd1
            RETLW 0x57          ; 'W'
            RETLW 0x56          ; 'V'
            RETLW 0xf2
            RETLW 0xb6
            RETLW 0x4f          ; 'O'
            RETLW 0xc9
            RETLW 0xbd
            RETLW 0x2a          ; '*'
            RETLW 0xb3
            RETLW 0x9d
            RETLW 0x81
            RETLW 0x5d          ; ']'
            RETLW 0xe0
            RETLW 0x05
            RETLW 0xb5
            RETLW 0xb9
            RETLW 0x26          ; '&'
            RETLW 0x67          ; 'g'
            RETLW 0x3c          ; '<'
            RETLW 0x65          ; 'e'
            RETLW 0xa0
            RETLW 0xba
            RETLW 0x39          ; '9'
            RETLW 0xc7
            RETLW 0xaf
            RETLW 0x33          ; '3'
            RETLW 0x24          ; '$'
            RETLW 0x47          ; 'G'
            RETLW 0xa6
            RETLW 0x20          ; ' '
            RETLW 0x1e
            RETLW 0x14
            RETLW 0x6f          ; 'o'
            RETLW 0x48          ; 'H'
            RETLW 0x9b
            RETLW 0x4d          ; 'M'
            RETLW 0xa6
            RETLW 0xf9
            RETLW 0xd9
            RETLW 0xdf
            RETLW 0x6e          ; 'n'
            RETLW 0xac
            RETLW 0x84
            RETLW 0xfa
            RETLW 0x8b
            RETLW 0x2e          ; '.'
            RETLW 0xb6
            RETLW 0x76          ; 'v'
            RETLW 0x19
            RETLW 0xc1
            RETLW 0xb0
            RETLW 0xa3
            RETLW 0xbb
            RETLW 0x0c
            RETLW 0xfd
            RETLW 0x70          ; 'p'
            RETLW 0x72          ; 'r'
            RETLW 0xca
            RETLW 0x55          ; 'U'
            RETLW 0xef
            RETLW 0xa0
            RETLW 0x7f
            RETLW 0xbf
            RETLW 0x59          ; 'Y'
            RETLW 0xad
LA0B7       ADDWF 0x02,1
            RETLW 0x51          ; 'Q'
            RETLW 0xa0
            RETLW 0x43          ; 'C'
            RETLW 0xd6
            RETLW 0x9f
            RETLW 0xee
            RETLW 0x4f          ; 'O'
            RETLW 0xf3
            RETLW 0xa4
            RETLW 0x04
            RETLW 0xaa
            RETLW 0x38          ; '8'
            RETLW 0xae
            RETLW 0x0f
            RETLW 0x66          ; 'f'
            RETLW 0x1a
            RETLW 0xe9
            RETLW 0x18
            RETLW 0x9e
            RETLW 0x00
            RETLW 0x3c          ; '<'
            RETLW 0xad
            RETLW 0x47          ; 'G'
            RETLW 0xcb
            RETLW 0x68          ; 'h'
            RETLW 0x20          ; ' '
            RETLW 0x33          ; '3'
            RETLW 0x61          ; 'a'
            RETLW 0x90
            RETLW 0xa0
            RETLW 0xba
            RETLW 0xc3
            RETLW 0x22          ; '"'
            RETLW 0x08
            RETLW 0xf2
            RETLW 0xc5
            RETLW 0x9a
            RETLW 0xed
            RETLW 0xe2
            RETLW 0x8f
            RETLW 0x53          ; 'S'
            RETLW 0x5a          ; 'Z'
            RETLW 0x10
            RETLW 0x7f
            RETLW 0xe9
            RETLW 0x85
            RETLW 0x60          ; '`'
            RETLW 0x68          ; 'h'
            RETLW 0x19
            RETLW 0x00
            RETLW 0x87
            RETLW 0x22          ; '"'
            RETLW 0x12
            RETLW 0x9d
            RETLW 0xff
            RETLW 0x14
            RETLW 0xaf
            RETLW 0xca
            RETLW 0x3a          ; ':'
            RETLW 0x7b          ; '{'
            RETLW 0xbc
            RETLW 0x56          ; 'V'
            RETLW 0xf1
            RETLW 0x00
LA0F8       CLRF 0x03
            CLRF 0x04
            BSF 0x03,5          ; switch to page 1
            MOVLW 0xff
            MOVWF 0x05
            MOVWF 0x06
            MOVLW 0x5f
            MOVWF 0x01
            BCF 0x03,5          ; switch to page 0
            CLRF 0x05
            CLRF 0x06
            CLRF 0x0b
            CLRF 0x18
            BSF 0x18,0
            MOVLW 0x0e
            MOVWF 0x1a
LA108       MOVF 0x1a,0
            SUBLW 0x0e
            CALL LA017
            CALL LK35B
            DECFSZ 0x1a,1
            GOTO LA108
LB10E       CALL LJ391
            ADDLW 0xad
            BTFSS 0x03,2
            GOTO LB10E
            CALL LJ391
            MOVWF 0x19
            CALL LJ391
            CALL LJ391
            CALL LJ391
            MOVWF 0x1a
            BCF 0x03,0
            RRF 0x19,0
            BTFSC 0x03,0
            GOTO LC12A
            ADDLW 0xc8
            BTFSS 0x03,0
            GOTO LC12A
            ADDLW 0xf6
            BTFSC 0x03,0
            GOTO LC12A
            ADDLW 0x0a
            MOVWF 0x04
            CALL LA00C
            XORWF 0x1a,0
            MOVF 0x19,0
            CALL LK35B
            MOVF 0x04,0
            GOTO LA001
LC12A       MOVLW 0x90
            CALL LK35B
            MOVLW 0x01
            GOTO LA131
LH12E       MOVLW 0x90
            CALL LK35B
            MOVLW 0x00
LA131       CALL LK35B
            GOTO LB10E
LA133       CLRF 0x10
            CLRF 0x11
            CLRF 0x12
            CLRF 0x13
            CLRF 0x14
            CLRF 0x15
            CLRF 0x16
            CLRF 0x17
            CLRF 0x2c
            MOVLW 0x10
            MOVWF 0x04
            MOVF 0x1b,0
            CALL LA2CE
            MOVWF 0x1c
            CALL LM239
            BCF 0x18,5
            BTFSC 0x0c,5
            BSF 0x18,5
            CALL LM239
            MOVWF 0x1b
            MOVWF 0x2d
            CALL LM239
            MOVWF 0x2f
            XORWF 0x2d,1
            SWAPF 0x2d,1
            RLF 0x0c,0
            RLF 0x0c,0
            ADDWF 0x2d,0
            MOVWF 0x2e
            RLF 0x2e,0
            RLF 0x2e,0
            ADDWF 0x2d,0
            MOVWF 0x0c
            RLF 0x0c,0
            RLF 0x0c,0
            ADDWF 0x2d,1
            CALL LM239
            MOVWF 0x20
            XORWF 0x2e,0
            MOVWF 0x19
            CALL LM239
            CALL LM239
            CALL LM239
            MOVWF 0x23
            CALL LM239
            CALL LM239
            CALL LM239
            CALL LM239
            CALL LM239
            CLRF 0x1a
LA165       CALL LM239
            BTFSC 0x18,2
            GOTO LA16E
            MOVLW 0x1d
            ADDWF 0x1a,0
            MOVWF 0x04
            MOVF 0x0c,0
            XORWF 0x2d,0
            MOVWF 0x00
LA16E       INCF 0x1a,1
            MOVF 0x1a,0
            ADDLW 0xf1
            BTFSS 0x03,2
            GOTO LA165
            BCF 0x18,1
            CLRF 0x2d
            CALL LD22C
            CALL LD22C
            CALL LD22C
            CALL LD22C
            CALL LJ391
            MOVWF 0x1a
            BTFSS 0x18,1
            GOTO LA182
            MOVLW 0x04
            XORWF 0x18,1
            BTFSC 0x18,2
            BSF 0x18,0
            GOTO LH12E
LA182       BTFSS 0x18,2
            GOTO LA18C
            BTFSS 0x2f,0
            GOTO LE1BB
            MOVF 0x23,0
            ANDLW 0x01
            ADDWF 0x20,0
            XORLW 0x9e
            MOVWF 0x1a
            GOTO LE1BB
LA18C       BTFSS 0x18,0
            GOTO LE1BB
            MOVF 0x19,0
            XORLW 0x80
            GOTO LE1BB
            CLRF 0x1a
LA192       MOVLW 0x1d
            ADDWF 0x1a,0
            MOVWF 0x04
            MOVF 0x00,0
            INCF 0x04,1
            XORLW 0x03
            BTFSC 0x03,2
            GOTO LE1BB
            XORLW 0x0a
            BTFSC 0x03,2
            GOTO LA1C3
            XORLW 0x18
            BTFSC 0x03,2
            GOTO LA1CE
            XORLW 0x08
            BTFSC 0x03,2
            GOTO LA1EB
            XORLW 0x04
            BTFSC 0x03,2
            GOTO LA1F1
            XORLW 0x31
            BTFSC 0x03,2
            GOTO LA1FE
            XORLW 0x1c
            BTFSC 0x03,2
            GOTO LA209
            XORLW 0x71
            BTFSC 0x03,2
            GOTO LA216
            XORLW 0x07
            BTFSC 0x03,2
            GOTO LA1C1
            XORLW 0x0f
            BTFSC 0x03,2
            GOTO LA21C
            MOVLW 0xcc
LH1B6       ADDWF 0x1a,1
            MOVF 0x1a,0
            ADDLW 0xf1
            BTFSS 0x03,0
            GOTO LA192
LE1BB       MOVF 0x1a,0
            CLRF 0x1a
LA1BD       CALL LT23A
            INCF 0x1a,1
            BTFSS 0x1a,6
            GOTO LA1BD
LA1C1       BCF 0x18,0
            GOTO LH12E
LA1C3       MOVF 0x00,0
            MOVWF 0x1c
            INCF 0x04,1
            MOVF 0x00,0
            MOVWF 0x1b
            MOVLW 0x63
            CALL LT23A
            MOVLW 0x00
            CALL LT23A
            MOVLW 0x03
            GOTO LH1B6
LA1CE       MOVF 0x00,0
            MOVWF 0x08
            INCF 0x04,1
            MOVF 0x00,0
            MOVWF 0x1c
            INCF 0x04,1
            MOVF 0x00,0
            MOVWF 0x1b
            BTFSS 0x1b,7
            GOTO LC1E9
            MOVF 0x1c,0
            BTFSS 0x03,2
            GOTO LC1E9
            CALL LC310
            CALL LC342
            CALL LC31C
            XORWF 0x08,0
            BTFSC 0x03,2
            GOTO LC1E9
            CLRW
            CALL LB315
            MOVLW 0x26
            XORWF 0x08,1
            SWAPF 0x08,1
            MOVF 0x08,0
            CALL LD332
            CALL LA320
LC1E9       MOVLW 0x03
            GOTO LH1B6
LA1EB       MOVF 0x1a,0
            CALL LT23A
            MOVLW 0x19
            CALL LT23A
            MOVLW 0x01
            GOTO LH1B6
LA1F1       CALL LB224
            CLRW
            CALL LC310
            CALL LC342
            CALL LC31C
LA1F6       CALL LT23A
            DECFSZ 0x2d,1
            GOTO LA1F6
            CALL LT23A
            CLRW
            CALL LT23A
            MOVLW 0x02
            GOTO LH1B6
LA1FE       MOVLW 0xea
            MOVF 0x1a,1
            BTFSS 0x03,2
            MOVLW 0xed
            CALL LT23A
            MOVF 0x1a,0
            CALL LT23A
            MOVLW 0x2c
            CALL LT23A
            MOVLW 0x01
            GOTO LH1B6
LA209       CALL LB224
            INCF 0x2d,1
            CALL LC310
LA20C       CALL LC342
            CALL LT23A
            DECFSZ 0x2d,1
            GOTO LA20C
            CALL LT23A
            MOVLW 0xff
            CALL LT23A
            CALL LC31C
            MOVLW 0x02
            GOTO LH1B6
LA216       MOVF 0x1a,0
            CALL LT23A
            MOVLW 0x41
            CALL LT23A
            MOVLW 0x02
            GOTO LH1B6
LA21C       MOVLW 0x60
            CALL LK35B
            MOVLW 0x1b
            CALL LT23A
            MOVLW 0x60
            CALL LT23A
            MOVLW 0x01
            GOTO LH1B6
LB224       MOVF 0x00,0
            ADDLW 0xe0
            MOVLW 0x60
            BTFSC 0x03,0
            CALL LK35B
            MOVF 0x00,0
            MOVWF 0x2d
            RETURN
LD22C       CALL LJ391
            XORWF 0x2d,1
            XORWF 0x2d,0
            XORWF 0x2d,1
            CALL LT23A
            CALL LT23A
            MOVF 0x2d,0
            XORWF 0x00,0
            BTFSS 0x03,2
            BSF 0x18,1
            INCF 0x04,1
            BCF 0x04,3
            RETLW 0x00
LM239       CALL LJ391
LT23A       BTFSC 0x18,2
            GOTO LA2B0
            MOVWF 0x0c
            MOVLW 0x10
            MOVWF 0x04
            MOVF 0x0c,0
            CALL LC277
            CALL LC277
            CALL LC277
            MOVF 0x00,0
            MOVWF 0x0f
            INCF 0x04,1
            MOVF 0x00,0
            CLRF 0x0e
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            MOVF 0x0f,0
            ADDWF 0x10,1
            BTFSC 0x03,0
            INCF 0x10,1
            MOVLW 0x39
            ADDWF 0x10,1
            MOVF 0x0e,0
            ADDWF 0x11,1
            BTFSC 0x03,0
            INCF 0x11,1
            MOVLW 0x8f
            ADDWF 0x11,1
            MOVF 0x0c,0
            RETURN
LC277       MOVWF 0x0d
            MOVF 0x00,0
            ANDLW 0x00
            CALL LA053
            ADDWF 0x0d,0
            MOVWF 0x0f
            INCF 0x04,1
            MOVF 0x00,0
            SUBWF 0x0f,1
            DECF 0x04,1
            SUBWF 0x00,0
            XORWF 0x0d,0
            CLRF 0x0e
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            BTFSC 0x03,0
            ADDWF 0x0e,1
            RRF 0x0e,1
            RRF 0x0f,1
            MOVLW 0x03
            ADDWF 0x04,1
            MOVF 0x0e,0
            ADDWF 0x00,1
            DECF 0x04,1
            MOVF 0x0f,0
            XORWF 0x00,1
            RLF 0x0d,0
            RLF 0x0d,0
            ADDLW 0x49
            RETURN
LA2B0       MOVWF 0x0c
            XORWF 0x00,1
            SWAPF 0x00,0
            ANDLW 0x0f
            ADDWF 0x1c,0
            CALL LB056
            MOVWF 0x0d
            MOVF 0x00,0
            ANDLW 0x0f
            ADDLW 0x10
            ADDWF 0x1c,0
            CALL LB056
            ADDWF 0x0d,1
            INCF 0x04,1
            BCF 0x04,3
            RLF 0x04,0
            COMF 0x0d,1
            RLF 0x0d,0
            RLF 0x0d,0
            ADDWF 0x0c,0
            MOVWF 0x0d
            SWAPF 0x0d,1
            RLF 0x0d,0
            RLF 0x0d,0
            XORWF 0x00,1
            RLF 0x04,0
            ANDLW 0x20
            XORLW 0x35
            MOVF 0x0c,0
            RETURN
LA2CE       ADDLW 0xc5
            BTFSS 0x03,0
            RETLW 0x00
            ADDLW 0xf6
            BTFSS 0x03,0
            RETLW 0x20          ; ' '
            RETLW 0x40          ; '@'
            RETLW 0x00
            RETLW 0x20          ; ' '
            RETLW 0x40          ; '@'
LA2D8       MOVLW 0x10
            MOVWF 0x04
LA2DA       MOVF 0x00,0
            CALL LK35B
            INCF 0x04,1
            DECFSZ 0x1a,1
            GOTO LA2DA
            GOTO LH12E
LA2E0       BSF 0x18,4
LB2E1       CALL LJ391
            DECFSZ 0x1a,1
            GOTO LB2E1
            GOTO LH12E
LA2E5       CALL LJ391
            BCF 0x18,7
            ANDLW 0xff
            BTFSS 0x03,2
            BSF 0x18,7
            GOTO LH12E
LA2EB       BTFSC 0x18,7
            GOTO LA2EF
LA2ED       MOVLW 0x01
            GOTO LB300
LA2EF       CLRW
LA2F0       MOVWF 0x04
            CALL LA0B7
            CALL LK35B
            INCF 0x04,0
            DECFSZ 0x1a,1
            GOTO LA2F0
            GOTO LH12E
LA2F7       MOVLW 0x00
LC2F8       MOVWF 0x04
            CALL LA026
            CALL LK35B
            INCF 0x04,0
            DECFSZ 0x1a,1
            GOTO LC2F8
            GOTO LH12E
LB2FF       CLRW
LB300       CALL LK35B
            DECFSZ 0x1a,1
            GOTO LB2FF
            GOTO LH12E
LA304       BTFSS 0x18,4
            GOTO LA309
            BCF 0x18,4
            MOVLW 0x13
            GOTO LC2F8
LA309       MOVLW 0x80
            BTFSC 0x18,5
            BTFSS 0x18,1
            GOTO LB300
            MOVLW 0x06
            GOTO LC2F8
LB30F       SLEEP
LC310       CALL LB315
            CALL LB357
            BCF 0x00,3
            MOVLW 0xa1
            GOTO LD332
LB315       ADDWF 0x1b,0
            MOVWF 0x0d
            MOVF 0x1c,0
            BTFSC 0x03,0
            ADDLW 0x01
            MOVWF 0x0e
            GOTO LA325
LC31C       BSF 0x03,5          ; switch to page 1
            BSF 0x06,3
            BCF 0x03,5          ; switch to page 0
            RETURN
LA320       BCF 0x00,2
            BCF 0x00,3
            BSF 0x00,2
            BSF 0x00,3
            RETURN
LA325       MOVLW 0x86
            MOVWF 0x04
            MOVLW 0x0c
            IORWF 0x00,1
            XORLW 0xff
            ANDWF 0x06,1
            BCF 0x00,3
            MOVLW 0xa0
            CALL LD332
            COMF 0x0e,0
            ANDLW 0x1f
            CALL LD332
            COMF 0x0d,0
LD332       MOVWF 0x0c
            MOVLW 0x08
LA334       BCF 0x00,2
            BTFSC 0x0c,7
            BSF 0x00,3
            BTFSS 0x0c,7
            BCF 0x00,3
            BSF 0x00,2
            RLF 0x0c,1
            ADDLW 0xff
            BTFSS 0x03,2
            GOTO LA334
            CALL LB357
            BTFSC 0x06,3
            BSF 0x18,6
            RETLW 0x00
LC342       MOVLW 0x86
            MOVWF 0x04
            CLRF 0x0c
            BSF 0x0c,0
            BCF 0x03,0
            BCF 0x00,2
            BSF 0x00,3
LA349       BCF 0x00,2
            RLF 0x0c,1
            BSF 0x00,2
            BTFSC 0x06,3
            BSF 0x0c,0
            BTFSS 0x03,0
            GOTO LA349
            SWAPF 0x0c,1
            MOVF 0x0c,0
            BCF 0x00,2
            BCF 0x00,3
            BSF 0x00,2
            XORLW 0x26
            RETURN
LB357       BCF 0x00,2
            BSF 0x00,3
            BSF 0x00,2
            RETURN
LK35B       MOVWF 0x0c
            BCF 0x06,7
            MOVLW 0x0f
            MOVWF 0x0e
LA35F       MOVLW 0x02
            MOVWF 0x0d
LA361       NOP
            NOP
            MOVLW 0x16
LA364       ADDLW 0xff
            BTFSS 0x03,2
            GOTO LA364
            DECFSZ 0x0d,1
            GOTO LA361
            BSF 0x03,5          ; switch to page 1
            BCF 0x06,7
            NOP
            MOVLW 0x0e
LA36D       ADDLW 0xff
            BTFSS 0x03,2
            GOTO LA36D
            CALL LB3C2
            MOVWF 0x0d
            RRF 0x0d,0
            MOVLW 0x09
            MOVWF 0x0d
LA375       RLF 0x0c,1
            BTFSS 0x03,0
            BSF 0x06,7
            BTFSC 0x03,0
            BCF 0x06,7
            NOP
            MOVLW 0x15
LA37C       ADDLW 0xff
            BTFSS 0x03,2
            GOTO LA37C
            DECFSZ 0x0d,1
            GOTO LA375
            NOP
            MOVLW 0x01
LA383       ADDLW 0xff
            BTFSS 0x03,2
            GOTO LA383
            BSF 0x06,7
            BCF 0x03,5          ; switch to page 0
            MOVLW 0x11
LA389       ADDLW 0xff
            BTFSS 0x03,2
            GOTO LA389
            BTFSC 0x06,7
            RETLW 0x00
            DECFSZ 0x0e,1
            GOTO LA35F
            GOTO LB30F
LJ391       MOVLW 0x0f
            MOVWF 0x0e
LB393       BTFSC 0x06,7
            GOTO LB393
            MOVLW 0x21
LA396       ADDLW 0xff
            BTFSS 0x03,2
            GOTO LA396
            MOVLW 0x08
            MOVWF 0x0d
LA39B       BCF 0x03,0
            BTFSS 0x06,7
            BSF 0x03,0
            RLF 0x0c,1
            NOP
            NOP
            MOVLW 0x15
LA3A2       ADDLW 0xff
            BTFSS 0x03,2
            GOTO LA3A2
            DECFSZ 0x0d,1
            GOTO LA39B
            NOP
            CLRF 0x0d
            BTFSS 0x06,7
            BSF 0x0d,0
            CALL LB3C2
            XORWF 0x0d,1
            BTFSC 0x0d,0
            GOTO LA3B6
            MOVLW 0x0e
LA3B0       ADDLW 0xff
            BTFSS 0x03,2
            GOTO LA3B0
            MOVF 0x0c,0
            ADDWF 0x2c,1
            RETURN
LA3B6       BCF 0x06,7
            BSF 0x03,5          ; switch to page 1
            BCF 0x06,7
            MOVLW 0x1a
LA3BA       ADDLW 0xff
            BTFSS 0x03,2
            GOTO LA3BA
            BSF 0x06,7
            BCF 0x03,5          ; switch to page 0
            DECFSZ 0x0e,1
            GOTO LB393
            GOTO LB30F
LB3C2       CLRW
            CALL LA3C4
LA3C4       SWAPF 0x0c,1
            BTFSC 0x0c,0
            ADDLW 0x01
            BTFSC 0x0c,1
            ADDLW 0x01
            BTFSC 0x0c,2
            ADDLW 0x01
            BTFSC 0x0c,3
            ADDLW 0x01
            RETURN
            ORG 0x2000
            ???
LA001       ???
            ???
            ???
            ORG 0x2007
            ADDLW 0xf1
            END

