红绿灯汇编程序

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