232key.asm

我实验板带的实验程序

;232通信程序，4800速率，12m晶体,注意该程序适应目前我站各个版本， 
;使用配套光盘的工具软件、串口调试助手，设置波特率4800， 连接232电缆到串口，
;分别按p32,p33,p34,p35可从软件界面受到单片机返回的4句话，本程序演示了单片机
;与pc的通信，单工
;***************************************************************************
;*  [e-mail]		     (51c51 test web)     www.8951.com     *
;*  Create by :石学军      www.51c51.com 更多例程请登陆网站        	   *
;***************************************************************************
ORG 0000H
AJMP main0
ORG 0030H
main0: MOV 20H,#00H	;设置串口工作方式
MOV TMOD,#22H
MOV SCON,#40H
MOV TH1,#0F3H		;设置速率4800,(12M晶体）
MOV PCON,#80H
SETB TR1
SETB REN		;允许接收
ajmp start

start:
l1:jnb p3.3,l3		;检测键盘，如果P3.3按下则执行L3
jnb p3.4,l4
jnb p3.5,l5
JNB P3.2,L6
jmp l1

l3: 	mov dptr,#ok1	;置表头1
	ajmp	senda3
	
senda3: clr a ;
	movc a,@a+dptr
	cjne a,#'$',senda_3
	ajmp start	;遇到$则从头开始执行。

senda_3:mov sbuf,a	;发送数据
	JNB TI,$;
	CLR TI ;
	inc dptr
	Ljmp senda3

l4: 	mov dptr,#ok2	;置表头2
	ajmp	senda3

l5: 	mov dptr,#ok3	;置表头3
	ajmp	senda3

l6: 	mov dptr,#ok4	;置表头4
	ajmp	senda3

ok1: db 0dh,0ah,0dh,0ah,"如果我还有一天寿命，那天我要做你女友。我还有一天的命吗？..没有。所以，很可惜。我今生仍然不是你的女友。如果我有翅膀，我要从天堂飞下来看你。我有翅膀吗？..没有。所以，很遗憾。我从此无法再看到你。",0dh,0ah,'$'
ok2: db 0dh,0ah,0dh,0ah,"倚天版开发套件是51测试网在志强版开发套件的基础上开发的增强型编程试验一体化开发套件，适合于零基础，或者初中级单片机爱好者 使用。并适合于单片机程序员的前期试",0dh,0ah,'$'
ok3: db 0dh,0ah,0dh,0ah,"89c51text-xp是51测试网为初学者量身定做的一套编程试验一体化51开发套件。采用单片机精确时序编程，质量非常稳定，决不会因为编程器的原因烧毁芯片。由一个51编程器和一个51标准",0dh,0ah,'$'
ok4: db 0dh,0ah,0dh,0ah," 2002年11月15日本站申请国际域名成功名称  http://www.51c51.com 我要c51!!!2002年9月推出标准版开发套件2002年10月推出xp版",0dh,0ah,'$'
end