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

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

本实验已经将串口通信线插接到微机的串口上，并且已经将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