sy13-3(2).asm

以查询方式将数据段中BUFFER开始的16个字节单元的数据从16550发送

SSEG SEGMENT STACK
     DB 100 DUP(?)
SSEG ENDS

DATA	SEGMENT
BUFFER	DB 1,2,3,4,5,6,7,8,9,0AH,0BH,0CH,0DH,0EH,0FH,0FH,00H
DATA    ENDS
CODE    SEGMENT
ASSUME  CS:CODE,DS:DATA
START:	MOV  AX,DATA
	MOV  DS,AX
	MOV  SI,OFFSET	BUFFER
				
	MOV  DX,98CCH
	MOV  AL,80H
	OUT  DX,AL
	MOV  DX,98C0H
	MOV  AL,60H
	OUT  DX,AL
	MOV  DX,98C4H
	MOV  AL,00H
	OUT  DX,AL
				
	MOV  DX,98CCH
	MOV  AL,1BH
	OUT  DX,AL
				
	MOV  DX,98C4H
	MOV  AL,00H
	OUT  DX,AL
				
	MOV  DX,98C0H
NEXT: 	MOV  AL,[SI]
	INC  SI
	OUT  DX,AL
	MOV  DX,98D4H
WAIT:	IN   AL,DX
	AND  AL,01H
	JZ   WAIT
			
	CMP  AL,00H
	JZ   FINISH
	JMP  NEXT
FINISH:	MOV  AH,4CH
	INT  21H
				
CODE  ENDS
END   START