📄 tfc.lst
字号:
280 0176 8A 1E 01C1r MOV BL,UPPER_ROW
281 017A 53 PUSH BX
282 017B 8A 1E 01C2r MOV BL,UPPER_COL
283 017F 53 PUSH BX
284 0180 B4 02 NORTH_1: MOV AH,02H
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 6
F:\工程文件\Fasm\交通灯\TFC.ASM
285 0182 8A 36 01C1r MOV DH,UPPER_ROW
286 0186 8A 16 01C2r MOV DL,UPPER_COL
287 018A B7 00 MOV BH,00H
288 018C CD 10 INT 10H
289 018E 83 F9 03 CMP CX,03H
290 0191 74 0A JZ NORTH_1_A1
291 0193 83 F9 02 CMP CX,02H
292 0196 74 22 JZ NORTH_1_A3
293 0198 83 F9 01 CMP CX,01H
294 019B 74 3A JZ NORTH_1_A2
295 019D 51 NORTH_1_A1: PUSH CX
296 019E BF 0000s MOV DI,SEG DAT2
297 01A1 8E C7 MOV ES,DI
298 01A3 BD 003Ar MOV BP,OFFSET DAT2
299 01A6 B0 00 MOV AL,00H
300 01A8 8A 1E 01BCr MOV BL,RED
301 01AC B4 13 MOV AH,13H
302 01AE B9 0001 MOV CX,01H
303 01B1 CD 10 INT 10H
304 01B3 FE 06 01C2r INC UPPER_COL
305 01B7 59 POP CX
306 01B8 E2 C6 LOOP NORTH_1
307 01BA 51 NORTH_1_A3: PUSH CX
308 01BB BF 0000s MOV DI,SEG DAT2
309 01BE 8E C7 MOV ES,DI
310 01C0 BD 003Ar MOV BP,OFFSET DAT2
311 01C3 B0 00 MOV AL,00H
312 01C5 8A 1E 01BFr MOV BL,WHIT
313 01C9 B4 13 MOV AH,13H
314 01CB B9 0001 MOV CX,01H
315 01CE CD 10 INT 10H
316 01D0 FE 06 01C2r INC UPPER_COL
317 01D4 59 POP CX
318 01D5 E2 A9 LOOP NORTH_1
319 01D7 51 NORTH_1_A2: PUSH CX
320 01D8 BF 0000s MOV DI,SEG DAT2
321 01DB 8E C7 MOV ES,DI
322 01DD BD 003Ar MOV BP,OFFSET DAT2
323 01E0 B0 00 MOV AL,00H
324 01E2 8A 1E 01BEr MOV BL,WHITE
325 01E6 B4 13 MOV AH,13H
326 01E8 B9 0001 MOV CX,01H
327 01EB CD 10 INT 10H
328 01ED FE 06 01C2r INC UPPER_COL
329 01F1 59 POP CX
330 01F2 E2 00 LOOP R_N1
331 01F4 5B R_N1: POP BX
332 01F5 88 1E 01C2r MOV UPPER_COL,BL
333 01F9 5B POP BX
334 01FA 88 1E 01C1r MOV UPPER_ROW,BL
335 01FE C3 RET
336 01FF NORTH1 ENDP
337 ;************************************* 灯颜色和位置设置1
338 01FF SOUTH1 PROC NEAR
339 01FF 8A 1E 01C3r MOV BL,UNDER_ROW
340 0203 53 PUSH BX
341 0204 8A 1E 01C4r MOV BL,UNDER_COL
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 7
F:\工程文件\Fasm\交通灯\TFC.ASM
342 0208 53 PUSH BX
343 0209 B4 02 SOUTH_1: MOV AH,02H
344 020B 8A 36 01C3r MOV DH,UNDER_ROW
345 020F 8A 16 01C4r MOV DL,UNDER_COL
346 0213 B7 00 MOV BH,00H
347 0215 CD 10 INT 10H
348 0217 83 F9 03 CMP CX,03H
349 021A 74 0A JZ SOUTH_1_A1
350 021C 83 F9 02 CMP CX,02H
351 021F 74 22 JZ SOUTH_1_A3
352 0221 83 F9 01 CMP CX,01H
353 0224 74 3A JZ SOUTH_1_A2
354 0226 51 SOUTH_1_A1: PUSH CX
355 0227 BF 0000s MOV DI,SEG DAT2
356 022A 8E C7 MOV ES,DI
357 022C BD 003Ar MOV BP,OFFSET DAT2
358 022F B0 00 MOV AL,00H
359 0231 8A 1E 01BCr MOV BL,RED
360 0235 B4 13 MOV AH,13H
361 0237 B9 0001 MOV CX,01H
362 023A CD 10 INT 10H
363 023C FE 06 01C4r INC UNDER_COL
364 0240 59 POP CX
365 0241 E2 C6 LOOP SOUTH_1
366 0243 51 SOUTH_1_A3: PUSH CX
367 0244 BF 0000s MOV DI,SEG DAT2
368 0247 8E C7 MOV ES,DI
369 0249 BD 003Ar MOV BP,OFFSET DAT2
370 024C B0 00 MOV AL,00H
371 024E 8A 1E 01BFr MOV BL,WHIT
372 0252 B4 13 MOV AH,13H
373 0254 B9 0001 MOV CX,01H
374 0257 CD 10 INT 10H
375 0259 FE 06 01C4r INC UNDER_COL
376 025D 59 POP CX
377 025E E2 A9 LOOP SOUTH_1
378 0260 51 SOUTH_1_A2: PUSH CX
379 0261 BF 0000s MOV DI,SEG DAT2
380 0264 8E C7 MOV ES,DI
381 0266 BD 003Ar MOV BP,OFFSET DAT2
382 0269 B0 00 MOV AL,00H
383 026B 8A 1E 01BEr MOV BL,WHITE
384 026F B4 13 MOV AH,13H
385 0271 B9 0001 MOV CX,01H
386 0274 CD 10 INT 10H
387 0276 FE 06 01C4r INC UNDER_COL
388 027A 59 POP CX
389 027B E2 00 LOOP R_S1
390 027D 5B R_S1: POP BX
391 027E 88 1E 01C4r MOV UNDER_COL,BL
392 0282 5B POP BX
393 0283 88 1E 01C3r MOV UNDER_ROW,BL
394 0287 C3 RET
395 0288 SOUTH1 ENDP
396 ;************************************* WEST 1
397 0288 WEST1 PROC NEAR
398 0288 8A 1E 01C5r MOV BL,LEFT_ROW
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 8
F:\工程文件\Fasm\交通灯\TFC.ASM
399 028C 53 PUSH BX
400 028D 8A 1E 01C6r MOV BL,LEFT_COL
401 0291 53 PUSH BX
402 0292 B4 02 WEST_1: MOV AH,02H
403 0294 8A 36 01C5r MOV DH,LEFT_ROW
404 0298 8A 16 01C6r MOV DL,LEFT_COL
405 029C B7 00 MOV BH,00H
406 029E CD 10 INT 10H
407 02A0 83 F9 03 CMP CX,03H
408 02A3 74 0A JZ WEST_1_A1
409 02A5 83 F9 02 CMP CX,02H
410 02A8 74 22 JZ WEST_1_A3
411 02AA 83 F9 01 CMP CX,01H
412 02AD 74 3A JZ WEST_1_A2
413 02AF 51 WEST_1_A1: PUSH CX
414 02B0 BF 0000s MOV DI,SEG DAT2
415 02B3 8E C7 MOV ES,DI
416 02B5 BD 003Ar MOV BP,OFFSET DAT2
417 02B8 B0 00 MOV AL,00H
418 02BA 8A 1E 01BEr MOV BL,WHITE
419 02BE B4 13 MOV AH,13H
420 02C0 B9 0001 MOV CX,01H
421 02C3 CD 10 INT 10H
422 02C5 FE 06 01C6r INC LEFT_COL
423 02C9 59 POP CX
424 02CA E2 C6 LOOP WEST_1
425 02CC 51 WEST_1_A3: PUSH CX
426 02CD BF 0000s MOV DI,SEG DAT2
427 02D0 8E C7 MOV ES,DI
428 02D2 BD 003Ar MOV BP,OFFSET DAT2
429 02D5 B0 00 MOV AL,00H
430 02D7 8A 1E 01BFr MOV BL,WHIT
431 02DB B4 13 MOV AH,13H
432 02DD B9 0001 MOV CX,01H
433 02E0 CD 10 INT 10H
434 02E2 FE 06 01C6r INC LEFT_COL
435 02E6 59 POP CX
436 02E7 E2 A9 LOOP WEST_1
437 02E9 51 WEST_1_A2: PUSH CX
438 02EA BF 0000s MOV DI,SEG DAT2
439 02ED 8E C7 MOV ES,DI
440 02EF BD 003Ar MOV BP,OFFSET DAT2
441 02F2 B0 00 MOV AL,00H
442 02F4 8A 1E 01BDr MOV BL,GREEN
443 02F8 B4 13 MOV AH,13H
444 02FA B9 0001 MOV CX,01H
445 02FD CD 10 INT 10H
446 02FF FE 06 01C6r INC LEFT_COL
447 0303 59 POP CX
448 0304 E2 00 LOOP R_W1
449 0306 5B R_W1: POP BX
450 0307 88 1E 01C6r MOV LEFT_COL,BL
451 030B 5B POP BX
452 030C 88 1E 01C5r MOV LEFT_ROW ,BL
453 0310 C3 RET
454 0311 WEST1 ENDP
455 ;************************************* EAST1
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 9
F:\工程文件\Fasm\交通灯\TFC.ASM
456 0311 EAST1 PROC NEAR
457 0311 8A 1E 01C7r MOV BL,RIGHT_ROW
458 0315 53 PUSH BX
459 0316 8A 1E 01C8r MOV BL,RIGHT_COL
460 031A 53 PUSH BX
461 031B B4 02 EAST_1: MOV AH,02H
462 031D 8A 36 01C7r MOV DH,RIGHT_ROW
463 0321 8A 16 01C8r MOV DL,RIGHT_COL
464 0325 B7 00 MOV BH,00H
465 0327 CD 10 INT 10H
466 0329 83 F9 03 CMP CX,03H
467 032C 74 0A JZ EAST_1_A1
468 032E 83 F9 02 CMP CX,02H
469 0331 74 22 JZ EAST_1_A3
470 0333 83 F9 01 CMP CX,01H
471 0336 74 3A JZ EAST_1_A2
472 0338 51 EAST_1_A1: PUSH CX
473 0339 BF 0000s MOV DI,SEG DAT2
474 033C 8E C7 MOV ES,DI
475 033E BD 003Ar MOV BP,OFFSET DAT2
476 0341 B0 00 MOV AL,00H
477 0343 8A 1E 01BEr MOV BL,WHITE
478 0347 B4 13 MOV AH,13H
479 0349 B9 0001 MOV CX,01H
480 034C CD 10 INT 10H
481 034E FE 06 01C8r INC RIGHT_COL
482 0352 59 POP CX
483 0353 E2 C6 LOOP EAST_1
484 0355 51 EAST_1_A3: PUSH CX
485 0356 BF 0000s MOV DI,SEG DAT2
486 0359 8E C7 MOV ES,DI
487 035B BD 003Ar MOV BP,OFFSET DAT2
488 035E B0 00 MOV AL,00H
489 0360 8A 1E 01BFr MOV BL,WHIT
490 0364 B4 13 MOV AH,13H
491 0366 B9 0001 MOV CX,01H
492 0369 CD 10 INT 10H
493 036B FE 06 01C8r INC RIGHT_COL
494 036F 59 POP CX
495 0370 E2 A9 LOOP EAST_1
496 0372 51 EAST_1_A2: PUSH CX
497 0373 BF 0000s MOV DI,SEG DAT2
498 0376 8E C7 MOV ES,DI
499 0378 BD 003Ar MOV BP,OFFSET DAT2
500 037B B0 00 MOV AL,00H
501 037D 8A 1E 01BDr MOV BL,GREEN
502 0381 B4 13 MOV AH,13H
503 0383 B9 0001 MOV CX,01H
504 0386 CD 10 INT 10H
505 0388 FE 06 01C8r INC RIGHT_COL
506 038C 59 POP CX
507 038D E2 00 LOOP R_E1
508 038F 5B R_E1: POP BX
509 0390 88 1E 01C8r MOV RIGHT_COL,BL
510 0394 5B POP BX
511 0395 88 1E 01C7r MOV RIGHT_ROW ,BL
512 0399 C3 RET
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 10
F:\工程文件\Fasm\交通灯\TFC.ASM
513 039A EAST1 ENDP
514 039A MOD1 ENDP
515 ;*********************************************
516 039A MOD2 PROC NEAR
517 039A B9 0003 MOV CX,03H
518 039D E8 0016 CALL NORTH2
519 03A0 B9 0003 MOV CX,03H
520 03A3 E8 0099 CALL SOUTH2
521 03A6 B9 0003 MOV CX,03H
522 03A9 E8 011C CALL WEST2
523 03AC B9 0003 MOV CX,03H
524 03AF E8 019F CALL EAST2
525 03B2 E8 0653 CALL DELAY2
526 03B5 C3 RET
527 ;************************************* 灯颜色和位置设置1
528 03B6 NORTH2 PROC NEAR
529 03B6 8A 1E 01C1r MOV BL,UPPER_ROW
530 03BA 53 PUSH BX
531 03BB 8A 1E 01C2r MOV BL,UPPER_COL
532 03BF 53 PUSH BX
533 03C0 B4 02 NORTH_2: MOV AH,02H
534 03C2 8A 36 01C1r MOV DH,UPPER_ROW
535 03C6 8A 16 01C2r MOV DL,UPPER_COL
536 03CA B7 00 MOV BH,00H
537 03CC CD 10 INT 10H
538 03CE 83 F9 03 CMP CX,03H
539 03D1 74 0A JZ NORTH_2_A1
540 03D3 83 F9 02 CMP CX,02H
541 03D6 74 22 JZ NORTH_2_A3
542 03D8 83 F9 01 CMP CX,01H
543 03DB 74 3A JZ NORTH_2_A2
544 03DD 51 NORTH_2_A1: PUSH CX
545 03DE BF 0000s MOV DI,SEG DAT2
546 03E1 8E C7 MOV ES,DI
547 03E3 BD 003Ar MOV BP,OFFSET DAT2
548 03E6 B0 00 MOV AL,00H
549 03E8 8A 1E 01BEr MOV BL,WHITE
550 03EC B4 13 MOV AH,13H
551 03EE B9 0001 MOV CX,01H
552 03F1 CD 10 INT 10H
553 03F3 FE 06 01C2r INC UPPER_COL
554 03F7 59 POP CX
555 03F8 E2 C6 LOOP NORTH_2
556 03FA 51 NORTH_2_A3: PUSH CX
557 03FB BF 0000s MOV DI,SEG DAT2
558 03FE 8E C7 MOV ES,DI
559 0400 BD 003Ar MOV BP,OFFSET DAT2
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -