历史上的今天
返回首页

历史上的今天

今天是:2025年01月16日(星期四)

正在发生

2018年01月16日 | 51单片机串口通信程序集

2018-01-16 来源:eefocus

串口通信的 单片机 程序


beep    bit   p3.7                ;蜂鸣器定义

        org 00h
      jmp main
        org 23h                       ;串行中断入口地址
      jmp com_int                     ;串行中断服务程序

;***********  主程序开始    *******************
        org 30h
  main:  mov sp,#30h                ;设置堆栈
             lcall rest             ;初始化
             lcall comm             ;串口初始化
             jmp $                  ;原地等待

;  *************   初始化   *********************
   rest:      mov p0,#00h             ;禁止数码管显示
             mov p2,#255
             clr  beep                ;禁止蜂鸣器
             mov p1,#255              ;禁止LED显示
             RET                      ;返回

; **************  串口初始化   *****************
;设置串行口工作方式1,定时器1作为波特率发生器
;波特率设置为   2400  ;

comm:         mov tmod,#20h          ;设置定时器T1工作方式2
              mov tl1,#0f3h             ;定时器计数初值,波特率 2400 
              mov th1,#0f3h            ;定时器重装值
              setb ea                       ;允许总的中断
              setb es                       ;允许串行中断
              mov pcon,#00h          ;波特率不倍增
              mov scon,#50h          ;设置串口工作方式1,REN = 1 允许接收
              setb tr1                       ;定时器开始工作
              ret                               ;返回
;***************  串口中断服务程序   ***********
;  如果接收  0FF  表示上位机需要联机信号, 单片机 发送 0FFH作为
;  应答信号,如果接收到 数字 1~ n,表示相应的功能;
;  这里,如果收到 1 ,则 单片机 向计算机发送字符  'H';
;            如果收到 2 ,则 单片机 向计算机发送字符  'e';
;            如果收到其他的数据,则发送    'J';
com_int:  clr es                        ;禁止串行中断
                clr ri                          ;清除接收标志位
                mov a,sbuf               ;从缓冲区取出数据
                mov p1,a
                mov dptr,#tab
                cjne a,#0ffh,in_1      ;检查数据
                mov sbuf,#255          ;收到联机信号,发送联机信号
                jnb ti,$                      ;等待发送完毕
                clr ti                          ;清除发送标志
                setb es                     ;允许串行中断
                reti                            ;中断返回
      in_1: cjne a,#1H, in_2         ;如果收到1
                movc a,@a+dptr
                mov sbuf,a             ;发送 'h'
                jnb ti,$                      ;等待发送完毕
                clr  ti                         ;清除发送中断标志
                setb es                     ;允许串行中断
                reti                            ;中断返回
      in_2: cjne a,#2,in_3         ;接收到  2 
                movc a,@a+dptr
                mov sbuf,a             ;发送 'e'
                jnb ti,$                      ;等待发送完毕
                clr  ti                         ;清除发送中断
                setb es                     ;允许串行中断
                reti                            ;中断返回
      in_3:     mov a,#03h
                movc a,@a+dptr
                mov sbuf,a             ;发送 'j'
                jnb ti,$                      ;等待发送完毕
                clr ti                          ;清除发送中断标志
                setb es                     ;允许串行中断
                reti                            ;返回
tab:    db '2','h','e','j'
  end



51 单片机 串口调试程序一例


/*定义为中断方式串口处理*/
#define INTERSENDSTR
/*不为8032系列芯片 */ 
//#define Chip_8032 

#include
#include
#include
#include "err.h"


#ifdef INTERSENDSTR
unsigned char xdata sSendComBuf[256],sRecComBuf[256];
unsigned char data bOut,bIn,bSout,bSin;
#else
#define DEFSENDCHAR TI=0;SBUF=ACC;while(!TI);TI=0;
#endif
//bps设置 9600就是 PSetBps(96)(11.0592MHz) 

unsigned char  PSetBps(unsigned int bps) SMALL
{
unsigned int t1;
unsigned char t2;
#ifdef INTERSENDSTR
/*如果使用中断方式发送数据,必须等待发送数据完毕才能更换波特率 */
while(bSin!=bSout)
{
;
}
ES=0;
#endif 

#ifdef CHIP_8032
if(3456%bps)
{
return ERR_SET_BPS;
}
t1=3456/bps;
t1--;t1=~t1;
RCAP2H=t1/256;RCAP2L=t1;
T2MOD=0x00;
/*使用定时器2做波特率发生器 */
T2CON=0x34;/*TF2=0;EXF2=0;RCLK=1;TCLK=1;EXEN2=0;TR2=1;C/T2=0;CP/RL2=0
*/
#else
t1=576/bps;
if((576%bps)||((t1==0))||(t1>=2*256)) 
{
return ERR_SET_BPS;
}
if(t1>256)
{
PCON=00;
t2=256-(288/bps);
}
else
{
PCON=0x80;
t2=256-t1;
}
TH1=t2;TL1=t2;
TR1=1;
#endif 
/*模式3*/
SM0=0;
RI=0;TI=0;
REN=1;
SM1=1;
SM2=1;
#ifdef INTERSENDSTR 
bOut=bIn;
bSout=bSin;
ES=1;
#endif 
return OK;
}
void PSendChar(unsigned char ch) SMALL
{

#ifdef INTERSENDSTR
unsigned char tch;

tch=bSin+1;
while(tch==bSout)
{
;
}
sSendComBuf[bSin]=ch;
ES=0;
if((bSout==bSin))
{
SBUF=sSendComBuf[bSin];
bSin++;
}
else
{
bSin++;               
}
ES=1;
#else 
ACC=ch;
DEFSENDCHAR;
#endif 
}
unsigned char PGetChar() SMALL
{
unsigned char ch;
#ifdef  INTERSENDSTR
ch=sRecComBuf[bOut];
bOut++;
return ch;
#else
ch=SBUF;
RI=0;
#endif 
}
bit PCharInCom() SMALL
{
#ifdef  INTERSENDSTR
if(bIn!=bOut)
{
return 1;
}
return 0;
#else
return RI;
#endif
}
void PSendString(unsigned char *st) SMALL
{
while(*st)
{
PSendChar(*st);
st++;
}
}
void PSendArray(unsigned char  *st,unsigned int  len) SMALL
{
unsigned int ii;
for(ii=0;ii{
PSendChar(st[ii]);
}
}
#ifdef  INTERSENDSTR
void PSerialInt() interrupt 4
{
if(RI) 
{
sRecComBuf[bIn]=SBUF;
bIn++;
RI=0;
}
if(TI)
{
TI=0;
if(bSout!=bSin)
{
bSout++;
}
if(bSout!=bSin)
{
SBUF=sSendComBuf[bSout];
}
}
}
#endif


推荐阅读

史海拾趣

Akahane Electronics Ind Corp公司的发展小趣事

面对日益严重的环境问题,Akahane敏锐地捕捉到绿色电子产品的市场潜力。公司投入大量研发资源,开发出低能耗、环保的电子产品,并积极推广绿色生产和循环经济理念。这一举措不仅赢得了消费者的青睐,还为公司赢得了良好的社会声誉。同时,Akahane还积极参与国际环保组织的活动,推动电子行业的绿色化发展。

Exclara Inc公司的发展小趣事

Exclara Inc.自创立之初就致力于研发创新技术,以满足电子行业对高性能、低功耗产品的需求。公司通过不断的技术突破,成功开发出了一系列具有竞争力的产品。例如,其采用HVX技术构成的驱动电源在T8型LED市场中脱颖而出,相比同规格方案,能够降低30%的BOM成本,这一技术革新不仅提升了产品的竞争力,也为公司赢得了市场的广泛认可。

Aavid Thermalloy公司的发展小趣事

随着LED技术的不断发展和市场需求的不断变化,Exclara看到了新的市场机遇。公司凭借在LED领域的技术积累和市场经验,成功进军了智能家居、智能照明等新兴市场。在这些新兴市场中,公司凭借其独特的技术优势和创新能力,迅速获得了市场份额和客户的认可。面对新的市场挑战和机遇,Exclara将继续保持创新精神和技术实力,为电子行业的发展贡献更多的力量。

请注意,以上故事框架仅供参考,具体内容和细节需要根据实际情况进行补充和完善。

CIPS公司的发展小趣事

自CIPS系统上线以来,其业务量呈现快速增长的态势。通过CIPS系统处理的跨境人民币业务量逐年攀升,连接到该系统的参与者数量也大幅增加。这些参与者遍布全球各地,涵盖了银行、金融机构等多个领域。CIPS系统的业务范围不断扩大,实际业务覆盖全球多个国家和地区,为全球金融网络的发展做出了重要贡献。

DZUS公司的发展小趣事

随着公司实力的增强,DZUS公司开始拓展国际市场。通过参加国际展览、与海外客户建立合作关系等方式,公司逐渐打开了国际市场的大门。同时,公司还针对不同国家和地区的市场需求,推出了定制化的产品和服务。这些举措使DZUS公司的品牌知名度和市场份额不断提升。

Britool Expert公司的发展小趣事

面对日益严峻的环境保护问题,DZUS公司积极响应国家号召,制定了可持续发展战略。公司采用环保材料和生产工艺,减少了对环境的污染和破坏。同时,公司还加大了对可再生能源的研发和应用力度,致力于推动绿色生产和可持续发展。这些举措使DZUS公司成为了行业的环保标杆,并赢得了社会各界的广泛赞誉。

问答坊 | AI 解惑

STW81101/02: 集成射频合成器

STW81101/02: 集成射频合成器;内嵌压控振荡器;相噪测量值在1GHz时为0.2°RMS(均方根),在2GHz时0.5°RMS,在4GHz时1.3°RMS,频率阶跃200kHz;可工作在750MHz到4.65GHz的多个频带内;支持连接多台设备的I²C协议;具有串行到并行的高速(SPI ...…

查看全部问答>

PROTEL99 电气器件库

PROTEL99 电气器件库…

查看全部问答>

在ARM上实现的图片任意缩放功能

硬件平台:S3C2440+3.2寸TFT(240x320,ILI9325) [ 本帖最后由 冰人 于 2010-1-4 11:10 编辑 ] …

查看全部问答>

A First Lab in Circuits and Electronics

replyreload += \',\' + 305103;寒假回家前人品爆发第四帖。 书名:A First Lab in Circuits and Electronics 作者:Yannis Tsividis 版权:John Wiley&Sons,Inc 版次:2001-05-09 总页数:139 文件格式:PDF 文件大小:10.3M 压缩包数:2 ...…

查看全部问答>

FPGA逻辑在输出时产生误码,请教都有什么原因

最近调试比较头疼;发现有的时候数据包会出现误码,就是每个数据错误测试将近两周了,发现点什么又被否决掉,总是问题多多请问产生误码的原因都是什么(误码为逻辑内部产生的,应该与PCB无关)我调试的过程中,主要是放在时钟方面考虑,由于主时钟 ...…

查看全部问答>

请教SEED工程师,关于SEED-DIM3517的启动

配套的文档没有提及,麻烦SEED的工程师指点一下。1. 板上原配的u-boot的启动参数是什么。我更新了启动参数,不能改回去了。2. 从SD卡启动需要注意什么问题。我按照文档的指引做了,可是不能启动。3. 板上HDMI接口是不是直接就可以使用。因为我没有 ...…

查看全部问答>

TI电源管理指南 选型手册 2011最新

TI  2011年 电源管理指南,选型手册.. 方便大家查阅选择需要的芯片…

查看全部问答>

基于2812实现rs485和rs232的串口通信源程序(转载)

基于2812实现rs485和rs232的串口通信源程序…

查看全部问答>

求分析电路-------关于485和传感器供电问题

各位大侠,问个电路问题。485采集器供电3.3V(独立),传感器供电12v(独立),问,3.3V和12v可以共地吗,如果要做隔离,如何实现,本系统用低功耗,12V电源由单片机系统控制开断。…

查看全部问答>

哪位大神给指导一下下面的代码是什么意思(红色部分)

//***********************主函数************************************************** void main(void) {   WDTCTL = WDT_ADLY_250;                     &n ...…

查看全部问答>