实验五、串行接口实验代码

按讲义连接电路

实验代码：

CODE SEGMENT
	ASSUME CS:CODE
START:
MAIN PROC
	;配置8255
	MOV AL,90H
	OUT 1BH,AL
	;配置8251
	MOV AL,4EH		;0100 1110		异步工作方式，8位长度字符，不进行奇偶校验，一位停止位
	OUT 39H,AL
	MOV AL,35H		;0011 0101		允许发送、接收，错误标识复位，发送请求有效
	OUT 39H,AL
PROCESS:	
	IN AL,18H
	TEST AL,0FFH					;K0-K7全为0结束程序
	JZ EXIT	
	MOV AH,AL						;发送接收数据均保存在AH中
	CALL SEND						;调用发送数据子程序,发送AH中的数据
	MOV AH,0H
	CALL RECIEVE					;调用接收数据子程序,接收数据存放在AH中
	MOV AL,AH						;输出AH中的数据
	OUT 19H,AL					
	JMP PROCESS
EXIT:
	MOV AL,00H
	OUT 19H,AL
	HLT
	MAIN ENDP
	
SEND PROC
WAITS:
	IN AL,39H						;取状态字
	TEST AL,01H						;是否准备好发送
	JZ WAITS						;木有，等一下
	MOV AL,AH						;从AH中取得要发送的数据
	OUT 38H,AL						;好鸟，发送数据
	RET
	SEND ENDP
	
RECIEVE PROC
WAITR:
	IN AL,39H						;取状态字
	TEST AL,02H						;是否准备好接收
	JZ WAITR						;木有，等一下
	IN AL,38h						;好鸟，接收数据
	MOV AH,AL						;把接收到的数据存到AH中
	RET
	RECIEVE ENDP
	
CODE  ENDS
	END START