流水燈控制匯編語言程序

ID:209237 · 發(fā)表于 2017-6-8 15:47

CODE SEGMENT
ASSUME CS:CODE
START:MOV AL,90H
   MOV DX,206H
   OUT DX,AL
AGAIN:MOV DX,200H
   IN AL,DX
   MOV BP,8
   TEST AL,03H
   JZ TURNOFF
   TEST AL,01H
   JZ DISP_0
   TEST AL,02H
   JZ DISP_1
   JMP AGAIN
DISP_0:MOV AL,00000001B
LP1: MOV DX,202H
   OUT DX,AL
   ROL AL,1
   CALL DELAY
   DEC BP
   CMP BP,0
   JZ AGAIN
   JMP LP1
DISP_1: MOV AL,10000000B
LP2: MOV DX,202H
   OUT DX,AL
   ROR AL,1
   CALL DELAY
   DEC BP
   CMP BP,0
   JZ AGAIN
   JMP LP2
TURNOFF:
   MOV AL,00H
   MOV DX,202H
   OUT DX,AL
   JMP AGAIN
DELAY PROC NEAR
   MOV BX,4
D1: MOV CX,10000
D2: LOOP D2
   DEC BX
   JNZ D1
   RET
DELAY ENDP
CODE  ENDS
   END START

帳號		自動登錄	找回密碼
密碼			立即注冊