📄 wyh001.lst
字号:
ORG 0000H
0000 0140 AJMP START
ORG 0040H
0040 START:
0040 908300 MOV DPTR,#8300H
0043 7590FF MOV P1,#0FFH
0046 READ:
0046 E590 C0: MOV A,P1
0048 B4FE03 CJNE A,#11111110B,C1
004B 02007A LJMP CH1
004E B4FD03 C1: CJNE A,#11111101B,C2
0051 02008B LJMP CH2
0054 B4FB03 C2: CJNE A,#11111011B,C3
0057 02009E LJMP CH3
005A B4F703 C3: CJNE A,#11110111B,C4
005D 0200B2 LJMP CH4
0060 B4EF03 C4: CJNE A,#11101111B,C5
0063 0200C4 LJMP CH5
0066 B4DF03 C5: CJNE A,#11011111B,C6
0069 0200EA LJMP CH6
006C B4BF03 C6: CJNE A,#10111111B,C7
006F 020116 LJMP CH7
0072 B47FD1 C7: CJNE A,#01111111B,C0
0075 020148 LJMP CH8
0078 0146 AJMP READ
007A CH1:
007A 758160 MOV SP,#60H
007D 7D02 MOV R5,#02H
007F 74FE MOV A,#0FEH
0081 F0 ROT0: MOVX @DPTR,A
0082 23 RL A
0083 120162 LCALL DELAY
0086 00 NOP
0087 DDF8 DJNZ R5,ROT0
0089 0146 AJMP READ
008B CH2:
008B 758160 MOV SP,#60H
008E 7D02 MOV R5,#02H
0090 74FE MOV A,#0FEH
0092 F0 ROT1: MOVX @DPTR,A
0093 23 RL A
0094 23 RL A
0095 120162 LCALL DELAY
0098 00 NOP
0099 DDF7 DJNZ R5,ROT1
009B 020046 LJMP READ
009E CH3:
009E 758160 MOV SP,#60H
00A1 7D02 MOV R5,#02H
00A3 74FE MOV A,#0FEH
00A5 F0 ROT2: MOVX @DPTR,A
00A6 23 RL A
00A7 23 RL A
00A8 23 RL A
00A9 120162 LCALL DELAY
00AC 00 NOP
00AD DDF6 DJNZ R5,ROT2
00AF 020046 LJMP READ
00B2 CH4:
00B2 758160 MOV SP,#60H
00B5 7D02 MOV R5,#02H
00B7 74FF MOV A,#0FFH
00B9 F0 ROT3: MOVX @DPTR,A
00BA 03 RR A
00BB 120162 LCALL DELAY
00BE 00 NOP
00BF DDF8 DJNZ R5,ROT3
00C1 020046 LJMP READ
00C4 CH5:
00C4 758160 MOV SP,#60H
00C7 7D02 MOV R5,#02H
00C9 74FF MOV A,#0FFH
00CB F0 ROT4: MOVX @DPTR,A
00CC 747E MOV A,#01111110B
00CE F0 MOVX @DPTR,A
00CF 120162 LCALL DELAY
00D2 743C MOV A,#00111100B
00D4 F0 MOVX @DPTR,A
00D5 120162 LCALL DELAY
00D8 7418 MOV A,#00011000B
00DA F0 MOVX @DPTR,A
00DB 120162 LCALL DELAY
00DE 7400 MOV A,#00000000B
00E0 F0 MOVX @DPTR,A
00E1 120162 LCALL DELAY
00E4 00 NOP
00E5 DDE4 DJNZ R5,ROT4
00E7 020046 LJMP READ
00EA CH6:
00EA 758160 MOV SP,#60H
00ED 7D02 MOV R5,#02H
00EF 74FF MOV A,#0FFH
00F1 F0 ROT5: MOVX @DPTR,A
00F2 74E7 MOV A,#11100111B
00F4 F0 MOVX @DPTR,A
00F5 120162 LCALL DELAY
00F8 74C3 MOV A,#11000011B
00FA F0 MOVX @DPTR,A
00FB 120162 LCALL DELAY
00FE 7481 MOV A,#10000001B
0100 F0 MOVX @DPTR,A
0101 120162 LCALL DELAY
0104 7400 MOV A,#00000000B
0106 F0 MOVX @DPTR,A
0107 120162 LCALL DELAY
010A 74FF MOV A,#0FFH
010C F0 MOVX @DPTR,A
010D 120162 LCALL DELAY
0110 00 NOP
0111 DDDE DJNZ R5,ROT5
0113 020046 LJMP READ
0116 CH7:
0116 758160 MOV SP,#60H
0119 7D02 MOV R5,#02H
011B 74FF MOV A,#0FFH
011D F0 ROT6: MOVX @DPTR,A
011E 747E MOV A,#01111110B
0120 F0 MOVX @DPTR,A
0121 120162 LCALL DELAY
0124 74BD MOV A,#10111101B
0126 F0 MOVX @DPTR,A
0127 120162 LCALL DELAY
012A 74DB MOV A,#11011011B
012C F0 MOVX @DPTR,A
012D 120162 LCALL DELAY
0130 74E7 MOV A,#11100111B
0132 F0 MOVX @DPTR,A
0133 120162 LCALL DELAY
0136 74DB MOV A,#11011011B
0138 F0 MOVX @DPTR,A
0139 120162 LCALL DELAY
013C 74BD MOV A,#10111101B
013E F0 MOVX @DPTR,A
013F 120162 LCALL DELAY
0142 00 NOP
0143 DDD8 DJNZ R5,ROT6
0145 020046 LJMP READ
0148 CH8:
0148 758160 MOV SP,#60H
014B 7D02 MOV R5,#02H
014D 74FF MOV A,#0FFH
014F F0 ROT7: MOVX @DPTR,A
0150 7400 MOV A,#00H
0152 F0 MOVX @DPTR,A
0153 120162 LCALL DELAY
0156 74FF MOV A,#0FFH
0158 F0 MOVX @DPTR,A
0159 120162 LCALL DELAY
015C 00 NOP
015D DDF0 DJNZ R5,ROT7
015F 020046 LJMP READ
0162 DELAY:
0162 7801 MOV R0,#01H
0164 7900 DELAY1: MOV R1,#00H
0166 7AB2 DELAY2: MOV R2,#0B2H
0168 DAFE DJNZ R2,$
016A D9FA DJNZ R1,DELAY2
016C D8F6 DJNZ R0,DELAY1
016E 22 RET
END
;
; ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -