sangna.asm

用HOLTEK单片机做的一个实际项目

NOP
#line 615 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 616 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 617 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 618 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 619 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].2
#line 620 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 621 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 622 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [0AH].0
RLC CR17
#line 623 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SNZ [014H].3
JMP L124
#line 624 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
INC CR17
L124:
#line 625 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 626 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
L121:
#line 606 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 59 1 ; 606 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
INC CR16
L123:
#line 606 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,CR16
SUB A,08h
SNZ [0ah].0
JMP L120
#line 628 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [014H].2
#line 629 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 630 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 631 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 632 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 634 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __pbc.3
#line 636 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,CR17
L119:
RET
#line 599 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
LOCAL CR16 DB ? ; counter
#pragma debug variable 59 CR16 counter
#line 599 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
LOCAL CR17 DB ? ; retc
#pragma debug variable 59 CR17 retc
_RcvByte ENDP
#line 640 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
@Ack_I2C .SECTION 'CODE'
PUBLIC _Ack_I2C
_Ack_I2C PROC
#pragma debug scope 61 1
#line 639 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
PUBLIC Ack_I2C0
LOCAL Ack_I2C0 DBIT ; a
#pragma debug variable 61 Ack_I2C0 a
#pragma debug scope 61 1 ; 641 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 641 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SNZ Ack_I2C0
JMP L127
#line 642 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].3
#line 642 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L128
L127:
#line 644 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [014H].3
L128:
#line 645 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 646 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 647 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 648 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 649 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 650 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].2
#line 651 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 652 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 653 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 654 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 655 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 656 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 657 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [014H].2
#line 658 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 659 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 660 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 661 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
L126:
RET
_Ack_I2C ENDP
#line 666 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
@SettingRD .SECTION 'CODE'
PUBLIC _SettingRD
_SettingRD PROC
#pragma debug scope 62 1 ; 667 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 667 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CALL _Start_I2C
#line 668 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,0a0h
MOV SendByte0,A
CALL _SendByte
#line 669 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,00h
MOV SendByte0,A
CALL _SendByte
#line 670 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CALL _Start_I2C
#line 671 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,0a1h
MOV SendByte0,A
CALL _SendByte
#line 673 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CALL _RcvByte
MOV b0_10,A
MOV A,b0_10
MOV __PreSettedTemperature,A
CLR __PreSettedTemperature[1]
#line 674 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR Ack_I2C0
CALL _Ack_I2C
#line 676 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CALL _RcvByte
MOV b0_10,A
MOV A,b0_10
MOV __Timer,A
CLR __Timer[1]
#line 677 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET Ack_I2C0
CALL _Ack_I2C
#line 678 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CALL _Stop_I2C
#line 680 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,__Timer
MOV T2,A
MOV A,__Timer[1]
MOV RH,A
MOV A,00h
MOV T4,A
MOV A,03ch
CALL MULL
MOV __Timer[1],A
MOV A,T6
MOV __Timer,A
L129:
RET
LOCAL b0_10 DB ?
_SettingRD ENDP
#line 684 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
@SettingWR .SECTION 'CODE'
PUBLIC _SettingWR
_SettingWR PROC
#pragma debug scope 63 1 ; 685 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 685 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CALL _Start_I2C
#line 686 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,0a0h
MOV SendByte0,A
CALL _SendByte
#line 687 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,00h
MOV SendByte0,A
CALL _SendByte
#line 689 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,__PreSettedTemperature
MOV SendByte0,A
CALL _SendByte
#line 691 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,03ch
MOV T2,A
MOV A,00h
MOV RH,A
MOV A,__Timer[1]
MOV T6,A
MOV A,__Timer
CALL DIVUL
MOV b0_11,A
MOV A,T6
MOV b0_11[1],A
MOV A,b0_11
MOV SendByte0,A
CALL _SendByte
#line 693 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CALL _Stop_I2C
L130:
RET
LOCAL b0_11 DB 2 DUP(?)
_SettingWR ENDP
#line 697 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
@MAIN .SECTION 'CODE'
_main PROC
begin:
#pragma debug scope 64 1 ; 702 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 702 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CALL _safeguard_init
#line 704 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __LedSequence
#line 707 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [012H].7
#line 708 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [014H].5
#line 709 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [012H].1
#line 710 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [014H].4
#line 711 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [012H].3
#line 712 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [012H].0
#line 714 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __SysState
#line 715 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __DrainTimer
#line 716 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __DisinfactTimer
CLR __DisinfactTimer[1]
#line 718 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __Timer
CLR __Timer[1]
#line 720 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __Flag_Power
#line 722 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __Flag_KeyPressed
#line 724 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET __InputReg
#line 725 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET __PreInputReg
#line 727 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CALL _SettingRD
#line 729 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,00h
SUB A,__PreSettedTemperature[1]
SNZ [0ah].0
JMP L225
SNZ [0ah].2
JMP L132
MOV A,043h
SUB A,__PreSettedTemperature
SZ [0ah].0
JMP L132
L225:
#pragma debug scope 65 64 ; 731 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 731 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,043h
MOV __PreSettedTemperature,A
CLR __PreSettedTemperature[1]
L132:
#line 734 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 64 1 ; 734 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [0EH].4
#line 734 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L135
L134:
#pragma debug scope 66 64 ; 747 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 747 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,__DisinfactTimer
OR A,__DisinfactTimer[1]
SZ [0ah].2
JMP L137
#pragma debug scope 67 66 ; 749 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 749 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [012H].0
#line 750 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 66 64 ; 750 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L138
L137:
#pragma debug scope 68 66 ; 753 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 753 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [012H].0
L138:
#line 759 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 66 64 ; 759 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SZ __DrainTimer
JMP L226
JMP L139
L226:
#pragma debug scope 69 66 ; 761 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 761 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [012H].7
#line 762 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 66 64 ; 762 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L140
L139:
#pragma debug scope 70 66 ; 765 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 765 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [012H].7
L140:
#line 773 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 66 64 ; 773 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SZ __ButtonScanTimer
JMP L141
#pragma debug scope 71 66 ; 777 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 777 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [016H].1
#line 779 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR CR20
#line 781 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [014H].1
#line 783 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [016H].0
#line 785 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].1
#line 787 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [016H].0
#line 789 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __InputReg
#line 791 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,08h
MOV CR18,A
#line 791 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L146
L143:
#pragma debug scope 72 71 ; 793 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 793 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [0AH].0
RRC __InputReg
#line 795 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SNZ [012H].5
JMP L147
#pragma debug scope 73 72 ; 797 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 797 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,080h
ADDM A,__InputReg
L147:
#line 800 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 72 71 ; 800 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [014H].1
#line 801 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].1
L144:
L146:
#line 791 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 71 66 ; 791 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,CR18
MOV b0_12,A
DEC CR18
SZ b0_12
JMP L143
#line 805 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,__PreInputReg
MOV b0_12,A
MOV A,b0_12
XOR A,__InputReg
SNZ [0ah].2
JMP L149
MOV A,b0_12
XOR A,0ffh
SZ [0ah].2
JMP L149
#pragma debug scope 74 71 ; 807 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 807 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET __Flag_KeyPressed
L149:
#line 810 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 71 66 ; 810 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SNZ __Flag_KeyPressed
JMP L151
#pragma debug scope 75 71 ; 812 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 812 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,__InputReg
MOV b0_12,A
MOV A,b0_12
XOR A,0ffh
SZ [0ah].2
JMP L155
CPLA b0_12
MOV b0_12,A
MOV A,b0_12
AND A,05h
SZ [05H]
JMP L227
JMP L153
L227:
L155:
#pragma debug scope 76 75 ; 814 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 814 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CPLA __PreInputReg
MOV CR19,A
#line 815 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR CR19.7
#line 816 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,08h
MOV CR18,A
#line 816 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L159
L156:
#pragma debug scope 77 76 ; 818 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 818 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SNZ CR19.7
JMP L160
#pragma debug scope 78 77 ; 820 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 820 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,CR18
MOV b0_12,A
SZ b0_12
JMP L228
JMP L186
L228:
MOV A,b0_12
XOR A,01h
SZ [0ah].2
JMP L208
MOV A,b0_12
XOR A,02h
SZ [0ah].2
JMP L197
MOV A,b0_12
XOR A,03h
SZ [0ah].2
JMP L169
MOV A,b0_12
XOR A,04h
SZ [0ah].2
JMP L180
MOV A,b0_12
XOR A,05h
SZ [0ah].2
JMP L174
MOV A,b0_12
XOR A,06h
SZ [0ah].2
JMP L164
#line 820 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L163
L164:
#pragma debug scope 79 78 ; 822 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 822 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SZ __SysState
JMP L165
#pragma debug scope 80 79 ; 824 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 824 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,03h
MOV __SysState,A
#line 826 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __DrainTimer
#line 827 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __DisinfactTimer
CLR __DisinfactTimer[1]
#line 829 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET __Flag_Power
#line 831 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].5
#line 833 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CALL _SettingRD
#line 834 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,00h
SUB A,__PreSettedTemperature[1]
SNZ [0ah].0
JMP L229
SNZ [0ah].2
JMP L166
MOV A,043h
SUB A,__PreSettedTemperature
SZ [0ah].0
JMP L166
L229:
#pragma debug scope 81 80 ; 836 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 836 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,043h
MOV __PreSettedTemperature,A
CLR __PreSettedTemperature[1]
#line 838 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 79 78 ; 838 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L166
L165:
#pragma debug scope 82 79 ; 841 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"