高分求51单片机串口通信的程序
发布网友
发布时间：2022-04-20 04:00
我来回答
共5个回答
热心网友
时间：2022-06-02 12:27
展开1全部#include <reg52.h>
#include <intrins.h>
#define uchar unsigned char
#define uint unsigned int
sbit LCD_RS = P2^0;
sbit LCD_RW = P2^1;
sbit LCD_EN = P2^2;
#define delayNOP(); {_nop_();_nop_();_nop_();_nop_();};
uchar data RXDdata[ ] = {0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,
0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20 };
uchar temp,buf,m,count;
bit playflag=0;
uchar code cdis1[ ] = {" SERILA TRANFER "};
uchar code cdis2[ ] = {" "};
/**********************************************************
延时子程序
**********************************************************/
char code SST516[3] _at_ 0x003b;
void delay1(uint ms)
{
uchar k;
while(ms--)
{
for(k = 0; k < 120; k++);
}
}
/******************************************************************/
/* */
/*检查LCD忙状态 */
/*lcd_busy为1时，忙，等待。lcd-busy为0时,闲，可写指令与数据。 */
/* */
/******************************************************************/
bit lcd_busy()
{
bit result;
LCD_RS = 0;
LCD_RW = 1;
LCD_EN = 1;
delayNOP();
result = (bit)(P0&0x80);
LCD_EN = 0;
return(result);
}
/*******************************************************************/
/* */
/*写指令数据到LCD */
/*RS=L，RW=L，E=高脉冲，D0-D7=指令码。 */
/* */
/*******************************************************************/
void lcd_wcmd(uchar cmd)
{
while(lcd_busy());
LCD_RS = 0;
LCD_RW = 0;
LCD_EN = 0;
_nop_();
_nop_();
P0 = cmd;
delayNOP();
LCD_EN = 1;
delayNOP();
LCD_EN = 0;
}
/*******************************************************************/
/* */
/*写显示数据到LCD */
/*RS=H，RW=L，E=高脉冲，D0-D7=数据。 */
/* */
/*******************************************************************/
void lcd_wdat(uchar dat)
{
while(lcd_busy());
LCD_RS = 1;
LCD_RW = 0;
LCD_EN = 0;
P0 = dat;
delayNOP();
LCD_EN = 1;
delayNOP();
LCD_EN = 0;
}
/*******************************************************************/
/* */
/* LCD初始化设定 */
/* */
/*******************************************************************/
void lcd_init()
{
delay1(15);
lcd_wcmd(0x01); //清除LCD的显示内容
lcd_wcmd(0x38); //16*2显示，5*7点阵，8位数据
delay1(5);
lcd_wcmd(0x38);
delay1(5);
lcd_wcmd(0x38);
delay1(5);
lcd_wcmd(0x0c); //开显示，显示光标，光标闪烁
delay1(5);
lcd_wcmd(0x01); //清除LCD的显示内容
delay1(5);
}
/*******************************************************************/
/* */
/* 设定显示位置 */
/* */
/*******************************************************************/
void lcd_pos(uchar pos)
{
lcd_wcmd(pos | 0x80); //数据指针=80+地址变量
}
/*********************************************************
发送数据函数
*********************************************************/
void senddata(uchar dat)
{
SBUF =dat;
while(!TI);
TI = 0;
}
/*********************************************************
串行中断服务函数
*********************************************************/
void serial() interrupt 4
{
ES = 0; //关闭串行中断
RI = 0; //清除串行接受标志位
buf = SBUF; //从串口缓冲区取得数据
playflag=1;
switch(buf)
{
case 0x31: senddata('X');break; //接受到1，发送字符'W'给计算机
case 0x32: senddata('L');break; //接受到2，发送字符'I'给计算机
case 0x33: senddata('1');break; //接受到3，发送字符'L'给计算机
case 0x34: senddata('0');break; //接受到4，发送字符'L'给计算机
case 0x35: senddata('0');break; //接受到5，发送字符'A'给计算机
case 0x36: senddata('0');break; //接受到5，发送字符'R'给计算机
default: senddata(buf);break; //接受到其它数据，将其发送给计算机
}
if(buf!=0x0D)
{
if(buf!=0x0A)
{
temp =buf;
if(count<16)
{
RXDdata[count]=temp;
count++;
}
}
}
ES = 1; //允许串口中断
}
/*********************************************************
数据显示函数
*********************************************************/
void play()
{
if(playflag)
{
lcd_pos(0x40); //设置位置为第二行
for(m=0;m<16;m++)
lcd_wdat(cdis2[m]); //清LCD1602第二行
for(m=0;m<16;m++)
{
lcd_pos(0x40+m); //设置显示位置为第二行
lcd_wdat(RXDdata[m]); //显示字符
}
playflag=0;
count=0x00;
for(m=0;m<16;m++)
RXDdata[m]=0x20; //清显存单元
}
}
/*********************************************************
主函数
*********************************************************/
void main(void)
{
P0 = 0xff;
P2 = 0xff;
SCON=0x50; //设定串口工作方式
PCON=0x00; //波特率不倍增
TMOD=0x20; //定时器1工作于8位自动重载模式, 用于产生波特率
EA=1;
ES = 1; //允许串口中断
TL1=0xf3;
TH1=0xf3; //波特率2400
TR1=1;
lcd_init();
lcd_pos(0x00); //设置显示位置为第一行
for(m=0;m<16;m++)
lcd_wdat(cdis1[m]); //显示字符
lcd_pos(0x40); //设置显示位置为第二行
for(m=0;m<16;m++)
lcd_wdat(cdis2[m]); //显示字符
while(1)
{
play();
}
}
这个串口通信程序在我的开发版上已经全部验证通过，你可以根据实际，攸 改里面某些参数，满足你自己的需要就行。
比如你你点亮小灯，这部分你只可在相应位置添加代码即可。单片机都是51的。
其中1602的显示程序是用来验证是否通信成功，这部分你可作为参考。这部分你大可用小灯显示程序来替代。
热心网友
时间：2022-06-02 12:27
利用方式1实现单片机双机通信，主频为6M，波特率为2400bps，电路见图5-10。当两个单片机距离较近时，甲、乙两机的发送端与接收端分别直接相联，两机共地。执行程序，甲机将亮灯信号发送给乙机，若通信正常，乙机接收到信号后点亮20个发光二极管。乙机采用查询与中断两种工作方式。当然20个LED乙机可单独控制，也可接受甲机的控制，并执行甲机指令，还需要进一步完善程序.
甲机发送程序：
org 0000h
sta: mov tmod,#20h ；设置波特率
mov tl1,#0FAh
mov th1,#0FAh
setb tr1
mov scon,#40h ；置工作方式1
clr ti
mov a,#00h
mov sbuf,a ；发送亮灯信号
wait: jbc ti,cont ；发送成功清标志
ajmp wait ；等待发送完毕
cont: sjmp sta ;重复发送
end
乙机查询工作方式接收：
org 0000h
mov tmod,#20h ;设置通信波特率
mov tl1,#0FAh
mov th1,#0FAh
setb tr1
mov scon,#40h
clr ri
setb ren ；允许接收
wait: jbc ri,read ；接收成功清标志
ajmp wait ；接收未完等待
read: mov a ,sbuf
mov p1,a ；接收亮灯信号送P1口
sjmp $
end
乙机中断工作方式接收
org 0000h
ajmp main
org 0023h
ajmp zd ；转串口中断程序
START: MOV TMOD,#20h
mov tl1,#0FAh
mov th1,#0FAh
setb tr1
mov scon,#50h
clr ri
mov ie,#90h ；开中断
MAIN:sjmp $ 主程序
zd: clr ri ；清接收标志
；==============中断程序还要再完善==============
mov a ,sbuf ；读接收信号
mov p1,a
MOV R1,A ;将收到的信号送缓存
reti ；中断返回
end
采用方式2 通信，数据帧格式是11位的，TB8为奇偶校验位，接收过程要求判断RB8，若出错置F0标志为1，正确则置F0标志为0，然后返回。发送波特率375kbps，晶振为12MHz，所以SMOD=l。由于传送数据的波特率与定时器无关，所以程序中无需对定时器编程.
send:
MOV SCON，#80H ；设置串行口为方式2
MOV PCON，#80H ；SMOD=l
MOV R0，#50H ；设数据块指针
MOV R7，#20 ；设数据块长度
STA： MOV A，@R0 ；取数据给A
MOV C，P
MOV TB8，C ；奇偶位P送给TB8，
MOV SBUF，A ；启动发送
;====================================================
WAIT： JBC TI，CONT ；若发完一帧数据，清标志后发下一帧数据
AJMP WAIT ；未完等待
;=======================================================
CONT：INC R0 ；修改数据指针
DJNZ R7，STA ；循环发送至结束
RET
;========================================================
;乙机接收程序如下：
； 在进行双机通信时，两机应采用相同的工作方式和波特率。
;=============================================================
MOV SCON，#90H ；设置串行口为方式2，REN为1，允许接收
MOV PCON，#80H ；SMOD=1
MOV R0，#50H ；设置数据块首址
MOV R7，#20 ；置数据块长度
;=========================================================
WAIT：JBC RI，READ ；接收完一帧数据则RI清零并读入数据
AJMP WAIT ；未完等待
;==========================================
READ：MOV A，SBUF ；读入数据
JNB PSW.0，PZ ；收到数为偶数则转
JNB RB8，ERR ；收到数为奇数，发端为偶数则通信出错
SJMP RIGHT ；相符则正确
PZ：JB RB8，ERR ；收到数为偶数，发端为奇数则出错
;========================================
RlGHT：MOV @R0，A ；通信正确，存放数据
INC R0 ；更改地址指针
DJNZ R7，WAIT ；数据块接收完否，未完继续
CLR PSW.5 ；通信正确，置F0为0
RET ；返回
ERROR：SETB PSW.5 ；通信出错，置F0为l
RET ；返回
热心网友
时间：2022-06-02 12:28
把下面的程序稍微改一下：
/*
说明：
1. U1为发信机，U2位收信机;
2. U1收到数据后会打印出AT89C51 U1-->...， 并循环点亮8个LED;
3. U2接收输入数据后保存最新的30个字符，按‘\’后输出AT89C51 U2-->...
*/
#include <reg51.h> /* define 8051 registers */
#include <stdio.h> /* define I/O functions */
void delays(unsigned int ms)
{
unsigned int ii,jj;
for(ii=0;ii<ms;ii++)
for(jj=0;jj<5000;jj++);
}
void delayms(void)
{
unsigned int ii;
for(ii=0;ii<100;ii++);
}
void ledloop(unsigned char ss)
{
unsigned int ii;
P1=0xFF;
for(ii=0;ii<8;ii++)
{
P1=~(0x01<<ii);
delays(ss);
P1=0xff;
delays(ss);
}
P1=0xFF;
}
void initcom(void){
SCON = 0x52;
TMOD = 0x20;
TCON = 0x69;
TH1 = 0xf3;
}
void main (void){ /* main program */
unsigned char ch;
initcom();
//printf ("\n-----------------------");
//printf ("\n|Here is the receiver!|");
//printf ("\n-----------------------\n");
ledloop(10);
while (1){
P1=0;
delays(10);
P1=0xFF;
delays(10);
P1=0;
delays(10);
P1=0xFF;
delays(10);
ch = getchar();
if( (ch>30)&&(ch<123))
{
printf("\nAT89C51 U1-->%c\n", ch);
delayms();
ledloop(3);
}
}
}
热心网友
时间：2022-06-02 12:28
串口很简单的！好好看看书看看教程！一会就会写了！
热心网友
时间：2022-06-02 12:29
这是C语言的，试试吧，
#include <reg52.h>
#include <intrins.h>
#define uchar unsigned char
#define uint unsigned int
sbit LCD_RS = P2^0;
sbit LCD_RW = P2^1;
sbit LCD_EN = P2^2;
#define delayNOP(); {_nop_();_nop_();_nop_();_nop_();};
uchar data RXDdata[ ] = {0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20,
0x20,0x20,0x20,0x20,0x20,0x20,0x20,0x20 };
uchar temp,buf,m,count;
bit playflag=0;
uchar code cdis1[ ] = {" SERILA TRANFER "};
uchar code cdis2[ ] = {" "};
/**********************************************************
延时子程序
**********************************************************/
void delay1(uint ms)
{
uchar k;
while(ms--)
{
for(k = 0; k < 120; k++);
}
}
/******************************************************************/
/* */
/*检查LCD忙状态 */
/*lcd_busy为1时，忙，等待。lcd-busy为0时,闲，可写指令与数据。 */
/* */
/******************************************************************/
bit lcd_busy()
{
bit result;
LCD_RS = 0;
LCD_RW = 1;
LCD_EN = 1;
delayNOP();
result = (bit)(P0&0x80);
LCD_EN = 0;
return(result);
}
/*******************************************************************/
/* */
/*写指令数据到LCD */
/*RS=L，RW=L，E=高脉冲，D0-D7=指令码。 */
/* */
/*******************************************************************/
void lcd_wcmd(uchar cmd)
{
while(lcd_busy());
LCD_RS = 0;
LCD_RW = 0;
LCD_EN = 0;
_nop_();
_nop_();
P0 = cmd;
delayNOP();
LCD_EN = 1;
delayNOP();
LCD_EN = 0;
}
/*******************************************************************/
/* */
/*写显示数据到LCD */
/*RS=H，RW=L，E=高脉冲，D0-D7=数据。 */
/* */
/*******************************************************************/
void lcd_wdat(uchar dat)
{
while(lcd_busy());
LCD_RS = 1;
LCD_RW = 0;
LCD_EN = 0;
P0 = dat;
delayNOP();
LCD_EN = 1;
delayNOP();
LCD_EN = 0;
}
/*******************************************************************/
/* */
/* LCD初始化设定 */
/* */
/*******************************************************************/
void lcd_init()
{
delay1(15);
lcd_wcmd(0x01); //清除LCD的显示内容
lcd_wcmd(0x38); //16*2显示，5*7点阵，8位数据
delay1(5);
lcd_wcmd(0x38);
delay1(5);
lcd_wcmd(0x38);
delay1(5);
lcd_wcmd(0x0c); //开显示，显示光标，光标闪烁
delay1(5);
lcd_wcmd(0x01); //清除LCD的显示内容
delay1(5);
}
/*******************************************************************/
/* */
/* 设定显示位置 */
/* */
/*******************************************************************/
void lcd_pos(uchar pos)
{
lcd_wcmd(pos | 0x80); //数据指针=80+地址变量
}
/*********************************************************
发送数据函数
*********************************************************/
void senddata(uchar dat)
{
SBUF =dat;
while(!TI);
TI = 0;
}
/*********************************************************
串行中断服务函数
*********************************************************/
void serial() interrupt 4
{
ES = 0; //关闭串行中断
RI = 0; //清除串行接受标志位
buf = SBUF; //从串口缓冲区取得数据
playflag=1;
switch(buf)
{
case 0x31: senddata('W');break; //接受到1，发送字符'W'给计算机
case 0x32: senddata('I');break; //接受到2，发送字符'I'给计算机
case 0x33: senddata('L');break; //接受到3，发送字符'L'给计算机
case 0x34: senddata('L');break; //接受到4，发送字符'L'给计算机
case 0x35: senddata('A');break; //接受到5，发送字符'A'给计算机
case 0x36: senddata('R');break; //接受到5，发送字符'R'给计算机
default: senddata(buf);break; //接受到其它数据，将其发送给计算机
}
if(buf!=0x0D)
{
if(buf!=0x0A)
{
temp =buf;
if(count<16)
{
RXDdata[count]=temp;
count++;
}
}
}
ES = 1; //允许串口中断
}
/*********************************************************
数据显示函数
*********************************************************/
void play()
{
if(playflag)
{
lcd_pos(0x40); //设置位置为第二行
for(m=0;m<16;m++)
lcd_wdat(cdis2[m]); //清LCD1602第二行
for(m=0;m<16;m++)
{
lcd_pos(0x40+m); //设置显示位置为第二行
lcd_wdat(RXDdata[m]); //显示字符
}
playflag=0;
count=0x00;
for(m=0;m<16;m++)
RXDdata[m]=0x20; //清显存单元
}
}
/*********************************************************
主函数
*********************************************************/
void main(void)
{
P0 = 0xff;
P2 = 0xff;
SCON=0x50; //设定串口工作方式
PCON=0x00; //波特率不倍增
TMOD=0x20; //定时器1工作于8位自动重载模式, 用于产生波特率
EA=1;
ES = 1; //允许串口中断
TL1=0xfd;
TH1=0xfd; //波特率9600
TR1=1;
lcd_init();
lcd_pos(0x00); //设置显示位置为第一行
for(m=0;m<16;m++)
lcd_wdat(cdis1[m]); //显示字符
lcd_pos(0x40); //设置显示位置为第二行
for(m=0;m<16;m++)
lcd_wdat(cdis2[m]); //显示字符
while(1)
{
play();
}
}
/*********************************************************/
