Код:
; Generated by WinDis84, (c) Nigel Goodwin 1998.
LIST P=16F84, F=INHX8M
include "P16FXX.inc"
ORG 0x0000
BSF STATUS , RP0
MOVLW 0x01
MOVWF TRISA
MOVLW 0x80
MOVWF TRISB
CLRF INTCON
CLRF OPTION_REG
BCF OPTION_REG, NOT_RBPU
BCF OPTION_REG, PSA
BCF OPTION_REG, PS2
BCF OPTION_REG, PS1
BCF OPTION_REG, PS0
BCF STATUS , RP0
CLRF PORTA
CLRF PORTB
BSF PORTB , 06
CLRF 0x24
CLRF 0x1F
CLRF 0x21
CLRF 0x22
CALL Label_0001
CALL Label_0002
BTFSC PORTA , 00
GOTO Label_0003
GOTO Label_0004
Label_0003 CALL Label_0005
CALL Label_0006
BTFSC PORTA , 00
GOTO Label_0003
GOTO Label_0004
Label_0004 CALL Label_0005
CALL Label_0006
BTFSS PORTA , 00
GOTO Label_0004
CALL Label_0007
CALL Label_0008
GOTO Label_0003
Label_0008 MOVF 0x10 , W
ADDLW 0xC5
BTFSC STATUS , C
GOTO Label_0009
INCF 0x10 , f
RETURN
Label_0009 CLRF 0x10
MOVF 0x11 , W
ADDLW 0xF7
BTFSC STATUS , C
GOTO Label_000A
INCF 0x11 , f
RETURN
Label_000A CLRF 0x11
MOVF 0x12 , W
ADDLW 0xF7
BTFSC STATUS , C
GOTO Label_000B
INCF 0x12 , f
RETURN
Label_000B CLRF 0x12
MOVF 0x13 , W
ADDLW 0xF7
BTFSC STATUS , C
GOTO Label_000C
INCF 0x13 , f
RETURN
Label_000C CLRF 0x13
MOVF 0x14 , W
ADDLW 0xF7
BTFSC STATUS , C
GOTO Label_000D
INCF 0x14 , f
RETURN
Label_000D CLRF 0x14
MOVF 0x15 , W
ADDLW 0xF7
BTFSC STATUS , C
GOTO Label_000E
INCF 0x15 , f
RETURN
Label_000E CLRF 0x15
MOVF 0x16 , W
ADDLW 0xF7
BTFSC STATUS , C
GOTO Label_000F
INCF 0x16 , f
RETURN
Label_000F CLRF 0x16
MOVF 0x17 , W
ADDLW 0xF7
BTFSC STATUS , C
GOTO Label_0010
INCF 0x17 , f
RETURN
Label_0010 CLRF 0x17
MOVF 0x18 , W
ADDLW 0xF7
BTFSC STATUS , C
GOTO Label_0011
INCF 0x18 , f
RETURN
Label_0011 CLRF 0x18
RETURN
Label_0007 MOVF 0x19 , W
ADDLW 0xC5
BTFSC STATUS , C
GOTO Label_0012
INCF 0x19 , f
RETURN
Label_0012 CLRF 0x19
MOVF 0x1A , W
ADDLW 0xF7
BTFSC STATUS , C
GOTO Label_0013
INCF 0x1A , f
RETURN
Label_0013 CLRF 0x1A
MOVF 0x1B , W
ADDLW 0xF7
BTFSC STATUS , C
GOTO Label_0014
INCF 0x1B , f
RETURN
Label_0014 CLRF 0x1B
MOVF 0x1C , W
ADDLW 0xF7
BTFSC STATUS , C
GOTO Label_0015
INCF 0x1C , f
RETURN
Label_0015 CLRF 0x1C
MOVF 0x1D , W
ADDLW 0xF7
BTFSC STATUS , C
GOTO Label_0016
INCF 0x1D , f
RETURN
Label_0016 CLRF 0x1D
MOVF 0x1E , W
ADDLW 0xF7
BTFSC STATUS , C
GOTO Label_0017
INCF 0x1E , f
RETURN
Label_0017 CLRF 0x1E
RETURN
Label_0030 MOVF 0x24 , W
ADDWF PCL , f
GOTO Label_0018
GOTO Label_0019
GOTO Label_001A
GOTO Label_001B
GOTO Label_001C
GOTO Label_001D
Label_0018 MOVF 0x13 , W
CALL Label_001E
BCF PORTB , 05
MOVWF PORTA
BSF PORTB , 00
RETURN
Label_0019 MOVF 0x14 , W
CALL Label_001E
BCF PORTB , 00
MOVWF PORTA
BSF PORTB , 01
RETURN
Label_001A MOVF 0x15 , W
CALL Label_001E
BCF PORTB , 01
MOVWF PORTA
BSF PORTB , 02
RETURN
Label_001B MOVF 0x16 , W
CALL Label_001E
BCF PORTB , 02
MOVWF PORTA
BSF PORTB , 03
RETURN
Label_001C MOVF 0x17 , W
CALL Label_001E
BCF PORTB , 03
MOVWF PORTA
BSF PORTB , 04
RETURN
Label_001D MOVF 0x18 , W
CALL Label_001E
BCF PORTB , 04
MOVWF PORTA
BSF PORTB , 05
RETURN
Label_0031 MOVF 0x24 , W
ADDWF PCL , f
GOTO Label_001F
GOTO Label_0020
GOTO Label_0021
GOTO Label_0022
GOTO Label_0023
GOTO Label_0024
Label_001F MOVF 0x1A , W
CALL Label_001E
BCF PORTB , 05
MOVWF PORTA
BSF PORTB , 00
RETURN
Label_0020 MOVF 0x1B , W
CALL Label_001E
BCF PORTB , 00
MOVWF PORTA
BSF PORTB , 01
RETURN
Label_0021 MOVF 0x1C , W
CALL Label_001E
BCF PORTB , 01
MOVWF PORTA
BSF PORTB , 02
RETURN
Label_0022 MOVF 0x1D , W
CALL Label_001E
BCF PORTB , 02
MOVWF PORTA
BSF PORTB , 03
RETURN
Label_0023 MOVF 0x1E , W
CALL Label_001E
BCF PORTB , 03
MOVWF PORTA
BSF PORTB , 04
RETURN
Label_0024 MOVLW 0x0F
CALL Label_001E
BCF PORTB , 04
MOVWF PORTA
BSF PORTB , 05
RETURN
Label_001E ANDLW 0x0F
ADDWF PCL , f
RETLW 0x00
RETLW 0x02
RETLW 0x04
RETLW 0x06
RETLW 0x08
RETLW 0x0A
RETLW 0x0C
RETLW 0x0E
RETLW 0x10
RETLW 0x12
RETLW 0x14
RETLW 0x16
RETLW 0x18
RETLW 0x1A
RETLW 0x1C
RETLW 0x1E
Label_002E MOVLW 0x40
MOVWF PORTB
BSF STATUS , RP0
MOVLW 0x11
MOVWF TRISA
BCF STATUS , RP0
Label_0025 CLRWDT
BTFSS PORTA , 04
GOTO Label_0025
BSF STATUS , RP0
MOVLW 0x01
MOVWF TRISA
BCF STATUS , RP0
CLRF 0x19
CLRF 0x1A
CLRF 0x1B
CLRF 0x1C
CLRF 0x1D
CLRF 0x1E
RETURN
Label_002A MOVLW 0x0F
MOVWF 0x21
MOVLW 0x10
MOVWF FSR
Label_0027 MOVF FSR , W
ADDLW 0xF0
CLRWDT
BCF STATUS , RP0
MOVWF EEADR
MOVF INDF , W
MOVWF EEDATA
BSF STATUS , RP0
BSF EECON1 , 02
MOVLW 0x55
MOVWF EECON2
MOVLW 0xAA
MOVWF EECON2
BSF EECON1 , 01
Label_0026 BTFSC EECON1 , 01
GOTO Label_0026
BCF STATUS , RP0
INCF FSR , f
DECFSZ 0x21 , f
GOTO Label_0027
CLRF 0x21
RETURN
Label_0001 MOVLW 0x0F
MOVWF 0x21
MOVLW 0x10
MOVWF FSR
Label_0028 CLRWDT
MOVF FSR , W
ADDLW 0xF0
BCF STATUS , RP0
MOVWF EEADR
BSF STATUS , RP0
BSF EECON1 , 00
BCF STATUS , RP0
MOVF EEDATA , W
MOVWF INDF
INCF FSR , f
DECFSZ 0x21 , f
GOTO Label_0028
CLRF 0x21
RETURN
Label_0005 BTFSS PORTB , 07
GOTO Label_0029
CLRWDT
RETURN
Label_0029 MOVLW 0x40
MOVWF PORTB
CALL Label_002A
MOVLW 0x14
MOVWF PORTA
BSF PORTB , 00
CLRF 0x22
Label_002C CLRWDT
CLRF 0x21
Label_002B DECFSZ 0x21 , f
GOTO Label_002B
DECFSZ 0x22 , f
GOTO Label_002C
BCF PORTB , 06
Label_002D NOP
GOTO Label_002D
Label_0006 DECFSZ 0x21 , f
RETURN
CLRWDT
BSF STATUS , RP0
MOVLW 0x19
MOVWF TRISA
BCF STATUS , RP0
MOVF PORTA , W
MOVWF 0x23
BSF STATUS , RP0
MOVLW 0x01
MOVWF TRISA
BCF STATUS , RP0
BTFSS 0x23 , 04
CALL Label_002E
INCF 0x24 , f
MOVF 0x24 , W
ADDLW 0xFA
BTFSC STATUS , Z
CLRF 0x24
BTFSS 0x23 , 03
GOTO Label_002F
CALL Label_0030
RETURN
Label_002F CALL Label_0031
RETURN
Label_0002 BSF STATUS , RP0
MOVLW 0x03
MOVWF TRISA
BCF STATUS , RP0
MOVF PORTA , W
MOVWF 0x23
BSF STATUS , RP0
MOVLW 0x01
MOVWF TRISA
BCF STATUS , RP0
BTFSC 0x23 , 01
RETURN
CLRF 0x10
CLRF 0x11
CLRF 0x12
CLRF 0x13
CLRF 0x14
CLRF 0x15
CLRF 0x16
CLRF 0x17
CLRF 0x18
CLRF 0x19
CLRF 0x1A
CLRF 0x1B
CLRF 0x1C
CLRF 0x1D
CLRF 0x1E
RETURN
ORG 0x2000
DATA 0x0F
DATA 0x0F
DATA 0x0F
DATA 0x0F
ORG 0x2007
DATA 0x16
ORG 0x2100
DATA 0x00
DATA 0x00
DATA 0x00
DATA 0x01
DATA 0x01
DATA 0x01
DATA 0x05
DATA 0x08
DATA 0x00
DATA 0x00
DATA 0x00
DATA 0x00
DATA 0x00
DATA 0x00
DATA 0x00
ORG 0x2140
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
END