📄 gwdvp_m1.lst
字号:
03F2 209705 JB P1.7,NOK8
03F5 7407 MOV A,#07H
03F7 02044B LJMP GOHM
03FA 00 NOK8: NOP
; ---------------------------------------------
03FB 7590FB MOV P1,#0FBH ; THERE IS KEYI
03FE 00 NOP
03FF 209405 JB P1.4,NOK9
0402 7408 MOV A,#08H
0404 02044B LJMP GOHM
0407 00 NOK9: NOP
0408 209505 JB P1.5,NOKA
040B 7409 MOV A,#09H
040D 02044B LJMP GOHM
0410 00 NOKA: NOP
0411 209605 JB P1.6,NOKB
0414 740A MOV A,#0AH
0416 02044B LJMP GOHM
0419 00 NOKB: NOP
041A 209705 JB P1.7,NOKC
041D 740B MOV A,#0BH
041F 02044B LJMP GOHM
0422 00 NOKC: NOP
; ---------------------------------------------
0423 7590F7 MOV P1,#0F7H ; THERE IS KEYI
0426 00 NOP
0427 209405 JB P1.4,NOKD
042A 740C MOV A,#0CH
042C 02044B LJMP GOHM
042F 00 NOKD: NOP
0430 209505 JB P1.5,NOKE
0433 740D MOV A,#0DH
0435 02044B LJMP GOHM
0438 00 NOKE: NOP
0439 209605 JB P1.6,NOKF
C:\KX_7C8\KX8051_LCD_F_TEST_2C8\ASM\GWDVP_M1.ASM
页 13
11-22-08
07:54:38
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
043C 740E MOV A,#0EH
043E 02044B LJMP GOHM
0441 00 NOKF: NOP
0442 209705 JB P1.7,NOKR
0445 740F MOV A,#0FH
0447 02044B LJMP GOHM
044A 22 NOKR: RET
; ---------------------------------------------
044B C0E0 GOHM: PUSH ACC
044D 1205E5 KLK3: LCALL DELAY
0450 120460 LCALL KKS1
0453 70F8 JNZ KLK3
0455 1205E5 LCALL DELAY
0458 120460 LCALL KKS1
045B 70F0 JNZ KLK3
045D D0E0 POP ACC
045F 22 RET
0460 7590F0 KKS1: MOV P1,#0F0H ; IS THERE ANY
0463 00 NOP
0464 00 NOP
0465 00 NOP
0466 00 NOP
0467 00 NOP
0468 E590 MOV A,P1
046A 440F ORL A,#0FH
046C F4 CPL A
046D 22 RET ; IF THERE IS KEYING THEN A =/= 0； 如果A=0表示没有任何键
;LLLLLLLLLLLLLLLLLLLLLLLLLLLLLL
; TTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTT
046E 00 BCDHEX : NOP ; N BYTES COMPRESSED BCD CODES TO M BYTES HEX CODES
046F 753007 MOV 30H,#07H ; HERE N=M=7 BCD(49,4A,4B,4C,4D,4E,4FH)--HEX(59,5A,5B,5C,5D,5E,5FH)
0472 753107 MOV 31H,#07H ; BCD码向16进制HEX码转换程序
0475 795F MOV R1,#ADB
0477 AA31 MOV R2,AD1
0479 AB30 MOV R3,AD0
047B 744F MOV A,#ADA
047D C3 CLR C
047E 9B SUBB A,R3
047F 04 INC A
0480 F8 MOV R0,A
0481 7700 DBNZ: MOV @R1,#00H
0483 19 DEC R1
0484 DAFB DJNZ R2,DBNZ
0486 8017 SJMP DBNB
0488 795F DBNJ: MOV R1,#ADB
C:\KX_7C8\KX8051_LCD_F_TEST_2C8\ASM\GWDVP_M1.ASM
页 14
11-22-08
07:54:38
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
048A AA31 MOV R2,AD1
048C C200 CLR 00H
048E E4 CLR A
048F C7 DBNM: XCH A,@R1
0490 75F064 MOV B,#64H
0493 A4 MUL AB
0494 A200 MOV C,00H
0496 37 ADDC A,@R1
0497 F7 MOV @R1,A
0498 9200 MOV 00H,C
049A E5F0 MOV A,B
049C 19 DEC R1
049D DAF0 DJNZ R2,DBNM
049F E4 DBNB: CLR A
04A0 D6 XCHD A,@R0
04A1 C6 XCH A,@R0
04A2 C4 SWAP A
04A3 75F00A MOV B,#0AH
04A6 A4 MUL AB
04A7 26 ADD A,@R0
04A8 08 INC R0
04A9 AA31 DBNA: MOV R2,AD1
04AB 1A DEC R2
04AC 795F MOV R1,#ADB
04AE 27 ADD A,@R1
04AF F7 MOV @R1,A
04B0 19 DBNL: DEC R1
04B1 E4 CLR A
04B2 37 ADDC A,@R1
04B3 F7 MOV @R1,A
04B4 DAFA DJNZ R2,DBNL
04B6 DBD0 DJNZ R3,DBNJ
04B8 22 RET
04B9 0212 DB 02H,12H
; llllllllllllllllllllllllllllllllllllllllllll
04BB 00 HEXBCD : NOP ; 7 BYTE HEX TO 8 BYTE BCD : HEX(3XH-30H)-->BCD(4XH-40H)
04BC 7840 MUBTD: MOV R0,#40H
04BE 7F08 MOV R7,#08H
04C0 E4 CLR A
04C1 F6 LOPP1: MOV @R0,A
04C2 08 INC R0
04C3 DFFC DJNZ R7,LOPP1
04C5 7F38 MOV R7,#38H
04C7 7930 LOOP4: MOV R1,#30H
04C9 7E07 MOV R6,#07H
04CB C3 CLR C
C:\KX_7C8\KX8051_LCD_F_TEST_2C8\ASM\GWDVP_M1.ASM
页 15
11-22-08
07:54:38
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
04CC E7 LOPP2: MOV A,@R1
04CD 33 RLC A
04CE F7 MOV @R1,A
04CF 09 INC R1
04D0 DEFA DJNZ R6,LOPP2
04D2 7D08 MOV R5,#08H
04D4 7840 MOV R0,#40H
04D6 E6 LOOP3: MOV A,@R0
04D7 36 ADDC A,@R0
04D8 D4 DA A
04D9 F6 MOV @R0,A
04DA 08 INC R0
04DB DDF9 DJNZ R5,LOOP3
04DD DFE8 DJNZ R7,LOOP4
04DF 22 RET
;
;llllllllllllllllllllllllllllllllllllll
04E0 A940 DSP1: MOV R1,40H
04E2 09 INC R1
04E3 8940 MOV 40H,R1
04E5 E7 MOV A,@R1 ; DAT1
04E6 F590 MOV P1,A
04E8 D2B0 SETB RS
04EA C2B1 CLR RW
04EC 00 nop
04ED C2B2 CLR E
04EF 00 NOP
04F0 00 NOP
04F1 D2B2 SETB E
04F3 1205F5 LCALL DDT9
04F6 DAE8 DJNZ R2,DSP1
04F8 22 RET
04F9 C2B0 ENABLE: CLR RS
04FB C2B1 CLR RW
04FD 853090 MOV P1,DAT
0500 C2B2 CLR E
0502 00 nop
0503 D2B2 SETB E
0505 1205F5 LCALL DDT9
0508 22 RET
C:\KX_7C8\KX8051_LCD_F_TEST_2C8\ASM\GWDVP_M1.ASM
页 16
11-22-08
07:54:38
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
0509 90050E ASC1: MOV DPTR,#TAJ
050C 93 MOVC A,@A+DPTR
050D 22 RET
050E 303132
0511 333435
0514 363738
0517 394142
051A 434445
051D 46 TAJ: DB 30H,31H,32H,33H,34H,35H,36H,37H,38H,39H,41H,42H,43H,44H,45H,46H
; KKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK
051E 900523 ASC: MOV DPTR,#TA6
0521 93 MOVC A,@A+DPTR
0522 22 RET
0523 303132
0526 333435
0529 363738
052C 392048
052F 7A4D TA6: DB 30H,31H,32H,33H,34H,35H,36H,37H,38H,39H,20H,48H,7AH,4DH
0531 E4732E DB 0E4H,73H,2EH ; 0EH- u ; 0FH- s ;10H ->.
0534 753038 DISP3: MOV DAT,#38H ;8bit 2 Rol 5*7
0537 1204F9 LCALL ENABLE
053A 75300F MOV DAT,#0FH ;OPEN LCD : 00001DCB
053D 1204F9 LCALL ENABLE
0540 753006 MOV DAT,#06H ;LEFT TO RIGHT:
0543 1204F9 LCALL ENABLE
0546 22 RET
;
;
0547 7C14 FB1: MOV R4,#14H
0549 7E00 MOV R6,#00H
054B EE RC5: MOV A,R6
054C 0E INC R6
054D 93 MOVC A,@A+DPTR
054E 8DF0 MOV B,R5
0550 0D INC R5
0551 1205A4 LCALL DISP2
0554 DCF5 DJNZ R4,RC5
0556 22 RET
0557 202053
055A 49474E
055D 414C20
0560 546573
0563 747320
0566 20 TC1: DB 20H,20H,53H,49H,47H,4EH,41H,4CH,20H,54H,65H,73H,74H,73H,20H,20H
C:\KX_7C8\KX8051_LCD_F_TEST_2C8\ASM\GWDVP_M1.ASM
页 17
11-22-08
07:54:38
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
; SIGNAL_TESTS
;LLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLL
0567 7C0A FB6: MOV R4,#0AH ; SQUARE: ,SAWTOOTH , TRIANGLE, LADDER
0569 7E00 MOV R6,#00H
056B EE RCV: MOV A,R6
056C 0E INC R6
056D 93 MOVC A,@A+DPTR
056E 8DF0 MOV B,R5
0570 0D INC R5
0571 1205A4 LCALL DISP2
0574 DCF5 DJNZ R4,RCV
0576 22 RET
0577 202020
057A 204B4F
057D 4E5849
0580 4E KONX: DB 20H,20H,20H,20H,4BH,4FH,4EH,58H,49H,4EH ; KONXIN
;LLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLL
0581 7C05 FCN9: MOV R4,#05H ;
0583 7E00 MOV R6,#00H
0585 EE RCT9: MOV A,R6
0586 0E INC R6
0587 93 MOVC A,@A+DPTR
0588 8DF0 MOV B,R5
058A 0D INC R5
058B 1205A4 LCALL DISP2
058E DCF5 DJNZ R4,RCT9
0590 22 RET
;
0591 465245
0594 513A FN_A : DB 46H,52H,45H,51H,3AH ; FREQ:
0596 505720
0599 203A FN_B : DB 50H,57H,20H,20H,3AH ; PW :
059B 445554
059E 593A FN_C : DB 44H,55H,54H,59H,3AH ; DUTY:
;LLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLL
;
05A0 E520 WW45: MOV A,20H
05A2 8010 SJMP OOLK
05A4 F520 DISP2: MOV 20H,A
05A6 B43A02 CJNE A,#3AH,NNO3A
05A9 8009 SJMP OOLK
05AB 54F0 NNO3A: ANL A,#0F0H
05AD B430F0 CJNE A,#30H,WW45
05B0 E520 MOV A,20H
C:\KX_7C8\KX8051_LCD_F_TEST_2C8\ASM\GWDVP_M1.ASM
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -