; Generated by WinDis84, (c) Nigel Goodwin 1998. LIST P=16F84, F=INHX8M include "P16FXX.inc" ORG 0x0000 MOVLW 0x20 MOVWF FSR MOVLW 0x50 CALL Label_0001 GOTO Label_0002 Label_0003 XORWF FSR , W CLRF INDF INCF FSR , f Label_0001 XORWF FSR , W BTFSS STATUS , Z GOTO Label_0003 CLRWDT RETLW 0x00 ORG 0x0429 Label_000B MOVLW 0xFF BSF STATUS , RP0 BCF STATUS , RP1 MOVWF TRISA BCF STATUS , RP0 RETURN Label_0039 MOVLW 0x07 CLRF STATUS MOVWF 0x1F MOVLW 0x80 BSF STATUS , RP0 MOVWF TRISA MOVLW 0xFF BCF STATUS , RP0 MOVWF PORTA BSF STATUS , RP0 CLRF TRISB BCF STATUS , RP0 MOVWF PORTB RETURN Label_0043 CLRF STATUS CLRF 0x46 CLRF 0x47 GOTO Label_0004 Label_0006 NOP INCF 0x46 , f BTFSC STATUS , Z INCF 0x47 , f Label_0004 MOVF 0x45 , W SUBWF 0x47 , W BTFSS STATUS , Z GOTO Label_0005 MOVF 0x44 , W SUBWF 0x46 , W Label_0005 BTFSC STATUS , C RETURN GOTO Label_0006 Label_000C CLRF STATUS CLRF PORTA MOVLW 0x01 MOVWF 0x70 MOVF 0x46 , W MOVWF 0x71 INCF 0x71 , f GOTO Label_0007 Label_0008 BCF STATUS , C RLF 0x70 , f Label_0007 DECFSZ 0x71 , f GOTO Label_0008 COMF 0x70 , W BSF STATUS , RP0 MOVWF TRISA BCF STATUS , RP0 RETURN Label_000D GOTO Label_0009 Label_000A CLRWDT NOP NOP NOP NOP NOP NOP Label_0009 BCF STATUS , RP0 BCF STATUS , RP1 MOVF 0x4E , W BTFSC STATUS , Z DECF 0x4F , f DECF 0x4E , f INCF 0x4E , W BTFSC STATUS , Z INCF 0x4F , W BTFSC STATUS , Z RETURN GOTO Label_000A Label_003A CLRF STATUS MOVF 0x44 , W MOVWF 0x46 MOVF 0x45 , W MOVWF 0x47 CALL Label_000B MOVF 0x44 , W MOVWF 0x46 MOVF 0x45 , W MOVWF 0x47 CALL Label_000C MOVLW 0x32 MOVWF 0x4E CLRF 0x4F CALL Label_000D MOVF 0x44 , W MOVWF 0x46 MOVF 0x45 , W MOVWF 0x47 CALL Label_000B MOVLW 0x32 MOVWF 0x4E CLRF 0x4F GOTO Label_0009 Label_000E MOVLW 0x64 CLRF STATUS MOVWF 0x4E CLRF 0x4F CALL Label_000D MOVLW 0xFF ADDWF 0x22 , f BCF STATUS , Z BTFSC STATUS , C ADDLW 0x01 BTFSS STATUS , Z ADDWF 0x23 , f MOVLW 0xFF BCF STATUS , Z BTFSC STATUS , C ADDLW 0x01 BTFSS STATUS , Z ADDWF 0x24 , f MOVLW 0xFF BCF STATUS , Z BTFSC STATUS , C ADDLW 0x01 BTFSS STATUS , Z ADDWF 0x25 , f MOVF 0x25 , W IORWF 0x24 , W IORWF 0x23 , W IORWF 0x22 , W BTFSC STATUS , Z RETURN GOTO Label_000E Label_003B CLRF STATUS MOVF 0x46 , W MOVWF 0x72 MOVLW 0x01 MOVWF 0x70 MOVLW 0x00 CLRF 0x71 INCF 0x72 , f GOTO Label_000F Label_0010 BCF STATUS , C RLF 0x70 , f RLF 0x71 , f Label_000F DECFSZ 0x72 , f GOTO Label_0010 COMF 0x70 , f COMF 0x71 , f MOVLW 0xFF ANDWF 0x70 , W MOVWF 0x48 CLRF 0x49 CLRF 0x4A CLRF 0x4B Label_0013 BTFSS 0x44 , 00 GOTO Label_0011 CLRF PORTA MOVF 0x48 , W BSF STATUS , RP0 MOVWF TRISA MOVLW 0xFF MOVWF TRISA MOVLW 0x06 BCF STATUS , RP0 MOVWF 0x4E CLRF 0x4F CALL Label_000D GOTO Label_0012 Label_0011 CLRF PORTA MOVF 0x48 , W BSF STATUS , RP0 MOVWF TRISA MOVLW 0x06 BCF STATUS , RP0 MOVWF 0x4E CLRF 0x4F CALL Label_000D MOVLW 0xFF BSF STATUS , RP0 MOVWF TRISA Label_0012 BCF STATUS , RP0 RLF 0x45 , W RRF 0x45 , f RRF 0x44 , f INCF 0x4A , f BTFSC STATUS , Z INCF 0x4B , f MOVF 0x4B , W XORLW 0x80 MOVWF 0x70 MOVLW 0x80 SUBWF 0x70 , W MOVLW 0x08 BTFSC STATUS , Z SUBWF 0x4A , W BTFSC STATUS , C RETURN GOTO Label_0013 Label_003C CLRF STATUS MOVF 0x44 , W MOVWF 0x72 MOVLW 0x01 MOVWF 0x70 MOVLW 0x00 CLRF 0x71 INCF 0x72 , f GOTO Label_0014 Label_0015 BCF STATUS , C RLF 0x70 , f RLF 0x71 , f Label_0014 DECFSZ 0x72 , f GOTO Label_0015 COMF 0x70 , f COMF 0x71 , f MOVLW 0xFF ANDWF 0x70 , W MOVWF 0x48 CLRF 0x49 CLRF 0x4A CLRF 0x4B Label_0018 CLRF PORTA MOVF 0x48 , W BSF STATUS , RP0 MOVWF TRISA MOVLW 0xFF MOVWF TRISA CLRWDT NOP NOP BCF STATUS , RP0 MOVF PORTA , W MOVWF 0x46 CLRF 0x47 MOVF 0x49 , W MOVWF 0x71 MOVF 0x48 , W MOVWF 0x70 COMF 0x70 , f COMF 0x71 , f MOVF 0x46 , W ANDWF 0x70 , f MOVF 0x47 , W ANDWF 0x71 , f MOVF 0x71 , W IORWF 0x70 , W BTFSC STATUS , Z GOTO Label_0016 MOVF 0x4D , W MOVWF 0x71 MOVF 0x4C , W MOVWF 0x70 RLF 0x71 , W RRF 0x71 , f RRF 0x70 , f MOVLW 0x80 IORWF 0x70 , W MOVWF 0x4C MOVF 0x71 , W MOVWF 0x4D GOTO Label_0017 Label_0016 RLF 0x4D , W RRF 0x4D , f RRF 0x4C , f Label_0017 MOVLW 0x06 MOVWF 0x4E CLRF 0x4F CALL Label_000D INCF 0x4A , f BTFSC STATUS , Z INCF 0x4B , f MOVF 0x4B , W XORLW 0x80 MOVWF 0x70 MOVLW 0x80 SUBWF 0x70 , W MOVLW 0x08 BTFSC STATUS , Z SUBWF 0x4A , W BTFSS STATUS , C GOTO Label_0018 MOVF 0x4D , W MOVWF 0x71 MOVF 0x4C , W MOVWF 0x70 RETURN Label_0042 MOVLW 0xFF CLRF STATUS MOVWF PORTB GOTO Label_0019 Label_001D BSF PORTA , 02 BCF PORTA , 03 GOTO Label_001A Label_001E BCF PORTA , 02 BSF PORTA , 03 Label_001A BCF PORTA , 06 GOTO Label_001B Label_001F BCF PORTA , 02 BCF PORTA , 03 BSF PORTA , 06 GOTO Label_001B Label_0019 MOVF 0x47 , W MOVWF 0x73 MOVF 0x46 , W MOVWF 0x72 GOTO Label_001C Label_0020 MOVF 0x72 , W XORLW 0x01 BTFSC STATUS , Z GOTO Label_001D XORLW 0x03 BTFSC STATUS , Z GOTO Label_001E XORLW 0x01 BTFSC STATUS , Z GOTO Label_001F GOTO Label_001B Label_001C MOVF 0x73 , W BTFSC STATUS , Z GOTO Label_0020 Label_001B BTFSS 0x45 , 07 GOTO Label_0021 MOVLW 0x7F MOVWF PORTB GOTO Label_0022 Label_002D BCF PORTB , 02 BCF PORTB , 00 BCF PORTB , 06 BCF PORTB , 04 BCF PORTB , 03 BCF PORTB , 01 GOTO Label_0023 Label_002E BSF PORTB , 02 GOTO Label_0024 Label_002F BCF PORTB , 02 BCF PORTB , 00 BSF PORTB , 06 BCF PORTB , 04 BCF PORTB , 03 GOTO Label_0025 Label_0030 BCF PORTB , 02 BCF PORTB , 00 BCF PORTB , 06 BCF PORTB , 04 BSF PORTB , 03 Label_0025 BSF PORTB , 01 GOTO Label_0026 Label_0031 BSF PORTB , 02 BCF PORTB , 00 BCF PORTB , 06 BSF PORTB , 04 GOTO Label_0027 Label_0032 BCF PORTB , 02 BSF PORTB , 00 GOTO Label_0028 Label_0033 BCF PORTB , 02 BSF PORTB , 00 GOTO Label_0029 Label_0034 BCF PORTB , 02 Label_0024 BCF PORTB , 00 BCF PORTB , 06 BSF PORTB , 04 BSF PORTB , 03 BSF PORTB , 01 Label_0023 BSF PORTB , 07 GOTO Label_0022 Label_0035 BCF PORTB , 02 BCF PORTB , 00 Label_0029 BCF PORTB , 06 BCF PORTB , 04 BCF PORTB , 03 GOTO Label_002A Label_0036 BCF PORTB , 02 BCF PORTB , 00 Label_0028 BCF PORTB , 06 BCF PORTB , 04 Label_0027 BSF PORTB , 03 Label_002A BCF PORTB , 01 Label_0026 BCF PORTB , 07 GOTO Label_0022 Label_0021 MOVLW 0x0A MOVWF 0x72 CLRF 0x73 MOVF 0x45 , W MOVWF 0x71 MOVF 0x44 , W MOVWF 0x70 CALL Label_002B MOVF 0x70 , W MOVWF 0x72 MOVF 0x71 , W MOVWF 0x73 GOTO Label_002C Label_0037 MOVF 0x72 , W MOVWF 0x70 ADDLW 0xF6 BTFSC STATUS , C GOTO Label_0022 ADDLW 0x0A BTFSS STATUS , C GOTO Label_0022 MOVLW 0x00 SUBWF 0x70 , f MOVLW 0x05 MOVWF PCLATH MOVLW 0xBF ADDWF 0x70 , W BTFSC STATUS , C INCF PCLATH , f MOVWF PCL GOTO Label_002D GOTO Label_002E GOTO Label_002F GOTO Label_0030 GOTO Label_0031 GOTO Label_0032 GOTO Label_0033 GOTO Label_0034 GOTO Label_0035 GOTO Label_0036 Label_002C MOVF 0x73 , W BTFSC STATUS , Z GOTO Label_0037 Label_0022 DECF 0x48 , W IORWF 0x49 , W BTFSS STATUS , Z GOTO Label_0038 BCF PORTB , 05 RETURN Label_0038 BSF PORTB , 05 RETURN Label_0002 CALL Label_0039 CLRF 0x24 CLRF 0x25 CLRF 0x2E INCF 0x2E , f CLRF 0x2F Label_004C MOVF 0x2E , W MOVWF 0x44 MOVF 0x2F , W MOVWF 0x45 CALL Label_003A MOVLW 0xCC MOVWF 0x44 CLRF 0x45 MOVF 0x2E , W MOVWF 0x46 MOVF 0x2F , W MOVWF 0x47 CALL Label_003B MOVLW 0x44 MOVWF 0x44 CLRF 0x45 MOVF 0x2E , W MOVWF 0x46 MOVF 0x2F , W MOVWF 0x47 CALL Label_003B Label_003D MOVF 0x2E , W MOVWF 0x44 MOVF 0x2F , W MOVWF 0x45 CALL Label_003C INCF 0x70 , W IORWF 0x71 , W BTFSC STATUS , Z GOTO Label_003D MOVF 0x2E , W MOVWF 0x44 MOVF 0x2F , W MOVWF 0x45 CALL Label_003A MOVLW 0xCC MOVWF 0x44 CLRF 0x45 MOVF 0x2E , W MOVWF 0x46 MOVF 0x2F , W MOVWF 0x47 CALL Label_003B MOVLW 0xBE MOVWF 0x44 CLRF 0x45 MOVF 0x2E , W MOVWF 0x46 MOVF 0x2F , W MOVWF 0x47 CALL Label_003B CLRF 0x26 CLRF 0x27 Label_003E MOVF 0x2E , W MOVWF 0x44 MOVF 0x2F , W MOVWF 0x45 CALL Label_003C MOVF 0x26 , W ADDWF 0x26 , W ADDLW 0x32 MOVWF FSR BCF STATUS , IRP MOVF 0x70 , W MOVWF INDF INCF FSR , f MOVF 0x71 , W MOVWF INDF INCF 0x26 , f BTFSC STATUS , Z INCF 0x27 , f MOVF 0x27 , W XORLW 0x80 MOVWF 0x70 MOVLW 0x80 SUBWF 0x70 , W MOVLW 0x09 BTFSC STATUS , Z SUBWF 0x26 , W BTFSS STATUS , C GOTO Label_003E MOVF 0x33 , W MOVWF 0x71 MOVF 0x32 , W MOVWF 0x70 RLF 0x71 , W RRF 0x71 , f RRF 0x70 , f MOVF 0x70 , W MOVWF 0x2C MOVF 0x71 , W MOVWF 0x2D BTFSS 0x32 , 00 GOTO Label_003F MOVLW 0x05 MOVWF 0x2A GOTO Label_0040 Label_003F CLRF 0x2A Label_0040 CLRF 0x2B MOVLW 0x80 BSF STATUS , RP0 MOVWF TRISA BCF STATUS , RP0 MOVF 0x25 , W XORLW 0x80 MOVWF 0x70 MOVLW 0x80 SUBWF 0x70 , W MOVLW 0x06 BTFSC STATUS , Z SUBWF 0x24 , W BTFSC STATUS , C GOTO Label_0041 INCF 0x24 , f BTFSC STATUS , Z INCF 0x25 , f CLRF 0x30 CLRF 0x31 Label_0045 MOVLW 0xFF MOVWF 0x44 MOVWF 0x45 CLRF 0x46 INCF 0x46 , f CLRF 0x47 CLRF 0x48 CLRF 0x49 CALL Label_0042 MOVLW 0x0A MOVWF 0x44 CLRF 0x45 CALL Label_0043 MOVLW 0xFF MOVWF 0x44 MOVWF 0x45 MOVLW 0x02 MOVWF 0x46 CLRF 0x47 CLRF 0x48 CLRF 0x49 CALL Label_0042 MOVLW 0x0A MOVWF 0x44 CLRF 0x45 CALL Label_0043 MOVLW 0xFF MOVWF 0x44 MOVWF 0x45 MOVLW 0x03 MOVWF 0x46 CLRF 0x47 CLRF 0x48 CLRF 0x49 CALL Label_0042 INCF 0x30 , f BTFSC STATUS , Z INCF 0x31 , f MOVF 0x31 , W XORLW 0x80 MOVWF 0x70 MOVLW 0x80 SUBWF 0x70 , W MOVLW 0x96 BTFSC STATUS , Z SUBWF 0x30 , W BTFSC STATUS , C GOTO Label_0044 GOTO Label_0045 Label_0041 MOVF 0x2D , W XORLW 0x80 MOVWF 0x70 MOVLW 0x80 SUBWF 0x70 , W MOVLW 0x51 BTFSC STATUS , Z SUBWF 0x2C , W BTFSS STATUS , C GOTO Label_0046 MOVLW 0x7F MOVWF 0x70 CLRF 0x71 MOVF 0x2C , W SUBWF 0x70 , W MOVWF 0x2C MOVF 0x2D , W BTFSS STATUS , C INCF 0x2D , W SUBWF 0x71 , W MOVWF 0x2D MOVF 0x2B , W IORWF 0x2A , W BTFSC STATUS , Z INCF 0x2C , f BTFSC STATUS , Z INCF 0x2D , f MOVLW 0x0A MOVWF 0x72 CLRF 0x73 MOVF 0x2D , W MOVWF 0x71 MOVF 0x2C , W MOVWF 0x70 CALL Label_002B MOVF 0x74 , W MOVWF 0x22 MOVF 0x75 , W MOVWF 0x23 MOVLW 0x0A MOVWF 0x72 CLRF 0x73 MOVF 0x2D , W MOVWF 0x71 MOVF 0x2C , W MOVWF 0x70 CALL Label_002B MOVF 0x70 , W MOVWF 0x28 MOVF 0x71 , W MOVWF 0x29 CLRF 0x30 CLRF 0x31 Label_0049 MOVLW 0xFF MOVWF 0x44 MOVWF 0x45 CLRF 0x46 INCF 0x46 , f CLRF 0x47 CLRF 0x48 CLRF 0x49 CALL Label_0042 MOVLW 0x0A MOVWF 0x44 CLRF 0x45 CALL Label_0043 MOVF 0x2D , W XORLW 0x80 MOVWF 0x70 MOVLW 0x80 SUBWF 0x70 , W MOVLW 0x0A BTFSC STATUS , Z SUBWF 0x2C , W BTFSC STATUS , C GOTO Label_0047 MOVF 0x28 , W MOVWF 0x44 MOVF 0x29 , W MOVWF 0x45 MOVLW 0x02 MOVWF 0x46 CLRF 0x47 CLRF 0x48 INCF 0x48 , f CLRF 0x49 CALL Label_0042 MOVLW 0x0A MOVWF 0x44 CLRF 0x45 CALL Label_0043 MOVF 0x2A , W MOVWF 0x44 MOVF 0x2B , W MOVWF 0x45 MOVLW 0x03 MOVWF 0x46 CLRF 0x47 CLRF 0x48 GOTO Label_0048 Label_0047 MOVF 0x22 , W MOVWF 0x44 MOVF 0x23 , W MOVWF 0x45 MOVLW 0x02 MOVWF 0x46 CLRF 0x47 CLRF 0x48 CLRF 0x49 CALL Label_0042 MOVLW 0x0A MOVWF 0x44 CLRF 0x45 CALL Label_0043 MOVF 0x28 , W MOVWF 0x44 MOVF 0x29 , W MOVWF 0x45 MOVLW 0x03 MOVWF 0x46 CLRF 0x47 CLRF 0x48 INCF 0x48 , f Label_0048 CLRF 0x49 CALL Label_0042 MOVLW 0x05 MOVWF 0x44 CLRF 0x45 CALL Label_0043 INCF 0x30 , f BTFSC STATUS , Z INCF 0x31 , f MOVF 0x31 , W XORLW 0x80 MOVWF 0x70 MOVLW 0x81 SUBWF 0x70 , W MOVLW 0xF4 BTFSC STATUS , Z SUBWF 0x30 , W BTFSC STATUS , C GOTO Label_0044 GOTO Label_0049 Label_0046 MOVLW 0x0A MOVWF 0x72 CLRF 0x73 MOVF 0x2D , W MOVWF 0x71 MOVF 0x2C , W MOVWF 0x70 CALL Label_002B MOVF 0x74 , W MOVWF 0x22 MOVF 0x75 , W MOVWF 0x23 MOVLW 0x0A MOVWF 0x72 CLRF 0x73 MOVF 0x2D , W MOVWF 0x71 MOVF 0x2C , W MOVWF 0x70 CALL Label_002B MOVF 0x70 , W MOVWF 0x28 MOVF 0x71 , W MOVWF 0x29 CLRF 0x30 CLRF 0x31 Label_004B MOVF 0x2D , W XORLW 0x80 MOVWF 0x70 MOVLW 0x80 SUBWF 0x70 , W MOVLW 0x0A BTFSC STATUS , Z SUBWF 0x2C , W BTFSS STATUS , C GOTO Label_004A MOVF 0x22 , W MOVWF 0x44 MOVF 0x23 , W MOVWF 0x45 CLRF 0x46 INCF 0x46 , f CLRF 0x47 CLRF 0x48 CLRF 0x49 CALL Label_0042 Label_004A MOVLW 0x0A MOVWF 0x44 CLRF 0x45 CALL Label_0043 MOVF 0x28 , W MOVWF 0x44 MOVF 0x29 , W MOVWF 0x45 MOVLW 0x02 MOVWF 0x46 CLRF 0x47 CLRF 0x48 INCF 0x48 , f CLRF 0x49 CALL Label_0042 MOVLW 0x0A MOVWF 0x44 CLRF 0x45 CALL Label_0043 MOVF 0x2A , W MOVWF 0x44 MOVF 0x2B , W MOVWF 0x45 MOVLW 0x03 MOVWF 0x46 CLRF 0x47 CLRF 0x48 CLRF 0x49 CALL Label_0042 MOVLW 0x05 MOVWF 0x44 CLRF 0x45 CALL Label_0043 INCF 0x30 , f BTFSC STATUS , Z INCF 0x31 , f MOVF 0x31 , W XORLW 0x80 MOVWF 0x70 MOVLW 0x81 SUBWF 0x70 , W MOVLW 0xF4 BTFSC STATUS , Z SUBWF 0x30 , W BTFSS STATUS , C GOTO Label_004B Label_0044 BTFSC PORTA , 07 GOTO Label_004C CLRF 0x24 CLRF 0x25 DECF 0x2E , W IORWF 0x2F , W BTFSS STATUS , Z GOTO Label_004D CLRF 0x2E GOTO Label_004E Label_004D CLRF 0x2E INCF 0x2E , f Label_004E CLRF 0x2F CLRF 0x30 CLRF 0x31 Label_004F MOVLW 0xFF MOVWF PORTB BSF PORTA , 02 BCF PORTA , 03 BCF PORTA , 06 MOVLW 0x26 MOVWF PORTB MOVLW 0x0A MOVWF 0x44 CLRF 0x45 CALL Label_0043 MOVLW 0xFF MOVWF PORTB BCF PORTA , 02 BSF PORTA , 03 BCF PORTA , 06 MOVLW 0x7F MOVWF PORTB MOVLW 0x0A MOVWF 0x44 CLRF 0x45 CALL Label_0043 MOVLW 0x01 ADDWF 0x2E , W MOVWF 0x44 MOVLW 0x00 BTFSC STATUS , C MOVLW 0x01 ADDWF 0x2F , W MOVWF 0x45 MOVLW 0x03 MOVWF 0x46 CLRF 0x47 CLRF 0x48 CLRF 0x49 CALL Label_0042 MOVLW 0x0A MOVWF 0x44 CLRF 0x45 CALL Label_0043 INCF 0x30 , f BTFSC STATUS , Z INCF 0x31 , f MOVF 0x31 , W XORLW 0x80 MOVWF 0x70 MOVLW 0x87 SUBWF 0x70 , W MOVLW 0x08 BTFSC STATUS , Z SUBWF 0x30 , W BTFSC STATUS , C GOTO Label_004C GOTO Label_004F Label_002B CLRF 0x76 BTFSS 0x71 , 07 GOTO Label_0050 COMF 0x70 , f INCF 0x70 , f BTFSC STATUS , Z DECF 0x71 , f COMF 0x71 , f BSF 0x76 , 06 BSF 0x76 , 07 Label_0050 MOVF 0x73 , W ANDLW 0x80 XORWF 0x76 , f BTFSS 0x73 , 07 GOTO Label_0051 COMF 0x72 , f INCF 0x72 , f BTFSC STATUS , Z DECF 0x73 , f COMF 0x73 , f GOTO Label_0051 CLRF 0x76 Label_0051 CLRF 0x74 CLRF 0x75 MOVF 0x72 , W IORWF 0x73 , W BTFSS STATUS , Z GOTO Label_0052 CLRF 0x70 CLRF 0x71 RETLW 0x00 Label_0052 MOVLW 0x1F IORWF 0x76 , f BCF STATUS , C Label_0053 INCF 0x76 , f RLF 0x72 , f RLF 0x73 , f BTFSS STATUS , C GOTO Label_0053 Label_0056 RRF 0x73 , f RRF 0x72 , f MOVF 0x73 , W SUBWF 0x71 , W BTFSS STATUS , Z GOTO Label_0054 MOVF 0x72 , W SUBWF 0x70 , W Label_0054 BTFSS STATUS , C GOTO Label_0055 MOVF 0x72 , W SUBWF 0x70 , f MOVF 0x73 , W BTFSS STATUS , C INCF 0x73 , W SUBWF 0x71 , f Label_0055 RLF 0x74 , f RLF 0x75 , f DECFSZ 0x76 , f BTFSC 0x76 , 05 GOTO Label_0056 BTFSS 0x76 , 07 GOTO Label_0057 COMF 0x74 , f INCF 0x74 , f BTFSC STATUS , Z DECF 0x75 , f COMF 0x75 , f Label_0057 MOVF 0x74 , W MOVWF 0x72 MOVF 0x75 , W MOVWF 0x73 BTFSS 0x76 , 06 RETLW 0x00 COMF 0x70 , f INCF 0x70 , f BTFSC STATUS , Z DECF 0x71 , f COMF 0x71 , f RETLW 0x00 ORG 0x2000 DATA 0x00 DATA 0x0F DATA 0x0F DATA 0x0F ORG 0x2007 DATA 0x10 ORG 0x2100 DATA 0x00 ORG 0x2108 0x00 ORG 0x2110 DATA 0x00 ORG 0x2118 DATA 0x00 ORG 0x2120 DATA 0x00 ORG 0x2128 DATA 0x00 END