232.asm

简单232通讯程序

	ORG 0000H
	AJMP main0
	ORG 0030H
main0: 	MOV 20H,#00H
	MOV TMOD,#22H		;设定时器工作方式
	MOV SCON,#40H
	MOV TH1,#0FAH 		;速度9600
	MOV PCON,#80H
	SETB TR1
	SETB REN		;允许接收
	ajmp start
start:	mov dptr,#ok		;查表
senda: 	clr a ;
	movc a,@a+dptr
	cjne a,#'$',senda_0
	ajmp $			;遇到$停止。
senda_0:mov sbuf,a
	JNB TI,$		;串行发送一帧结束了吗？
	CLR TI ;
	inc dptr		;指针加一
	Ljmp senda
ok: db 0dh,0ah,0dh,0ah,"如果我还有一天寿命，那天我要做你女友。我还有一天的命吗？..没有。所以，很可惜。我今生仍然不是你的女友。如果我有翅膀，我要从天堂飞下来看你。我有翅膀吗？..没有。所以，很遗憾。我从此无法再看到你。",0dh,0ah,'$'
end