51单片机串口通信软件程序集
beepbit 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
clrbeep;禁止蜂鸣器
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,$;等待发送完毕
clrti ;清除发送中断标志
setb es ;允许串行中断
reti;中断返回
in_2: cjne a,#2,in_3 ;接收到2
movc a,@a+dptr
mov sbuf,a ;发送 e
jnb ti,$;等待发送完毕
clrti ;清除发送中断
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 charPSetBps(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;
#ifdefINTERSENDSTR
ch=sRecComBuf[bOut];
bOut++;
return ch;
#else
ch=SBUF;
RI=0;
#endif
}
bit PCharInCom() SMALL
{
#ifdefINTERSENDSTR
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 intlen) SMALL
{
unsigned int ii;
for(ii=0;ii { PSendChar(st[ii]); } } #ifdefINTERSENDSTR 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
51单片机串口通 相关文章:
- 51单片机串口通信试验汇编程序(12-01)
- AVR和51单片机串口通信简单实验(11-30)
- Labview与C51单片机实现串口通信(11-28)
- 51单片机串口通信测试程序(11-27)
- 51单片机的串口通信(11-26)
- C51单片机串口通讯注意点(11-24)