📄 he-nongduojiance.asm
字号:
MOV 73H,#25
LCALL DISP
MOV R1,#30H
CA3: MOV R2,#0FFH
CLR P1.2
NOP
SETB P1.2
MOV R3,#0FFH
DJNZ R3,$
DJNZ R2,$-4
DJNZ R1,CA3
SJMP LOP
LOP1: DJNZ R3,KEY1 ;按一次电流
MOV 6FH,#27
MOV 70H,#10
MOV 71H,#1
MOV 72H,#0
MOV 73H,#0
LCALL DISP
MOV R1,#10H
MOV R2,#0FFH
MOV R3,#0FFH
DJNZ R3,$
DJNZ R2,$-4
DJNZ R1,$-8
LOP: CLR P1.2
NOP
SETB P1.2
MOV SCON,#50H
LJMP SSEND1
TIMER: MOV R0,#2H
CA4: MOV R1,#0FFH
CLR P1.2
NOP
SETB P1.2
MOV R2,#0FFH
DJNZ R2,$
DJNZ R1,$-4
DJNZ R0,CA4
RET
ADRET: RETI
ADINT1:
LCALL ADRET
CLR EA
CLR EX1
PUSH ACC
PUSH PSW
SETB RS0
CLR RS1
MOV 29H,TL1
MOV 28H,TH1
MOV TH1,#00H
MOV TL1,#00H
CLR P1.2
NOP
SETB P1.2
CLR C
MOV A,29H
SUBB A,#11H
MOV R3,A
MOV A,28H
SUBB A,#27H
MOV R2,A
MOV R6,#10H
CLR F0
LCALL FS2
MOV R0,#84H
MOV A,R6
MOV @R0,A
INC R0
MOV A,R2
MOV @R0,A
INC R0
MOV A,R3
MOV @R0,A
MOV R0,#87H
MOV @R0,#7AH
INC R0
MOV @R0,#0A3H
INC R0
MOV @R0,#83H
MOV R0,#87H
MOV R1,#84H
LCALL FMUL
MOV R1,#84H
LCALL FSTR ;以上为mv值归整
CLR P1.2
NOP
SETB P1.2
MOV R0,#83H
MOV A,@R0
CJNE A,#0AH,$+3
JC NORMAL
MOV 6FH,#10
MOV 70H,#21
MOV 71H,#0
MOV 72H,#23
MOV 73H,#21
LCALL DISP
SJMP $
NORMAL: CLR P1.2
NOP
SETB P1.2
CJNE A,#3,$+3
JC DQ0
CJNE A,#4,$+3
JC DQ1
CJNE A,#5,$+3
JC DQ2
CJNE A,#6,$+3
JC DQ3
CJNE A,#7,$+3
JC DQ4
LJMP HHHH
DQ0: CLR A
MOV R0,#87H
MOV @R0,#41H
INC R0
MOV @R0,#0 ;<3
INC R0
MOV @R0,#0
LJMP QUSHU
DQ1:
MOV R0,#87H
MOV @R0,#08H
INC R0 ;3
MOV R1,#80H
MOV A,@R1
MOV @R0,A
INC R0
MOV @R0,#00H
MOV R0,#99H
MOV @R0,#1
MOV R0,#87H
LJMP QBFB1
DQ2: MOV R0,#81H
MOV A,@R0
MOV R1,#9BH
MOV @R1,A ;4
DEC R0
MOV A,@R0
DEC R1
MOV @R1,A
DEC R1
MOV @R1,#1
LJMP QBFB
DQ3: MOV R0,#80H
MOV A,@R0
ADD A,#1 ;5
MOV R1,#99H
MOV @R1,A
INC R0
INC R1
MOV A,@R0
MOV @R1,A
INC R0
INC R1
MOV A,@R0
MOV @R1,A
LJMP QBFB
DQ4: MOV R0,#80H
MOV A,@R0
MOV B,#10
MUL AB
INC R0
SETB C
ADDC A,@R0
MOV R1,#99H ;6
MOV @R1,A
CJNE A,#13,HHH
MOV R0,#82H
MOV A,@R0
JNZ HHHH
HH: MOV R0,#82H
MOV A,@R0
INC R1
MOV @R1,A
INC R1
MOV @R1,#0
LJMP QBFB
HHH: JC HH
HHHH: MOV 6FH,#10
MOV 70H,#1FH
MOV 71H,#5DH
MOV 72H,#5DH
MOV 73H,#5DH
BACKI: LCALL DISP
POP PSW
POP ACC
CLR 2FH
SETB EA
SETB ES
LJMP WAITES
QBFB: MOV R0,#9AH
MOV A,@R0
MOV B,#10
MUL AB
INC R0
ADD A,@R0
MOV R0,#89H
MOV @R0,#00H
DEC R0
MOV @R0,A
DEC R0
JZ ZERO
MOV @R0,#08H
SJMP QBFB1
ZERO: MOV @R0,#41H
QBFB1: MOV R1,#8CH
MOV @R1,#00H
DEC R1
MOV @R1,#0CAH
DEC R1
MOV @R1,#07H
LCALL FDIV
MOV R1,#87H
LCALL FSTR
MOV R0,#99H
MOV A,@R0
DEC A
QUSHU: MOV B,#3
MOV DPTR,#PXND
MOV 32H,#00H
MOV 30H,#00H
MUL AB
CLR P1.2
NOP
SETB P1.2
JMP @A+DPTR
PXND: LJMP CAB1 ;绝压0.1MPa
LJMP CAB2 ;绝压0.2MPa
LJMP CAB3 ;绝压0.3MPa
LJMP CAB4 ;绝压0.4MPa
LJMP CAB5 ;绝压0.5MPa
LJMP CAB6 ;绝压0.6MPa
LJMP CAB7 ;绝压0.7MPa
LJMP CAB8 ;绝压0.8MPa
LJMP CAB9 ;绝压0.9MPa
LJMP CAB10 ;绝压1.0MPa
LJMP CAB11 ;绝压1.1MPa
LJMP CAB12 ;绝压1.2MPa
LJMP CAB13 ;绝压1.3MPa
CAB1: MOV DPTR,#P1ND
LCALL GETDA
CAB21: MOV DPTR,#P2ND
LCALL DISPR
JB ACC.7,LOWX
MOV A,30H
CJNE A,#11,$+3
JNC HE100A
MOV R1,#90H
LCALL FSTR
SJMP CAB1
HE100A: LJMP HE100
CAB2: MOV DPTR,#P2ND
LCALL GETDA
CAB31: MOV DPTR,#P3ND
LCALL DISPR
JB ACC.7,LOWX
MOV A,30H
CJNE A,#11,$+3
JNC HE100A
MOV R1,#90H
LCALL FSTR
SJMP CAB2
CAB3: MOV DPTR,#P3ND
LCALL GETDA
CAB41: MOV DPTR,#P4ND
LCALL DISPR
JB ACC.7,LOWX
MOV A,30H
CJNE A,#11,$+3
JNC HE100A
MOV R1,#90H
LCALL FSTR
SJMP CAB3
LOWX: LJMP LOWX1
CAB4: MOV DPTR,#P4ND
LCALL GETDA
CAB51: MOV DPTR,#P5ND
LCALL DISPR
JB ACC.7,LOWX
MOV A,30H
CJNE A,#11,$+3
JNC HE100B
MOV R1,#90H
LCALL FSTR
SJMP CAB4
CAB5: MOV DPTR,#P5ND
LCALL GETDA
CAB61: MOV DPTR,#P6ND
LCALL DISPR
JB ACC.7,LOWXX
MOV A,30H
CJNE A,#11,$+3
JNC HE100B
MOV R1,#90H
LCALL FSTR
SJMP CAB5
LOWXX: LJMP LOWX1
CAB6: MOV DPTR,#P6ND
LCALL GETDA
CAB71: MOV DPTR,#P7ND
LCALL DISPR
JB ACC.7,LOWXX
MOV A,30H
CJNE A,#11,$+3
JNC HE100B
MOV R1,#90H
LCALL FSTR
SJMP CAB6
CAB7: MOV DPTR,#P7ND
LCALL GETDA
CAB81: MOV DPTR,#P8ND
LCALL DISPR
JB ACC.7,LOWXX
MOV A,30H
CJNE A,#11,$+3
JNC HE100B
MOV R1,#90H
LCALL FSTR
SJMP CAB7
HE100B: LJMP HE100
CAB8: MOV DPTR,#P8ND
LCALL GETDA
CAB91: MOV DPTR,#P9ND
LCALL DISPR
JB ACC.7,LOWXX
MOV A,30H
CJNE A,#11,$+3
JNC HE100B
MOV R1,#90H
LCALL FSTR
SJMP CAB8
CAB9: MOV DPTR,#P9ND
LCALL GETDA
CAB101: MOV DPTR,#P10ND
LCALL DISPR
JB ACC.7,LOWXX
MOV A,30H
CJNE A,#11,$+3
JNC HE100B
MOV R1,#90H
LCALL FSTR
SJMP CAB9
CAB10: MOV DPTR,#P10ND
LCALL GETDA
CAB111: MOV DPTR,#P11ND
LCALL DISPR
JB ACC.7,LOWXXX
MOV A,30H
CJNE A,#11,$+3
JNC HE100
MOV R1,#90H
LCALL FSTR
SJMP CAB10
CAB11: MOV DPTR,#P11ND
LCALL GETDA
CAB121: MOV DPTR,#P12ND
LCALL DISPR
JB ACC.7,LOWXXX
MOV A,30H
CJNE A,#11,$+3
JNC HE100
MOV R1,#90H
LCALL FSTR
SJMP CAB11
CAB12: MOV DPTR,#P12ND
LCALL GETDA
CAB131: MOV DPTR,#P13ND
LCALL DISPR
JB ACC.7,LOWXXX
MOV A,30H
CJNE A,#11,$+3
JNC HE100
MOV R1,#90H
LCALL FSTR
SJMP CAB12
CAB13: MOV DPTR,#P13ND
LCALL GETDA
CAB141: MOV DPTR,#P14ND
LCALL DISPR
JB ACC.7,LOWXXX
MOV A,30H
CJNE A,#11,$+3
JNC HE100
MOV R1,#90H
LCALL FSTR
SJMP CAB13
LOWXXX: LJMP LOWX1
HE100: CLR P1.2
NOP
SETB P1.2
MOV 6FH,#29
MOV 70H,#10
MOV 71H,#1
MOV 72H,#0
MOV 73H,#0
LCALL DISP
POP PSW
POP ACC
SETB ES
SETB EA
CLR 2FH
LJMP WAITES
PSTA: CLR P1.2
NOP
SETB P1.2
MOV R0,#8AH
MOV R1,#8DH
LCALL FSUB
MOV R1,#8DH
LCALL FSTR
MOV R0,#87H
LCALL FMUL
MOV R1,#96H
LCALL FSTR
MOV R0,#8FH
MOV @R0,#0EBH
DEC R0
MOV @R0,#91H
DEC R0
MOV @R0,#01H
LCALL FMUL
MOV R1,#96H
LCALL FSTR
MOV R0,#8AH
LCALL FSUB
MOV R1,#96H
LCALL FSTR
MOV R0,#96H
MOV R1,#84H
LCALL FSUB
RET
GETDA: CLR P1.2
NOP
SETB P1.2
MOV R0,#8AH
INC 30H
LCALL LPDM3
DEC 32H
DEC 32H
DEC 32H
MOV R0,#8DH
RET
DISPR: CLR P1.2
NOP
SETB P1.2
LCALL LPDM3
LCALL PSTA
MOV A,R4
RET
LOWX1: MOV A,30H
CJNE A,#1,LOW2
MOV 6FH,#29
MOV 70H,#0AH
MOV 71H,#0AH
MOV 72H,#0AH
MOV 73H,#00H
LCALL DISP
POP PSW
POP ACC
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -