标题: 单片机RS485半双工多机通信程序Proteus仿真 MAX487芯片可切换从机地址 [打印本页]
作者: zzxllll    时间: 2022-5-18 01:10
标题: 单片机RS485半双工多机通信程序Proteus仿真 MAX487芯片可切换从机地址
单片机+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, 下载次数: 87)
作者: ln_yxggg    时间: 2023-12-27 11:18
简单、明了、实用，如果按Modbus协议写就可以做工程用了



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1