D1 EQU 10H
D2 EQU 200H
;MADE BY 3S
DATA SEGMENT
PB DB ?
DATA ENDS
STACK SEGMENT STACK
STA DW 50D DUP(?)
TOP EQU LENGTH STA
STACK ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA
START: PUSH CS
POP DS
MOV DX,203H ;设置为全输出
MOV AL,80H
OUT DX,AL
MOV DX,202H
MOV AL,00H
OUT DX,AL ;清LED
MOV DX,202H ;全红
MOV AL,0FH
OUT DX,AL
MOV BX,7fH
CALL DLY
BG: MOV AL,10010110B ;南北绿,东西红
OUT DX,AL
MOV BX,D2
CALL DLY
MOV CX,03H
XH1: MOV AL,10011111B ;绿灭
OUT DX,AL
MOV BX,D1
CALL DLY
MOV AL,10010110B