微机一直都在!

                   

.Model small 

.386

DATA SEGMENT

DATA ENDS  

 CODE SEGMENT

ASSUME CS:CODE,DS:DATA

BEG:

MOV AL,80H

MOV DX,203H

OUT DX,AL

MOV AL,01H

MOV DX,201H

OUT DX,AL

A: 

CALL DIS

ROL  AL,1

OUT DX,AL

JMP A

 

DIS PROC NEAR

 MOV CX,50000

 B:LOOP B

 RET

DIS ENDP

CODE ENDS

  END BEG