📄 gwdvp_m1.lst
字号:
021D 1205A4 LCALL DISP2
0220 22 RET
0221 B40A1F KF10: CJNE A,#0AH,KF11 ; 键11(K26)控制
0224 753001 MOV DAT,#01H ; CLEAR 液晶显示初始化
0227 1204F9 LCALL ENABLE
022A 744B MOV A,#4BH
022C 75F080 MOV B,#80H
022F 1205A4 LCALL DISP2 ;
0232 7432 MOV A,#32H
0234 75F081 MOV B,#81H
0237 1205A4 LCALL DISP2
023A 7436 MOV A,#36H
023C 75F082 MOV B,#82H
023F 1205A4 LCALL DISP2
0242 22 RET
C:\KX_7C8\KX8051_LCD_F_TEST_2C8\ASM\GWDVP_M1.ASM
页 7
11-22-08
07:54:38
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
0243 B40B1F KF11: CJNE A,#0BH,KF12 ; 键12(K27)控制
0246 753001 MOV DAT,#01H ; CLEAR 液晶显示初始化
0249 1204F9 LCALL ENABLE
024C 744B MOV A,#4BH
024E 75F080 MOV B,#80H
0251 1205A4 LCALL DISP2 ;
0254 7432 MOV A,#32H
0256 75F081 MOV B,#81H
0259 1205A4 LCALL DISP2
025C 7437 MOV A,#37H
025E 75F082 MOV B,#82H
0261 1205A4 LCALL DISP2
0264 22 RET
0265 B40C1C KF12: CJNE A,#0CH,KF13 ; 键13(K34)控制
0268 120A8D LCALL CLR88
026B 753001 MOV DAT,#01H ; CLEAR
026E 1204F9 LCALL ENABLE
; -----------------------------------------------测频率-------------------------------------
0271 900591 MOV DPTR,#FN_A ;以上程序显示液晶设置
0274 7D80 MOV R5,#80H
0276 120581 LCALL FCN9
0279 120690 RRRV: LCALL TESTF ; 测频率子程序
027C 120927 LCALL TESTFF ; 数据显示调整子程序
027F 80F8 SJMP RRRV
0281 0202A4 KF14A: LJMP KF14
0284 B40DFA KF13: CJNE A,#0DH,KF14A ; 键14(K35)控制
0287 753001 MOV DAT,#01H ; CLEAR
028A 1204F9 LCALL ENABLE
028D 900596 RRRC: MOV DPTR,#FN_B
0290 7D81 MOV R5,#81H
0292 120581 LCALL FCN9
0295 750B00 MOV 0BH,#00H
0298 750A00 MOV 0AH,#00H
029B 1207CE LCALL WITH ; 测脉宽子程序
029E 1209B7 LCALL TESTPW ; 数据显示调整子程序
02A1 80EA SJMP RRRC
02A3 22 RET
02A4 B40E1C KF14: CJNE A,#0EH,KF15 ; 键15(K36)控制
02A7 753001 MOV DAT,#01H ; CLEAR
02AA 1204F9 LCALL ENABLE
C:\KX_7C8\KX8051_LCD_F_TEST_2C8\ASM\GWDVP_M1.ASM
页 8
11-22-08
07:54:38
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
02AD 90059B MOV DPTR,#FN_C
02B0 7D81 MOV R5,#81H
02B2 120581 LCALL FCN9
02B5 750B00 MOV 0BH,#00H
02B8 750A00 MOV 0AH,#00H
02BB 120864 RRRN: LCALL RATO ; 测占空比子程序
02BE 120A06 LCALL TESTD ; 数据显示调整子程序
02C1 80F8 SJMP RRRN
KF15: ; 键16(K37)控制
02C3 7449 MOV A,#49H
02C5 75F080 MOV B,#80H
02C8 1205A4 LCALL DISP2
02CB 7443 MOV A,#43H
02CD 75F080 MOV B,#80H
02D0 1205A4 LCALL DISP2
02D3 020AB2 LJMP CCC
02D6 22 RET
02D7 22 RET
;LLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLL
;
;KKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK
02D8 00 DIVD1: NOP ; 2N BYTE / N BYTE = N BYTE ,HERE N=3 IN 31H
02D9 75300C MOV 30H,#0CH ; (4A,4B,4C,4D,4E,4FH)/(5D,5E,5FH)=(4D,4E,4FH)
02DC 753106 MOV 31H,#06H ; 除法程序，30H放置被除数字节数，31H放置除数字节数
02DF E531 DIVPP: MOV A,AD1
02E1 FA MOV R2,A
02E2 23 RL A
02E3 23 RL A
02E4 23 RL A
02E5 FB MOV R3,A
02E6 C2F0 CLR 0F0H
02E8 C3 CLR C
02E9 744F MOV A,#ADA
02EB 9A SUBB A,R2
02EC F533 MOV AD3,A
02EE 795F MOV R1,#ADB
02F0 E7 DIVMB2B: MOV A,@R1
02F1 7006 JNZ DIVM2B
02F3 19 DEC R1
02F4 DAFA DJNZ R2,DIVMB2B
02F6 D2F0 SETB 0F0H
02F8 22 RET
02F9 AA31 DIVM2B: MOV R2,AD1
02FB 795F MOV R1,#ADB
02FD A833 MOV R0,AD3
02FF E6 DIVM2L: MOV A,@R0
C:\KX_7C8\KX8051_LCD_F_TEST_2C8\ASM\GWDVP_M1.ASM
页 9
11-22-08
07:54:38
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
0300 97 SUBB A,@R1
0301 18 DEC R0
0302 19 DEC R1
0303 DAFA DJNZ R2,DIVM2L
0305 5021 JNC DIVM20
0307 12032D DIVM2D: LCALL SHIL1
030A 400E JC DIVM2S
030C A833 DIVM2C: MOV R0,AD3
030E 795F MOV R1,#ADB
0310 AA31 MOV R2,AD1
0312 E6 DIVM2CL: MOV A,@R0
0313 97 SUBB A,@R1
0314 18 DEC R0
0315 19 DEC R1
0316 DAFA DJNZ R2,DIVM2CL
0318 400B JC DIVM2E
031A 054F DIVM2S: INC ADA
031C AA31 MOV R2,AD1
031E A833 MOV R0,AD3
0320 795F MOV R1,#ADB
0322 120339 LCALL SUBMBB
0325 DBE0 DIVM2E: DJNZ R3,DIVM2D
0327 22 RET
0328 D2F0 DIVM20: SETB 0F0H
032A 22 RET
032B 0212 DB 02H,12H
032D AA30 SHIL1: MOV R2,AD0
032F 784F MOV R0,#ADA
0331 C3 SHIL1B: CLR C
0332 E6 SHILL: MOV A,@R0
0333 33 RLC A
0334 F6 MOV @R0,A
0335 18 DEC R0
0336 DAFA DJNZ R2,SHILL
0338 22 RET
0339 C3 SUBMBB: CLR C
033A E6 SUBMB1: MOV A,@R0
033B 97 SUBB A,@R1
033C F6 MOV @R0,A
033D 18 DEC R0
033E 19 DEC R1
033F DAF9 DJNZ R2,SUBMB1
0341 22 RET
AD0 EQU 30H
C:\KX_7C8\KX8051_LCD_F_TEST_2C8\ASM\GWDVP_M1.ASM
页 10
11-22-08
07:54:38
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
AD1 EQU 31H
AD2 EQU 32H
AD3 EQU 33H
AD4 EQU 34H
AD5 EQU 35H
AD6 EQU 36H
ADA EQU 4FH
ADB EQU 5FH
ADC EQU 4DH
ADDV EQU 5DH
0342 00 MULNM: NOP ; N BYTES X M BYTES = N+M BYTES HERE N=3;M=3
0343 753006 MOV 30H,#06H ; (4D,4E,4FH)*(5D,5E,5FH)=(5A--5FH)
0346 753106 MOV 31H,#06H ; 乘法程序，30H放置被乘数字节数，31H放置乘数字节数
0349 E530 MULTT: MOV A,AD0
034B AB31 MOV R3,AD1
034D FA MOV R2,A
034E 2B ADD A,R3
034F 04 INC A
0350 F532 MOV AD2,A
0352 745F MOV A,#ADB
0354 C3 CLR C
0355 9B SUBB A,R3
0356 F536 MOV AD6,A
0358 F9 MOV R1,A
0359 9A SUBB A,R2
035A F535 MOV AD5,A
035C 0A INC R2
035D 7700 MULNMZ: MOV @R1,#00H
035F 19 DEC R1
0360 DAFB DJNZ R2,MULNMZ
0362 AA30 MULNMB: MOV R2,AD0
0364 A936 MOV R1,AD6
0366 784F MOV R0,#ADA
0368 C200 CLR 00H
036A E55F MULNML: MOV A,ADB
036C 6014 JZ MULNMD
036E 86F0 MOV B,@R0
0370 A4 MUL AB
0371 27 ADD A,@R1
0372 F7 MOV @R1,A
0373 300002 JNB 00H,MULNM1
0376 05F0 INC B
0378 E5F0 MULNM1: MOV A,B
037A 19 DEC R1
037B 37 ADDC A,@R1
037C F7 MOV @R1,A
C:\KX_7C8\KX8051_LCD_F_TEST_2C8\ASM\GWDVP_M1.ASM
页 11
11-22-08
07:54:38
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
037D 9200 MOV 00H,C
037F 18 DEC R0
0380 DAE8 DJNZ R2,MULNML
0382 A835 MULNMD: MOV R0,AD5
0384 E4 CLR A
0385 AA32 MOV R2,AD2
0387 C6 MULNMS: XCH A,@R0
0388 08 INC R0
0389 DAFC DJNZ R2,MULNMS
038B DBD5 DJNZ R3,MULNMB
038D 22 RET
; LLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLL
038E 120460 KKEYI: LCALL KKS1 ; KEY SCANNING PROG
0391 7008 JNZ KLK1 ; 有键盘, 转跳 KLK1
0393 1205E5 KN1: LCALL DELAY
0396 1205E5 LCALL DELAY
0399 80F3 SJMP KKEYI ; 无键,转跳 KKEYI 继续测键
039B 1205E5 KLK1: LCALL DELAY
039E 1205E5 LCALL DELAY
03A1 120460 LCALL KKS1
03A4 7005 JNZ KLK2 ; 确实有键,转跳至 KLK2
03A6 1205E5 LCALL DELAY
03A9 80E3 SJMP KKEYI
; --------------------------------------------
03AB 7590FE KLK2: MOV P1,#0FEH ; THERE IS KEYI
03AE 00 NOP
03AF 209405 JB P1.4,NOK1
03B2 7400 MOV A,#00H
03B4 02044B LJMP GOHM
03B7 00 NOK1: NOP
03B8 209505 JB P1.5,NOK2
03BB 7401 MOV A,#01H
03BD 02044B LJMP GOHM
03C0 00 NOK2: NOP
03C1 209605 JB P1.6,NOK3
03C4 7402 MOV A,#02H
03C6 02044B LJMP GOHM
03C9 00 NOK3: NOP
03CA 209705 JB P1.7,NOK4
03CD 7403 MOV A,#03H
03CF 02044B LJMP GOHM
03D2 00 NOK4: NOP
; ---------------------------------------------
03D3 7590FD MOV P1,#0FDH ; THERE IS KEYI
03D6 00 NOP
C:\KX_7C8\KX8051_LCD_F_TEST_2C8\ASM\GWDVP_M1.ASM
页 12
11-22-08
07:54:38
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
03D7 209405 JB P1.4,NOK5
03DA 7404 MOV A,#04H
03DC 02044B LJMP GOHM
03DF 00 NOK5: NOP
03E0 209505 JB P1.5,NOK6
03E3 7405 MOV A,#05H
03E5 02044B LJMP GOHM
03E8 00 NOK6: NOP
03E9 209605 JB P1.6,NOK7
03EC 7406 MOV A,#06H
03EE 02044B LJMP GOHM
03F1 00 NOK7: NOP
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -