; Generated by WinDis84, (c) Nigel Goodwin 1998. LIST P=16F84, F=INHX8M include "P16FXX.inc" ORG 0x0000 CLRWDT GOTO Label_0001 ORG 0x0004 MOVWF 0x10 SWAPF STATUS , W MOVWF 0x11 BCF STATUS , RP0 BSF 0x1D , 00 DECF 0x23 , f MOVF 0x23 , W BTFSC STATUS , Z CALL Label_0002 BTFSS 0x0F , 00 DECF 0x0E , f BTFSC STATUS , Z BSF 0x0F , 00 BCF STATUS , RP0 MOVLW 0x10 MOVWF INTCON SWAPF 0x11 , W MOVWF STATUS SWAPF 0x10 , f SWAPF 0x10 , W Label_0001 RETFIE BSF STATUS , RP0 MOVLW 0x00 MOVWF EECON1 BCF STATUS , RP0 MOVLW 0x80 MOVWF INTCON BSF STATUS , RP0 MOVLW 0x1F MOVWF TRISA MOVLW 0x0F MOVWF TRISB MOVLW 0xC4 MOVWF OPTION_REG BCF STATUS , RP0 MOVLW 0xFA MOVWF 0x0C MOVLW 0x31 MOVWF 0x0D MOVLW 0x00 MOVWF PORTA MOVWF PORTB MOVWF 0x1C MOVWF 0x1D MOVWF 0x1E MOVWF 0x1F MOVWF 0x20 MOVWF 0x21 MOVWF 0x22 MOVWF 0x14 MOVWF 0x19 MOVWF 0x1A MOVWF 0x1B MOVWF 0x25 MOVWF 0x26 MOVWF 0x27 MOVWF 0x16 MOVWF 0x17 MOVWF 0x28 MOVLW 0x01 MOVWF 0x24 MOVLW 0x64 MOVWF 0x23 MOVLW 0x2C MOVWF 0x18 BCF PORTB , 06 BSF INTCON , INTE MOVLW 0x00 MOVWF 0x21 MOVLW 0x20 MOVWF 0x22 Label_0019 CLRWDT BCF STATUS , RP0 BTFSS PORTB , 03 CALL Label_0003 BTFSS PORTB , 01 CALL Label_0004 BCF 0x1D , 00 MOVLW 0x59 MOVWF EEDATA CLRF 0x12 CLRF 0x13 CLRF 0x26 CLRF 0x27 BCF 0x1D , 03 BCF 0x1D , 02 Label_0009 CLRWDT BSF EEDATA , 02 INCF 0x26 , f MOVF 0x26 , f BTFSC STATUS , Z CALL Label_0005 Label_0006 BTFSS EEDATA , 01 GOTO Label_0006 BCF EEDATA , 01 MOVF EEADR , f BTFSC STATUS , Z GOTO Label_0007 MOVF EEADR , W ADDWF 0x12 , f BTFSC STATUS , C GOTO Label_0008 Label_0007 BTFSS 0x1D , 00 GOTO Label_0009 GOTO Label_000A Label_0008 INCF 0x13 , f BTFSS 0x1D , 00 GOTO Label_0009 Label_000A MOVLW 0xC9 MOVWF EEDATA BSF EEDATA , 02 Label_000B BTFSS EEDATA , 01 GOTO Label_000B MOVF EEADR , W MOVWF 0x14 MOVF 0x13 , W SUBLW 0xF2 BTFSS STATUS , C CALL Label_000C CALL Label_000D MOVF 0x13 , W SUBLW 0x82 BTFSC STATUS , Z GOTO Label_000E BTFSS STATUS , C GOTO Label_000F GOTO Label_0010 Label_000E MOVF 0x12 , W SUBLW 0x64 BTFSS STATUS , C GOTO Label_000F GOTO Label_0010 Label_000F BCF 0x24 , 00 GOTO Label_0011 Label_0010 MOVF 0x14 , W SUBWF 0x18 , W BTFSC STATUS , Z GOTO Label_0012 BTFSC STATUS , C BSF 0x24 , 00 BTFSS STATUS , C BCF 0x24 , 00 Label_0011 BTFSC 0x24 , 00 CALL Label_0013 BTFSS 0x24 , 00 CALL Label_0014 Label_0012 MOVF 0x21 , W MOVWF 0x1F MOVF 0x22 , W MOVWF 0x20 CALL Label_0015 MOVF 0x1F , W ADDLW 0x00 BTFSC STATUS , Z GOTO Label_0016 Label_0017 DECF 0x1F , f BTFSC STATUS , Z GOTO Label_0016 BTFSC 0x1D , 00 GOTO Label_0017 GOTO Label_0018 Label_0016 CLRWDT MOVF 0x1F , W ADDWF 0x20 , W BTFSC STATUS , Z GOTO Label_0018 MOVLW 0xFA MOVWF 0x1F DECF 0x20 , f BTFSC 0x1D , 00 GOTO Label_0017 Label_0018 BSF PORTB , 04 NOP NOP NOP BCF PORTB , 04 GOTO Label_0019 Label_0014 MOVF 0x22 , W SUBLW 0x20 BTFSC STATUS , Z GOTO Label_001A MOVF 0x21 , W SUBLW 0xFA BTFSC STATUS , Z GOTO Label_001B INCF 0x21 , f GOTO Label_001A Label_001B MOVLW 0x00 MOVWF 0x21 INCF 0x22 , f Label_001A RETURN Label_0013 MOVF 0x22 , W SUBLW 0x02 BTFSC STATUS , Z GOTO Label_001C MOVF 0x21 , W ADDLW 0x00 BTFSS STATUS , Z DECF 0x21 , f BTFSC STATUS , Z GOTO Label_001D GOTO Label_001C Label_001D MOVLW 0xFA MOVWF 0x21 DECF 0x22 , f Label_001C RETURN Label_0004 BTFSC 0x1D , 04 GOTO Label_001E BTFSS 0x0F , 00 GOTO Label_001E BCF 0x0F , 00 BTFSS PORTB , 05 GOTO Label_001F GOTO Label_0020 Label_001F BSF PORTB , 05 MOVLW 0x3E MOVWF 0x18 CALL Label_0021 GOTO Label_0022 Label_0020 BCF PORTB , 05 MOVLW 0x2C MOVWF 0x18 Label_0022 MOVLW 0x1E MOVWF 0x0E Label_001E RETURN Label_0003 CLRF 0x26 CLRF 0x27 BCF 0x1D , 03 BCF 0x1D , 02 MOVLW 0x00 MOVWF INTCON BCF PORTB , 07 MOVLW 0x00 MOVWF 0x21 MOVLW 0x20 MOVWF 0x22 Label_0023 CLRWDT BTFSS PORTB , 03 GOTO Label_0023 CALL Label_0024 MOVLW 0x90 MOVWF INTCON BCF 0x1D , 00 Label_0025 CLRWDT INCF 0x26 , f MOVF 0x26 , f BTFSC STATUS , Z CALL Label_0005 BTFSS 0x1D , 00 GOTO Label_0025 RETURN Label_0038 MOVF 0x0D , f BTFSC STATUS , Z GOTO Label_0026 DECF 0x0C , f BTFSC STATUS , Z GOTO Label_0027 GOTO Label_0028 Label_0027 INCF 0x25 , f MOVLW 0xFA MOVWF 0x0C DECF 0x0D , f GOTO Label_0028 Label_0026 MOVLW 0x00 MOVWF 0x21 MOVLW 0x20 MOVWF 0x22 MOVLW 0xFA MOVWF 0x0C MOVLW 0x31 MOVWF 0x0D Label_0028 RETURN Label_0024 MOVLW 0xFA MOVWF 0x0C MOVLW 0x31 MOVWF 0x0D CLRF 0x25 BCF 0x1D , 01 BCF PORTB , 07 BTFSC PORTB , 05 GOTO Label_0029 MOVLW 0x2C MOVWF 0x18 GOTO Label_002A Label_0029 MOVLW 0x3E MOVWF 0x18 Label_002A RETURN Label_003B CLRF 0x25 BTFSC 0x1D , 01 GOTO Label_002B BSF 0x1D , 01 MOVLW 0xFF MOVWF 0x18 GOTO Label_002C Label_002B BCF 0x1D , 01 BSF PORTB , 07 Label_002C RETURN Label_000C MOVLW 0x00 MOVWF 0x21 MOVLW 0x20 MOVWF 0x22 RETURN Label_0002 INCF 0x19 , f MOVF 0x19 , W SUBLW 0x3C BTFSC STATUS , Z GOTO Label_002D GOTO Label_002E Label_002D CLRF 0x19 INCF 0x1A , f MOVF 0x1A , W SUBLW 0x3C BTFSC STATUS , Z GOTO Label_002F GOTO Label_002E Label_002F CLRF 0x1A INCF 0x1B , f MOVF 0x1B , W SUBLW 0x08 BTFSC STATUS , Z GOTO Label_0030 GOTO Label_002E Label_0030 CALL Label_0021 BTFSC PORTB , 05 GOTO Label_0031 GOTO Label_002E Label_0031 BCF PORTB , 05 MOVLW 0x2C MOVWF 0x18 Label_002E MOVLW 0x64 MOVWF 0x23 RETURN Label_0005 BTFSC 0x1D , 03 GOTO Label_0032 INCF 0x27 , f MOVF 0x27 , f BTFSC STATUS , Z GOTO Label_0033 GOTO Label_0034 Label_0033 BTFSC 0x1D , 02 GOTO Label_0035 BSF 0x1D , 02 CLRF 0x27 CLRF 0x26 GOTO Label_0034 Label_0035 BSF 0x1D , 03 CLRF 0x27 CLRF 0x26 GOTO Label_0034 Label_0032 INCF 0x27 , f MOVF 0x27 , f BTFSC STATUS , Z BSF PORTB , 07 Label_0034 RETURN Label_000D MOVF 0x13 , W SUBLW 0x01 BTFSC STATUS , Z GOTO Label_0036 MOVF 0x13 , W SUBLW 0x01 BTFSS STATUS , C GOTO Label_0037 CALL Label_0038 GOTO Label_0039 Label_0037 CALL Label_0024 GOTO Label_0039 Label_0036 MOVF 0x12 , W SUBLW 0x32 BTFSS STATUS , C GOTO Label_003A CALL Label_0038 GOTO Label_0039 Label_003A CALL Label_0024 Label_0039 BTFSC 0x25 , 03 CALL Label_003B RETURN Label_0015 BTFSC 0x1D , 05 GOTO Label_003C BTFSC 0x1D , 04 GOTO Label_003D MOVF 0x14 , W SUBLW 0x23 BTFSS STATUS , C GOTO Label_003E BSF 0x1D , 04 BSF PORTB , 05 MOVLW 0x3E MOVWF 0x18 CALL Label_0021 BSF PORTB , 06 BCF 0x1D , 05 CLRF 0x17 CLRF 0x28 GOTO Label_003E Label_003D MOVF 0x14 , W SUBLW 0x3E BTFSS STATUS , C GOTO Label_003F BTFSC STATUS , Z GOTO Label_003F MOVF 0x1A , W SUBLW 0x03 BTFSC STATUS , Z GOTO Label_0040 GOTO Label_0041 Label_0040 CALL Label_0021 INCF 0x17 , f MOVF 0x17 , W SUBLW 0x3C BTFSC STATUS , Z GOTO Label_0042 GOTO Label_0041 Label_0042 CLRF 0x17 INCF 0x28 , f MOVF 0x28 , W SUBLW 0x06 BTFSC STATUS , Z GOTO Label_003F GOTO Label_0041 Label_003F CALL Label_0021 BCF PORTB , 06 BSF 0x1D , 05 MOVF 0x28 , W SUBLW 0x06 BTFSS STATUS , C GOTO Label_0043 MOVF 0x17 , W BTFSC STATUS , Z GOTO Label_0044 GOTO Label_0041 Label_0044 MOVLW 0x01 MOVWF 0x17 GOTO Label_0041 Label_0043 MOVLW 0x06 MOVWF 0x28 CLRF 0x17 GOTO Label_0041 Label_0041 GOTO Label_003E Label_003C MOVF 0x1B , W SUBWF 0x28 , W BTFSC STATUS , Z GOTO Label_0045 GOTO Label_003E Label_0045 MOVF 0x1A , W SUBWF 0x17 , W BTFSC STATUS , Z GOTO Label_0046 GOTO Label_003E Label_0046 BCF PORTB , 05 MOVLW 0x2C MOVWF 0x18 BCF 0x1D , 04 BCF 0x1D , 05 CLRF 0x17 CLRF 0x28 GOTO Label_003E Label_003E RETURN Label_0021 MOVLW 0x64 MOVWF 0x23 CLRF 0x19 CLRF 0x1A CLRF 0x1B RETURN ORG 0x2000 DATA 0x0F DATA 0x0F DATA 0x0F DATA 0x0F ORG 0x2007 DATA 0x1E END