;交通灯************************
DATA SEGMENT
DAT0 DB ' r : Time Restore.',0DH,0AH,'$'
DAT1 DB ' c : Change The N-S GREEN TIME .',0DH,0AH,'$'
DAT2 DB '#'
DAT3 DB ' d : Change The W-E GREEN TIME .',0DH,0AH,'$'
DAT4 DB 'ESC : QUIT .',0DH,0AH,'$'
DAT5 DB 'PLEASE INPUT SECONDS(<99):',0DH,0AH,'$'
DAT6 DB '********************* *********************','$'
DAT7 DB ' * * ','$'
DAT8 DB ' n : NIGHT CONTROL(NEXT MOD).',0DH,0AH,'$'
DAT9 DB ' Design By TianLi (Elec.0303|20034972) ',0DH,0AH,'$'
DAT10 DB ' Press ENTER into the program ! ' ,0DH,0AH,'$'
DAT11 DB ' And Press ESC to Quit ',0DH,0AH,'$'
DAT12 DB ' This is a Traffic Lights Program ',0DH,0AH,'$'
RED DB 04H
GREEN DB 02H
WHITE DB 0FH
WHIT DB 0FH
YELLOW DB 8EH
UPPER_ROW DB 1
UPPER_COL DB 24
UNDER_ROW DB 10
UNDER_COL DB 24
LEFT_ROW DB 5
LEFT_COL DB 1
RIGHT_ROW DB 5
RIGHT_COL DB 47
INTFLAG DB 0
COUNT DB 18
SECOND DB 0
OLD_SEG DW ?
OLD_OFF DW ?
OLD_MSK DB ?
NS DB 20H
WE DB 20H
N1 DB 8EH
N2 DB 0FH
N3 DB 0
DATA ENDS
;***************************************
STACK SEGMENT STACK
STA DB 256 DUP(?)
TOP EQU $-STA
STACK ENDS
;************************************8
CODE SEGMENT
ASSUME CS:CODE,DS:DATA,SS:STACK
START: MOV AX,DATA
MOV DS,AX
MOV AX,STACK
MOV SS,AX
MOV AX,TOP
MOV SP,AX
A0: MOV AH,0 ;设置 300*200 彩色图形方式
MOV AL,3
INT 10H
MOV AH,01H
MOV CX,2000H
