io-32.asm

A1.asm 显示程序实验 STACK1 SEGMENT STACK DW 256 DUP(?) STACK1 ENDS DATA SEGMENT USE16 MES1 DB

;Io-32.asm
;32位I/O接口电路设计实验

.386P
;****************根据查看端口资源修改下列符号值*******************
IOY0         EQU   9C00H          ;片选IOY0对应的端口始地址
;*****************************************************************

STACK1 SEGMENT STACK
        DW 256 DUP(?)
STACK1 ENDS

CODE   SEGMENT  USE16
         ASSUME CS:CODE

START: MOV  CX,16   
       MOV  EAX,00000001H      
LOOP1: MOV  DX,IOY0                ;依次点亮16行
       OUT  DX,EAX       
       CALL DALLY       
       ROL  EAX,1
       LOOP LOOP1
       
KEY:   MOV  AH,1                   ;判断是否有按键按下？
       INT  16H
       JZ   START
       
QUIT:  MOV  EAX,0
       MOV  DX,IOY0
       OUT  DX,EAX    
       MOV  AX,4C00H               ;结束程序退出
       INT  21H

DALLY PROC NEAR                    ;软件延时子程序
       PUSH EAX
       MOV  EAX,02FFFFFFH
D1:    DEC  EAX
       JNZ  D1
       POP  EAX
       RET
DALLY ENDP

CODE  ENDS
       END  START