📄 tmp.lst
字号:
Turbo Assembler Version 4.1 06/01/11 16:25:37 Page 1
F:\工程文件\Fasm\交通灯\tmp.ASM
1 ;电子0303 田里 20034972
2 ;交通灯************************
3 0000 DATA SEGMENT
4 0000 52 3A 54 69 6D 65 20+ DAT0 DB 'R:Time Restore.',0DH,0AH,'$'
5 52 65 73 74 6F 72 65+
6 2E 0D 0A 24
7 0012 43 3A 43 68 61 6E 67+ DAT1 DB 'C:Change The N-S GREEN TIME .',0DH,0AH,'$'
8 65 20 54 68 65 20 4E+
9 2D 53 20 47 52 45 45+
10 4E 20 54 49 4D 45 20+
11 2E 0D 0A 24
12 0032 23 DAT2 DB '#'
13 0033 44 3A 43 68 61 6E 67+ DAT3 DB 'D:Change The W-E GREEN TIME .',0DH,0AH,'$'
14 65 20 54 68 65 20 57+
15 2D 45 20 47 52 45 45+
16 4E 20 54 49 4D 45 20+
17 2E 0D 0A 24
18 0053 45 53 43 3D 51 55 49+ DAT4 DB 'ESC=QUIT ',0DH,0AH,'$'
19 54 20 0D 0A 24
20 005F 50 4C 45 41 53 45 20+ DAT5 DB 'PLEASE INPUT SECONDS(<99):',0DH,0AH,'$'
21 49 4E 50 55 54 20 53+
22 45 43 4F 4E 44 53 28+
23 3C 39 39 29 3A 0D 0A+
24 24
25 007C 2A 2A 2A 2A 2A 2A 2A+ DAT6 DB '********************* *********************','$'
26 2A 2A 2A 2A 2A 2A 2A+
27 2A 2A 2A 2A 2A 2A 2A+
28 20 20 20 20 20 20 20+
29 20 20 2A 2A 2A 2A 2A+
30 2A 2A 2A 2A 2A 2A 2A+
31 2A 2A 2A 2A 2A 2A 2A+
32 2A 2A 24
33 00B0 20 20 20 20 20 20 20+ DAT7 DB ' * * ','$'
34 20 20 20 20 20 20 20+
35 20 20 20 20 20 20 2A+
36 20 20 20 20 20 20 20+
37 20 20 2A 20 20 24
38 00D2 4E 3A 4E 49 47 48 54+ DAT8 DB 'N:NIGHT CONTROL(NEXT MOD).',0DH,0AH,'$'
39 20 43 4F 4E 54 52 4F+
40 4C 28 4E 45 58 54 20+
41 4D 4F 44 29 2E 0D 0A+
42 24
43 00EF 04 RED DB 04H
44 00F0 02 GREEN DB 02H
45 00F1 0F WHITE DB 0FH
46 00F2 0F WHIT DB 0FH
47 00F3 8E YELLOW DB 8EH
48 00F4 01 UPPER_ROW DB 1
49 00F5 18 UPPER_COL DB 24
50 00F6 0A UNDER_ROW DB 10
51 00F7 18 UNDER_COL DB 24
52 00F8 05 LEFT_ROW DB 5
53 00F9 01 LEFT_COL DB 1
54 00FA 05 RIGHT_ROW DB 5
55 00FB 2F RIGHT_COL DB 47
56 00FC 00 INTFLAG DB 0
57 00FD 12 COUNT DB 18
Turbo Assembler Version 4.1 06/01/11 16:25:37 Page 2
F:\工程文件\Fasm\交通灯\tmp.ASM
58 00FE 00 SECOND DB 0
59 00FF ???? OLD_SEG DW ?
60 0101 ???? OLD_OFF DW ?
61 0103 ?? OLD_MSK DB ?
62 0104 20 NS DB 20H
63 0105 20 WE DB 20H
64 0106 8E N1 DB 8EH
65 0107 0F N2 DB 0FH
66 0108 00 N3 DB 0
67 0109 DATA ENDS
68 ;***************************************
69 0000 STACK SEGMENT STACK
*Warning* F:\工程文件\Fasm\交通灯\tmp.ASM(39) Reserved word used as symbol: STACK
70 0000 0100*(??) STA DB 256 DUP(?)
71 =0100 TOP EQU $-STA
72 0100 STACK ENDS
73 ;************************************8
74 0000 CODE SEGMENT
75 ASSUME CS:CODE,DS:DATA,SS:STACK
76 0000 B8 0000s START: MOV AX,DATA
77 0003 8E D8 MOV DS,AX
78 0005 B8 0000s MOV AX,STACK
79 0008 8E D0 MOV SS,AX
80 000A B8 0100 MOV AX,TOP
81 000D 8B E0 MOV SP,AX
82 000F B4 00 MOV AH,0 ;设置300*200彩色图形方式
83 0011 B0 03 MOV AL,3
84 0013 CD 10 INT 10H
85 0015 B4 01 MOV AH,01H
86 0017 B9 2000 MOV CX,2000H
87 001A CD 10 INT 10H
88 ;*************************************************
89 001C B4 02 A1: MOV AH,02H
90 001E B6 0C MOV DH,12
91 0020 B2 0A MOV DL,10
92 0022 B7 00 MOV BH,00H
93 0024 CD 10 INT 10H
94 0026 B4 09 MOV AH,09H
95 0028 BA 0000r MOV DX,OFFSET DAT0
96 002B CD 21 INT 21H
97 002D B4 02 MOV AH,02H
98 002F B6 03 MOV DH,3
99 0031 B2 00 MOV DL,0
100 0033 B7 00 MOV BH,00H
101 0035 CD 10 INT 10H
102 0037 B4 09 MOV AH,09H
103 0039 BA 007Cr MOV DX,OFFSET DAT6
104 003C CD 21 INT 21H
105 003E B4 02 MOV AH,02H
106 0040 B6 07 MOV DH,7
107 0042 B2 00 MOV DL,0
108 0044 B7 00 MOV BH,00H
109 0046 CD 10 INT 10H
110 0048 B4 09 MOV AH,09H
111 004A BA 007Cr MOV DX,OFFSET DAT6
112 004D CD 21 INT 21H
113 004F B1 00 MOV CL,0
Turbo Assembler Version 4.1 06/01/11 16:25:37 Page 3
F:\工程文件\Fasm\交通灯\tmp.ASM
114 0051 B4 02 A2: MOV AH,02H
115 0053 8A F1 MOV DH,CL
116 0055 B2 00 MOV DL,0
117 0057 B7 00 MOV BH,00H
118 0059 CD 10 INT 10H
119 005B B4 09 MOV AH,09H
120 005D BA 00B0r MOV DX,OFFSET DAT7
121 0060 CD 21 INT 21H
122 0062 FE C1 INC CL
123 0064 80 F9 03 CMP CL,3H
124 0067 75 E8 JNZ A2
125 0069 B1 08 MOV CL,8
126 006B B4 02 A3: MOV AH,02H
127 006D 8A F1 MOV DH,CL
128 006F B2 00 MOV DL,0
129 0071 B7 00 MOV BH,00H
130 0073 CD 10 INT 10H
131 0075 B4 09 MOV AH,09H
132 0077 BA 00B0r MOV DX,OFFSET DAT7
133 007A CD 21 INT 21H
134 007C FE C1 INC CL
135 007E 80 F9 0C CMP CL,0CH
136 0081 75 E8 JNZ A3
137 0083 B4 02 MOV AH,02H
138 0085 B6 0D MOV DH,13
139 0087 B2 0A MOV DL,10
140 0089 B7 00 MOV BH,00H
141 008B CD 10 INT 10H
142 008D B4 09 MOV AH,09H
143 008F BA 0012r MOV DX,OFFSET DAT1
144 0092 CD 21 INT 21H
145 0094 B4 02 MOV AH,02H
146 0096 B6 0E MOV DH,14
147 0098 B2 0A MOV DL,10
148 009A B7 00 MOV BH,00H
149 009C CD 10 INT 10H
150 009E B4 09 MOV AH,09H
151 00A0 BA 0033r MOV DX,OFFSET DAT3
152 00A3 CD 21 INT 21H
153 00A5 B4 02 MOV AH,02H
154 00A7 B6 0F MOV DH,15
155 00A9 B2 0A MOV DL,10
156 00AB B7 00 MOV BH,00H
157 00AD CD 10 INT 10H
158 00AF B4 09 MOV AH,09H
159 00B1 BA 00D2r MOV DX,OFFSET DAT8
160 00B4 CD 21 INT 21H
161 00B6 B4 02 MOV AH,02H
162 00B8 B6 10 MOV DH,16
163 00BA B2 0A MOV DL,10
164 00BC B7 00 MOV BH,00H
165 00BE CD 10 INT 10H
166 00C0 B4 09 MOV AH,09H
167 00C2 BA 0053r MOV DX,OFFSET DAT4
168 00C5 CD 21 INT 21H
169 00C7 E8 000C CALL MOD1
170 00CA E8 0489 CALL MOD3
Turbo Assembler Version 4.1 06/01/11 16:25:37 Page 4
F:\工程文件\Fasm\交通灯\tmp.ASM
171 00CD E8 0246 CALL MOD2
172 00D0 E8 0483 CALL MOD3
173 00D3 E9 FF46 JMP A1
174 ;********************************************* 灯颜色和位置设置1
175 00D6 MOD1 PROC NEAR
176 00D6 B9 0003 MOV CX,03H
177 00D9 E8 0016 CALL NORTH1
178 00DC B9 0003 MOV CX,03H
179 00DF E8 0099 CALL SOUTH1
180 00E2 B9 0003 MOV CX,03H
181 00E5 E8 011C CALL WEST1
182 00E8 B9 0003 MOV CX,03H
183 00EB E8 019F CALL EAST1
184 00EE E8 06A5 CALL DELAY1
185 00F1 C3 RET
186 ;************************************* NORTH1
187 00F2 NORTH1 PROC NEAR
188 00F2 8A 1E 00F4r MOV BL,UPPER_ROW
189 00F6 53 PUSH BX
190 00F7 8A 1E 00F5r MOV BL,UPPER_COL
191 00FB 53 PUSH BX
192 00FC B4 02 NORTH_1: MOV AH,02H
193 00FE 8A 36 00F4r MOV DH,UPPER_ROW
194 0102 8A 16 00F5r MOV DL,UPPER_COL
195 0106 B7 00 MOV BH,00H
196 0108 CD 10 INT 10H
197 010A 83 F9 03 CMP CX,03H
198 010D 74 0A JZ NORTH_1_A1
199 010F 83 F9 02 CMP CX,02H
200 0112 74 22 JZ NORTH_1_A3
201 0114 83 F9 01 CMP CX,01H
202 0117 74 3A JZ NORTH_1_A2
203 0119 51 NORTH_1_A1: PUSH CX
204 011A BF 0000s MOV DI,SEG DAT2
205 011D 8E C7 MOV ES,DI
206 011F BD 0032r MOV BP,OFFSET DAT2
207 0122 B0 00 MOV AL,00H
208 0124 8A 1E 00EFr MOV BL,RED
209 0128 B4 13 MOV AH,13H
210 012A B9 0001 MOV CX,01H
211 012D CD 10 INT 10H
212 012F FE 06 00F5r INC UPPER_COL
213 0133 59 POP CX
214 0134 E2 C6 LOOP NORTH_1
215 0136 51 NORTH_1_A3: PUSH CX
216 0137 BF 0000s MOV DI,SEG DAT2
217 013A 8E C7 MOV ES,DI
218 013C BD 0032r MOV BP,OFFSET DAT2
219 013F B0 00 MOV AL,00H
220 0141 8A 1E 00F2r MOV BL,WHIT
221 0145 B4 13 MOV AH,13H
222 0147 B9 0001 MOV CX,01H
223 014A CD 10 INT 10H
224 014C FE 06 00F5r INC UPPER_COL
225 0150 59 POP CX
226 0151 E2 A9 LOOP NORTH_1
227 0153 51 NORTH_1_A2: PUSH CX
Turbo Assembler Version 4.1 06/01/11 16:25:37 Page 5
F:\工程文件\Fasm\交通灯\tmp.ASM
228 0154 BF 0000s MOV DI,SEG DAT2
229 0157 8E C7 MOV ES,DI
230 0159 BD 0032r MOV BP,OFFSET DAT2
231 015C B0 00 MOV AL,00H
232 015E 8A 1E 00F1r MOV BL,WHITE
233 0162 B4 13 MOV AH,13H
234 0164 B9 0001 MOV CX,01H
235 0167 CD 10 INT 10H
236 0169 FE 06 00F5r INC UPPER_COL
237 016D 59 POP CX
238 016E E2 00 LOOP R_N1
239 0170 5B R_N1: POP BX
240 0171 88 1E 00F5r MOV UPPER_COL,BL
241 0175 5B POP BX
242 0176 88 1E 00F4r MOV UPPER_ROW,BL
243 017A C3 RET
244 017B NORTH1 ENDP
245 ;************************************* 灯颜色和位置设置1
246 017B SOUTH1 PROC NEAR
247 017B 8A 1E 00F6r MOV BL,UNDER_ROW
248 017F 53 PUSH BX
249 0180 8A 1E 00F7r MOV BL,UNDER_COL
250 0184 53 PUSH BX
251 0185 B4 02 SOUTH_1: MOV AH,02H
252 0187 8A 36 00F6r MOV DH,UNDER_ROW
253 018B 8A 16 00F7r MOV DL,UNDER_COL
254 018F B7 00 MOV BH,00H
255 0191 CD 10 INT 10H
256 0193 83 F9 03 CMP CX,03H
257 0196 74 0A JZ SOUTH_1_A1
258 0198 83 F9 02 CMP CX,02H
259 019B 74 22 JZ SOUTH_1_A3
260 019D 83 F9 01 CMP CX,01H
261 01A0 74 3A JZ SOUTH_1_A2
262 01A2 51 SOUTH_1_A1: PUSH CX
263 01A3 BF 0000s MOV DI,SEG DAT2
264 01A6 8E C7 MOV ES,DI
265 01A8 BD 0032r MOV BP,OFFSET DAT2
266 01AB B0 00 MOV AL,00H
267 01AD 8A 1E 00EFr MOV BL,RED
268 01B1 B4 13 MOV AH,13H
269 01B3 B9 0001 MOV CX,01H
270 01B6 CD 10 INT 10H
271 01B8 FE 06 00F7r INC UNDER_COL
272 01BC 59 POP CX
273 01BD E2 C6 LOOP SOUTH_1
274 01BF 51 SOUTH_1_A3: PUSH CX
275 01C0 BF 0000s MOV DI,SEG DAT2
276 01C3 8E C7 MOV ES,DI
277 01C5 BD 0032r MOV BP,OFFSET DAT2
278 01C8 B0 00 MOV AL,00H
279 01CA 8A 1E 00F2r MOV BL,WHIT
280 01CE B4 13 MOV AH,13H
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -