专家
公告
财富商城
电子网
旗下网站
首页
问题库
专栏
标签库
话题
专家
NEW
门户
发布
提问题
发文章
STM32
基于STM32的最精练的PLC解释器核心算法源代码
2019-07-21 05:17
发布
×
打开微信“扫一扫”,打开网页后点击屏幕右上角分享按钮
站内问答
/
STM32/STM8
9571
2
1437
最精练的基于STM32的PLC解释器核心算法源代码!!!
不仅可用于可编程解释执行的内核代码,也可以用于IC设计的IP核开发、操作系统开发,或者其它对执行效率要求很高的场合!
能看懂不?绝对可以让您终生受益无穷!
能看懂的童鞋,恭喜你,C语言水平很不错!
PLC摘取核心源码.zip
(2.66 MB, 下载次数: 293)
2018-5-2 17:04 上传 点击文件名下载附件
PLC摘取核心源码
友情提示:
此问题已得到解决,问题已经关闭,关闭后问题禁止继续编辑,回答。
2条回答
xo37
2019-07-21 10:14
一共两个C文件:
a.c:
[mw_shl_code=c,true]void trig_proc(void)
{
u32 tmp1, tmp2, tmp;
u32 i;
for (i=0; i<X_MAP_SIZE; i+=4)
{
tmp1 = *(__IO u32 *)(i+X_MAP_START);
tmp2 = *(__IO u32 *)(i+X_BAK_START);
tmp = (tmp1^tmp2);
*(__IO u32 *)(i+XP_MAP_START) = (tmp&tmp1);
*(__IO u32 *)(i+XF_MAP_START) = (tmp&tmp2);
}
memcpy((void *)X_BAK_START, (void *)X_MAP_START, X_MAP_SIZE);
for (i=0; i<Y_MAP_SIZE; i+=4)
{
tmp1 = *(__IO u32 *)(i+Y_MAP_START);
tmp2 = *(__IO u32 *)(i+Y_BAK_START);
tmp = (tmp1^tmp2);
*(__IO u32 *)(i+YP_MAP_START) = (tmp&tmp1);
*(__IO u32 *)(i+YF_MAP_START) = (tmp&tmp2);
}
memcpy((void *)Y_BAK_START, (void *)Y_MAP_START, Y_MAP_SIZE);
for (i=0; i<M_MAP_SIZE; i+=4)
{
tmp1 = (*(__IO u32 *)(i+M_MAP_START));
tmp2 = (*(__IO u32 *)(i+M_BAK_START));
tmp = (tmp1^tmp2);
*(__IO u32 *)(i+MP_MAP_START) = (tmp&tmp1);
*(__IO u32 *)(i+MF_MAP_START) = (tmp&tmp2);
}
memcpy((void *)M_BAK_START, (void *)M_MAP_START, M_MAP_SIZE);
}
[/mw_shl_code]
b.c:
[mw_shl_code=c,true]void instruct_exe(void)
{
u32 a1, a2;
u16 wTmp;
u16 n;
u32 i;
if (!(IS_HAVE_PRG_FLAG))
return;
a1 = PLC_PRG_ADDR_START + sizeof(T_PlcPrgHead) + 16;
a2 = a1 + __pPlcPrgHead->len;
START();
for (i=a1; i<a2; i+=8)
{
wTmp = *(u16 *)(i);
n = (wTmp>>12)&0x0f;
wTmp &= 0x03ff;
PAR_FLAG = *(u16 *)(i+2);
if (wTmp >= __BaseInstCodeStart && wTmp <= _BaseInstCodeEnd)
// if (n < 2)
{
_pBaseInstTbl[wTmp](*(u32 *)(i+4));
}
else if (wTmp >= _2InstCodeStart && wTmp <= _2CellInstCodeEnd)// if (n < 4)
{
_p2CellInstTbl[wTmp-_2InstCodeStart](*(u32 *)(i+4), *(u32 *)(i+8), *(u32 *)(i+12));
i += 8;
}
else if (wTmp >= _3InstCodeStart && wTmp <= _3InstCodeEnd)//if (n < 6)
{
_p3CellInstTbl[wTmp-_2InstCodeStart](*(u32 *)(i+4), *(u32 *)(i+8), *(u32 *)(i+12), *(u32 *)(i+16), *(u32 *)(i+20));
i += 16;
}
}
END();
}
[/mw_shl_code]
其余是广告,请叫我雷锋……
加载中...
查看其它2个回答
一周热门
更多
>
相关问题
STM32F4上I2C(在PROTEUS中模拟)调试不通的问题
6 个回答
芯片供应紧张,准备换个MCU,MM32L系列替换STM32L系列的怎么样?
7 个回答
STM32同时使用两个串口进行数据收发时数据丢包的问题
5 个回答
STM32F103串口通信死机问题
4 个回答
STM32WLE5CC连接SX1268在LoRa模式下能与 SX1278互通吗?
2 个回答
相关文章
ST公司第一款无线低功耗单片机模块有效提高物联网设计生产效率
0个评论
如何实现对单片机寄存器的访问
0个评论
通过USB用STM32片内自带Bootloader下载程序及注意事项
0个评论
欲练此功必先自宫之STM32汇编启动,放慢是为了更好的前行
0个评论
×
关闭
采纳回答
向帮助了您的知道网友说句感谢的话吧!
非常感谢!
确 认
×
关闭
编辑标签
最多设置5个标签!
STM32
保存
关闭
×
关闭
举报内容
检举类型
检举内容
检举用户
检举原因
广告推广
恶意灌水
回答内容与提问无关
抄袭答案
其他
检举说明(必填)
提交
关闭
×
打开微信“扫一扫”,打开网页后点击屏幕右上角分享按钮
×
付费偷看金额在0.1-10元之间
确定
×
关闭
您已邀请
0
人回答
查看邀请
擅长该话题的人
回答过该话题的人
我关注的人
a.c:
[mw_shl_code=c,true]void trig_proc(void)
{
u32 tmp1, tmp2, tmp;
u32 i;
for (i=0; i<X_MAP_SIZE; i+=4)
{
tmp1 = *(__IO u32 *)(i+X_MAP_START);
tmp2 = *(__IO u32 *)(i+X_BAK_START);
tmp = (tmp1^tmp2);
*(__IO u32 *)(i+XP_MAP_START) = (tmp&tmp1);
*(__IO u32 *)(i+XF_MAP_START) = (tmp&tmp2);
}
memcpy((void *)X_BAK_START, (void *)X_MAP_START, X_MAP_SIZE);
for (i=0; i<Y_MAP_SIZE; i+=4)
{
tmp1 = *(__IO u32 *)(i+Y_MAP_START);
tmp2 = *(__IO u32 *)(i+Y_BAK_START);
tmp = (tmp1^tmp2);
*(__IO u32 *)(i+YP_MAP_START) = (tmp&tmp1);
*(__IO u32 *)(i+YF_MAP_START) = (tmp&tmp2);
}
memcpy((void *)Y_BAK_START, (void *)Y_MAP_START, Y_MAP_SIZE);
for (i=0; i<M_MAP_SIZE; i+=4)
{
tmp1 = (*(__IO u32 *)(i+M_MAP_START));
tmp2 = (*(__IO u32 *)(i+M_BAK_START));
tmp = (tmp1^tmp2);
*(__IO u32 *)(i+MP_MAP_START) = (tmp&tmp1);
*(__IO u32 *)(i+MF_MAP_START) = (tmp&tmp2);
}
memcpy((void *)M_BAK_START, (void *)M_MAP_START, M_MAP_SIZE);
}
[/mw_shl_code]
b.c:
[mw_shl_code=c,true]void instruct_exe(void)
{
u32 a1, a2;
u16 wTmp;
u16 n;
u32 i;
if (!(IS_HAVE_PRG_FLAG))
return;
a1 = PLC_PRG_ADDR_START + sizeof(T_PlcPrgHead) + 16;
a2 = a1 + __pPlcPrgHead->len;
START();
for (i=a1; i<a2; i+=8)
{
wTmp = *(u16 *)(i);
n = (wTmp>>12)&0x0f;
wTmp &= 0x03ff;
PAR_FLAG = *(u16 *)(i+2);
if (wTmp >= __BaseInstCodeStart && wTmp <= _BaseInstCodeEnd)
// if (n < 2)
{
_pBaseInstTbl[wTmp](*(u32 *)(i+4));
}
else if (wTmp >= _2InstCodeStart && wTmp <= _2CellInstCodeEnd)// if (n < 4)
{
_p2CellInstTbl[wTmp-_2InstCodeStart](*(u32 *)(i+4), *(u32 *)(i+8), *(u32 *)(i+12));
i += 8;
}
else if (wTmp >= _3InstCodeStart && wTmp <= _3InstCodeEnd)//if (n < 6)
{
_p3CellInstTbl[wTmp-_2InstCodeStart](*(u32 *)(i+4), *(u32 *)(i+8), *(u32 *)(i+12), *(u32 *)(i+16), *(u32 *)(i+20));
i += 16;
}
}
END();
}
[/mw_shl_code]
其余是广告,请叫我雷锋……
一周热门 更多>