触摸屏如何用宏脚本和PLC时间同步
liebian365 2024-11-04 14:29 18 浏览 0 评论
在实际项目中,经常会用到一些定时功能,如设备的定时开关机、付尾款程序等一些需要定时来完成的逻辑,都需要准确的实时时钟。
这些逻辑一般在PLC实现,但是由于有些PLC没有内置实时时钟电池,而只是用超级电容保持时钟,断电保持时间一般7天左右,以西门子ST20为例,可以加装电池板及电池CR1025实现,这样就加了成本。
那如何用触摸屏实现PLC时钟同步呢?以200smart为例,当上位机采用的威纶通MT8071IE时,如何用触摸屏时间同步PLC呢?
1.打开维纶触摸屏开发环境,宏指令→新增
2.写触摸屏的宏脚本,为了大家看的方便,我把注释列上。写完成之后,把周期执行、当HMI启动时即执行一次 勾选上,并且把周期执行的时间写上,这里单位是100ms,我写600也就是1分钟执行一次时钟同步比较。注意由于PLC用的是BCD码格式,所以触摸屏也选用的是BCD码,省的进行数据转换。
macro_command main()
short h_y,h_mo,h_d,h_h,h_m,h_s,h_w//声明触摸屏变量 bcd
char p_y,p_Mo, p_d,p_h,p_m,p_s,p_w//声明PLC变量 bcd
GetData(h_y,"Local HMI",LW,9015,1)//读取触摸屏年
GetData(h_mo,"Local HMI",LW,9014,1)//读取触摸屏月
GetData(h_d,"Local HMI",LW,9013,1)//读取触摸屏日
GetData(h_h,"Local HMI",LW,9012,1)//读取触摸屏时
GetData(h_m,"Local HMI",LW,9011,1)//读取触摸屏分
GetData(h_s,"Local HMI",LW,9010,1)//读取触摸屏秒
GetData(p_y,"Siemens S7-200 SMART (Ethernet)",VB,100,1)//读取PLC年
GetData(p_mo,"Siemens S7-200 SMART (Ethernet)",VB,101,1)//读取PLC月
GetData(p_d,"Siemens S7-200 SMART (Ethernet)",VB,102,1)//读取PLC日
GetData(p_h,"Siemens S7-200 SMART (Ethernet)",VB,103,1)//读取PLC时
GetData(p_m,"Siemens S7-200 SMART (Ethernet)",VB,104,1)//读取PLC分
GetData(p_s,"Siemens S7-200 SMART (Ethernet)",VB,105,1)//读取PLC秒
if h_y<>p_y or h_mo<>p_mo or h_d<>p_d or h_h<>p_h or h_m<>p_m or h_s<>p_s then//年月日时分秒任意不相等
SetData(h_y,"Siemens S7-200 SMART (Ethernet)",VB,110,1)//设定PLC年
SetData(h_mo,"Siemens S7-200 SMART (Ethernet)",VB,111,1)//设定PLC月
SetData(h_d,"Siemens S7-200 SMART (Ethernet)",VB,112,1)//设定PLC日
SetData(h_h,"Siemens S7-200 SMART (Ethernet)",VB,113,1)//设定PLC时
SetData(h_m,"Siemens S7-200 SMART (Ethernet)",VB,114,1)//设定PLC分
SetData(h_s,"Siemens S7-200 SMART (Ethernet)",VB,115,1)//设定PLC秒
bool plcset=true
SetData(plcset,"Siemens S7-200 SMART (Ethernet)",M,2.0,1)//接通PLC设置时钟的代码
plcset = false
SetData(plcset,"Siemens S7-200 SMART (Ethernet)",M,2.0,1)//断开PLC设置时钟的代码
end if
end macro_command
3.写PLC读时钟和同步时钟的代码(梯形图)
设置时钟,采用的是上升沿触发。
读时钟,由于精度1秒,所以1秒读一次即可,没有必要每个扫描周期都运行
时钟格式切记是BCD码,也就是4位二进制表示1位10进制数
4.200Smart定义的时钟数据格式
5.小案例分享
如果对您有帮助,欢迎转发关注,定时出C#上位机入门,机器视觉,运动控制,EPLAN,PLC相关技术分享
-------一个从打杂工自学加实践到电气及软件工程师的工控人
相关推荐
- 4万多吨豪华游轮遇险 竟是因为这个原因……
-
(观察者网讯)4.7万吨豪华游轮搁浅,竟是因为油量太低?据观察者网此前报道,挪威游轮“维京天空”号上周六(23日)在挪威近海发生引擎故障搁浅。船上载有1300多人,其中28人受伤住院。经过数天的调...
- “菜鸟黑客”必用兵器之“渗透测试篇二”
-
"菜鸟黑客"必用兵器之"渗透测试篇二"上篇文章主要针对伙伴们对"渗透测试"应该如何学习?"渗透测试"的基本流程?本篇文章继续上次的分享,接着介绍一下黑客们常用的渗透测试工具有哪些?以及用实验环境让大家...
- 科幻春晚丨《震动羽翼说“Hello”》两万年星间飞行,探测器对地球的最终告白
-
作者|藤井太洋译者|祝力新【编者按】2021年科幻春晚的最后一篇小说,来自大家喜爱的日本科幻作家藤井太洋。小说将视角放在一颗太空探测器上,延续了他一贯的浪漫风格。...
- 麦子陪你做作业(二):KEGG通路数据库的正确打开姿势
-
作者:麦子KEGG是通路数据库中最庞大的,涵盖基因组网络信息,主要注释基因的功能和调控关系。当我们选到了合适的候选分子,单变量研究也已做完,接着研究机制的时便可使用到它。你需要了解你的分子目前已有哪些...
- 知存科技王绍迪:突破存储墙瓶颈,详解存算一体架构优势
-
智东西(公众号:zhidxcom)编辑|韦世玮智东西6月5日消息,近日,在落幕不久的GTIC2021嵌入式AI创新峰会上,知存科技CEO王绍迪博士以《存算一体AI芯片:AIoT设备的算力新选择》...
- 每日新闻播报(September 14)_每日新闻播报英文
-
AnOscarstatuestandscoveredwithplasticduringpreparationsleadinguptothe87thAcademyAward...
- 香港新巴城巴开放实时到站数据 供科技界研发使用
-
中新网3月22日电据香港《明报》报道,香港特区政府致力推动智慧城市,鼓励公私营机构开放数据,以便科技界研发使用。香港运输署21日与新巴及城巴(两巴)公司签署谅解备忘录,两巴将于2019年第3季度,开...
- 5款不容错过的APP: Red Bull Alert,Flipagram,WifiMapper
-
本周有不少非常出色的app推出,鸵鸟电台做了一个小合集。亮相本周榜单的有WifiMapper's安卓版的app,其中包含了RedBull的一款新型闹钟,还有一款可爱的怪物主题益智游戏。一起来看看我...
- Qt动画效果展示_qt显示图片
-
今天在这篇博文中,主要实践Qt动画,做一个实例来讲解Qt动画使用,其界面如下图所示(由于没有录制为gif动画图片,所以请各位下载查看效果):该程序使用应用程序单窗口,主窗口继承于QMainWindow...
- 如何从0到1设计实现一门自己的脚本语言
-
作者:dong...
- 三年级语文上册 仿写句子 需要的直接下载打印吧
-
描写秋天的好句好段1.秋天来了,山野变成了美丽的图画。苹果露出红红的脸庞,梨树挂起金黄的灯笼,高粱举起了燃烧的火把。大雁在天空一会儿写“人”字,一会儿写“一”字。2.花园里,菊花争奇斗艳,红的似火,粉...
- C++|那些一看就很简洁、优雅、经典的小代码段
-
目录0等概率随机洗牌:1大小写转换2字符串复制...
- 二年级上册语文必考句子仿写,家长打印,孩子照着练
-
二年级上册语文必考句子仿写,家长打印,孩子照着练。具体如下:...
你 发表评论:
欢迎- 一周热门
- 最近发表
- 标签列表
-
- wireshark怎么抓包 (75)
- qt sleep (64)
- cs1.6指令代码大全 (55)
- factory-method (60)
- sqlite3_bind_blob (52)
- hibernate update (63)
- c++ base64 (70)
- nc 命令 (52)
- wm_close (51)
- epollin (51)
- sqlca.sqlcode (57)
- lua ipairs (60)
- tv_usec (64)
- 命令行进入文件夹 (53)
- postgresql array (57)
- statfs函数 (57)
- .project文件 (54)
- lua require (56)
- for_each (67)
- c#工厂模式 (57)
- wxsqlite3 (66)
- dmesg -c (58)
- fopen参数 (53)
- tar -zxvf -c (55)
- 速递查询 (52)