📄 m8-2.lst
字号:
Input Filename : M8-2.asm
Output Filename : M8-2.obj
1 0000 ORG 0H
2 00A0 CS EQU 0A0H
3 00A1 SK EQU 0A1H
4 00A2 DI EQU 0A2H
5 00A3 DO EQU 0A3H
6 0000 75 81 60 MOV SP,#60H
7 0003 C2 A1 CLR SK
8 0005 C2 A0 CLR CS
9 0007 C2 A2 CLR DI
10 0009 C2 A3 CLR DO
11 000B 12 00 7B CALL EWEN
12 000E 12 00 E3 CALL ERAL
13 0011 C2 D3 CLR RS0
14 0013 C2 D4 CLR RS1
15 0015 78 00 MOV R0,#00H
16 0017 75 0A 01 MOV 0AH,#01H
17 001A 7C 04 MOV R4,#04H
18 001C E8 ZZ1 MOV A,R0
19 001D F5 09 MOV 09H,A
20 001F 85 0A 20 MOV 20H,0AH
21 0022 E5 0A MOV A,0AH
22 0024 23 RL A
23 0025 F5 0B MOV 0BH,A
24 0027 85 0B 21 MOV 21H,0BH
25 002A 12 00 88 LCALL WRITE
26 002D E5 0B MOV A,0BH
27 002F 23 RL A
28 0030 F5 0A MOV 0AH,A
29 0032 08 INC R0
30 0033 DC E7 DJNZ R4,ZZ1
31 0035 78 00 XXXX MOV R0,#00H
32 0037 79 30 MOV R1,#30H
33 0039 7C 04 MOV R4,#04H
34 003B E8 ZZ MOV A,R0
35 003C 12 00 C1 CALL READ
36 003F A7 20 MOV @R1,20H
37 0041 85 20 90 MOV P1,20H
38 0044 7A 00 MOV R2,#00H
39 0046 12 00 FE CALL DL1
40 0049 09 INC R1
41 004A A7 21 MOV @R1,21H
42 004C 85 21 90 MOV P1,21H
43 004F 7A 00 MOV R2,#00H
44 0051 12 00 FE CALL DL1
45 0054 09 INC R1
46 0055 08 INC R0
47 0056 DC E3 DJNZ R4,ZZ
48 0058 01 35 AJMP XXXX
49 005A 7D 08 WRBYTE MOV R5,#8
50 005C C2 A1 WRB1 CLR SK
51 005E 33 RLC A
52 005F 92 A2 MOV DI,C
53 0061 00 NOP
54 0062 D2 A1 SETB SK
55 0064 00 NOP
56 0065 DD F5 DJNZ R5,WRB1
57 0067 33 RLC A
58 0068 22 RET
59 0069 D2 A0 COMM SETB CS
60 006B D2 A1 SETB SK
61 006D C2 A2 CLR DI
62 006F 00 NOP
63 0070 00 NOP
64 0071 00 NOP
65 0072 C2 A1 CLR SK
66 0074 D2 A2 SETB DI
67 0076 00 NOP
68 0077 00 NOP
69 0078 D2 A1 SETB SK
70 007A 22 RET
71 007B 11 69 EWEN CALL COMM
72 007D 74 30 MOV A,#30H
73 007F 11 5A CALL WRBYTE
74 0081 C2 A0 CLR CS
75 0083 C2 A1 CLR SK
76 0085 C2 A2 CLR DI
77 0087 22 RET
78 0088 11 69 WRITE CALL COMM
79 008A E5 09 MOV A,09H
80 008C 44 40 ORL A,#40H
81 008E 11 5A CALL WRBYTE
82 0090 E5 20 MOV A,20H
83 0092 11 5A CALL WRBYTE
84 0094 E5 21 MOV A,21H
85 0096 11 5A CALL WRBYTE
86 0098 C2 A0 CLR CS
87 009A C2 A2 CLR DI
88 009C 12 00 DA CALL PULSE
89 009F 12 00 DA CALL PULSE
90 00A2 D2 A0 SETB CS
91 00A4 D2 A3 SETB DO
92 00A6 12 00 FC CALL DELAY
93 00A9 12 00 DA CALL PULSE
94 00AC C2 A0 CLR CS
95 00AE 22 RET
96 00AF D2 A3 RDBYTE SETB DO
97 00B1 33 RLC A
98 00B2 7D 08 MOV R5,#8
99 00B4 C2 A1 RDB1 CLR SK
100 00B6 A2 A3 MOV C,DO
101 00B8 33 RLC A
102 00B9 00 NOP
103 00BA D2 A1 SETB SK
104 00BC 00 NOP
105 00BD DD F5 DJNZ R5,RDB1
106 00BF 00 NOP
107 00C0 22 RET
108 00C1 11 69 READ CALL COMM
109 00C3 44 80 ORL A,#80H
110 00C5 11 5A CALL WRBYTE
111 00C7 C2 A2 CLR DI
112 00C9 12 00 DA CALL PULSE
113 00CC 12 00 DA CALL PULSE
114 00CF 11 AF CALL RDBYTE
115 00D1 F5 20 MOV 20H,A
116 00D3 11 AF CALL RDBYTE
117 00D5 F5 21 MOV 21H,A
118 00D7 C2 A0 CLR CS
119 00D9 22 RET
120 00DA D2 A1 PULSE SETB SK
121 00DC 00 NOP
122 00DD 00 NOP
123 00DE 00 NOP
124 00DF C2 A1 CLR SK
125 00E1 00 NOP
126 00E2 22 RET
127 00E3 11 69 ERAL CALL COMM
128 00E5 74 20 MOV A,#20H
129 00E7 11 5A CALL WRBYTE
130 00E9 D2 A1 SETB SK
131 00EB C2 A0 CLR CS
132 00ED 00 NOP
133 00EE 11 DA CALL PULSE
134 00F0 D2 A0 SETB CS
135 00F2 D2 A3 SETB DO
136 00F4 12 00 FC CALL DELAY
137 00F7 C2 A0 CLR CS
138 00F9 C2 A2 CLR DI
139 00FB 22 RET
140 00FC 7A 00 DELAY MOV R2,#00H
141 00FE 7B 00 DL1 MOV R3,#00H
142 0100 DB FE DJNZ R3,$
143 0102 DA FA DJNZ R2,DL1
144 0104 22 RET
145 0105 END
Lines Assembled : 145 Assembly Errors : 0
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -