; original File = H:\icprog\PROG\KM266_1.hex

    processor 16F676
    #include <P16F676.INC>
    __config 0x31CC
;   _CPD_OFF & _CP_OFF & _BODEN_ON & _MCLRE_OFF & _PWRTE_ON & _WDT_ON 
;   & _INTRC_OSC_NOCLKOUT 
    __idlocs 0xFFFF

;   EEPROM-Data
    Org 0x2100
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........
    DE 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF   ;  ........

; RAM-Variable
LRAM_0x20 equ 0x20
LRAM_0x21 equ 0x21
LRAM_0x22 equ 0x22
LRAM_0x23 equ 0x23
LRAM_0x24 equ 0x24
LRAM_0x25 equ 0x25
LRAM_0x26 equ 0x26
LRAM_0x27 equ 0x27
LRAM_0x28 equ 0x28
LRAM_0x29 equ 0x29
LRAM_0x2A equ 0x2A
LRAM_0x2B equ 0x2B
LRAM_0x2C equ 0x2C
LRAM_0x2D equ 0x2D
LRAM_0x2E equ 0x2E
LRAM_0x2F equ 0x2F
LRAM_0x30 equ 0x30
LRAM_0x31 equ 0x31
LRAM_0x32 equ 0x32
LRAM_0x33 equ 0x33
LRAM_0x34 equ 0x34
LRAM_0x35 equ 0x35
LRAM_0x36 equ 0x36
LRAM_0x37 equ 0x37
LRAM_0x38 equ 0x38
LRAM_0x39 equ 0x39
LRAM_0x3A equ 0x3A
LRAM_0x3B equ 0x3B
LRAM_0x3C equ 0x3C
LRAM_0x3D equ 0x3D
LRAM_0x3E equ 0x3E
LRAM_0x3F equ 0x3F
LRAM_0x40 equ 0x40
LRAM_0x41 equ 0x41
LRAM_0x42 equ 0x42
LRAM_0x43 equ 0x43
LRAM_0x44 equ 0x44
LRAM_0x45 equ 0x45
LRAM_0x46 equ 0x46
LRAM_0x47 equ 0x47
LRAM_0x48 equ 0x48
LRAM_0x49 equ 0x49
LRAM_0x4A equ 0x4A
LRAM_0x4B equ 0x4B
LRAM_0x4C equ 0x4C
LRAM_0x55 equ 0x55
LRAM_0x56 equ 0x56
LRAM_0x57 equ 0x57
LRAM_0x58 equ 0x58
LRAM_0x5A equ 0x5A
LRAM_0x5B equ 0x5B
LRAM_0x5C equ 0x5C
LRAM_0x5D equ 0x5D
LRAM_0x5E equ 0x5E
LRAM_0x5F equ 0x5F

; Program
;   Reset-Vector
	ORG	0x00h
	GOTO	j0024

	ORG	0x04h
;   Interrupt-Vector
	GOTO	j005
j0005:	MOVWF	LRAM_0x2D
	MOVF	STATUS,W
	MOVWF	LRAM_0x2F
	MOVF	PCLATH,W        ; !!Bank Program-Page-Select
	MOVWF	LRAM_0x2E
	BTFSC	PIR1,3         ; !!Bank!! PIR1 - PIE1
	GOTO	j0018		; **jedine
	BTFSC	INTCON,T0IF
	GOTO	j0066		; **jedine
	BTFSC	PIR1,0		; !!Bank!! PIR1 - PIE1
	GOTO	j005A		;
	BTFSC	INTCON,RAIF
	GOTO	j0057		; **jedine
j0012:	MOVF	LRAM_0x2F,W
	MOVWF	STATUS
	MOVF	LRAM_0x2E,W
	MOVWF	PCLATH         ; !!Bank Program-Page-Select
	MOVF	LRAM_0x2D,W
	RETFIE

j0018:	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select 
	BCF	T1CON,0          ; !!Bank!! T1CON - OSCCAL
	MOVLW	0x18           ;   b'00011000'  d'024'
	MOVWF	LRAM_0x31
	BTFSC	LRAM_0x35,3
	GOTO	j0029		; **dva
j001E:	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BTFSC	CMCON,6        ; !!Bank!! CMCON - VRCON
	GOTO	j0026		; **dva
	DECFSZ	LRAM_0x31,F
	GOTO	j001E		; **jeden
	BSF 	LRAM_0x35,3
j0024:	BSF 	PORTC,2          ; $ PORTC - TRISC
	GOTO	j0028		; ** jeden
j0026:	BCF	LRAM_0x35,3
	GOTO	j0054		; **dva
j0028:	GOTO	j0033		; **dva
j0029:	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BTFSS	CMCON,6        ; !!Bank!! CMCON - VRCON
	GOTO	j0031		; **jeden
	DECFSZ	LRAM_0x31,F
	GOTO	j0029		;**dva
	BCF	LRAM_0x35,3
	BCF	PORTC,2          ; $ PORTC - TRISC
	GOTO	j0033		;**dva
j0031:	BSF	LRAM_0x35,3
	GOTO	j0054		;**dva
j0033:	NOP
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	MOVF	TMR1H,W         ; !!Bank!! TMR1H - Unimplemented
	MOVWF	LRAM_0x2B
	MOVF	TMR1L,W         ; !!Bank!! TMR1L - PCON
	MOVWF	LRAM_0x2A
	BCF	STATUS,C
	RRF	LRAM_0x2B,F
	RRF	LRAM_0x2A,F
	BCF	STATUS,C
	RRF	LRAM_0x2B,F
	RRF	LRAM_0x2A,F
	MOVF	LRAM_0x2C,W
	MOVWF	FSR
	BTFSS	FSR,3
	GOTO	j0046		; **jeden
	MOVLW	0x20           ;   b'00100000'  d'032'  " "
	MOVWF	LRAM_0x2C
	MOVWF	FSR
j0046:	MOVF	LRAM_0x2A,W
	MOVWF	INDF
	INCF	FSR,F
	MOVF	LRAM_0x2B,W
	MOVWF	INDF
	INCF	FSR,F
	MOVF	FSR,W
	MOVWF	LRAM_0x2C
	BSF	T1CON,0          ; !!Bank!! T1CON - OSCCAL
	BCF	PIR1,0           ; !!Bank!! PIR1 - PIE1
	MOVLW	0x00           ;   b'00000000'  d'000'
	MOVWF	TMR1L          ; !!Bank!! TMR1L - PCON
	MOVLW	0x00           ;   b'00000000'  d'000'
	MOVWF	TMR1H          ; !!Bank!! TMR1H - Unimplemented
j0054:	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BCF	PIR1,3           ; !!Bank!! PIR1 - PIE1
	GOTO	j0012		; **tri
j0057:	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BCF	INTCON,RAIF
	GOTO	j0012		; **tri
j005A:	BSF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
        BCF	PIR1,0           ; !!Bank!! PIR1 - PIE1
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BCF	T1CON,0          ; !!Bank!! T1CON - OSCCAL
	BCF	PIR1,0           ; !!Bank!! PIR1 - PIE1
	BSF	PORTC,4          ; $ PORTC - TRISC
	MOVLW	0x3F           ;   b'00111111'  d'063'  "?"
	MOVWF	TMR1H          ; !!Bank!! TMR1H - Unimplemented
	MOVLW	0x63           ;   b'01100011'  d'099'  "c"
	MOVWF	TMR1L          ; !!Bank!! TMR1L - PCON
	BSF	PIR1,0           ; !!Bank!! PIR1 - PIE1
	GOTO 	j0012		;**tri
j0066:	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BCF	INTCON,T0IE
	BCF	INTCON,T0IF
	GOTO	j006C		; **jeden
j006A:	INCF	LRAM_0x43,F
	BSF	LRAM_0x35,5
j006C:	MOVF	ADCON0,W        ; !!Bank!! ADCON0 - ADCON1
	ANDLW	0xE3           ;   b'11100011'  d'227'
	XORLW	0x10           ;   b'00010000'  d'016'
	MOVWF	ADCON0         ; !!Bank!! ADCON0 - ADCON1
	BSF	ADCON0,1         ; !!Bank!! ADCON0 - ADCON1
j0071:	BTFSC	ADCON0,1       ; !!Bank!! ADCON0 - ADCON1
	GOTO	j0071		; **jeden
	BSF	ADCON0,1         ; !!Bank!! ADCON0 - ADCON1
j0074:	BTFSC	ADCON0,1       ; !!Bank!! ADCON0 - ADCON1
	GOTO	j0074		;**jeden
	MOVF	ADRESH,W        ; !!Bank!! ADRESH - ADRESL
	MOVWF	LRAM_0x46
	MOVF	LRAM_0x46,W
	ANDLW	0xE0           ;   b'11100000'  d'224'
	BTFSC	STATUS,Z
	GOTO	j0081		;**dva
	MOVF	LRAM_0x46,W
	ANDLW	0x80           ;   b'10000000'  d'128'
	BTFSS	STATUS,Z
	GOTO	j0081		;**dva
	GOTO	j006A		;**jeden
j0081:	BCF	LRAM_0x35,5
	BTFSC	LRAM_0x35,6
	GOTO	j0086		;**jeden
	BSF	LRAM_0x35,6
	GOTO	j0012		;**dva
j0086:	BCF	PORTA,2          ; !!Bank!! PORTA - TRISA
	MOVLW	0x24           ;   b'00100100'  d'036'  "$"
	MOVWF	LRAM_0x31
j0089:	DECFSZ	LRAM_0x31,F
	GOTO	j0089		;**jeden
	BSF	PORTA,2          ; !!Bank!! PORTA - TRISA
	GOTO	j0012		;**dva
j008D:	BSF	ADCON0,1         ; !!Bank!! ADCON0 - ADCON1
j008E:	BTFSC	ADCON0,1       ; !!Bank!! ADCON0 - ADCON1
	GOTO	j008E		;**jeden
	RETURN

;-----------------------------------------------------------------**	4XVYUZITA
j0091:	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select	;LADR_0x0091
	BTFSC	PORTA,3        ; !!Bank!! PORTA - TRISA
	GOTO	j009A		;**dva
	GOTO	j0095		;**dva
j0095:	BTFSS	PORTA,3        ; !!Bank!! PORTA - TRISA
	GOTO	j0095		;**dva
	BSF	LRAM_0x35,0
	BSF	LRAM_0x35,1
	GOTO	jx009E		;**jeden

j009A:	BTFSC	PORTA,3        ; !!Bank!! PORTA - TRISA
	GOTO	j009A		;**dva
	BSF	LRAM_0x35,0
	BCF	LRAM_0x35,1
j009E:	RETURN

;------------------------------------------------------------------**	1XVYUZITA
j009F:	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select	;LADR_0x009F
	BCF	INTCON,GIE
	MOVF	ADCON0,W        ; !!Bank!! ADCON0 - ADCON1
	ANDLW	0xE3           ;   b'11100011'  d'227'
	XORLW	0x0C           ;   b'00001100'  d'012'
	MOVWF	ADCON0         ; !!Bank!! ADCON0 - ADCON1
	CALL	j008D
	CALL	j008D
	CALL	j008D
	COMF	ADRESH,F        ; !!Bank!! ADRESH - ADRESL
	MOVF	ADRESH,W        ; !!Bank!! ADRESH - ADRESL
	MOVWF	LRAM_0x47
	CALL	j008D
	COMF	ADRESH,F        ; !!Bank!! ADRESH - ADRESL
	MOVF	ADRESH,W        ; !!Bank!! ADRESH - ADRESL
	ADDWF	LRAM_0x47,F
	RRF	LRAM_0x47,F
	BSF	INTCON,GIE
	RETURN

;---------------------------------------------------------------**	1XVYUZITA
j00B2:	BCF	INTCON,GIE		;LADR_0x00B2
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BSF	PORTC,5          ; $ PORTC - TRISC
	MOVF	ADCON0,W        ; !!Bank!! ADCON0 - ADCON1
	ANDLW	0xE3           ;   b'11100011'  d'227'
	XORLW	0x0C           ;   b'00001100'  d'012'
	MOVWF	ADCON0         ; !!Bank!! ADCON0 - ADCON1
	CALL	j008D
	CALL	j008D
	CALL	j008D
	COMF	ADRESH,F        ; !!Bank!! ADRESH - ADRESL
	MOVF	ADRESH,W        ; !!Bank!! ADRESH - ADRESL
	ADDWF	LRAM_0x48,F
	RRF	LRAM_0x48,F
	CALL	j008D
	COMF	ADRESH,F        ; !!Bank!! ADRESH - ADRESL
	MOVF	ADRESH,W        ; !!Bank!! ADRESH - ADRESL
	ADDWF	LRAM_0x48,F
	RRF	LRAM_0x48,F
	CALL	j008D
	COMF	ADRESH,F        ; !!Bank!! ADRESH - ADRESL
	MOVF	ADRESH,W        ; !!Bank!! ADRESH - ADRESL
	ADDWF	LRAM_0x48,F
	RRF	LRAM_0x48,F
	MOVF	LRAM_0x4A,W
	ADDWF	LRAM_0x48,F	
	RRF	LRAM_0x48,F
	MOVF	LRAM_0x4A,W
	ADDWF	LRAM_0x48,F
	RRF	LRAM_0x48,F
	MOVF	LRAM_0x4A,W
	ADDWF	LRAM_0x48,F
	RRF	LRAM_0x48,F
	MOVF	LRAM_0x4A,W
	ADDWF	LRAM_0x48,F
	RRF	LRAM_0x48,F
	MOVF	LRAM_0x48,W
	MOVWF	LRAM_0x4A
	BSF	PORTC,5          ; $ PORTC - TRISC
	BSF	INTCON,GIE
	RETURN

;-----------------------------------------------------------------**	1XVYUZITA
j00DB:	MOVF	LRAM_0x47,W		;LADR_0x00DB
	MOVWF	LRAM_0x32
	INCF	LRAM_0x32,F
	INCF	LRAM_0x32,F
	INCF	LRAM_0x32,F
	INCF	LRAM_0x32,F
	INCF	LRAM_0x32,F
	INCF	LRAM_0x32,F
	INCF	LRAM_0x32,F
	INCF	LRAM_0x32,F
	INCF	LRAM_0x32,F
	INCF	LRAM_0x32,F
	INCF	LRAM_0x32,F
	INCF	LRAM_0x32,F
	INCF	LRAM_0x32,F
	MOVF	LRAM_0x32,W
	ANDLW	0xE0           ;   b'11100000'  d'224'
	BTFSC	STATUS,Z
	GOTO	j00F3
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	MOVF	LRAM_0x48,W
	SUBWF	LRAM_0x32,F
	BTFSC	STATUS,C
	GOTO	j00F7
j00F3:	MOVLW	0xF0           ;   b'11110000'  d'240'
	MOVWF	LRAM_0x32	
	BSF	LRAM_0x35,7
	GOTO	j00F9
j00F7:	BCF	LRAM_0x35,7
	GOTO	j00F9
j00F9:	RETURN

;--------------------------------------------------------------**	1XVYUZITA	

j00FA:	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BCF	INTCON,GIE		;LADR_0x00FA
	MOVF	ADCON0,W        ; !!Bank!! ADCON0 - ADCON1
	ANDLW	0xE3           ;   b'11100011'  d'227'
	XORLW	0x1C           ;   b'00011100'  d'028'
	MOVWF	ADCON0         ; !!Bank!! ADCON0 - ADCON1
	CALL	j008D
	CALL	j008D
	CALL	j008D
	MOVF	ADRESH,W        ; !!Bank!! ADRESH - ADRESL
	MOVWF	LRAM_0x42
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BSF	INTCON,GIE
	RETURN

;-------------------------------------------------------------**	1XVYUZITA	
j0108:	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BCF	INTCON,GIE			;LADR_0x0108
	MOVF	ADCON0,W        ; !!Bank!! ADCON0 - ADCON1
	ANDLW	0xE3           ;   b'11100011'  d'227'
	XORLW	0x10           ;   b'00010000'  d'016'
	MOVWF	ADCON0         ; !!Bank!! ADCON0 - ADCON1
	CALL	j008D
	CALL	j008D
	CALL	j008D
	MOVF	ADRESH,W        ; !!Bank!! ADRESH - ADRESL
	MOVWF	LRAM_0x34
	BSF	INTCON,GIE
	RETURN

;-------------------------------------------------------------**	1XVYUZITA
j0115:	CLRF	LRAM_0x28		;LADR_0x0115
	CLRF	LRAM_0x29
	MOVF	LRAM_0x21,W
	MOVWF	LRAM_0x55
	MOVF	LRAM_0x20,W
	MOVWF	LRAM_0x56
	CALL	j01D1
	MOVF	LRAM_0x23,W
	MOVWF	LRAM_0x55
	MOVF	LRAM_0x22,W
	MOVWF	LRAM_0x56
	CALL	j01D1
	MOVF	LRAM_0x25,W
	MOVWF	LRAM_0x55
	MOVF	LRAM_0x24,W
	MOVWF	LRAM_0x56
	CALL	j01D1
	MOVF	LRAM_0x27,W
	MOVWF	LRAM_0x55
	MOVF	LRAM_0x26,W
	MOVWF	LRAM_0x56
	CALL	j01D1
	RETURN

;-------------------------------------------------------------**	1XVYUZITA
j012C:	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	CLRF	LRAM_0x56		;LADR_0x012C
	MOVF	LRAM_0x3D,W
	COMF	LRAM_0x3D,W
	MOVWF	LRAM_0x55
	MOVF	LRAM_0x4C,W
	MOVWF	LRAM_0x58
	CALL	j03A0
	MOVF	LRAM_0x55,W
	COMF	LRAM_0x55,W
	MOVWF	LRAM_0x33
	RETURN

;-------------------------------------------------------------**	1XVYUZITA
j0138:	MOVLW	0x02           ;   b'00000010'  d'002'	;LADR_0x0138
	MOVWF	PCLATH         ; !!Bank Program-Page-Select
	MOVF	LRAM_0x32,W
	MOVWF	LRAM_0x39
	BCF	STATUS,C
	RRF	LRAM_0x39,F
	BCF	STATUS,C
	RRF	LRAM_0x39,F
	BCF	STATUS,C
	RRF	LRAM_0x39,F
	MOVF	LRAM_0x39,W
	CALL	j02D0
	MOVWF	LRAM_0x38
	RETURN

;--------------------------------------------------------------**	1XVYUZITA	
j0146:	MOVLW	0x03           ;   b'00000011'  d'003'	;LADR_0x0146
	MOVWF	PCLATH         ; !!Bank Program-Page-Select
	MOVF	LRAM_0x32,W
	MOVWF	LRAM_0x37
	BCF	STATUS,C
	RRF	LRAM_0x37,F
	BCF	STATUS,C
	RRF	LRAM_0x37,F
	BCF	STATUS,C
	RRF	LRAM_0x37,F
	MOVF	LRAM_0x37,W
	CALL	j0300
	MOVWF	LRAM_0x36
	RETURN

;--------------------------------------------------------------**	1XVYUZITA
j0154:	MOVF	LRAM_0x28,W	;LADR_0x0154
	MOVWF	LRAM_0x55
	MOVF	LRAM_0x29,W
	MOVWF	LRAM_0x56
	MOVF	LRAM_0x32,W
	MOVWF	LRAM_0x58
	CALL	j03A0
	MOVF	LRAM_0x55,W
	MOVWF	LRAM_0x3C
	MOVF	LRAM_0x56,W
	MOVWF	LRAM_0x3B
	MOVF	LRAM_0x57,W
	MOVWF	LRAM_0x3A
	RETURN

;---------------------------------------------------------------**	1XVYUZITA
j0162:	BCF	STATUS,C			;LADR_0x0162
	RRF	LRAM_0x3C,F
	RRF	LRAM_0x3B,F
	MOVF	LRAM_0x3C,W
	MOVWF	LRAM_0x55
	MOVF	LRAM_0x3B,W
	MOVWF	LRAM_0x56
	MOVF	LRAM_0x36,W
	MOVWF	LRAM_0x58
	CALL	j03A0
	MOVF	LRAM_0x55,W
	MOVWF	LRAM_0x3F
	MOVF	LRAM_0x56,W
	MOVWF	LRAM_0x40
	BCF	STATUS,C
	RRF	LRAM_0x3F,F
	RRF	LRAM_0x40,F
	BCF	STATUS,C
	RRF	LRAM_0x3F,F
	RRF	LRAM_0x40,F
	NOP
	MOVF	LRAM_0x3F,F
	BTFSS	STATUS,Z
	GOTO	j017E
	MOVF	LRAM_0x40,W
	ANDLW	0xF0           ;   b'11110000'  d'240'
	BTFSC	STATUS,Z
	GOTO	j0188
j017E:	MOVLW	0x01           ;   b'00000001'  d'001'
	MOVWF	LRAM_0x31
	MOVLW	0x00           ;   b'00000000'  d'000'
	MOVWF	LRAM_0x30
	MOVF	LRAM_0x31,W
	SUBWF	LRAM_0x40,F
	MOVF	LRAM_0x30,W
	BTFSS	STATUS,C
	INCFSZ	LRAM_0x30,W
	SUBWF	LRAM_0x3F,F
j0188:	NOP
	MOVF	LRAM_0x3F,W
	MOVF	LRAM_0x3F,F
	BTFSC	STATUS,Z
	RETURN
	MOVLW	0xFF           ;   b'11111111'  d'255'
	MOVWF	LRAM_0x40
	CLRF	LRAM_0x3F
	RETURN

;--------------------------------------------------------------**	1XVYUZITA	
j0191:	CLRF	LRAM_0x57	;LADR_0x0191
	CLRF	LRAM_0x56
	CLRF	LRAM_0x55	
	MOVF	LRAM_0x38,W
	MOVWF	LRAM_0x56
	NOP
	CALL	LADR_0x01D8
	CLRF	LRAM_0x55
	MOVF	LRAM_0x40,W
	MOVWF	LRAM_0x56
	CALL	LADR_0x01D8
	RETURN

;--------------------------------------------------------------**	1XVYUZITA
j019D:	MOVF	LRAM_0x41,F		;LADR_0x019D
	BTFSC	STATUS,Z
	GOTO	j01A3
	INCF	LRAM_0x41,F
	MOVF	LRAM_0x41,W
	MOVWF	LRAM_0x44
j01A3:	BTFSC	LRAM_0x35,7
	GOTO	j01C0
	MOVF	LRAM_0x41,F
	BTFSC	STATUS,Z
	GOTO	j01AB
	MOVLW	0x02           ;   b'00000010'  d'002'
	MOVWF	LRAM_0x49
	GOTO	jx01AD
j01AB:	MOVLW	0x64           ;   b'01100100'  d'100'  "d"
	MOVWF	LRAM_0x49
j01AD:	MOVF	LRAM_0x45,W
	SUBWF	LRAM_0x3D,W
	BTFSS	STATUS,C
	GOTO	j01B8
	SUBWF	LRAM_0x49,W
	BTFSC	STATUS,C	
	GOTO	j01C0
	MOVF	LRAM_0x45,W
	ADDWF	LRAM_0x49,W
	MOVWF	LRAM_0x3D
	GOTO	j01C0
j01B8:	MOVF	LRAM_0x3D,W
	SUBWF	LRAM_0x45,W
	SUBWF	LRAM_0x49,W
	BTFSC	STATUS,C
	GOTO	j01C0
	MOVF	LRAM_0x49,W
	SUBWF	LRAM_0x45,W
	MOVWF	LRAM_0x3D
j01C0:	MOVF	LRAM_0x45,W
	ADDWF	LRAM_0x3D,F
	RRF	LRAM_0x3D,F
	MOVF	LRAM_0x3D,W
	MOVWF	LRAM_0x45
	RETURN
	MOVF	LRAM_0x2B,W
	MOVWF	LRAM_0x28
	MOVF	LRAM_0x2A,W
	MOVWF	LRAM_0x29
	MOVF	LRAM_0x26,W
	SUBWF	LRAM_0x29,F
	MOVF	LRAM_0x27,W
	BTFSS	STATUS,C
	INCFSZ	LRAM_0x27,W
	SUBWF	LRAM_0x28,F
	RETURN

;-----------------------------------------------------------**		4XVYUZITA
j01D1:	MOVF	LRAM_0x56,W		;LADR_0x01D1
	ADDWF	LRAM_0x29,F
	MOVF	LRAM_0x55,W
	BTFSC	STATUS,C
	INCFSZ	LRAM_0x55,W
	ADDWF	LRAM_0x28,F
	RETURN

;-----------------------------------------------------------**		2XVYUZITA
j01D8:	MOVF	LRAM_0x56,W		;LADR_0x01D8
	ADDWF	LRAM_0x3D,F
	MOVF	LRAM_0x55,W
	BTFSC	STATUS,C
	INCFSZ	LRAM_0x55,W
	ADDWF	LRAM_0x3E,F
	BTFSS	LRAM_0x3E,7
	GOTO	LADR_0x01E2
	CLRF	LRAM_0x3E
	CLRF	LRAM_0x3D
j01E2:	NOP
	MOVF	LRAM_0x3E,W
	MOVF	LRAM_0x3E,F
	NOP
	BTFSC	STATUS,Z
	RETURN
	NOP
	MOVLW	0xFF           ;   b'11111111'  d'255'
	MOVWF	LRAM_0x3D
	CLRF	LRAM_0x3E
	RETURN

;----------------------------------------------------------**
j01ED:	CALL	j03FF
	BSF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	MOVWF	T1CON          ; !!Bank!! T1CON - OSCCAL
	MOVLW	0x20           ;   b'00100000'  d'032'  " "
	MOVWF	FSR
j01F2:	CLRF	INDF	
	INCF	FSR,F
	BTFSS	FSR,6
	GOTO	j01F2
	CLRF	INDF
	INCF	FSR,F
	CLRF	INDF
	INCF	FSR,F
	CLRF	INDF
	INCF	FSR,F
	BSF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	MOVLW	0x3B           ;   b'00111011'  d'059'  ";"
	MOVWF	PORTA          ; !!Bank!! PORTA - TRISA
	MOVLW	0x09           ;   b'00001001'  d'009'
	MOVWF	PORTC          ; $ PORTC - TRISC
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BSF	PORTA,2          ; !!Bank!! PORTA - TRISA
	BSF	PORTC,4          ; $ PORTC - TRISC
	BCF	PORTC,5          ; $ PORTC - TRISC
	BSF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	MOVLW	0xD5           ;   b'11010101'  d'213'
	MOVWF	TMR0           ; !!Bank!! TMR0 - OPTION_REG
	CLRF	IOCA            ; !!Bank!! Unimplemented - IOCA
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	MOVLW	0xFF           ;   b'11111111'  d'255'
	MOVWF	LRAM_0x4B
        NOP
j020D:	CLRF	TMR0            ; !!Bank!! TMR0 - OPTION_REG
j020E:	NOP
	BTFSS	TMR0,7         ; !!Bank!! TMR0 - OPTION_REG
	GOTO	j020E
	INCFSZ	LRAM_0x4B,F
	GOTO	LADR_0x020D
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	MOVLW	0x1D           ;   b'00011101'  d'029'
	MOVWF	ADCON0         ; !!Bank!! ADCON0 - ADCON1
	BSF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	MOVLW	0x60           ;   b'01100000'  d'096'  "`"
	MOVWF	ADCON0         ; !!Bank!! ADCON0 - ADCON1
	MOVLW	0x9B           ;   b'10011011'  d'155'
	MOVWF	SFR_0x11       ; !!Warning: SFR_0x11 is Unimplemented
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	MOVLW	0x56           ;   b'01010110'  d'086'  "V"
	MOVWF	CMCON          ; !!Bank!! CMCON - VRCON
	BSF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	MOVLW	0xA0           ;   b'10100000'  d'160'
	MOVWF	CMCON          ; !!Bank!! CMCON - VRCON
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	MOVLW	0x60           ;   b'01100000'  d'096'  "`"
	MOVWF	INTCON
	CLRF	TMR0            ; !!Bank!! TMR0 - OPTION_REG
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	MOVLW	0x00           ;   b'00000000'  d'000'
	MOVWF	TMR1H          ; !!Bank!! TMR1H - Unimplemented
	MOVLW	0x00           ;   b'00000000'  d'000'
	MOVWF	TMR1L          ; !!Bank!! TMR1L - PCON
	MOVLW	0x01           ;   b'00000001'  d'001'
	MOVWF	T1CON          ; !!Bank!! T1CON - OSCCAL
	BSF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BCF	PIR1,7           ; !!Bank!! PIR1 - PIE1
	BCF	PIR1,6           ; !!Bank!! PIR1 - PIE1
	BSF	PIR1,3           ; !!Bank!! PIR1 - PIE1
	BSF	PIR1,0           ; !!Bank!! PIR1 - PIE1
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BCF	LRAM_0x35,3
	MOVLW	0x3F           ;   b'00111111'  d'063'  "?"
	MOVWF	LRAM_0x2B
	MOVWF	LRAM_0x21
	MOVWF	LRAM_0x23
	MOVWF	LRAM_0x25
	MOVWF	LRAM_0x27
	MOVWF	LRAM_0x33
	MOVLW	0x20           ;b'00100000'  d'032'  " "
	MOVWF	LRAM_0x2C
	MOVWF	LRAM_0x40
	MOVWF	LRAM_0x45
	MOVLW	0x00           ;   b'00000000'  d'000'
	CLRF	LRAM_0x35
	MOVWF	LRAM_0x3D
	MOVWF	LRAM_0x3E
	MOVWF	LRAM_0x3F
	MOVLW	0x01           ;   b'00000001'  d'001'
	MOVWF	LRAM_0x41
	CLRF	LRAM_0x43
	MOVLW	0x30           ;   b'00110000'  d'048'  "0"
	MOVWF	LRAM_0x48
	MOVWF	LRAM_0x4A
	CLRWDT
	RETURN

;---------------------------------------------------------**
j024B:	CALL	j01ED		;LADR_0x024D
	BSF	INTCON,GIE
j024D:	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BCF	PORTC,5          ; $ PORTC - TRISC
	CLRF	LRAM_0x43
	MOVLW	0x30           ;   b'00110000'  d'048'  "0"
	MOVWF	LRAM_0x48
	MOVWF	LRAM_0x4A
	MOVWF	LRAM_0x47
	MOVLW	0x01           ;   b'00000001'  d'001'
	MOVWF	LRAM_0x41
	BSF	PORTC,4          ; $ PORTC - TRISC
	BTFSS	PORTA,5        ; !!Bank!! PORTA - TRISA
	GOTO	LADR_0x025A
	GOTO	LADR_0x024D
j025A:	CALL	j00FA
	MOVF	LRAM_0x42,W
	ANDLW	0x80           ;   b'10000000'  d'128'
	BTFSS	STATUS,Z
	GOTO	j025A
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BCF	PORTC,4          ; $ PORTC - TRISC
	BCF	PORTC,1          ; $ PORTC - TRISC
j0262:	MOVLW	0xF0           ;   b'11110000'  d'240'
	MOVWF	LRAM_0x4B
j0264:	NOP
	INCFSZ	LRAM_0x4B,F
	GOTO	j0264
	CALL	j00B2
	BCF	INTCON,GIE
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	MOVF	ADCON0,W        ; !!Bank!! ADCON0 - ADCON1
	ANDLW	0xE3           ;   b'11100011'  d'227'
	XORLW	0x10           ;   b'00010000'  d'016'
	MOVWF	ADCON0         ; !!Bank!! ADCON0 - ADCON1
	BSF	ADCON0,1         ; !!Bank!! ADCON0 - ADCON1
j026F:	BTFSC	ADCON0,1       ; !!Bank!! ADCON0 - ADCON1
	GOTO	j026F
	BSF	ADCON0,1         ; !!Bank!! ADCON0 - ADCON1
j0272:	BTFSC	ADCON0,1       ; !!Bank!! ADCON0 - ADCON1
	GOTO	j0272
	MOVF	ADRESH,W        ; !!Bank!! ADRESH - ADRESL
	MOVWF	LRAM_0x30
	MOVF	LRAM_0x30,W
	ANDLW	0xE0           ;   b'11100000'  d'224'
	BTFSC	STATUS,Z
	GOTO	j027F
	MOVF	LRAM_0x30,W
	ANDLW	0x80           ;   b'10000000'  d'128'
	BTFSS	STATUS,Z
	GOTO	j027F
	GOTO	j0262
j027F:	BCF	LRAM_0x35,6
	BSF	PORTC,1          ; $ PORTC - TRISC
j0281:	CLRWDT
	CALL	j0091
	BTFSS	LRAM_0x35,1
	GOTO	j0281
j0285:	CLRWDT
	CALL	j0091
	BTFSS	LRAM_0x35,1
	GOTO	j0285
	CLRF	TMR0            ; !!Bank!! TMR0 - OPTION_REG
j028A:	CLRWDT
	CALL	j0091
	BTFSC	LRAM_0x35,1
	GOTO	j028A
	MOVF	TMR0,W          ; !!Bank!! TMR0 - OPTION_REG
	MOVWF	LRAM_0x4C
	DECF	LRAM_0x4C,F
	DECF	LRAM_0x4C,F
	DECF	LRAM_0x4C,F
	DECF	LRAM_0x4C,F
	DECF	LRAM_0x4C,F
	DECF	LRAM_0x4C,F
j0296:	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
        BCF	PORTC,5          ; $ PORTC - TRISC
	BTFSS	PORTA,5        ; !!Bank!! PORTA - TRISA
	GOTO	j029B
	GOTO	j024D
j029B:	BTFSS	LRAM_0x35,5
	GOTO	j02A2
	MOVF	LRAM_0x43,W
	ANDLW	0xF0           ;   b'11110000'  d'240'
	BTFSC	STATUS,Z
	GOTO	j02A4
	GOTO	j024D
j02A2:	CLRF	LRAM_0x43
	GOTO	j02A5
j02A4:	INCF	LRAM_0x43,F
j02A5:	CLRWDT
	CLRF	LRAM_0x3E
	CLRF	LRAM_0x3D
	CALL	j009F
	CALL	j00DB
	CALL	j0108
	CALL	j0115
	CALL	j0138
	CALL	j0146
	CALL	j0154
	CALL	j0162
	CALL	j0191
	CALL	j019D
	CALL	j012C
	NOP
	CLRWDT
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	CALL	j0091
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	BCF	INTCON,T0IE
	BCF	INTCON,T0IF
	MOVF	LRAM_0x33,W
	MOVWF	TMR0           ; !!Bank!! TMR0 - OPTION_REG
	BSF	INTCON,T0IE
	BCF	STATUS,RP0       ; !!Bank Register-Bank(0/1)-Select
	GOTO	j0296
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
j02D0:	ADDWF	PCL,F          ; !!Program-Counter-Modification
	RETLW	0x28           ;   b'00101000'  d'040'  "("
	RETLW	0x28           ;   b'00101000'  d'040'  "("
	RETLW	0x28           ;   b'00101000'  d'040'  "("
	RETLW	0x28           ;   b'00101000'  d'040'  "("
	RETLW	0x28           ;   b'00101000'  d'040'  "("
	RETLW	0x28           ;   b'00101000'  d'040'  "("
	RETLW	0x32           ;   b'00110010'  d'050'  "2"
	RETLW	0x3C           ;   b'00111100'  d'060'  "<"
	RETLW	0x46           ;   b'01000110'  d'070'  "F"
	RETLW	0x50           ;   b'01010000'  d'080'  "P"
	RETLW	0x64           ;   b'01100100'  d'100'  "d"
	RETLW	0x6E           ;   b'01101110'  d'110'  "n"
	RETLW	0x78           ;   b'01111000'  d'120'  "x"
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	RETLW	0x82           ;   b'10000010'  d'130'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
j0300	ADDWF	PCL,F          ; !!Program-Counter-Modification
	RETLW	0x64           ;   b'01100100'  d'100'  "d"
	RETLW	0x96           ;   b'10010110'  d'150'
	RETLW	0xB4           ;   b'10110100'  d'180'
	RETLW	0xBE           ;   b'10111110'  d'190'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	RETLW	0xC8           ;   b'11001000'  d'200'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
j03A0:	CLRF	LRAM_0x57
	MOVF	LRAM_0x55,W
	MOVWF	LRAM_0x5D
	MOVF	LRAM_0x56,W
	MOVWF	LRAM_0x5E
	MOVLW	0x08           ;   b'00001000'  d'008'
	MOVWF	LRAM_0x5F
j03A7:	RRF	LRAM_0x58,F
	BTFSC	STATUS,C
	GOTO	j03AF
	DECFSZ	LRAM_0x5F,F
	GOTO	j03A7
	CLRF	LRAM_0x55
	CLRF	LRAM_0x56
	RETLW	0x00           ;   b'00000000'  d'000'
j03AF:	BCF	STATUS,C
	GOTO	j03BA
j03B1:	RRF	LRAM_0x58,F
	BTFSS	STATUS,C
	GOTO	j03BA
	MOVF	LRAM_0x5E,W
	ADDWF	LRAM_0x56,F
	MOVF	LRAM_0x5D,W
	BTFSC	STATUS,C
	INCFSZ	LRAM_0x5D,W
	ADDWF	LRAM_0x55,F
j03BA:	RRF	LRAM_0x55,F
	RRF	LRAM_0x56,F	
	RRF	LRAM_0x57,F
	DECFSZ	LRAM_0x5F,F
	GOTO	j03B1
	RETURN
	MOVLW	0x04           ;   b'00000100'  d'004'
	MOVWF	LRAM_0x5F
	CLRF	LRAM_0x5A
	CLRF	LRAM_0x5B
j03C4:	MOVF	LRAM_0x55,W
	RRF	LRAM_0x5C,F
	BTFSC	STATUS,C
	MOVF	LRAM_0x58,W
	ADDWF	LRAM_0x5A,F
	BTFSC	STATUS,C
	INCF	LRAM_0x5B,F
	BCF	STATUS,C
	RRF	LRAM_0x5B,F
	RRF	LRAM_0x5A,F
	DECFSZ	LRAM_0x5F,F
	GOTO	j03C4
	MOVF	LRAM_0x5A,W
	RETURN
	RETLW	0x00           ;   b'00000000'  d'000'
	RETLW	0x00           ;   b'00000000'  d'000'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
	ADDLW	0xFF           ;   b'11111111'  d'255'
j03FF:	RETLW	0x34           ;   b'00110100'  d'052'  "4"

	End
