返回主页 单片机教程XL2000开发板 单片机学习 自制编程器 单片机资料 软件下载 电子技术产品介绍如何购买 论坛

;********************************************************************************
;232通信程序,9600速率,11.0592晶体,注意该程序不适应目前我站各个版本, *
;因为晶体我们选用的是12m,在此贴出为了便于参考 *
;使用配套光盘的工具软件、串口调试助手,设置波特率9600, 连接232电缆到串口, *
;可从软件界面受到单片机返回的话 *
;********************************************************************************
;* 日期: 2007-3-25 *
;* 版本: 3.0 *
;* 作者: 深圳学林电子有限公司 专业8051单片机教程站 *
;* 邮箱: sxj1974@163.com *
;* 网站: http://www.51c51.com http://www.8951.com 更多例程请登陆网站 *
;********************************************************************************
;* 硬件:此程序在本公司xlisp系列单片机实验仪运行通过 *
;********************************************************************************
;* 【版权】 Copyright(C)深圳学林电子有限公司 www.51c51.com All Rights Reserved *
;* 【声明】 此程序仅用于学习与参考,引用请注明版权和作者信息! *
;********************************************************************************

hex格式文件下载(点右键,目标另存为hex即可直接烧写)


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