南邮微机实验 串行口的测试

内容一：完成硬件测试环境，编写程序对微机系统的串口进行查询方式自发自收外环测试。

本实验已经将串口通信线插接到微机的串口上，并且已经将2,3引脚短路，形成一个自收的回路。

.586
DATA SEGMENT USE16
BUF DB 'HELLO'
LENS EQU $-BUF
DATA ENDS
CODE SEGMENT USE16
ASSUME CS:CODE,DS:DATA
BEG:  MOV AX,DATA
	  MOV DS,AX
	  CALL I8250
	  LEA BX,BUF
	  MOV CX,LENS

SCAN:   MOV DX,2FDH
	  IN AL,DX
	  TEST AL,20H
	  JZ SCAN
	  MOV DX,2F8H
	  MOV AL,[BX]
	  OUT DX,AL
	  INC BX
	 ; LOOP SCAN
	 ; MOV AH,4CH
	;  INT 21H
	  
SCAN1:  MOV DX,2FDH
	  IN AL,DX
	  TEST AL,01H
	  JZ SCAN1
	  MOV DX,2F8H
	  IN AL,DX
	  AND AL,01111111B
	  MOV DL,AL
	  MOV AH,02H
	  INT 21H
        	
	  LOOP SCAN
	  MOV AH,4CH
	  INT 21H
	  
I8250 PROC
	  MOV DX,2FBH
	  MOV AL,80H
	  OUT DX,AL
	  MOV DX,2F9H
	  MOV AL,0
	  OUT DX,AL
	  MOV DX,2F8H
	  MOV AL,30H
	  OUT DX,AL
	  MOV DX,2FBH
	  MOV AL,0AH
	  OUT DX,AL
	  MOV DX,2F9H
	  MOV AL,0
	  OUT DX,AL
	  MOV DX,2FCH
	  MOV AL,0
	  OUT DX,AL
	  RET
I8250 ENDP

CODE ENDS
	END BEG