设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 单片机RS485半双工多机通信程序Proteus仿真 MAX487芯片 ...
返回列表 发新帖
查看: 2345|回复: 1
打印 上一主题 下一主题
收起左侧

单片机RS485半双工多机通信程序Proteus仿真 MAX487芯片可切换从机地址

[复制链接]
跳转到指定楼层
楼主
ID:1027458 发表于 2022-5-18 01:10 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
单片机+MAX487仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）



单片机RS485半双工通信源程序如下:
  1. #include <reg52.h>
  2. #include <intrins.h>

  4. #define                 u8                unsigned char
  5. #define                u16                unsigned int

  7. sbit P37 = P3^7;
  8. #define                TR_485_T                P37 = 1
  9. #define                TR_485_R                P37 = 0

  11. sbit P20 = P2^0;
  12. #define                KEY   P20

  14. sbit P30 = P3^0;
  15. sbit P31 = P3^1;

  17. u8 TxBuf[] = {1,0,1,0,0x55};                //目的地址、源地址、长度、控制、数据

  19. ///UART中断
  20. //=====================
  21. void Uart() interrupt 4
  22. {
  23.         if(RI == 1)
  24.         {
  25.                 P1 = SBUF;
  26.                 RI = 0;
  27.         }
  28. }        
  29. */
  30. //=====================
  31. //发送一个字节
  32. //=====================
  33. void Send(u8 num)
  34. {
  35.         SBUF = num;
  36.         while(TI == 0);
  37.         TI = 0;
  38. }
  39. //==========================
  40. //主机发送  发送成功返回1 发送失败返回0
  41. //==========================
  42. u8 Master_Send(u8 *dat)
  43. {
  44.         u8 revalue;
  45.         u8 i = 0;
  46.         u8 sum = 0;                                                                //校验和
  47.         u16 times = 200;                                                //取值不可过小
  48.         u16 while_times = times;                //避免死循环
  49.         
  50.         REN = 0;                                        //禁止接收
  51.         TR_485_T;                                        //MAX485发送模式
  52.         TB8 = 1;                                                //发送的是地址
  53.         Send(dat[0]);                        //发送接收端地址
  54.         sum = dat[0];
  55.         
  56.         TR_485_R;                                        //MAX485接收模式
  57.         SM2 = 1;                                        //接收地址
  58.         REN = 1;                                        //允许接收 接收从机返回的地址
  59.         while_times = times;
  60.         while(1)
  61.         {
  62.                 if(RI == 1)                                //接收到从机返回的地址
  63.                 {        RI = 0;break;        }
  64.                 if((while_times--) == 0)        //未接收到从机返回的地址
  65.                 {        break;        }
  66.         }
  67.         if(while_times != 0 && SBUF == dat[0])                        //判断是否接收到从机返回的地址
  68.         {        
  69.                 TR_485_T;                                        //MAX485发送模式
  70.                 TB8 = 0;                                                //发送的是数据
  71.                 for(i=1;i<5;i++)
  72.                 {
  73.                         Send(dat[i]);
  74.                         sum += dat[i];
  75.                 }
  76.                 Send(sum);                                //发送校验和
  77.                
  78.                 TR_485_R;                //MAX485接收模式
  79.                 SM2 = 0;                //接收的是数据
  80.                 REN = 1;                //允许接收
  81.                 while_times = times;
  82.                 while(1)
  83.                 {
  84.                         if(RI == 1)                                        //接收到从机返回的校验和
  85.                         {        
  86.                                 RI = 0;
  87.                                 if(SBUF ==sum)        //校验和正确 发送成功
  88.                                         revalue = 1;
  89.                                 else
  90.                                         revalue = 0;                //校验和错误 发送失败
  91.                                 break;        
  92.                         }
  93.                         if((while_times--) == 0)
  94.                         {
  95.                                 revalue = 0;
  96.                                 break;        
  97.                         }
  98.                 }
  99.         }
  100.         else
  101.                 revalue = 0;
  102.                
  103.         return revalue;
  104. }
  105. //=====================
  106. //主函数
  107. //=====================
  108. void main(void)
  109. {
  110.         u8 num = 0;
  111.         Uart_Init();

  113.         while(1)
  114.         {
  115.                 if(KEY == 0)
  116.                 {
  117.                         TxBuf[0] = 2;
  118.                 }
  119.                 else
  120.                 {
  121.                         TxBuf[0] = 1;
  122.                 }
  123.                
  124.                 if(Master_Send(TxBuf))                        //发送成功后才发下一帧
  125.                 {
  126.                         num++;
  127.                         TxBuf[4] = num;
  128.                 }
  129.                
  130.                 delayms(1);
  131.                
  132.         }
  133. }
复制代码



Keil代码与Proteus8.8仿真51黑下载: RS485多机通信仿真【半双工】.rar (114.86 KB, 下载次数: 72)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏5 分享淘帖 顶顶2 踩踩
回复

使用道具 举报

沙发
ID:429994 发表于 2023-12-27 11:18 | 只看该作者
简单、明了、实用，如果按Modbus协议写就可以做工程用了
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表