⊙通用键盘显示板
019B 319F ACALL HB1
019D E533 MOV A, 83H 019F F9 HB1:
MOV R1, A
01A0 31A4 ACALL HB2
01A2 E9 MOV A, R1
01A3 C4 SWAP A
01A4 540F HB2: ANL A, #0FH 01A6 F6 MOV
@R0, A 01A7 18 DEC R0
01A8 22 RET
01A9 753080 HLED: MOV 30H, #80H 01AC 753140 MOV 31H, #40H
01AF 7F06 MOV R7, #06H 01B1 7801
HLED1: MOV R0, #01H 01B3 E530 MOV A, 3OH
01B5 F2 MOVX @R0, A
01B6 A831 MOV R0, 31H 01B8 E6 MOV A, @R0
01B9 900600 MOV @DPTR, #0600H 01BC 93 MOVC A, @A+DPTR
01BD 7800 MOV R0, #00H
01BF F2 MOVX @R0, A
01C0 0531 INC 31H
01C2 0530 INC 30H
01C4 DFEB DJNZ R7, HLED1 01C6
22
RET
0RG 0600H
0600 0C DB 0CH, 9FH, 4AH, 0BH, 99H, 29H,28H
0601 9F DB 8FH, 08H, 09H, 88H, 38H, 6CH
0602 4A DB 68H, 0E8H
0603 0B
0604 99
0605 29
0606 28
0607 8F
0608 08
0609 09
060A 88
060B 38
060C 6C
060D 1A
060E 68
060F E8 DB 0E8H
ORG 0700H
0700 C1 DB 0C1H, 0C8H, 0C9H, 0D0H, 0D8H, 0E0H
0701 C8 DB 0C2H, OCAH, 0D1H, 0D9H, 0DAH
0702 C9
0703 D0
0704 D8
0705 E0
0706 C2
0707 CA
0708 D1
0709 D9
070A DA
070B C3
070C CB DB 0CBH,0D2H,0D3H,0DBH,0E3H,0E2H,0F1H,0D2
070E D3
070F DB
0710 E3
0711 E2
0712 E1
ORG 0800H
0800 758160 DISP: MOV SP, #60H 0803 907001 MOV DPTR, #7001H
0806 7400 MOV A, #00H
0808 FO MOVX @DPTR, A
0809 7422 MOV A, #22H 080B F0 MOVX @DPTR,
A
080C 74DF MOV A, #0DFH
080E F0 MOVX @DPTR, A 080F E0 DIAP0: MOVX
A, @DPTR
0810 20F7FC JB ACC.7, DIAP0 0813 7A80 DISP1: MOV R2, #30H
0815 FA DISP2: MOV A, R2
0816 907001 MOV DPTR, #7001H 0819 F0 MOVX @DPTP, A
081A 7400 MOV A, #0CH
081C 907000 MOV DPTR, #7000H 081F F0 MOVX @DPTR, A
0820 120163 LCALL DELY
0823 74FF MOV A, #0FFH
0825 907000 MOV DPTR, #7000H 0828 F0 MOVX @DPTR, A
0829 0A INC R2
082A BA88E8 CJME R2,#88H,DISP2 082D 020813 LJMP DISP
BACK<< |
 |
