📄 tfc.lst
字号:
560 0403 B0 00 MOV AL,00H
561 0405 8A 1E 01BFr MOV BL,WHIT
562 0409 B4 13 MOV AH,13H
563 040B B9 0001 MOV CX,01H
564 040E CD 10 INT 10H
565 0410 FE 06 01C2r INC UPPER_COL
566 0414 59 POP CX
567 0415 E2 A9 LOOP NORTH_2
568 0417 51 NORTH_2_A2: PUSH CX
569 0418 BF 0000s MOV DI,SEG DAT2
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 11
F:\工程文件\Fasm\交通灯\TFC.ASM
570 041B 8E C7 MOV ES,DI
571 041D BD 003Ar MOV BP,OFFSET DAT2
572 0420 B0 00 MOV AL,00H
573 0422 8A 1E 01BDr MOV BL,GREEN
574 0426 B4 13 MOV AH,13H
575 0428 B9 0001 MOV CX,01H
576 042B CD 10 INT 10H
577 042D FE 06 01C2r INC UPPER_COL
578 0431 59 POP CX
579 0432 E2 00 LOOP R_N2
580 0434 5B R_N2: POP BX
581 0435 88 1E 01C2r MOV UPPER_COL ,BL
582 0439 5B POP BX
583 043A 88 1E 01C1r MOV UPPER_ROW ,BL
584 043E C3 RET
585 043F NORTH2 ENDP
586 ;************************************* 灯颜色和位置设置1
587 043F SOUTH2 PROC NEAR
588 043F 8A 1E 01C3r MOV BL,UNDER_ROW
589 0443 53 PUSH BX
590 0444 8A 1E 01C4r MOV BL,UNDER_COL
591 0448 53 PUSH BX
592 0449 B4 02 SOUTH_2: MOV AH,02H
593 044B 8A 36 01C3r MOV DH,UNDER_ROW
594 044F 8A 16 01C4r MOV DL,UNDER_COL
595 0453 B7 00 MOV BH,00H
596 0455 CD 10 INT 10H
597 0457 83 F9 03 CMP CX,03H
598 045A 74 0A JZ SOUTH_2_A1
599 045C 83 F9 02 CMP CX,02H
600 045F 74 22 JZ SOUTH_2_A3
601 0461 83 F9 01 CMP CX,01H
602 0464 74 3A JZ SOUTH_2_A2
603 0466 51 SOUTH_2_A1: PUSH CX
604 0467 BF 0000s MOV DI,SEG DAT2
605 046A 8E C7 MOV ES,DI
606 046C BD 003Ar MOV BP,OFFSET DAT2
607 046F B0 00 MOV AL,00H
608 0471 8A 1E 01BEr MOV BL,WHITE
609 0475 B4 13 MOV AH,13H
610 0477 B9 0001 MOV CX,01H
611 047A CD 10 INT 10H
612 047C FE 06 01C4r INC UNDER_COL
613 0480 59 POP CX
614 0481 E2 C6 LOOP SOUTH_2
615 0483 51 SOUTH_2_A3: PUSH CX
616 0484 BF 0000s MOV DI,SEG DAT2
617 0487 8E C7 MOV ES,DI
618 0489 BD 003Ar MOV BP,OFFSET DAT2
619 048C B0 00 MOV AL,00H
620 048E 8A 1E 01BFr MOV BL,WHIT
621 0492 B4 13 MOV AH,13H
622 0494 B9 0001 MOV CX,01H
623 0497 CD 10 INT 10H
624 0499 FE 06 01C4r INC UNDER_COL
625 049D 59 POP CX
626 049E E2 A9 LOOP SOUTH_2
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 12
F:\工程文件\Fasm\交通灯\TFC.ASM
627 04A0 51 SOUTH_2_A2: PUSH CX
628 04A1 BF 0000s MOV DI,SEG DAT2
629 04A4 8E C7 MOV ES,DI
630 04A6 BD 003Ar MOV BP,OFFSET DAT2
631 04A9 B0 00 MOV AL,00H
632 04AB 8A 1E 01BDr MOV BL,GREEN
633 04AF B4 13 MOV AH,13H
634 04B1 B9 0001 MOV CX,01H
635 04B4 CD 10 INT 10H
636 04B6 FE 06 01C4r INC UNDER_COL
637 04BA 59 POP CX
638 04BB E2 00 LOOP R_S2
639 04BD 5B R_S2: POP BX
640 04BE 88 1E 01C4r MOV UNDER_COL ,BL
641 04C2 5B POP BX
642 04C3 88 1E 01C3r MOV UNDER_ROW ,BL
643 04C7 C3 RET
644 04C8 SOUTH2 ENDP
645 ;************************************* WEST 2
646 04C8 WEST2 PROC NEAR
647 04C8 8A 1E 01C5r MOV BL,LEFT_ROW
648 04CC 53 PUSH BX
649 04CD 8A 1E 01C6r MOV BL,LEFT_COL
650 04D1 53 PUSH BX
651 04D2 B4 02 WEST_2: MOV AH,02H
652 04D4 8A 36 01C5r MOV DH,LEFT_ROW
653 04D8 8A 16 01C6r MOV DL,LEFT_COL
654 04DC B7 00 MOV BH,00H
655 04DE CD 10 INT 10H
656 04E0 83 F9 03 CMP CX,03H
657 04E3 74 0A JZ WEST_2_A1
658 04E5 83 F9 02 CMP CX,02H
659 04E8 74 22 JZ WEST_2_A3
660 04EA 83 F9 01 CMP CX,01H
661 04ED 74 3A JZ WEST_2_A2
662 04EF 51 WEST_2_A1: PUSH CX
663 04F0 BF 0000s MOV DI,SEG DAT2
664 04F3 8E C7 MOV ES,DI
665 04F5 BD 003Ar MOV BP,OFFSET DAT2
666 04F8 B0 00 MOV AL,00H
667 04FA 8A 1E 01BCr MOV BL,RED
668 04FE B4 13 MOV AH,13H
669 0500 B9 0001 MOV CX,01H
670 0503 CD 10 INT 10H
671 0505 FE 06 01C6r INC LEFT_COL
672 0509 59 POP CX
673 050A E2 C6 LOOP WEST_2
674 050C 51 WEST_2_A3: PUSH CX
675 050D BF 0000s MOV DI,SEG DAT2
676 0510 8E C7 MOV ES,DI
677 0512 BD 003Ar MOV BP,OFFSET DAT2
678 0515 B0 00 MOV AL,00H
679 0517 8A 1E 01BFr MOV BL,WHIT
680 051B B4 13 MOV AH,13H
681 051D B9 0001 MOV CX,01H
682 0520 CD 10 INT 10H
683 0522 FE 06 01C6r INC LEFT_COL
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 13
F:\工程文件\Fasm\交通灯\TFC.ASM
684 0526 59 POP CX
685 0527 E2 A9 LOOP WEST_2
686 0529 51 WEST_2_A2: PUSH CX
687 052A BF 0000s MOV DI,SEG DAT2
688 052D 8E C7 MOV ES,DI
689 052F BD 003Ar MOV BP,OFFSET DAT2
690 0532 B0 00 MOV AL,00H
691 0534 8A 1E 01BEr MOV BL,WHITE
692 0538 B4 13 MOV AH,13H
693 053A B9 0001 MOV CX,01H
694 053D CD 10 INT 10H
695 053F FE 06 01C6r INC LEFT_COL
696 0543 59 POP CX
697 0544 E2 00 LOOP R_W2
698 0546 5B R_W2: POP BX
699 0547 88 1E 01C6r MOV LEFT_COL,BL
700 054B 5B POP BX
701 054C 88 1E 01C5r MOV LEFT_ROW,BL
702 0550 C3 RET
703 0551 WEST2 ENDP
704 ;************************************* EAST 2
705 0551 EAST2 PROC NEAR
706 0551 8A 1E 01C7r MOV BL ,RIGHT_ROW
707 0555 53 PUSH BX
708 0556 8A 1E 01C8r MOV BL,RIGHT_COL
709 055A 53 PUSH BX
710 055B B4 02 EAST_2: MOV AH,02H
711 055D 8A 36 01C7r MOV DH,RIGHT_ROW
712 0561 8A 16 01C8r MOV DL,RIGHT_COL
713 0565 B7 00 MOV BH,00H
714 0567 CD 10 INT 10H
715 0569 83 F9 03 CMP CX,03H
716 056C 74 0A JZ EAST_2_A1
717 056E 83 F9 02 CMP CX,02H
718 0571 74 22 JZ EAST_2_A3
719 0573 83 F9 01 CMP CX,01H
720 0576 74 3A JZ EAST_2_A2
721 0578 51 EAST_2_A1: PUSH CX
722 0579 BF 0000s MOV DI,SEG DAT2
723 057C 8E C7 MOV ES,DI
724 057E BD 003Ar MOV BP,OFFSET DAT2
725 0581 B0 00 MOV AL,00H
726 0583 8A 1E 01BCr MOV BL,RED
727 0587 B4 13 MOV AH,13H
728 0589 B9 0001 MOV CX,01H
729 058C CD 10 INT 10H
730 058E FE 06 01C8r INC RIGHT_COL
731 0592 59 POP CX
732 0593 E2 C6 LOOP EAST_2
733 0595 51 EAST_2_A3: PUSH CX
734 0596 BF 0000s MOV DI,SEG DAT2
735 0599 8E C7 MOV ES,DI
736 059B BD 003Ar MOV BP,OFFSET DAT2
737 059E B0 00 MOV AL,00H
738 05A0 8A 1E 01BFr MOV BL,WHIT
739 05A4 B4 13 MOV AH,13H
740 05A6 B9 0001 MOV CX,01H
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 14
F:\工程文件\Fasm\交通灯\TFC.ASM
741 05A9 CD 10 INT 10H
742 05AB FE 06 01C8r INC RIGHT_COL
743 05AF 59 POP CX
744 05B0 E2 A9 LOOP EAST_2
745 05B2 51 EAST_2_A2: PUSH CX
746 05B3 BF 0000s MOV DI,SEG DAT2
747 05B6 8E C7 MOV ES,DI
748 05B8 BD 003Ar MOV BP,OFFSET DAT2
749 05BB B0 00 MOV AL,00H
750 05BD 8A 1E 01BEr MOV BL,WHITE
751 05C1 B4 13 MOV AH,13H
752 05C3 B9 0001 MOV CX,01H
753 05C6 CD 10 INT 10H
754 05C8 FE 06 01C8r INC RIGHT_COL
755 05CC 59 POP CX
756 05CD E2 00 LOOP R_E2
757 05CF 5B R_E2: POP BX
758 05D0 88 1E 01C8r MOV RIGHT_COL,BL
759 05D4 5B POP BX
760 05D5 88 1E 01C7r MOV RIGHT_ROW ,BL
761 05D9 C3 RET
762 05DA EAST2 ENDP
763 05DA MOD2 ENDP
764 ;*********************************************
765 05DA MOD3 PROC NEAR
766 05DA B9 0003 MOV CX,03H
767 05DD E8 0016 CALL NORTH3
768 05E0 B9 0003 MOV CX,03H
769 05E3 E8 0099 CALL SOUTH3
770 05E6 B9 0003 MOV CX,03H
771 05E9 E8 011C CALL WEST3
772 05EC B9 0003 MOV CX,03H
773 05EF E8 019F CALL EAST3
774 05F2 E8 0607 CALL DELAY3
775 05F5 C3 RET
776 ;************************************* NORTH3
777 05F6 NORTH3 PROC NEAR
778 05F6 8A 1E 01C1r MOV BL,UPPER_ROW
779 05FA 53 PUSH BX
780 05FB 8A 1E 01C2r MOV BL,UPPER_COL
781 05FF 53 PUSH BX
782 0600 B4 02 NORTH_3: MOV AH,02H
783 0602 8A 36 01C1r MOV DH,UPPER_ROW
784 0606 8A 16 01C2r MOV DL,UPPER_COL
785 060A B7 00 MOV BH,00H
786 060C CD 10 INT 10H
787 060E 83 F9 03 CMP CX,03H
788 0611 74 0A JZ NORTH_3_A1
789 0613 83 F9 02 CMP CX,02H
790 0616 74 22 JZ NORTH_3_A3
791 0618 83 F9 01 CMP CX,01H
792 061B 74 3A JZ NORTH_3_A2
793 061D 51 NORTH_3_A1: PUSH CX
794 061E BF 0000s MOV DI,SEG DAT2
795 0621 8E C7 MOV ES,DI
796 0623 BD 003Ar MOV BP,OFFSET DAT2
797 0626 B0 00 MOV AL,00H
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 15
F:\工程文件\Fasm\交通灯\TFC.ASM
798 0628 8A 1E 01BEr MOV BL,WHITE
799 062C B4 13 MOV AH,13H
800 062E B9 0001 MOV CX,01H
801 0631 CD 10 INT 10H
802 0633 FE 06 01C2r INC UPPER_COL
803 0637 59 POP CX
804 0638 E2 C6 LOOP NORTH_3
805 063A 51 NORTH_3_A3: PUSH CX
806 063B BF 0000s MOV DI,SEG DAT2
807 063E 8E C7 MOV ES,DI
808 0640 BD 003Ar MOV BP,OFFSET DAT2
809 0643 B0 00 MOV AL,00H
810 0645 8A 1E 01C0r MOV BL,YELLOW
811 0649 B4 13 MOV AH,13H
812 064B B9 0001 MOV CX,01H
813 064E CD 10 INT 10H
814 0650 FE 06 01C2r INC UPPER_COL
815 0654 59 POP CX
816 0655 E2 A9 LOOP NORTH_3
817 0657 51 NORTH_3_A2: PUSH CX
818 0658 BF 0000s MOV DI,SEG DAT2
819 065B 8E C7 MOV ES,DI
820 065D BD 003Ar MOV BP,OFFSET DAT2
821 0660 B0 00 MOV AL,00H
822 0662 8A 1E 01BEr MOV BL,WHITE
823 0666 B4 13 MOV AH,13H
824 0668 B9 0001 MOV CX,01H
825 066B CD 10 INT 10H
826 066D FE 06 01C2r INC UPPER_COL
827 0671 59 POP CX
828 0672 E2 00 LOOP R_N3
829 0674 5B R_N3: POP BX
830 0675 88 1E 01C2r MOV UPPER_COL,BL
831 0679 5B POP BX
832 067A 88 1E 01C1r MOV UPPER_ROW,BL
833 067E C3 RET
834 067F NORTH3 ENDP
835 ;************************************* SOUTH 3
836 067F SOUTH3 PROC NEAR
837 067F 8A 1E 01C3r MOV BL,UNDER_ROW
838 0683 53 PUSH BX
839 0684 8A 1E 01C4r MOV BL,UNDER_COL
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -