📄 tfc.lst
字号:
840 0688 53 PUSH BX
841 0689 B4 02 SOUTH_3: MOV AH,02H
842 068B 8A 36 01C3r MOV DH,UNDER_ROW
843 068F 8A 16 01C4r MOV DL,UNDER_COL
844 0693 B7 00 MOV BH,00H
845 0695 CD 10 INT 10H
846 0697 83 F9 03 CMP CX,03H
847 069A 74 0A JZ SOUTH_3_A1
848 069C 83 F9 02 CMP CX,02H
849 069F 74 22 JZ SOUTH_3_A3
850 06A1 83 F9 01 CMP CX,01H
851 06A4 74 3A JZ SOUTH_3_A2
852 06A6 51 SOUTH_3_A1: PUSH CX
853 06A7 BF 0000s MOV DI,SEG DAT2
854 06AA 8E C7 MOV ES,DI
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 16
F:\工程文件\Fasm\交通灯\TFC.ASM
855 06AC BD 003Ar MOV BP,OFFSET DAT2
856 06AF B0 00 MOV AL,00H
857 06B1 8A 1E 01BEr MOV BL,WHITE
858 06B5 B4 13 MOV AH,13H
859 06B7 B9 0001 MOV CX,01H
860 06BA CD 10 INT 10H
861 06BC FE 06 01C4r INC UNDER_COL
862 06C0 59 POP CX
863 06C1 E2 C6 LOOP SOUTH_3
864 06C3 51 SOUTH_3_A3: PUSH CX
865 06C4 BF 0000s MOV DI,SEG DAT2
866 06C7 8E C7 MOV ES,DI
867 06C9 BD 003Ar MOV BP,OFFSET DAT2
868 06CC B0 00 MOV AL,00H
869 06CE 8A 1E 01C0r MOV BL,YELLOW
870 06D2 B4 13 MOV AH,13H
871 06D4 B9 0001 MOV CX,01H
872 06D7 CD 10 INT 10H
873 06D9 FE 06 01C4r INC UNDER_COL
874 06DD 59 POP CX
875 06DE E2 A9 LOOP SOUTH_3
876 06E0 51 SOUTH_3_A2: PUSH CX
877 06E1 BF 0000s MOV DI,SEG DAT2
878 06E4 8E C7 MOV ES,DI
879 06E6 BD 003Ar MOV BP,OFFSET DAT2
880 06E9 B0 00 MOV AL,00H
881 06EB 8A 1E 01BEr MOV BL,WHITE
882 06EF B4 13 MOV AH,13H
883 06F1 B9 0001 MOV CX,01H
884 06F4 CD 10 INT 10H
885 06F6 FE 06 01C4r INC UNDER_COL
886 06FA 59 POP CX
887 06FB E2 00 LOOP R_S3
888 06FD 5B R_S3: POP BX
889 06FE 88 1E 01C4r MOV UNDER_COL,BL
890 0702 5B POP BX
891 0703 88 1E 01C3r MOV UNDER_ROW,BL
892 0707 C3 RET
893 0708 SOUTH3 ENDP
894 ;************************************* WEST 3
895 0708 WEST3 PROC NEAR
896 0708 8A 1E 01C5r MOV BL,LEFT_ROW
897 070C 53 PUSH BX
898 070D 8A 1E 01C6r MOV BL,LEFT_COL
899 0711 53 PUSH BX
900 0712 B4 02 WEST_3: MOV AH,02H
901 0714 8A 36 01C5r MOV DH,LEFT_ROW
902 0718 8A 16 01C6r MOV DL,LEFT_COL
903 071C B7 00 MOV BH,00H
904 071E CD 10 INT 10H
905 0720 83 F9 03 CMP CX,03H
906 0723 74 0A JZ WEST_3_A1
907 0725 83 F9 02 CMP CX,02H
908 0728 74 22 JZ WEST_3_A3
909 072A 83 F9 01 CMP CX,01H
910 072D 74 3A JZ WEST_3_A2
911 072F 51 WEST_3_A1: PUSH CX
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 17
F:\工程文件\Fasm\交通灯\TFC.ASM
912 0730 BF 0000s MOV DI,SEG DAT2
913 0733 8E C7 MOV ES,DI
914 0735 BD 003Ar MOV BP,OFFSET DAT2
915 0738 B0 00 MOV AL,00H
916 073A 8A 1E 01BEr MOV BL,WHITE
917 073E B4 13 MOV AH,13H
918 0740 B9 0001 MOV CX,01H
919 0743 CD 10 INT 10H
920 0745 FE 06 01C6r INC LEFT_COL
921 0749 59 POP CX
922 074A E2 C6 LOOP WEST_3
923 074C 51 WEST_3_A3: PUSH CX
924 074D BF 0000s MOV DI,SEG DAT2
925 0750 8E C7 MOV ES,DI
926 0752 BD 003Ar MOV BP,OFFSET DAT2
927 0755 B0 00 MOV AL,00H
928 0757 8A 1E 01C0r MOV BL,YELLOW
929 075B B4 13 MOV AH,13H
930 075D B9 0001 MOV CX,01H
931 0760 CD 10 INT 10H
932 0762 FE 06 01C6r INC LEFT_COL
933 0766 59 POP CX
934 0767 E2 A9 LOOP WEST_3
935 0769 51 WEST_3_A2: PUSH CX
936 076A BF 0000s MOV DI,SEG DAT2
937 076D 8E C7 MOV ES,DI
938 076F BD 003Ar MOV BP,OFFSET DAT2
939 0772 B0 00 MOV AL,00H
940 0774 8A 1E 01BEr MOV BL,WHITE
941 0778 B4 13 MOV AH,13H
942 077A B9 0001 MOV CX,01H
943 077D CD 10 INT 10H
944 077F FE 06 01C6r INC LEFT_COL
945 0783 59 POP CX
946 0784 E2 00 LOOP R_W3
947 0786 5B R_W3: POP BX
948 0787 88 1E 01C6r MOV LEFT_COL,BL
949 078B 5B POP BX
950 078C 88 1E 01C5r MOV LEFT_ROW ,BL
951 0790 C3 RET
952 0791 WEST3 ENDP
953 ;************************************* EAST3
954 0791 EAST3 PROC NEAR
955 0791 8A 1E 01C7r MOV BL,RIGHT_ROW
956 0795 53 PUSH BX
957 0796 8A 1E 01C8r MOV BL,RIGHT_COL
958 079A 53 PUSH BX
959 079B B4 02 EAST_3: MOV AH,02H
960 079D 8A 36 01C7r MOV DH,RIGHT_ROW
961 07A1 8A 16 01C8r MOV DL,RIGHT_COL
962 07A5 B7 00 MOV BH,00H
963 07A7 CD 10 INT 10H
964 07A9 83 F9 03 CMP CX,03H
965 07AC 74 0A JZ EAST_3_A1
966 07AE 83 F9 02 CMP CX,02H
967 07B1 74 22 JZ EAST_3_A3
968 07B3 83 F9 01 CMP CX,01H
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 18
F:\工程文件\Fasm\交通灯\TFC.ASM
969 07B6 74 3A JZ EAST_3_A2
970 07B8 51 EAST_3_A1: PUSH CX
971 07B9 BF 0000s MOV DI,SEG DAT2
972 07BC 8E C7 MOV ES,DI
973 07BE BD 003Ar MOV BP,OFFSET DAT2
974 07C1 B0 00 MOV AL,00H
975 07C3 8A 1E 01BEr MOV BL,WHITE
976 07C7 B4 13 MOV AH,13H
977 07C9 B9 0001 MOV CX,01H
978 07CC CD 10 INT 10H
979 07CE FE 06 01C8r INC RIGHT_COL
980 07D2 59 POP CX
981 07D3 E2 C6 LOOP EAST_3
982 07D5 51 EAST_3_A3: PUSH CX
983 07D6 BF 0000s MOV DI,SEG DAT2
984 07D9 8E C7 MOV ES,DI
985 07DB BD 003Ar MOV BP,OFFSET DAT2
986 07DE B0 00 MOV AL,00H
987 07E0 8A 1E 01C0r MOV BL,YELLOW
988 07E4 B4 13 MOV AH,13H
989 07E6 B9 0001 MOV CX,01H
990 07E9 CD 10 INT 10H
991 07EB FE 06 01C8r INC RIGHT_COL
992 07EF 59 POP CX
993 07F0 E2 A9 LOOP EAST_3
994 07F2 51 EAST_3_A2: PUSH CX
995 07F3 BF 0000s MOV DI,SEG DAT2
996 07F6 8E C7 MOV ES,DI
997 07F8 BD 003Ar MOV BP,OFFSET DAT2
998 07FB B0 00 MOV AL,00H
999 07FD 8A 1E 01BEr MOV BL,WHITE
1000 0801 B4 13 MOV AH,13H
1001 0803 B9 0001 MOV CX,01H
1002 0806 CD 10 INT 10H
1003 0808 FE 06 01C8r INC RIGHT_COL
1004 080C 59 POP CX
1005 080D E2 00 LOOP R_E3
1006 080F 5B R_E3: POP BX
1007 0810 88 1E 01C8r MOV RIGHT_COL,BL
1008 0814 5B POP BX
1009 0815 88 1E 01C7r MOV RIGHT_ROW ,BL
1010 0819 C3 RET
1011 081A EAST3 ENDP
1012 081A MOD3 ENDP
1013 ;****************************************************延时子程序 及键盘控制1
1014 081A DELAY1 PROC NEAR
1015 081A 50 PUSH AX
1016 081B 53 PUSH BX
1017 081C 51 PUSH CX
1018 081D 52 PUSH DX
1019 081E C6 06 01C9r 00 MAIN1: MOV INTFLAG,0
1020 0823 C6 06 01CAr 12 MOV COUNT ,18
1021 0828 A0 01D1r MOV AL,NS
1022 082B A2 01CBr MOV SECOND ,AL
1023 082E B4 35 MOV AH,35H ;读取中断向量
1024 0830 B0 08 MOV AL,08H
1025 0832 CD 21 INT 21H
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 19
F:\工程文件\Fasm\交通灯\TFC.ASM
1026 0834 89 1E 01CEr MOV OLD_OFF,BX
1027 0838 8C 06 01CCr MOV OLD_SEG,ES
1028 083C E4 21 IN AL,21H
1029 083E A2 01D0r MOV OLD_MSK,AL
1030 0841 B4 02 MOV AH,02H
1031 0843 B6 06 MOV DH,06
1032 0845 B2 19 MOV DL,25
1033 0847 B7 00 MOV BH,00H
1034 0849 CD 10 INT 10H
1035 084B FA CLI ;设置中断向量
1036 084C 1E PUSH DS
1037 084D B4 25 MOV AH,25H
1038 084F B0 08 MOV AL,08H
1039 0851 BA 0000s MOV DX,SEG INTERRUPT2
1040 0854 8E DA MOV DS,DX
1041 0856 BA 0BE7r MOV DX,OFFSET INTERRUPT2
1042 0859 CD 21 INT 21H
1043 085B 1F POP DS
1044 085C A0 01D0r MOV AL,OLD_MSK
1045 085F 24 FE AND AL,11111110B
1046 0861 FB STI
1047 0862 B4 0B MAINLOOP1: MOV AH,0BH ;test keyboard
1048 0864 CD 21 INT 21H
1049 0866 3C 00 CMP AL,00H
1050 0868 74 56 JE CHK_INT1
1051 086A B4 08 MOV AH,08H ;get key
1052 086C CD 21 INT 21H
1053 086E 3C 72 CMP AL,72H ;'r'
1054 0870 74 13 JZ RESTOR1
1055 0872 3C 63 CMP AL,63H ;'c'
1056 0874 74 14 JZ CFG_NS1
1057 0876 3C 64 CMP AL,64H ;'d'
1058 0878 74 16 JZ CFG_WE1
1059 087A 3C 6E CMP AL,6EH ;'n'
1060 087C 74 17 JZ CFG_N1
1061 087E 3C 1B CMP AL,1BH ;'ESC'
1062 0880 75 3E JNE CHK_INT1
1063 0882 EB 17 90 JMP QUIT1
1064 0885 E8 00AE RESTOR1: CALL RESTORE1
1065 0888 EB 94 JMP MAIN1
1066 088A E8 00B2 CFG_NS1: CALL CFIG_NS1
1067 088D EB 31 90 JMP CHK_INT1
1068 0890 E8 00ED CFG_WE1: CALL CFIG_WE1
1069 0893 EB 89 JMP MAIN1
1070 0895 E8 0129 CFG_N1: CALL CFIG_N1
1071 0898 EB 26 90 JMP CHK_INT1
1072 089B FA QUIT1: CLI
1073 089C 1E PUSH DS
1074 089D 06 PUSH ES
1075 089E 8C D8 MOV AX,DS
1076 08A0 8E C0 MOV ES,AX
1077 08A2 B4 25 MOV AH,25H
1078 08A4 B0 08 MOV AL,08H
1079 08A6 26: 8B 16 01CCr MOV DX,ES:OLD_SEG
1080 08AB 8E DA MOV DS,DX
1081 08AD 26: 8B 16 01CEr MOV DX,ES:OLD_OFF
1082 08B2 CD 21 INT 21H
Turbo Assembler Version 4.1 06/01/11 22:59:59 Page 20
F:\工程文件\Fasm\交通灯\TFC.ASM
1083 08B4 07 POP ES
1084 08B5 1F POP DS
1085 08B6 A0 01D0r MOV AL,OLD_MSK
1086 08B9 E6 21 OUT 21H,AL
1087 08BB FB STI
1088 08BC B4 4C MOV AH,4CH ;exit
1089 08BE CD 21 INT 21H
1090 08C0 80 3E 01C9r 00 CHK_INT1: CMP INTFLAG,0 ;计数18次，则减一秒
1091 08C5 74 9B JE MAINLOOP1
1092 08C7 C6 06 01C9r 00 MOV INTFLAG,0
1093 08CC FE 0E 01CAr DEC COUNT
1094 08D0 75 90 JNE MAINLOOP1
1095 08D2 C6 06 01CAr 12 MOV COUNT,18
1096 08D7 A0 01CBr MOV AL,SECOND
1097 08DA FE C8 DEC AL
1098 08DC 2F DAS
1099 08DD A2 01CBr MOV SECOND,AL
1100 08E0 80 3E 01CBr 00 CMP SECOND,0 ;等于0则返回
1101 08E5 77 03 JA REFRESH1
1102 08E7 EB 48 90 JMP STOP1
1103 08EA B4 02 REFRESH1: MOV AH,02H ;转成ASC 并输出
1104 08EC B6 05 MOV DH,05
1105 08EE B2 19 MOV DL,25
1106 08F0 B7 00 MOV BH,00H
1107 08F2 CD 10 INT 10H
1108 08F4 8A 36 01CBr MOV DH,SECOND
1109 08F8 8A D6 MOV DL,DH
1110 08FA 80 E2 F0 AND DL,11110000B
1111 08FD B1 04 MOV CL,04
1112 08FF D2 EA SHR DL,CL
1113 0901 80 CA 30 OR DL,30H
1114 0904 B4 0E MOV AH,0EH
1115 0906 8A C2 MOV AL,DL
1116 0908 CD 10 INT 10H
1117 090A 8A D6 MOV DL,DH
1118 090C 80 E2 0F AND DL,00001111B
1119 090F 80 CA 30 OR DL,30H
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -