processor 16F628A #include __config 0x3F50 ; _CP_OFF & _DATA_CP_OFF & _LVP_OFF & _BODEN_ON & _MCLRE_OFF & _PWRTE_ON & _WDT_OFF ; & _INTOSC_OSC_NOCLKOUT ; EEPROM-Data Org 0x2100 DE 0x6F, 0xB6, 0xB8, 0xE3, 0x61, 0xBD, 0xB8, 0x65 ; o...a..e DE 0x00, 0xA1, 0x70, 0x6F, 0xBC, 0xBA, 0x6F, 0x63 ; ..po..oc DE 0xBF, 0xC4, 0x00, 0x42, 0xC3, 0x63, 0x6F, 0xBA ; ...B.co. DE 0xB8, 0x65, 0x00, 0x43, 0x70, 0x65, 0xE3, 0xBD ; .e.Cpe.. DE 0xB8, 0x65, 0x00, 0x48, 0xB8, 0xB7, 0xBA, 0xB8 ; .e.H.... DE 0x65, 0x00, 0xA0, 0x61, 0xBB, 0x61, 0xBD, 0x63 ; e..a.a.c DE 0x00, 0x4B, 0x61, 0xBD, 0x61, 0xBB, 0x00, 0x00 ; .Ka.a... 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 0x20, 0x53, 0x59, 0x50, 0x45, 0x52, 0x2D, 0x20 ; SYPER- DE 0x20, 0x4E, 0x41, 0x53, 0x54, 0x59, 0x41, 0x20 ; NASTYA DE 0x0A, 0x08, 0x0A, 0x0C, 0x28, 0x01, 0xFF, 0xFF ; ....(... ; RAM-Variable LRAM_0x0A equ 0x0A LRAM_0x0B equ 0x0B LRAM_0x1A equ 0x1A LRAM_0x1B equ 0x1B LRAM_0x1C equ 0x1C LRAM_0x1D equ 0x1D LRAM_0x1F equ 0x1F 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_0x70 equ 0x70 LRAM_0x71 equ 0x71 LRAM_0x72 equ 0x72 LRAM_0x73 equ 0x73 LRAM_0x74 equ 0x74 LRAM_0x75 equ 0x75 LRAM_0x76 equ 0x76 LRAM_0x77 equ 0x77 LRAM_0x78 equ 0x78 LRAM_0x79 equ 0x79 LRAM_0x7A equ 0x7A LRAM_0x7B equ 0x7B LRAM_0x7C equ 0x7C LRAM_0x7D equ 0x7D LRAM_0x7E equ 0x7E ; Program Org 0x0000 ; Reset-Vector GOTO LADR_0x000A Org 0x0004 ; Interrupt-Vector MOVWF LRAM_0x7E MOVF STATUS,W MOVWF LRAM_0x74 MOVF LRAM_0x0A,W MOVWF LRAM_0x75 GOTO LADR_0x01B1 LADR_0x000A GOTO LADR_0x0579 LADR_0x000B MOVLW 0x00 ; b'00000000' d'000' MOVWF LRAM_0x0A MOVF FSR,W INCF FSR,F ADDWF PCL,F ; !!Program-Counter-Modification RETLW 0x00 ; b'00000000' d'000' RETLW 0x00 ; b'00000000' d'000' RETLW 0x00 ; b'00000000' d'000' RETLW 0x01 ; b'00000001' d'001' RETLW 0x02 ; b'00000010' d'002' RETLW 0x03 ; b'00000011' d'003' RETLW 0x04 ; b'00000100' d'004' RETLW 0x05 ; b'00000101' d'005' RETLW 0x06 ; b'00000110' d'006' RETLW 0x07 ; b'00000111' d'007' RETLW 0x0F ; b'00001111' d'015' RETLW 0x0E ; b'00001110' d'014' RETLW 0x0D ; b'00001101' d'013' RETLW 0x0C ; b'00001100' d'012' RETLW 0x0B ; b'00001011' d'011' RETLW 0x0A ; b'00001010' d'010' RETLW 0x09 ; b'00001001' d'009' RETLW 0x08 ; b'00001000' d'008' LADR_0x0022 MOVLW 0xFF ; b'11111111' d'255' MOVWF LRAM_0x38 MOVWF LRAM_0x39 LADR_0x0025 MOVLW 0x01 ; b'00000001' d'001' SUBWF LRAM_0x38,F MOVLW 0x00 ; b'00000000' d'000' BTFSS STATUS,C DECF LRAM_0x39,F SUBWF LRAM_0x39,F INCF LRAM_0x38,W BTFSC STATUS,Z INCF LRAM_0x39,W BTFSS STATUS,Z GOTO LADR_0x0025 CALL LADR_0x04FC CALL LADR_0x03B8 MOVLW 0x78 ; b'01111000' d'120' "x" BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1B BSF LRAM_0x1C,0 MOVF LRAM_0x1A,W BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x2F MOVLW 0x79 ; b'01111001' d'121' "y" BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1B BSF LRAM_0x1C,0 MOVF LRAM_0x1A,W BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x2E MOVLW 0x7A ; b'01111010' d'122' "z" BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1B BSF LRAM_0x1C,0 MOVF LRAM_0x1A,W BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x2C MOVLW 0x7B ; b'01111011' d'123' "{" BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1B BSF LRAM_0x1C,0 MOVF LRAM_0x1A,W BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x26 MOVLW 0x7C ; b'01111100' d'124' "|" BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1B BSF LRAM_0x1C,0 MOVF LRAM_0x1A,W BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x25 MOVLW 0x7D ; b'01111101' d'125' "}" BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1B BSF LRAM_0x1C,0 MOVF LRAM_0x1A,W BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x27 CALL LADR_0x02E4 CALL LADR_0x056E LADR_0x005E CALL LADR_0x0482 MOVF LRAM_0x2B,W BTFSC STATUS,Z GOTO LADR_0x0096 MOVF LRAM_0x2B,W XORLW 0x04 ; b'00000100' d'004' BTFSS STATUS,Z GOTO LADR_0x006C CALL LADR_0x0356 LADR_0x0067 MOVF LRAM_0x2B,F BTFSC STATUS,Z GOTO LADR_0x006C CALL LADR_0x0482 GOTO LADR_0x0067 LADR_0x006C MOVF LRAM_0x3B,F BTFSC STATUS,Z GOTO LADR_0x007A GOTO LADR_0x0084 LADR_0x0070 CALL LADR_0x059A LADR_0x0071 MOVF LRAM_0x2B,F BTFSC STATUS,Z GOTO LADR_0x0084 CALL LADR_0x0482 GOTO LADR_0x0071 LADR_0x0076 CALL LADR_0x058B GOTO LADR_0x0084 LADR_0x0078 CALL LADR_0x05AC GOTO LADR_0x0084 LADR_0x007A MOVF LRAM_0x2B,W XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x0070 XORLW 0x03 ; b'00000011' d'003' BTFSC STATUS,Z GOTO LADR_0x0076 XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x0078 LADR_0x0084 CALL LADR_0x056E MOVLW 0xFF ; b'11111111' d'255' MOVWF LRAM_0x22 MOVWF LRAM_0x23 MOVWF LRAM_0x38 MOVLW 0x8F ; b'10001111' d'143' MOVWF LRAM_0x39 LADR_0x008B MOVLW 0x01 ; b'00000001' d'001' SUBWF LRAM_0x38,F MOVLW 0x00 ; b'00000000' d'000' BTFSS STATUS,C DECF LRAM_0x39,F SUBWF LRAM_0x39,F INCF LRAM_0x38,W BTFSC STATUS,Z INCF LRAM_0x39,W BTFSS STATUS,Z GOTO LADR_0x008B LADR_0x0096 DECFSZ LRAM_0x28,W GOTO LADR_0x00A2 CLRF LRAM_0x28 DECFSZ LRAM_0x2A,W GOTO LADR_0x009D CALL LADR_0x029C GOTO LADR_0x009E LADR_0x009D CALL LADR_0x031E LADR_0x009E MOVLW 0xFF ; b'11111111' d'255' MOVWF LRAM_0x22 MOVWF LRAM_0x23 CALL LADR_0x038A LADR_0x00A2 MOVF LRAM_0x24,W BTFSC STATUS,Z GOTO LADR_0x0112 MOVF LRAM_0x24,W XORLW 0x0C ; b'00001100' d'012' BTFSS STATUS,Z GOTO LADR_0x00AE MOVF LRAM_0x21,W IORWF LRAM_0x20,W BTFSS STATUS,Z GOTO LADR_0x00AE CALL LADR_0x0356 LADR_0x00AE MOVF LRAM_0x3B,F BTFSC STATUS,Z GOTO LADR_0x00DE GOTO LADR_0x0109 LADR_0x00B2 CLRF LRAM_0x27 INCF LRAM_0x27,F GOTO LADR_0x0109 LADR_0x00B5 MOVLW 0x02 ; b'00000010' d'002' GOTO LADR_0x00BA LADR_0x00B7 MOVLW 0x03 ; b'00000011' d'003' GOTO LADR_0x00BA LADR_0x00B9 MOVLW 0x04 ; b'00000100' d'004' LADR_0x00BA MOVWF LRAM_0x27 GOTO LADR_0x0109 LADR_0x00BC MOVF LRAM_0x21,W IORWF LRAM_0x20,W BTFSS STATUS,Z GOTO LADR_0x0109 CALL LADR_0x059A GOTO LADR_0x0109 LADR_0x00C2 MOVF LRAM_0x21,W IORWF LRAM_0x20,W BTFSS STATUS,Z GOTO LADR_0x0109 CALL LADR_0x058B GOTO LADR_0x0109 LADR_0x00C8 MOVF LRAM_0x21,W IORWF LRAM_0x20,W BTFSS STATUS,Z GOTO LADR_0x0109 CALL LADR_0x05AC GOTO LADR_0x0109 LADR_0x00CE CALL LADR_0x031E GOTO LADR_0x0109 LADR_0x00D0 CALL LADR_0x029C GOTO LADR_0x0109 LADR_0x00D2 CLRF LRAM_0x2D INCF LRAM_0x2D,F GOTO LADR_0x0109 LADR_0x00D5 MOVLW 0x02 ; b'00000010' d'002' GOTO LADR_0x00DC LADR_0x00D7 MOVLW 0x03 ; b'00000011' d'003' GOTO LADR_0x00DC LADR_0x00D9 MOVLW 0x04 ; b'00000100' d'004' GOTO LADR_0x00DC LADR_0x00DB MOVLW 0x05 ; b'00000101' d'005' LADR_0x00DC MOVWF LRAM_0x2D GOTO LADR_0x0109 LADR_0x00DE MOVF LRAM_0x24,W XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x00B2 XORLW 0x03 ; b'00000011' d'003' BTFSC STATUS,Z GOTO LADR_0x00B5 XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x00B7 XORLW 0x07 ; b'00000111' d'007' BTFSC STATUS,Z GOTO LADR_0x00B9 XORLW 0x09 ; b'00001001' d'009' BTFSC STATUS,Z GOTO LADR_0x00BC XORLW 0x1D ; b'00011101' d'029' BTFSC STATUS,Z GOTO LADR_0x00C2 XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x00C8 XORLW 0x04 ; b'00000100' d'004' BTFSC STATUS,Z GOTO LADR_0x00CE XORLW 0x03 ; b'00000011' d'003' BTFSC STATUS,Z GOTO LADR_0x00D0 XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x00D2 XORLW 0x3C ; b'00111100' d'060' "<" BTFSC STATUS,Z GOTO LADR_0x00D5 XORLW 0x07 ; b'00000111' d'007' BTFSC STATUS,Z GOTO LADR_0x00D7 XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x00D9 XORLW 0x03 ; b'00000011' d'003' BTFSC STATUS,Z GOTO LADR_0x00DB LADR_0x0109 CLRF LRAM_0x24 CALL LADR_0x056E MOVLW 0xFF ; b'11111111' d'255' MOVWF LRAM_0x20 MOVLW 0x04 ; b'00000100' d'004' MOVWF LRAM_0x21 MOVLW 0xFF ; b'11111111' d'255' MOVWF LRAM_0x22 MOVWF LRAM_0x23 LADR_0x0112 MOVF LRAM_0x21,W IORWF LRAM_0x20,W BTFSC STATUS,Z GOTO LADR_0x011C MOVLW 0x01 ; b'00000001' d'001' SUBWF LRAM_0x20,F MOVLW 0x00 ; b'00000000' d'000' BTFSS STATUS,C DECF LRAM_0x21,F SUBWF LRAM_0x21,F LADR_0x011C MOVF LRAM_0x23,W IORWF LRAM_0x22,W BTFSC STATUS,Z GOTO LADR_0x0129 MOVF LRAM_0x2D,W BTFSC STATUS,Z GOTO LADR_0x0129 MOVLW 0x01 ; b'00000001' d'001' SUBWF LRAM_0x22,F MOVLW 0x00 ; b'00000000' d'000' BTFSS STATUS,C DECF LRAM_0x23,F SUBWF LRAM_0x23,F LADR_0x0129 DECF LRAM_0x22,W IORWF LRAM_0x23,W BTFSS STATUS,Z GOTO LADR_0x005E CLRF LRAM_0x2D INCF LRAM_0x2D,F CALL LADR_0x056E LADR_0x0130 BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BTFSC LRAM_0x1C,1 GOTO LADR_0x0130 MOVLW 0x78 ; b'01111000' d'120' "x" MOVWF LRAM_0x1B BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVF LRAM_0x2F,W BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1A BCF STATUS,C BTFSC LRAM_0x0B,GIE BSF STATUS,C BCF LRAM_0x0B,GIE BSF LRAM_0x1C,2 MOVLW 0x55 ; b'01010101' d'085' "U" MOVWF LRAM_0x1D MOVLW 0xAA ; b'10101010' d'170' MOVWF LRAM_0x1D BSF LRAM_0x1C,1 BCF LRAM_0x1C,2 BTFSC STATUS,C BSF LRAM_0x0B,GIE LADR_0x0146 BTFSC LRAM_0x1C,1 GOTO LADR_0x0146 MOVLW 0x79 ; b'01111001' d'121' "y" MOVWF LRAM_0x1B BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVF LRAM_0x2E,W BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1A BCF STATUS,C BTFSC LRAM_0x0B,GIE BSF STATUS,C BCF LRAM_0x0B,GIE BSF LRAM_0x1C,2 MOVLW 0x55 ; b'01010101' d'085' "U" MOVWF LRAM_0x1D MOVLW 0xAA ; b'10101010' d'170' MOVWF LRAM_0x1D BSF LRAM_0x1C,1 BCF LRAM_0x1C,2 BTFSC STATUS,C BSF LRAM_0x0B,GIE LADR_0x015B BTFSC LRAM_0x1C,1 GOTO LADR_0x015B MOVLW 0x7A ; b'01111010' d'122' "z" MOVWF LRAM_0x1B BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVF LRAM_0x2C,W BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1A BCF STATUS,C BTFSC LRAM_0x0B,GIE BSF STATUS,C BCF LRAM_0x0B,GIE BSF LRAM_0x1C,2 MOVLW 0x55 ; b'01010101' d'085' "U" MOVWF LRAM_0x1D MOVLW 0xAA ; b'10101010' d'170' MOVWF LRAM_0x1D BSF LRAM_0x1C,1 BCF LRAM_0x1C,2 BTFSC STATUS,C BSF LRAM_0x0B,GIE LADR_0x0170 BTFSC LRAM_0x1C,1 GOTO LADR_0x0170 MOVLW 0x7B ; b'01111011' d'123' "{" MOVWF LRAM_0x1B BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVF LRAM_0x26,W BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1A BCF STATUS,C BTFSC LRAM_0x0B,GIE BSF STATUS,C BCF LRAM_0x0B,GIE BSF LRAM_0x1C,2 MOVLW 0x55 ; b'01010101' d'085' "U" MOVWF LRAM_0x1D MOVLW 0xAA ; b'10101010' d'170' MOVWF LRAM_0x1D BSF LRAM_0x1C,1 BCF LRAM_0x1C,2 BTFSC STATUS,C BSF LRAM_0x0B,GIE LADR_0x0185 BTFSC LRAM_0x1C,1 GOTO LADR_0x0185 MOVLW 0x7C ; b'01111100' d'124' "|" MOVWF LRAM_0x1B BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVF LRAM_0x25,W BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1A BCF STATUS,C BTFSC LRAM_0x0B,GIE BSF STATUS,C BCF LRAM_0x0B,GIE BSF LRAM_0x1C,2 MOVLW 0x55 ; b'01010101' d'085' "U" MOVWF LRAM_0x1D MOVLW 0xAA ; b'10101010' d'170' MOVWF LRAM_0x1D BSF LRAM_0x1C,1 BCF LRAM_0x1C,2 BTFSC STATUS,C BSF LRAM_0x0B,GIE LADR_0x019A BTFSC LRAM_0x1C,1 GOTO LADR_0x019A MOVLW 0x7D ; b'01111101' d'125' "}" MOVWF LRAM_0x1B BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVF LRAM_0x27,W BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1A BCF STATUS,C BTFSC LRAM_0x0B,GIE BSF STATUS,C BCF LRAM_0x0B,GIE BSF LRAM_0x1C,2 MOVLW 0x55 ; b'01010101' d'085' "U" MOVWF LRAM_0x1D MOVLW 0xAA ; b'10101010' d'170' MOVWF LRAM_0x1D BSF LRAM_0x1C,1 BCF LRAM_0x1C,2 BTFSS STATUS,C GOTO LADR_0x005E BSF LRAM_0x0B,GIE GOTO LADR_0x005E LADR_0x01B1 MOVLW 0x01 ; b'00000001' d'001' BTFSS LRAM_0x0B,RBIF ANDLW 0x00 ; b'00000000' d'000' BTFSS LRAM_0x0B,RBIE ANDLW 0x00 ; b'00000000' d'000' IORLW 0x00 ; b'00000000' d'000' BTFSC STATUS,Z GOTO LADR_0x01D5 BCF LRAM_0x0B,RBIF MOVLW 0x00 ; b'00000000' d'000' BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BCF STATUS,RP1 ; !!Bank Register-Bank(2/3)-Select BTFSC PORTB,7 ; !!Bank!! PORTB - TRISB - PORTB - TRISB MOVLW 0x01 ; b'00000001' d'001' MOVWF LRAM_0x77 MOVLW 0x00 ; b'00000000' d'000' BTFSC PORTB,6 ; !!Bank!! PORTB - TRISB - PORTB - TRISB MOVLW 0x01 ; b'00000001' d'001' MOVWF LRAM_0x7D XORWF LRAM_0x29,W BTFSC STATUS,Z GOTO LADR_0x01D3 DECF LRAM_0x7D,W BTFSC STATUS,Z GOTO LADR_0x01D3 DECF LRAM_0x77,W BTFSC STATUS,Z GOTO LADR_0x01D0 CLRF LRAM_0x2A INCF LRAM_0x2A,F GOTO LADR_0x01D1 LADR_0x01D0 CLRF LRAM_0x2A LADR_0x01D1 CLRF LRAM_0x28 INCF LRAM_0x28,F LADR_0x01D3 MOVF LRAM_0x7D,W MOVWF LRAM_0x29 LADR_0x01D5 MOVLW 0x01 ; b'00000001' d'001' BTFSS LRAM_0x0B,T0IF ANDLW 0x00 ; b'00000000' d'000' BTFSS LRAM_0x0B,T0IE ANDLW 0x00 ; b'00000000' d'000' IORLW 0x00 ; b'00000000' d'000' BTFSC STATUS,Z GOTO LADR_0x0229 BCF LRAM_0x0B,T0IF CLRF LRAM_0x78 INCF LRAM_0x78,F CLRF LRAM_0x79 CLRF LRAM_0x7A LADR_0x01E2 MOVLW 0xA0 ; b'10100000' d'160' MOVWF LRAM_0x7B CLRF LRAM_0x7C LADR_0x01E5 MOVLW 0x01 ; b'00000001' d'001' SUBWF LRAM_0x7B,F BTFSS STATUS,C DECF LRAM_0x7C,F INCF LRAM_0x7B,W BTFSC STATUS,Z INCF LRAM_0x7C,W BTFSS STATUS,Z GOTO LADR_0x01E5 BCF STATUS,C BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BCF STATUS,RP1 ; !!Bank Register-Bank(2/3)-Select BTFSC PORTA,4 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented BSF STATUS,C MOVLW 0x00 ; b'00000000' d'000' BTFSC STATUS,C MOVLW 0x01 ; b'00000001' d'001' MOVWF LRAM_0x70 CLRF LRAM_0x71 MOVF LRAM_0x79,W MOVWF LRAM_0x73 MOVF LRAM_0x78,W MOVWF LRAM_0x72 BCF STATUS,C RLF LRAM_0x72,F RLF LRAM_0x73,F MOVF LRAM_0x70,W ADDWF LRAM_0x72,W MOVWF LRAM_0x78 MOVF LRAM_0x71,W BTFSC STATUS,C INCF LRAM_0x71,W ADDWF LRAM_0x73,W MOVWF LRAM_0x79 MOVLW 0x00 ; b'00000000' d'000' BTFSC PORTA,4 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVLW 0x01 ; b'00000001' d'001' MOVWF LRAM_0x76 MOVLW 0x32 ; b'00110010' d'050' "2" MOVWF LRAM_0x7B LADR_0x020D CLRF LRAM_0x7C LADR_0x020E MOVF LRAM_0x7C,W IORWF LRAM_0x7B,W BTFSC STATUS,Z GOTO LADR_0x021E MOVLW 0x01 ; b'00000001' d'001' SUBWF LRAM_0x7B,F MOVLW 0x00 ; b'00000000' d'000' BTFSS STATUS,C DECF LRAM_0x7C,F BTFSC PORTA,4 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVLW 0x01 ; b'00000001' d'001' XORWF LRAM_0x76,W BTFSC STATUS,Z GOTO LADR_0x020E CLRF LRAM_0x7B GOTO LADR_0x020D LADR_0x021E INCF LRAM_0x7A,F MOVLW 0x0D ; b'00001101' d'013' SUBWF LRAM_0x7A,W BTFSS STATUS,C GOTO LADR_0x01E2 MOVF LRAM_0x78,W MOVWF LRAM_0x24 MOVLW 0x3F ; b'00111111' d'063' "?" ANDWF LRAM_0x24,F MOVLW 0xFF ; b'11111111' d'255' MOVWF TMR0 ; !!Bank!! TMR0 - OPTION_REG - TMR0 - OPTION_REG LADR_0x0229 MOVF LRAM_0x75,W MOVWF LRAM_0x0A MOVF LRAM_0x74,W MOVWF STATUS SWAPF LRAM_0x7E,F SWAPF LRAM_0x7E,W RETFIE LADR_0x0230 BCF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVLW 0x7F ; b'01111111' d'127' "" CALL LADR_0x0516 BSF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVLW 0x1F ; b'00011111' d'031' CALL LADR_0x0516 MOVLW 0x1D ; b'00011101' d'029' CALL LADR_0x0516 MOVLW 0x1D ; b'00011101' d'029' CALL LADR_0x0516 MOVLW 0x11 ; b'00010001' d'017' CALL LADR_0x0516 MOVLW 0x15 ; b'00010101' d'021' CALL LADR_0x0516 MOVLW 0x15 ; b'00010101' d'021' CALL LADR_0x0516 MOVLW 0x1F ; b'00011111' d'031' CALL LADR_0x0516 MOVLW 0x00 ; b'00000000' d'000' CALL LADR_0x0516 MOVLW 0x1F ; b'00011111' d'031' CALL LADR_0x0516 MOVLW 0x11 ; b'00010001' d'017' CALL LADR_0x0516 MOVLW 0x1D ; b'00011101' d'029' CALL LADR_0x0516 MOVLW 0x19 ; b'00011001' d'025' CALL LADR_0x0516 MOVLW 0x1D ; b'00011101' d'029' CALL LADR_0x0516 MOVLW 0x11 ; b'00010001' d'017' CALL LADR_0x0516 MOVLW 0x1F ; b'00011111' d'031' CALL LADR_0x0516 MOVLW 0x00 ; b'00000000' d'000' CALL LADR_0x0516 MOVLW 0x1F ; b'00011111' d'031' CALL LADR_0x0516 MOVLW 0x11 ; b'00010001' d'017' CALL LADR_0x0516 MOVLW 0x17 ; b'00010111' d'023' CALL LADR_0x0516 MOVLW 0x11 ; b'00010001' d'017' CALL LADR_0x0516 MOVLW 0x1D ; b'00011101' d'029' CALL LADR_0x0516 MOVLW 0x11 ; b'00010001' d'017' CALL LADR_0x0516 MOVLW 0x1F ; b'00011111' d'031' CALL LADR_0x0516 MOVLW 0x00 ; b'00000000' d'000' CALL LADR_0x0516 MOVLW 0x1F ; b'00011111' d'031' CALL LADR_0x0516 MOVLW 0x11 ; b'00010001' d'017' CALL LADR_0x0516 MOVLW 0x1B ; b'00011011' d'027' CALL LADR_0x0516 MOVLW 0x1B ; b'00011011' d'027' CALL LADR_0x0516 MOVLW 0x13 ; b'00010011' d'019' CALL LADR_0x0516 MOVLW 0x1B ; b'00011011' d'027' CALL LADR_0x0516 MOVLW 0x1F ; b'00011111' d'031' CALL LADR_0x0516 MOVLW 0x00 ; b'00000000' d'000' CALL LADR_0x0516 CLRF LRAM_0x32 LADR_0x0275 MOVLW 0x15 ; b'00010101' d'021' CALL LADR_0x0516 INCF LRAM_0x32,F MOVLW 0x08 ; b'00001000' d'008' SUBWF LRAM_0x32,W BTFSS STATUS,C GOTO LADR_0x0275 CLRF LRAM_0x32 LADR_0x027D MOVLW 0x14 ; b'00010100' d'020' CALL LADR_0x0516 INCF LRAM_0x32,F MOVLW 0x08 ; b'00001000' d'008' SUBWF LRAM_0x32,W BTFSS STATUS,C GOTO LADR_0x027D CLRF LRAM_0x32 LADR_0x0285 MOVLW 0x10 ; b'00010000' d'016' CALL LADR_0x0516 INCF LRAM_0x32,F MOVLW 0x08 ; b'00001000' d'008' SUBWF LRAM_0x32,W BTFSS STATUS,C GOTO LADR_0x0285 MOVLW 0x01 ; b'00000001' d'001' CALL LADR_0x0516 MOVLW 0x03 ; b'00000011' d'003' CALL LADR_0x0516 MOVLW 0x1D ; b'00011101' d'029' CALL LADR_0x0516 MOVLW 0x15 ; b'00010101' d'021' CALL LADR_0x0516 MOVLW 0x1D ; b'00011101' d'029' CALL LADR_0x0516 MOVLW 0x03 ; b'00000011' d'003' CALL LADR_0x0516 MOVLW 0x01 ; b'00000001' d'001' CALL LADR_0x0516 MOVLW 0x00 ; b'00000000' d'000' GOTO LADR_0x0516 LADR_0x029C GOTO LADR_0x02D0 LADR_0x029D INCF LRAM_0x2F,F MOVLW 0x31 ; b'00110001' d'049' "1" SUBWF LRAM_0x2F,W BTFSS STATUS,C RETURN MOVLW 0x30 ; b'00110000' d'048' "0" MOVWF LRAM_0x2F RETURN LADR_0x02A5 INCF LRAM_0x2E,F MOVLW 0x11 ; b'00010001' d'017' SUBWF LRAM_0x2E,W BTFSS STATUS,C RETURN MOVLW 0x10 ; b'00010000' d'016' MOVWF LRAM_0x2E RETURN LADR_0x02AD INCF LRAM_0x2C,F MOVLW 0x11 ; b'00010001' d'017' SUBWF LRAM_0x2C,W BTFSS STATUS,C RETURN MOVLW 0x10 ; b'00010000' d'016' MOVWF LRAM_0x2C RETURN LADR_0x02B5 INCF LRAM_0x26,F MOVLW 0x11 ; b'00010001' d'017' SUBWF LRAM_0x26,W BTFSS STATUS,C RETURN MOVLW 0x10 ; b'00010000' d'016' MOVWF LRAM_0x26 RETURN LADR_0x02BD INCF LRAM_0x25,F MOVLW 0x51 ; b'01010001' d'081' "Q" SUBWF LRAM_0x25,W BTFSS STATUS,C RETURN MOVLW 0x50 ; b'01010000' d'080' "P" MOVWF LRAM_0x25 RETURN LADR_0x02C5 MOVF LRAM_0x21,W IORWF LRAM_0x20,W BTFSC STATUS,Z INCF LRAM_0x27,F MOVLW 0x05 ; b'00000101' d'005' SUBWF LRAM_0x27,W BTFSS STATUS,C RETURN CLRF LRAM_0x27 INCF LRAM_0x27,F RETURN LADR_0x02D0 MOVF LRAM_0x2D,W XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x029D XORLW 0x03 ; b'00000011' d'003' BTFSC STATUS,Z GOTO LADR_0x02A5 XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x02AD XORLW 0x07 ; b'00000111' d'007' BTFSC STATUS,Z GOTO LADR_0x02B5 XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x02BD XORLW 0x03 ; b'00000011' d'003' BTFSS STATUS,Z RETURN GOTO LADR_0x02C5 LADR_0x02E4 CALL LADR_0x0593 MOVLW 0x88 ; b'10001000' d'136' CALL LADR_0x045F MOVLW 0x10 ; b'00010000' d'016' CALL LADR_0x045F BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVF LRAM_0x27,W SUBLW 0x04 ; b'00000100' d'004' CALL LADR_0x045F MOVLW 0x0E ; b'00001110' d'014' CALL LADR_0x045F BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select DECFSZ LRAM_0x3A,W GOTO LADR_0x02F4 MOVLW 0x78 ; b'01111000' d'120' "x" GOTO LADR_0x02F6 LADR_0x02F4 MOVF LRAM_0x2F,W SUBLW 0x30 ; b'00110000' d'048' "0" LADR_0x02F6 CALL LADR_0x045F BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVF LRAM_0x26,W ADDLW 0x01 ; b'00000001' d'001' MOVWF FSR CALL LADR_0x000B CALL LADR_0x045F BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVF LRAM_0x2C,W ADDLW 0x01 ; b'00000001' d'001' MOVWF FSR CALL LADR_0x000B CALL LADR_0x045F BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVF LRAM_0x2E,W ADDLW 0x01 ; b'00000001' d'001' MOVWF FSR CALL LADR_0x000B CALL LADR_0x045F MOVLW 0x29 ; b'00101001' d'041' ")" BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select SUBWF LRAM_0x25,W BTFSC STATUS,C GOTO LADR_0x0311 MOVF LRAM_0x25,W SUBLW 0x28 ; b'00101000' d'040' "(" GOTO LADR_0x0312 LADR_0x0311 MOVLW 0x00 ; b'00000000' d'000' LADR_0x0312 CALL LADR_0x045F MOVLW 0x28 ; b'00101000' d'040' "(" BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select SUBWF LRAM_0x25,W BTFSS STATUS,C GOTO LADR_0x031B MOVF LRAM_0x25,W ADDLW 0xD8 ; b'11011000' d'216' GOTO LADR_0x031C LADR_0x031B MOVLW 0x00 ; b'00000000' d'000' LADR_0x031C CALL LADR_0x045F GOTO LADR_0x05A7 LADR_0x031E GOTO LADR_0x0342 LADR_0x031F DECFSZ LRAM_0x2F,F RETURN CLRF LRAM_0x2F INCF LRAM_0x2F,F RETURN LADR_0x0324 DECFSZ LRAM_0x2E,F RETURN CLRF LRAM_0x2E INCF LRAM_0x2E,F RETURN LADR_0x0329 DECFSZ LRAM_0x2C,F RETURN CLRF LRAM_0x2C INCF LRAM_0x2C,F RETURN LADR_0x032E DECFSZ LRAM_0x26,F RETURN CLRF LRAM_0x26 INCF LRAM_0x26,F RETURN LADR_0x0333 DECFSZ LRAM_0x25,F RETURN CLRF LRAM_0x25 INCF LRAM_0x25,F RETURN LADR_0x0338 MOVF LRAM_0x21,W IORWF LRAM_0x20,W BTFSC STATUS,Z DECF LRAM_0x27,F MOVF LRAM_0x27,F BTFSS STATUS,Z RETURN MOVLW 0x04 ; b'00000100' d'004' MOVWF LRAM_0x27 RETURN LADR_0x0342 MOVF LRAM_0x2D,W XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x031F XORLW 0x03 ; b'00000011' d'003' BTFSC STATUS,Z GOTO LADR_0x0324 XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x0329 XORLW 0x07 ; b'00000111' d'007' BTFSC STATUS,Z GOTO LADR_0x032E XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x0333 XORLW 0x03 ; b'00000011' d'003' BTFSS STATUS,Z RETURN GOTO LADR_0x0338 LADR_0x0356 DECFSZ LRAM_0x3B,W GOTO LADR_0x035D CLRF LRAM_0x3B CLRF LRAM_0x3A CLRF LRAM_0x2D INCF LRAM_0x2D,F GOTO LADR_0x0362 LADR_0x035D CLRF LRAM_0x3B INCF LRAM_0x3B,F CLRF LRAM_0x3A INCF LRAM_0x3A,F CLRF LRAM_0x2D LADR_0x0362 BCF LRAM_0x0B,GIE MOVLW 0xFF ; b'11111111' d'255' MOVWF LRAM_0x31 LADR_0x0365 DECF LRAM_0x31,F MOVF LRAM_0x31,W XORLW 0xFF ; b'11111111' d'255' BTFSC STATUS,Z GOTO LADR_0x0388 MOVF LRAM_0x31,W MOVWF LRAM_0x30 BTFSS LRAM_0x3B,0 GOTO LADR_0x0372 BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BCF STATUS,RP1 ; !!Bank Register-Bank(2/3)-Select BSF PORTB,4 ; !!Bank!! PORTB - TRISB - PORTB - TRISB GOTO LADR_0x0375 LADR_0x0372 BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BCF STATUS,RP1 ; !!Bank Register-Bank(2/3)-Select BCF PORTB,4 ; !!Bank!! PORTB - TRISB - PORTB - TRISB LADR_0x0375 DECF LRAM_0x30,F MOVF LRAM_0x30,W XORLW 0xFF ; b'11111111' d'255' BTFSS STATUS,Z GOTO LADR_0x0375 MOVF LRAM_0x31,W MOVWF LRAM_0x30 BTFSC LRAM_0x3B,0 GOTO LADR_0x0382 BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BCF STATUS,RP1 ; !!Bank Register-Bank(2/3)-Select BSF PORTB,4 ; !!Bank!! PORTB - TRISB - PORTB - TRISB GOTO LADR_0x0385 LADR_0x0382 BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BCF STATUS,RP1 ; !!Bank Register-Bank(2/3)-Select BCF PORTB,4 ; !!Bank!! PORTB - TRISB - PORTB - TRISB LADR_0x0385 INCFSZ LRAM_0x30,F GOTO LADR_0x0385 GOTO LADR_0x0365 LADR_0x0388 BSF LRAM_0x0B,GIE RETURN LADR_0x038A MOVLW 0x02 ; b'00000010' d'002' CALL LADR_0x0410 GOTO LADR_0x03A4 LADR_0x038D MOVF LRAM_0x2F,W CALL LADR_0x04C3 GOTO LADR_0x03B7 LADR_0x0390 MOVF LRAM_0x2E,W CALL LADR_0x0562 GOTO LADR_0x03B7 LADR_0x0393 MOVF LRAM_0x2C,W CALL LADR_0x0562 GOTO LADR_0x03B7 LADR_0x0396 MOVF LRAM_0x26,W CALL LADR_0x0562 GOTO LADR_0x03B7 LADR_0x0399 MOVF LRAM_0x25,W CALL LADR_0x04A3 GOTO LADR_0x03B7 LADR_0x039C MOVLW 0x10 ; b'00010000' d'016' MOVWF LRAM_0x32 MOVLW 0x01 ; b'00000001' d'001' CALL LADR_0x0544 MOVF LRAM_0x27,W ADDLW 0x03 ; b'00000011' d'003' CALL LADR_0x0516 GOTO LADR_0x03B7 LADR_0x03A4 MOVF LRAM_0x2D,W XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x038D XORLW 0x03 ; b'00000011' d'003' BTFSC STATUS,Z GOTO LADR_0x0390 XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x0393 XORLW 0x07 ; b'00000111' d'007' BTFSC STATUS,Z GOTO LADR_0x0396 XORLW 0x01 ; b'00000001' d'001' BTFSC STATUS,Z GOTO LADR_0x0399 XORLW 0x03 ; b'00000011' d'003' BTFSC STATUS,Z GOTO LADR_0x039C LADR_0x03B7 GOTO LADR_0x02E4 LADR_0x03B8 MOVLW 0x53 ; b'01010011' d'083' "S" MOVWF LRAM_0x34 MOVLW 0x05 ; b'00000101' d'005' MOVWF LRAM_0x35 LADR_0x03BC MOVLW 0x01 ; b'00000001' d'001' SUBWF LRAM_0x34,F BTFSS STATUS,C DECF LRAM_0x35,F INCF LRAM_0x34,W BTFSC STATUS,Z INCF LRAM_0x35,W BTFSS STATUS,Z GOTO LADR_0x03BC BCF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented BCF PORTB,3 ; !!Bank!! PORTB - TRISB - PORTB - TRISB BCF PORTB,2 ; !!Bank!! PORTB - TRISB - PORTB - TRISB BSF PORTB,1 ; !!Bank!! PORTB - TRISB - PORTB - TRISB BCF PORTB,0 ; !!Bank!! PORTB - TRISB - PORTB - TRISB BSF PORTA,3 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented BCF PORTA,3 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVLW 0x74 ; b'01110100' d'116' "t" MOVWF LRAM_0x34 MOVLW 0x01 ; b'00000001' d'001' MOVWF LRAM_0x35 LADR_0x03D0 MOVLW 0x01 ; b'00000001' d'001' SUBWF LRAM_0x34,F MOVLW 0x00 ; b'00000000' d'000' BTFSS STATUS,C DECF LRAM_0x35,F SUBWF LRAM_0x35,F INCF LRAM_0x34,W BTFSC STATUS,Z INCF LRAM_0x35,W BTFSS STATUS,Z GOTO LADR_0x03D0 MOVLW 0x2B ; b'00101011' d'043' "+" CALL LADR_0x0516 MOVLW 0x13 ; b'00010011' d'019' CALL LADR_0x0516 MOVLW 0x0C ; b'00001100' d'012' CALL LADR_0x0516 MOVLW 0x04 ; b'00000100' d'004' CALL LADR_0x0516 CALL LADR_0x0230 GOTO LADR_0x052E LADR_0x03E5 MOVWF LRAM_0x32 CLRF LRAM_0x34 CLRF LRAM_0x33 LADR_0x03E8 MOVF LRAM_0x32,W XORWF LRAM_0x34,W BTFSC STATUS,Z GOTO LADR_0x03F7 MOVF LRAM_0x33,W BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1B BSF LRAM_0x1C,0 MOVF LRAM_0x1A,F BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BTFSC STATUS,Z INCF LRAM_0x34,F BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select INCF LRAM_0x33,F GOTO LADR_0x03E8 LADR_0x03F7 CLRF LRAM_0x34 LADR_0x03F8 MOVF LRAM_0x33,W BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1B BSF LRAM_0x1C,0 MOVF LRAM_0x1A,W CALL LADR_0x0516 INCF LRAM_0x33,F MOVF LRAM_0x33,W BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1B BSF LRAM_0x1C,0 MOVF LRAM_0x1A,F BTFSS STATUS,Z GOTO LADR_0x0409 MOVLW 0x10 ; b'00010000' d'016' BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x34 LADR_0x0409 BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select INCF LRAM_0x34,F MOVLW 0x10 ; b'00010000' d'016' SUBWF LRAM_0x34,W BTFSC STATUS,C RETURN GOTO LADR_0x03F8 LADR_0x0410 MOVWF LRAM_0x32 DECFSZ LRAM_0x32,W GOTO LADR_0x0423 BCF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVLW 0x80 ; b'10000000' d'128' CALL LADR_0x0516 BSF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented CLRF LRAM_0x33 LADR_0x0418 MOVLW 0x20 ; b'00100000' d'032' " " CALL LADR_0x0516 INCF LRAM_0x33,F MOVLW 0x10 ; b'00010000' d'016' SUBWF LRAM_0x33,W BTFSS STATUS,C GOTO LADR_0x0418 BCF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVLW 0x80 ; b'10000000' d'128' CALL LADR_0x0516 BSF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented LADR_0x0423 MOVF LRAM_0x32,W XORLW 0x02 ; b'00000010' d'002' BTFSS STATUS,Z RETURN BCF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVLW 0xC0 ; b'11000000' d'192' CALL LADR_0x0516 BSF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented CLRF LRAM_0x33 LADR_0x042C MOVLW 0x20 ; b'00100000' d'032' " " CALL LADR_0x0516 INCF LRAM_0x33,F MOVLW 0x10 ; b'00010000' d'016' SUBWF LRAM_0x33,W BTFSS STATUS,C GOTO LADR_0x042C BCF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVLW 0xC0 ; b'11000000' d'192' CALL LADR_0x0516 BSF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented RETURN LADR_0x0438 MOVWF LRAM_0x33 MOVLW 0x30 ; b'00110000' d'048' "0" MOVWF LRAM_0x34 MOVWF LRAM_0x32 LADR_0x043C MOVLW 0x0A ; b'00001010' d'010' SUBWF LRAM_0x33,W BTFSS STATUS,C GOTO LADR_0x0444 INCF LRAM_0x34,F MOVLW 0xF6 ; b'11110110' d'246' ADDWF LRAM_0x33,F GOTO LADR_0x043C LADR_0x0444 MOVF LRAM_0x33,W ADDWF LRAM_0x32,F BCF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVLW 0x8B ; b'10001011' d'139' CALL LADR_0x0516 BSF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVF LRAM_0x34,W XORLW 0x30 ; b'00110000' d'048' "0" BTFSS STATUS,Z GOTO LADR_0x0450 MOVLW 0x20 ; b'00100000' d'032' " " MOVWF LRAM_0x34 LADR_0x0450 MOVF LRAM_0x34,W CALL LADR_0x0516 MOVF LRAM_0x32,W CALL LADR_0x0516 MOVLW 0x20 ; b'00100000' d'032' " " CALL LADR_0x0516 MOVLW 0x00 ; b'00000000' d'000' CALL LADR_0x0516 DECFSZ LRAM_0x3A,W GOTO LADR_0x045C MOVLW 0x78 ; b'01111000' d'120' "x" GOTO LADR_0x0516 LADR_0x045C MOVF LRAM_0x27,W ADDLW 0x03 ; b'00000011' d'003' GOTO LADR_0x0516 LADR_0x045F BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x31 MOVLW 0x08 ; b'00001000' d'008' MOVWF LRAM_0x32 LADR_0x0463 MOVF LRAM_0x32,F BTFSC STATUS,Z GOTO LADR_0x047B DECF LRAM_0x32,F MOVF LRAM_0x31,W MOVWF LRAM_0x30 INCF LRAM_0x32,W GOTO LADR_0x046D LADR_0x046B BCF STATUS,C RRF LRAM_0x30,F LADR_0x046D ADDLW 0xFF ; b'11111111' d'255' BTFSS STATUS,Z GOTO LADR_0x046B BTFSS LRAM_0x30,0 GOTO LADR_0x0476 BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BCF STATUS,RP1 ; !!Bank Register-Bank(2/3)-Select BSF PORTA,6 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented GOTO LADR_0x0479 LADR_0x0476 BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BCF STATUS,RP1 ; !!Bank Register-Bank(2/3)-Select BCF PORTA,6 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented LADR_0x0479 CALL LADR_0x05A1 GOTO LADR_0x0463 LADR_0x047B BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BSF PORTA,6 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented CALL LADR_0x05B1 CALL LADR_0x05A1 BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BCF PORTA,6 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented RETURN LADR_0x0482 BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select CLRF LRAM_0x2B BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BSF PORTB,0 ; !!Bank!! PORTB - TRISB - PORTB - TRISB BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BTFSC PORTB,0 ; !!Bank!! PORTB - TRISB - PORTB - TRISB GOTO LADR_0x048B CLRF LRAM_0x2B INCF LRAM_0x2B,F LADR_0x048B BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BCF PORTB,0 ; !!Bank!! PORTB - TRISB - PORTB - TRISB BSF PORTB,1 ; !!Bank!! PORTB - TRISB - PORTB - TRISB BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BTFSC PORTB,1 ; !!Bank!! PORTB - TRISB - PORTB - TRISB GOTO LADR_0x0493 MOVLW 0x02 ; b'00000010' d'002' MOVWF LRAM_0x2B LADR_0x0493 BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BCF PORTB,1 ; !!Bank!! PORTB - TRISB - PORTB - TRISB BSF PORTB,2 ; !!Bank!! PORTB - TRISB - PORTB - TRISB BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BTFSC PORTB,2 ; !!Bank!! PORTB - TRISB - PORTB - TRISB GOTO LADR_0x049B MOVLW 0x03 ; b'00000011' d'003' MOVWF LRAM_0x2B LADR_0x049B BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BCF PORTB,2 ; !!Bank!! PORTB - TRISB - PORTB - TRISB BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BTFSC PORTB,5 ; !!Bank!! PORTB - TRISB - PORTB - TRISB RETURN MOVLW 0x04 ; b'00000100' d'004' MOVWF LRAM_0x2B RETURN LADR_0x04A3 MOVWF LRAM_0x35 CLRF LRAM_0x36 LADR_0x04A5 INCF LRAM_0x36,F MOVLW 0x05 ; b'00000101' d'005' MOVWF LRAM_0x30 MOVF LRAM_0x35,W CALL LADR_0x04E1 SUBWF LRAM_0x36,W BTFSC STATUS,C GOTO LADR_0x04B0 MOVLW 0x03 ; b'00000011' d'003' CALL LADR_0x0516 GOTO LADR_0x04A5 LADR_0x04B0 MOVLW 0x3E ; b'00111110' d'062' ">" CALL LADR_0x0516 MOVLW 0x3C ; b'00111100' d'060' "<" CALL LADR_0x0516 MOVLW 0x05 ; b'00000101' d'005' MOVWF LRAM_0x30 MOVF LRAM_0x35,W CALL LADR_0x04E1 MOVWF LRAM_0x36 LADR_0x04B9 MOVLW 0x10 ; b'00010000' d'016' SUBWF LRAM_0x36,W BTFSC STATUS,C GOTO LADR_0x04C1 MOVLW 0x03 ; b'00000011' d'003' CALL LADR_0x0516 INCF LRAM_0x36,F GOTO LADR_0x04B9 LADR_0x04C1 MOVF LRAM_0x35,W GOTO LADR_0x0438 LADR_0x04C3 MOVWF LRAM_0x36 CLRF LRAM_0x37 LADR_0x04C5 MOVLW 0x03 ; b'00000011' d'003' MOVWF LRAM_0x30 MOVF LRAM_0x36,W CALL LADR_0x04E1 SUBWF LRAM_0x37,W BTFSC STATUS,C GOTO LADR_0x04D0 MOVLW 0x03 ; b'00000011' d'003' CALL LADR_0x0516 INCF LRAM_0x37,F GOTO LADR_0x04C5 LADR_0x04D0 MOVLW 0xFD ; b'11111101' d'253' MOVWF LRAM_0x30 MOVF LRAM_0x37,W CALL LADR_0x0554 MOVWF LRAM_0x35 MOVF LRAM_0x36,W ADDWF LRAM_0x35,W MOVWF LRAM_0x37 MOVF LRAM_0x37,F BTFSS STATUS,Z GOTO LADR_0x04DD MOVLW 0x20 ; b'00100000' d'032' " " MOVWF LRAM_0x37 LADR_0x04DD MOVF LRAM_0x37,W CALL LADR_0x0516 MOVF LRAM_0x36,W GOTO LADR_0x0438 LADR_0x04E1 MOVWF LRAM_0x31 CLRF LRAM_0x33 MOVF LRAM_0x30,W BTFSC STATUS,Z GOTO LADR_0x04FA CLRF LRAM_0x32 LADR_0x04E7 INCF LRAM_0x32,F BTFSC LRAM_0x30,7 GOTO LADR_0x04ED BCF STATUS,C RLF LRAM_0x30,F GOTO LADR_0x04E7 LADR_0x04ED BCF STATUS,C RLF LRAM_0x33,F MOVF LRAM_0x30,W SUBWF LRAM_0x31,W BTFSS STATUS,C GOTO LADR_0x04F7 MOVF LRAM_0x30,W SUBWF LRAM_0x31,F BSF LRAM_0x33,0 BCF STATUS,C LADR_0x04F7 RRF LRAM_0x30,F DECFSZ LRAM_0x32,F GOTO LADR_0x04ED LADR_0x04FA MOVF LRAM_0x33,W RETURN LADR_0x04FC CLRF LRAM_0x0B MOVLW 0x10 ; b'00010000' d'016' BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF PORTA ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVLW 0xE0 ; b'11100000' d'224' MOVWF PORTB ; !!Bank!! PORTB - TRISB - PORTB - TRISB MOVLW 0x07 ; b'00000111' d'007' BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x1F CLRF PORTA ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented CLRF PORTB ; !!Bank!! PORTB - TRISB - PORTB - TRISB BSF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BCF TMR0,7 ; !!Bank!! TMR0 - OPTION_REG - TMR0 - OPTION_REG BSF LRAM_0x0B,PEIE BSF TMR0,5 ; !!Bank!! TMR0 - OPTION_REG - TMR0 - OPTION_REG BSF TMR0,4 ; !!Bank!! TMR0 - OPTION_REG - TMR0 - OPTION_REG BSF TMR0,3 ; !!Bank!! TMR0 - OPTION_REG - TMR0 - OPTION_REG MOVLW 0xFF ; b'11111111' d'255' BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF TMR0 ; !!Bank!! TMR0 - OPTION_REG - TMR0 - OPTION_REG BSF LRAM_0x0B,T0IE BCF LRAM_0x0B,T0IF BSF LRAM_0x0B,RBIE BCF LRAM_0x0B,RBIF BSF LRAM_0x0B,GIE RETURN LADR_0x0516 BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select MOVWF LRAM_0x31 MOVLW 0x0A ; b'00001010' d'010' MOVWF LRAM_0x30 MOVLW 0xF0 ; b'11110000' d'240' ANDWF PORTB,F ; !!Bank!! PORTB - TRISB - PORTB - TRISB SWAPF LRAM_0x31,W ANDLW 0x0F ; b'00001111' d'015' ADDWF PORTB,F ; !!Bank!! PORTB - TRISB - PORTB - TRISB BSF PORTA,3 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented BCF PORTA,3 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVLW 0xF0 ; b'11110000' d'240' ANDWF PORTB,F ; !!Bank!! PORTB - TRISB - PORTB - TRISB MOVF LRAM_0x31,W ANDLW 0x0F ; b'00001111' d'015' ADDWF PORTB,F ; !!Bank!! PORTB - TRISB - PORTB - TRISB BSF PORTA,3 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented BCF PORTA,3 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented LADR_0x0528 DECF LRAM_0x30,F MOVF LRAM_0x30,W XORLW 0xFF ; b'11111111' d'255' BTFSC STATUS,Z RETURN GOTO LADR_0x0528 LADR_0x052E MOVLW 0x96 ; b'10010110' d'150' MOVWF LRAM_0x32 CLRF LRAM_0x33 BCF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVLW 0x01 ; b'00000001' d'001' CALL LADR_0x0516 LADR_0x0534 MOVLW 0x01 ; b'00000001' d'001' SUBWF LRAM_0x32,F MOVLW 0x00 ; b'00000000' d'000' BTFSS STATUS,C DECF LRAM_0x33,F SUBWF LRAM_0x33,F INCF LRAM_0x32,W BTFSC STATUS,Z INCF LRAM_0x33,W BTFSS STATUS,Z GOTO LADR_0x0534 BCF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented MOVLW 0x80 ; b'10000000' d'128' CALL LADR_0x0516 BSF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented RETURN LADR_0x0544 MOVWF LRAM_0x33 BCF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented DECFSZ LRAM_0x33,W GOTO LADR_0x054B MOVF LRAM_0x32,W ADDLW 0x7F ; b'01111111' d'127' "" CALL LADR_0x0516 LADR_0x054B MOVF LRAM_0x33,W XORLW 0x02 ; b'00000010' d'002' BTFSS STATUS,Z GOTO LADR_0x0552 MOVF LRAM_0x32,W ADDLW 0xBF ; b'10111111' d'191' CALL LADR_0x0516 LADR_0x0552 BSF PORTA,2 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented RETURN LADR_0x0554 MOVWF LRAM_0x32 CLRF LRAM_0x31 LADR_0x0556 MOVF LRAM_0x30,W BTFSC LRAM_0x32,0 ADDWF LRAM_0x31,F BCF STATUS,C RLF LRAM_0x30,F BCF STATUS,C RRF LRAM_0x32,F MOVF LRAM_0x32,F BTFSS STATUS,Z GOTO LADR_0x0556 MOVF LRAM_0x31,W RETURN LADR_0x0562 MOVWF LRAM_0x35 CLRF LRAM_0x36 LADR_0x0564 MOVF LRAM_0x35,W SUBWF LRAM_0x36,W BTFSC STATUS,C GOTO LADR_0x056C MOVLW 0x03 ; b'00000011' d'003' CALL LADR_0x0516 INCF LRAM_0x36,F GOTO LADR_0x0564 LADR_0x056C MOVF LRAM_0x36,W GOTO LADR_0x0438 LADR_0x056E CALL LADR_0x052E MOVF LRAM_0x2D,F BTFSS STATUS,Z GOTO LADR_0x0576 MOVLW 0x05 ; b'00000101' d'005' MOVWF LRAM_0x32 MOVLW 0x01 ; b'00000001' d'001' CALL LADR_0x0544 LADR_0x0576 MOVF LRAM_0x2D,W CALL LADR_0x03E5 GOTO LADR_0x038A LADR_0x0579 BCF STATUS,IRP MOVLW 0x20 ; b'00100000' d'032' " " MOVWF FSR MOVLW 0x30 ; b'00110000' d'048' "0" CALL LADR_0x0583 MOVLW 0x01 ; b'00000001' d'001' MOVWF LRAM_0x3A MOVWF LRAM_0x3B CLRF STATUS GOTO LADR_0x0022 LADR_0x0583 CLRWDT LADR_0x0584 CLRF INDF INCF FSR,F XORWF FSR,W BTFSC STATUS,Z RETLW 0x00 ; b'00000000' d'000' XORWF FSR,W GOTO LADR_0x0584 LADR_0x058B INCF LRAM_0x2D,F MOVLW 0x07 ; b'00000111' d'007' SUBWF LRAM_0x2D,W BTFSS STATUS,C RETURN CLRF LRAM_0x2D INCF LRAM_0x2D,F RETURN LADR_0x0593 BSF PORTA,6 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented BSF PORTA,7 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented CALL LADR_0x05B1 BCF PORTA,6 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented CALL LADR_0x05B1 BCF PORTA,7 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented RETURN LADR_0x059A DECFSZ LRAM_0x3A,W GOTO LADR_0x059E CLRF LRAM_0x3A RETURN LADR_0x059E CLRF LRAM_0x3A INCF LRAM_0x3A,F RETURN LADR_0x05A1 CALL LADR_0x05B1 BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BSF PORTA,7 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented CALL LADR_0x05B1 BCF PORTA,7 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented RETURN LADR_0x05A7 BCF STATUS,RP0 ; !!Bank Register-Bank(0/1)-Select BSF PORTA,7 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented CALL LADR_0x05B1 BSF PORTA,6 ; !!Bank!! PORTA - TRISA - Unimplemented - Unimplemented RETURN LADR_0x05AC DECFSZ LRAM_0x2D,F RETURN MOVLW 0x06 ; b'00000110' d'006' MOVWF LRAM_0x2D RETURN LADR_0x05B1 NOP NOP RETURN End