STM32 MODBUS通讯源码 stm32 modbus 主机
yuyutoo 2024-12-19 17:33 5 浏览 0 评论
最近几年受口罩影响，工控产品的价格以是水涨船高。尤其是PLC，不管是高端还是低端的PLC，价格是早已翻了好几倍。价格高不说而且还缺货，所以很多公司为了降低成本，保证能够有充足的货源，都采取了用STM32自制电路板来替代。虽然STM32的价格也是翻了好几倍，但是这也只是单个芯片的价格而已，如果用产品去相比PLC仍然还是具有相当大的空间。其实如果没有复杂的总线控制的需求，只是简单的完成PLC的IO及通讯功能，实现起来还是挺简单的。IO我就不讲了，因为那确实太简单。下面分享给大家的是MODBUS-RTU的通讯源码，希望能给搞工控的朋友一些帮助。
【下面是MODBUS-RTU调度程序】
void ModbusRTU(u8 com,u8 *data, u16 len)
{
if(data[0]==1&&IF_ModbusCRC16(com,data,len )==1)
{
switch(data[1])//根据不同的功能码进行处理
{
case 01:{CMD01(com,data,len);break;}//读输出开关量
case 02:{CMD02(com,data,len);break;}//读输入开关量
case 03:{CMD03(com,data,len);break;}//读多个寄存器
case 05:{CMD05(com,data,len);break;}//写单个输出开关量
case 06:{CMD06(com,data,len);break;}//写单个寄存器
case 15:{CMD0F(com,data,len);break;}//写多个输出开关量
case 16:{CMD10(com,data,len);break;}//写多个寄存器
}
}
}
u8 M[1000];
u8 X[1000];
u8 Y[1000];
u16 D[1000];
u8 IS8BIT =0;
u16 OUTIM_A=0;
u16 OUTIM_B=0;
void SEND_DAT(u8 com,u8 *data, u16 len)//将数据从指定的串口发送出去
{
if(com==2){USART2_SendTxt(data,len);}
if(com==3){USART3_SendTxt(data,len);}
if(com==4){USART4_SendTxt(data,len);}
if(com==5){USART5_SendTxt(data,len);}
}
【下面是MODBUS-RTU从站模式】
void CMD01(u8 com,u8 *data, u16 len)
{
u8 U8BIT=0;
u8 U8BYTE=0;
u8 RDT[200];
int i=0;
int LEN=data[4];
int STARTADDR=data[2];
LEN=(LEN<<8) + data[5];
STARTADDR=(STARTADDR<<8)+data[3];
RDT[0]=data[0];
RDT[1]=data[1];
RDT[2]=LEN/8;
if(LEN%8){RDT[2]=RDT[2]+1;}
for(i=0;i<LEN;i++)
{
U8BIT=i%8;
if(M[STARTADDR+i])
{
U8BYTE=1;
RDT[3+i/8]=RDT[3+i/8]|(U8BYTE<<U8BIT);
}
else
{
U8BYTE=254;
RDT[3+i/8]=RDT[3+i/8]&(U8BYTE<<U8BIT);
}
}
ModbusCRC16(com,RDT,RDT[2]+3 );
RDT[4+LEN]=COMCRC16[com][0];
RDT[5+LEN]=COMCRC16[com][1];
SEND_DAT(com,RDT,LEN+5);
}
void CMD02(u8 com,u8 *data, u16 len)
{
}
void CMD03(u8 com,u8 *data, u16 len)
{
u8 RDT[200];
int i=0;
int LEN=data[5]*2;
int STARTADDR=data[2];
STARTADDR=(STARTADDR<<8)+data[3];
RDT[0]=data[0];
RDT[1]=data[1];
RDT[2]=LEN;
for(i=0;i<LEN;i++)
{
if(IS8BIT==0){if((i%2)==0){RDT[3+i]=D[STARTADDR+i/2]>>8;}else{RDT[3+i]=D[STARTADDR+i/2];}}
else{RDT[3+i]=D[STARTADDR+i];}
}
ModbusCRC16(com,RDT,LEN+3 );
RDT[3+LEN]=COMCRC16[com][0];
RDT[4+LEN]=COMCRC16[com][1];
SEND_DAT(com,RDT,LEN+5);
}
void CMD05(u8 com,u8 *data, u16 len)
{
u8 RDT[200];
int i=0;
int STARTADDR=data[2];
STARTADDR=(STARTADDR<<8)+data[3];
RDT[0]=data[0];
RDT[1]=data[1];
RDT[2]=data[2];
RDT[3]=data[3];
RDT[4]=data[4];
RDT[5]=data[5];
RDT[6]=data[6];
RDT[7]=data[7];
M[STARTADDR+0]=data[5]?1:0;
SEND_DAT(com,RDT,8);
}
void CMD06(u8 com,u8 *data, u16 len)
{
u8 RDT[200];
int i=0;
int STARTADDR=data[2];
STARTADDR=(STARTADDR<<8)+data[3];
RDT[0]=data[0];
RDT[1]=data[1];
RDT[2]=data[2];
RDT[3]=data[3];
RDT[4]=data[4];
RDT[5]=data[5];
RDT[6]=data[6];
RDT[7]=data[7];
if(IS8BIT==0)
{
D[STARTADDR]=data[4];
D[STARTADDR]=(D[STARTADDR]<<8)+data[5];
}
else
{
D[STARTADDR+0]=data[4];
D[STARTADDR+1]=data[5];
}
SEND_DAT(com,RDT,8);
}
void CMD0F(u8 com,u8 *data, u16 len)
{
u8 U8BIT=0;
u8 U8BYTE=0;
u8 RDT[200];
int i=0;
int LEN=data[4];
int STARTADDR=data[2];
LEN=(LEN<<8)+data[5];
STARTADDR=(STARTADDR<<8)+data[3];
RDT[0]=data[0];
RDT[1]=data[1];
RDT[2]=data[2];
RDT[3]=data[3];
RDT[4]=data[4];
RDT[5]=data[5];
for(i=0;i<LEN;i++)
{
U8BIT=i%8;
U8BYTE=1<<U8BIT;
M[STARTADDR+i]=(data[7+i/8]&U8BYTE)?1:0;
}
ModbusCRC16(com,RDT,6);
RDT[6]=COMCRC16[com][0];
RDT[7]=COMCRC16[com][1];
SEND_DAT(com,RDT,8);
}
void CMD10(u8 com,u8 *data, u16 len)//写多个寄存器
{
u8 RDT[200];
int i=0;
int LEN=data[6];
int STARTADDR=data[2];
STARTADDR=(STARTADDR<<8)+data[3];
RDT[0]=data[0];
RDT[1]=data[1];
RDT[2]=data[2];
RDT[3]=data[3];
RDT[4]=data[4];
RDT[5]=data[5];
for(i=0;i<LEN;i++)
{
if(IS8BIT==0)
{
if((i%2)==0){D[STARTADDR+i/2]=data[7+i];D[STARTADDR+i/2]=D[STARTADDR+i/2]<<8;}else{D[STARTADDR+i/2]+=data[7+i];}
}
else
{
D[STARTADDR+i]=data[7+i];
}
}
ModbusCRC16(com,RDT,6);
RDT[6]=COMCRC16[com][0];
RDT[7]=COMCRC16[com][1];
SEND_DAT(com,RDT,8);
}
【下面是CRC效验程序】
#include "MODBUS_CRC16.h"
u8 COM2CRC16[2];
u8 COM3CRC16[2];
u16 IX, IY;
//CRC校验查表用参数 /* CRC 高位字节值表*/
static u8 auchCRCHi[] =
{
0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,0x01,0xC0,
0x80,0x41,0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,
0x00,0xC1,0x81,0x40,0x00,0xC1,0x81,0x40,0x01,0xC0,
0x80,0x41,0x01,0xC0,0x80,0x41,0x00,0xC1,0x81,0x40,
0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,0x00,0xC1,
0x81,0x40,0x01,0xC0,0x80,0x41,0x01,0xC0,0x80,0x41,
0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,0x00,0xC1,
0x81,0x40,0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,
0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,0x01,0xC0,
0x80,0x41,0x00,0xC1,0x81,0x40,0x00,0xC1,0x81,0x40,
0x01,0xC0,0x80,0x41,0x01,0xC0,0x80,0x41,0x00,0xC1,
0x81,0x40,0x01,0xC0,0x80,0x41,0x00,0xC1,0x81,0x40,
0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,0x01,0xC0,
0x80,0x41,0x00,0xC1,0x81,0x40,0x00,0xC1,0x81,0x40,
0x01,0xC0,0x80,0x41,0x00,0xC1,0x81,0x40,0x01,0xC0,
0x80,0x41,0x01,0xC0,0x80,0x41,0x00,0xC1,0x81,0x40,
0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,0x01,0xC0,
0x80,0x41,0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,
0x00,0xC1,0x81,0x40,0x00,0xC1,0x81,0x40,0x01,0xC0,
0x80,0x41,0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,
0x01,0xC0,0x80,0x41,0x00,0xC1,0x81,0x40,0x01,0xC0,
0x80,0x41,0x00,0xC1,0x81,0x40,0x00,0xC1,0x81,0x40,
0x01,0xC0,0x80,0x41,0x01,0xC0,0x80,0x41,0x00,0xC1,
0x81,0x40,0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,
0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,0x01,0xC0,
0x80,0x41,0x00,0xC1,0x81,0x40
};
/* CRC低位字节值表*/
static u8 auchCRCLo[] =
{
0x00,0xC0,0xC1,0x01,0xC3,0x03,0x02,0xC2,0xC6,0x06,
0x07,0xC7,0x05,0xC5,0xC4,0x04,0xCC,0x0C,0x0D,0xCD,
0x0F,0xCF,0xCE,0x0E,0x0A,0xCA,0xCB,0x0B,0xC9,0x09,
0x08,0xC8,0xD8,0x18,0x19,0xD9,0x1B,0xDB,0xDA,0x1A,
0x1E,0xDE,0xDF,0x1F,0xDD,0x1D,0x1C,0xDC,0x14,0xD4,
0xD5,0x15,0xD7,0x17,0x16,0xD6,0xD2,0x12,0x13,0xD3,
0x11,0xD1,0xD0,0x10,0xF0,0x30,0x31,0xF1,0x33,0xF3,
0xF2,0x32,0x36,0xF6,0xF7,0x37,0xF5,0x35,0x34,0xF4,
0x3C,0xFC,0xFD,0x3D,0xFF,0x3F,0x3E,0xFE,0xFA,0x3A,
0x3B,0xFB,0x39,0xF9,0xF8,0x38,0x28,0xE8,0xE9,0x29,
0xEB,0x2B,0x2A,0xEA,0xEE,0x2E,0x2F,0xEF,0x2D,0xED,
0xEC,0x2C,0xE4,0x24,0x25,0xE5,0x27,0xE7,0xE6,0x26,
0x22,0xE2,0xE3,0x23,0xE1,0x21,0x20,0xE0,0xA0,0x60,
0x61,0xA1,0x63,0xA3,0xA2,0x62,0x66,0xA6,0xA7,0x67,
0xA5,0x65,0x64,0xA4,0x6C,0xAC,0xAD,0x6D,0xAF,0x6F,
0x6E,0xAE,0xAA,0x6A,0x6B,0xAB,0x69,0xA9,0xA8,0x68,
0x78,0xB8,0xB9,0x79,0xBB,0x7B,0x7A,0xBA,0xBE,0x7E,
0x7F,0xBF,0x7D,0xBD,0xBC,0x7C,0xB4,0x74,0x75,0xB5,
0x77,0xB7,0xB6,0x76,0x72,0xB2,0xB3,0x73,0xB1,0x71,
0x70,0xB0,0x50,0x90,0x91,0x51,0x93,0x53,0x52,0x92,
0x96,0x56,0x57,0x97,0x55,0x95,0x94,0x54,0x9C,0x5C,
0x5D,0x9D,0x5F,0x9F,0x9E,0x5E,0x5A,0x9A,0x9B,0x5B,
0x99,0x59,0x58,0x98,0x88,0x48,0x49,0x89,0x4B,0x8B,
0x8A,0x4A,0x4E,0x8E,0x8F,0x4F,0x8D,0x4D,0x4C,0x8C,
0x44,0x84,0x85,0x45,0x87,0x47,0x46,0x86,0x82,0x42,
0x43,0x83,0x41,0x81,0x80,0x40
};
void ModbusCRC16(int com,u8 *data, u16 len)
{
u8 L=(u8)len;
u8 uchCRCHi=0xFF; /*高CRC字节初始化*/
u8 uchCRCLo=0xFF; /*低CRC字节初始化*/
u8 uIndex; /*CRC循环中的索引*/
while(L--) /* 传输消息缓冲区*/
{
uIndex = uchCRCHi ^ *data++; /* 计算CRC */
uchCRCHi = uchCRCLo ^ auchCRCHi[uIndex];
uchCRCLo = auchCRCLo[uIndex];
}
if(com==2)
{
COM2CRC16[0] =uchCRCHi;//高位置
COM2CRC16[1] =uchCRCLo; //低位置
}
else
{
COM3CRC16[0] =uchCRCHi;//高位置
COM3CRC16[1] =uchCRCLo; //低位置
}
}
u8 IF_ModbusCRC16(int com,u8 *data, u16 len )
{
u8 CRC16[2];
if(len>4)
{
ModbusCRC16(com,data,len-2);
if(com==2)
{
CRC16[0]=COM2CRC16[0];//高位置
CRC16[1]=COM2CRC16[1];//低位置
}
else
{
CRC16[0]=COM3CRC16[0];//高位置
CRC16[1]=COM3CRC16[1];//低位置
}
if(data[len-2]==CRC16[0]&&data[len-1]==CRC16[1])return 1;else return 0;
}
else{return 0;}
}
相关推荐
- Mysql和Oracle实现序列自增（oracle创建序列的sql）
-
Mysql和Oracle实现序列自增/*ORACLE设置自增序列oracle本身不支持如mysql的AUTO_INCREMENT自增方式，我们可以用序列加触发器的形式实现，假如有一个表T_WORKM...
- 关于Oracle数据库12c 新特性总结（oracle数据库19c与12c）
-
概述今天主要简单介绍一下Oracle12c的一些新特性，仅供参考。参考：http://docs.oracle.com/database/121/NEWFT/chapter12102.htm#NEWFT...
- MySQL CREATE TABLE 简单设计模板交流
-
推荐用MySQL8.0(2018/4/19发布,开发者说同比5.7快2倍)或同类型以上版本....
- mysql学习9:创建数据库（mysql5.5创建数据库）
-
前言：我也是在学习过程中，不对的地方请谅解showdatabases;#查看数据库表createdatabasename...
- MySQL面试题-CREATE TABLE AS 与CREATE TABLE LIKE的区别
-
执行"CREATETABLE新表ASSELECT*FROM原表;"后，新表与原表的字段一致，但主键、索引不会复制到新表，会把原表的表记录复制到新表。...
- Nike Dunk High Volt 和 Bright Spruce 预计将于 12 月推出
-
在街上看到的PandaDunk的超载可能让一些球鞋迷们望而却步，但Dunk的浪潮仍然强劲，看不到尽头。我们看到的很多版本都是为女性和儿童制作的，这种新配色为后者引入了一种令人耳目一新的新选择，而...
- 美国多功能舰载雷达及美国海军舰载多功能雷达系统技术介绍
-
多功能雷达AN/SPY-1的特性和技术能力，该雷达已经在美国海军服役了30多年，其修改-AN/SPY-1A、AN/SPY-1B（V）、AN/SPY-1D、AN/SPY-1D（V），以及雷神...
- 汽车音响怎么玩，安装技术知识（汽车音响怎么玩,安装技术知识视频）
-
全面分析汽车音响使用或安装技术常识一:主机是大多数人最熟习的音响器材，有关主机的各种性能及规格，也是耳熟能详的事，以下是一些在使用或安装时，比较需要注意的事项：LOUDNESS：几年前的主机，此按...
- 【推荐】ProAc Response系列扬声器逐个看
-
有考牌(公认好声音)扬声器之称ProAcTablette小音箱，相信不少音响发烧友都曾经，或者现在依然持有，正当大家逐渐掌握Tablette的摆位设定与器材配搭之后，下一步就会考虑升级至表现更全...
- #本站首晒# 漂洋过海来看你 — BLACK&DECKER 百得 BDH2000L无绳吸尘器 开箱
-
作者：初吻给了烟sco混迹张大妈时日不短了，手没少剁。家里有了汪星人，吸尘器使用频率相当高，偶尔零星打扫用卧式的实在麻烦（汪星人：你这分明是找借口，我掉毛是满屋子都有，铲屎君都是用卧式满屋子吸的，你...
- 专题|一个品牌一件产品(英国篇)之Quested(罗杰之声)
-
Quested(罗杰之声)代表产品：Q212FS品牌介绍Quested(罗杰之声)是录音监听领域的传奇品牌，由英国录音师RogerQuested于1985年创立。在成立Quested之前，Roger...
- 常用半导体中英对照表(建议收藏)（半导体英文术语）
-
作为一个源自国外的技术，半导体产业涉及许多英文术语。加之从业者很多都有海外经历或习惯于用英文表达相关技术和工艺节点，这就导致许多英文术语翻译成中文后，仍有不少人照应不上或不知如何翻译。为此，我们整理了...
- Fyne Audio F502SP 2.5音路低音反射式落地音箱评测
-
FyneAudio的F500系列，有新成员了！不过，新成员不是新的款式，却是根据原有款式提出特别版。特别版产品在原有型号后标注了SP字样，意思是SpecialProduction。Fyne一共推出...
- 有哪些免费的内存数据库(In-Memory Database)
-
以下是一些常见的免费的内存数据库：1.Redis：Redis是一个开源的内存数据库，它支持多种数据结构，如字符串、哈希表、列表、集合和有序集合。Redis提供了快速的读写操作，并且支持持久化数据到磁...
- RazorSQL Mac版(SQL数据库查询工具)
-
RazorSQLMac特别版是一款看似简单实则功能非常出色的SQL数据库查询、编辑、浏览和管理工具。RazorSQLformac特别版可以帮你管理多个数据库，支持主流的30多种数据库，包括Ca...
欢迎 你 发表评论:
- 一周热门
-
-
前端面试:iframe 的优缺点? iframe有那些缺点
-
带斜线的表头制作好了，如何填充内容?这几种方法你更喜欢哪个?
-
漫学笔记之PHP.ini常用的配置信息
-
其实模版网站在开发工作中很重要，推荐几个参考站给大家
-
推荐7个模板代码和其他游戏源码下载的网址
-
[干货] JAVA - JVM - 2 内存两分 [干货]+java+-+jvm+-+2+内存两分吗
-
正在学习使用python搭建自动化测试框架?这个系统包你可能会用到
-
织梦(Dedecms)建站教程 织梦建站详细步骤
-
【开源分享】2024PHP在线客服系统源码(搭建教程+终身使用)
-
2024PHP在线客服系统源码+完全开源 带详细搭建教程
-
- 最近发表
-
- Mysql和Oracle实现序列自增（oracle创建序列的sql）
- 关于Oracle数据库12c 新特性总结（oracle数据库19c与12c）
- MySQL CREATE TABLE 简单设计模板交流
- mysql学习9:创建数据库（mysql5.5创建数据库）
- MySQL面试题-CREATE TABLE AS 与CREATE TABLE LIKE的区别
- Nike Dunk High Volt 和 Bright Spruce 预计将于 12 月推出
- 美国多功能舰载雷达及美国海军舰载多功能雷达系统技术介绍
- 汽车音响怎么玩，安装技术知识（汽车音响怎么玩,安装技术知识视频）
- 【推荐】ProAc Response系列扬声器逐个看
- #本站首晒# 漂洋过海来看你 — BLACK&DECKER 百得 BDH2000L无绳吸尘器 开箱
- 标签列表
-
- mybatis plus (70)
- scheduledtask (71)
- css滚动条 (60)
- java学生成绩管理系统 (59)
- 结构体数组 (69)
- databasemetadata (64)
- javastatic (68)
- jsp实用教程 (53)
- fontawesome (57)
- widget开发 (57)
- vb net教程 (62)
- hibernate 教程 (63)
- case语句 (57)
- svn连接 (74)
- directoryindex (69)
- session timeout (58)
- textbox换行 (67)
- extension_dir (64)
- linearlayout (58)
- vba高级教程 (75)
- iframe用法 (58)
- sqlparameter (59)
- trim函数 (59)
- flex布局 (63)
- contextloaderlistener (56)