编写实现同一时刻只有一只LED灯亮的流水灯程序.
往返流水灯
从左往右,再从右往左,如此往返.
SSTACK SEGMENT STACK
DW 32 DUP(?)
SSTACK ENDS
CODE SEGMENT
ASSUME CS:CODE
START:
MOV DX, 0646H
MOV AL, 80H
OUT DX, AL
MOV BH, 80H
MOV BL, 80H
MOV CX, 09H
AA1:
MOV DX, 0642H
MOV AL, BL
OUT DX, AL
SHR BL, 1
CALL DELAY
CALL DELAY
LOOP AA1
MOV CX,09H
AA2:
MOV DX, 0640H
MOV AL, BH
OUT DX, AL
SHR BH, 1
CALL DELAY
CALL DELAY
LOOP AA2
MOV BH,01H
MOV BL,01H
MOV CX,09H
AA3:
MOV DX, 0640H
MOV AL, BH
OUT DX, AL
SHL BH, 1
CALL DELAY
CALL DELAY
LOOP AA3
MOV CX,09H
AA4 :
MOV DX, 0642H
MOV AL, BL
OUT DX, AL
SHL BL, 1
CALL DELAY
CALL DELAY
LOOP AA4
MOV CX,09H
JMP START
DELAY:
PUSH CX
MOV CX, 0F000H
AA5:
PUSH AX
POP AX
LOOP AA5
POP CX
RET
CODE ENDS
END START