用VC写自已的组态软件 点击：13912 | 回复：77
发表于：2006-02-09 15:17:00
19楼
贴一个Modbus协议的规约驱动程序供大家讨论，其实这些东西在upcas中是完全开放的。
#main.py
#This is a test Device Driver Script
import user
DICount = 16
AICount = 8
SleepTime = 200
def ProcInit(slave):
user.SetSlaveDICount(slave, DICount)
user.SetSlaveAICount(slave, AICount)
return
def ProcA(slave):
SlaveAddr = 0
SettingList = user.GetSlaveSetting(slave)
if (len(SettingList) >= 2):
SlaveAddr = int(SettingList[1])
msg = ""
msg += user.Int2Char(SlaveAddr)
msg += user.Int2Char(0x02)
msg += user.Int2Char(0x00)
msg += user.Int2Char(0x00)
msg += user.Int2Char(DICount / 256)
msg += user.Int2Char(DICount % 256)
msg += user.MB_Crc(msg)
user.SlaveSend(slave, msg)
user.Sleep(SleepTime)
msg = user.SlaveReceive(slave)
nLen = len(msg)
if (nLen >= 5 and msg[nLen - 2 :] == user.MB_Crc(msg[0: nLen - 2])):
i = 0
while (i < DICount):
charValue = user.Char2Int(msg[3 + i / 8])
user.SetSlaveDI(slave, i, user.GetBit(charValue, i % 8))
i = i + 1
ProcC(slave)
return
def ProcB(slave):
SlaveAddr = 0
SettingList = user.GetSlaveSetting(slave)
if (len(SettingList) >= 2):
SlaveAddr = int(SettingList[1])
msg = ""
msg += user.Int2Char(SlaveAddr)
msg += user.Int2Char(0x03)
msg += user.Int2Char(0x00)
msg += user.Int2Char(0x00)
msg += user.Int2Char(AICount / 256)
msg += user.Int2Char(AICount % 256)
msg += user.MB_Crc(msg)
user.SlaveSend(slave, msg)
user.Sleep(SleepTime)
msg = user.SlaveReceive(slave)
nLen = len(msg)
if (nLen >= 5 and msg[nLen - 2 :] == user.MB_Crc(msg[0: nLen - 2])):
i = 0
while (i < AICount):
Value = user.Char2Int(msg[3 + 2 * i]) * 256 + user.Char2Int(msg[4 + 2 * i])
user.SetSlaveAI(slave, i, Value)
i = i + 1
return
def ProcC(slave):
command = user.GetSlaveCommand(slave)
if (len(command) < 3):
return
UserID = command[0]
index = int(command[1])
value = int(command[2])
SlaveAddr = 0
SettingList = user.GetSlaveSetting(slave)
if (len(SettingList) >= 2):
SlaveAddr = int(SettingList[1])
msg = ""
msg += user.Int2Char(SlaveAddr)
msg += user.Int2Char(0x05)
msg += user.Int2Char(index / 256)
msg += user.Int2Char(index % 256)
if (value):
msg += user.Int2Char(0xff)
else:
msg += user.Int2Char(0x00)
msg += user.Int2Char(0x00)
msg += user.MB_Crc(msg)
user.SlaveSend(slave, msg)
user.Sleep(SleepTime)
msg = user.SlaveReceive(slave)
nLen = len(msg)
return
def ProcD(slave):
return
def ProcFinalize(slave):
return
#main.py
#This is a test Device Driver Script
import user
DICount = 16
AICount = 8
SleepTime = 200
def ProcInit(slave):
user.SetSlaveDICount(slave, DICount)
user.SetSlaveAICount(slave, AICount)
return
def ProcA(slave):
SlaveAddr = 0
SettingList = user.GetSlaveSetting(slave)
if (len(SettingList) >= 2):
SlaveAddr = int(SettingList[1])
msg = ""
msg += user.Int2Char(SlaveAddr)
msg += user.Int2Char(0x02)
msg += user.Int2Char(0x00)
msg += user.Int2Char(0x00)
msg += user.Int2Char(DICount / 256)
msg += user.Int2Char(DICount % 256)
msg += user.MB_Crc(msg)
user.SlaveSend(slave, msg)
user.Sleep(SleepTime)
msg = user.SlaveReceive(slave)
nLen = len(msg)
if (nLen >= 5 and msg[nLen - 2 :] == user.MB_Crc(msg[0: nLen - 2])):
i = 0
while (i < DICount):
charValue = user.Char2Int(msg[3 + i / 8])
user.SetSlaveDI(slave, i, user.GetBit(charValue, i % 8))
i = i + 1
ProcC(slave)
return
def ProcB(slave):
SlaveAddr = 0
SettingList = user.GetSlaveSetting(slave)
if (len(SettingList) >= 2):
SlaveAddr = int(SettingList[1])
msg = ""
msg += user.Int2Char(SlaveAddr)
msg += user.Int2Char(0x03)
msg += user.Int2Char(0x00)
msg += user.Int2Char(0x00)
msg += user.Int2Char(AICount / 256)
msg += user.Int2Char(AICount % 256)
msg += user.MB_Crc(msg)
user.SlaveSend(slave, msg)
user.Sleep(SleepTime)
msg = user.SlaveReceive(slave)
nLen = len(msg)
if (nLen >= 5 and msg[nLen - 2 :] == user.MB_Crc(msg[0: nLen - 2])):
i = 0
while (i < AICount):
Value = user.Char2Int(msg[3 + 2 * i]) * 256 + user.Char2Int(msg[4 + 2 * i])
user.SetSlaveAI(slave, i, Value)
i = i + 1
return
def ProcC(slave):
command = user.GetSlaveCommand(slave)
if (len(command) < 3):
return
UserID = command[0]
index = int(command[1])
value = int(command[2])
SlaveAddr = 0
SettingList = user.GetSlaveSetting(slave)
if (len(SettingList) >= 2):
SlaveAddr = int(SettingList[1])
msg = ""
msg += user.Int2Char(SlaveAddr)
msg += user.Int2Char(0x05)
msg += user.Int2Char(index / 256)
msg += user.Int2Char(index % 256)
if (value):
msg += user.Int2Char(0xff)
else:
msg += user.Int2Char(0x00)
msg += user.Int2Char(0x00)
msg += user.MB_Crc(msg)
user.SlaveSend(slave, msg)
user.Sleep(SleepTime)
msg = user.SlaveReceive(slave)
nLen = len(msg)
return
def ProcD(slave):
return
def ProcFinalize(slave):
return
发表于：2006-02-10 11:29:00
20楼
我也作了一个工控组态软件，请多提意见，互相交流
32点免费下载地址：[b]http://www.kipway.com[/b]
[b]EcHmi[/b](Easy Control Human-Machine Interaction )是一个通用的工控软件人机介面组态软件。作者十多年从事工控行业软件的开发，深知工控组态软件的可靠性、易用性、灵活性的重要性。随着应用需求和技术的发展，一个典型的工控软件包括RTDB、HDB、HMI、REPORT、WEB五大部分，我们不可能将每一部分都做到国外产品如iFix的水平，为何不选取其中一部分作为重点把它做好呢？EcHmi从HMI入手，从2001年的1.0版开始，到目前的8.1版，历经5年时间，通过不断的应用、改进，相信能给您带来惊喜。
[b]高效的C脚本[/b]
EcHmi的脚本采用CScript，脚本历经两次升级，目前的脚本系统采用虚拟机方式，由编译器编译成字节码，由虚拟机直接执行字节码，效率很高。虚拟机的功能十分强大，支持指针、数组、递归函数调用。
脚本分为图形脚本、窗口脚本、控制过程脚本。
内置函数包含数据访问类、图形控制类、画面（窗口）控制类、ActiveX访问类和标准ANSIC的一些函数（比如字符串处理、数学计算等），而且方便扩充内置函数，扩充内置函数时不需要修改编译系统。只需在虚拟机里定义扩充函数的实现即可。
[b]ActiveX支持[/b]
EcHmi的每一个画面都是ActiveX容器，因此您可以插入ActiveX控件，并可用脚本来访问ActiveX的属性和方法，以达到EcHmi和ActiveX交换数据的目的。
[b]OPC数据接口[/b]
OPC技术基于COM/DCOM技术的国际通用的工业控制过程数据交换规范。EcHmi中内置了OPC 2.0Client。OPC也是目前EcHmi唯一的驱动接口，当然你也可以很方便的定义和实现您自己的驱动接口，挂接不支持OPC的设备。
[b]简单易用的动画向导[/b]
使用向导来产生动画脚本，[b]您只需要点几下鼠标就行了[/b]。
系统提供了数值显示、百分比填充、移动、缩放、旋转、仪表指针、边线/文本颜色、实体填充颜色、显示/隐藏、条件闪烁等动画向导，由向导直接生成可见可控的脚本。因此无需手工编写脚本就能产生丰富多彩、表达直观的动态界面。当然对于懂C语言的工程组态工程师来讲，也可以直接手工编写脚本。
[b]功能强大易用的界面制作系统[/b]
采用GDIPLUS和GDI混合编程，采用世界坐标映射，方便对图形的编辑调整。可对任何类型的图形(包括图片)进行任意角度的旋转、整体调控。并提供了图型之间的对齐、等分排列功能。
[b]系统资源占用低、稳定可靠[/b]
EcHmi采用VC++编写，同时采用高效的图形显示技术和高性能的CScript脚本系统，中等规模的工程(<1000点)的CPU占用率在一般的P4 2.0G CPU下< 5%
EcHmi从1.0到目前的8.1历经5年多，经过不断的实际工程应用、改进，已经很成熟。
下载EcHmi8.1免费版(内含说明书)
[url=http://www.kipway.com]http://www.kipway.com[/url]
32点免费下载地址：[b]http://www.kipway.com[/b]
[b]EcHmi[/b](Easy Control Human-Machine Interaction )是一个通用的工控软件人机介面组态软件。作者十多年从事工控行业软件的开发，深知工控组态软件的可靠性、易用性、灵活性的重要性。随着应用需求和技术的发展，一个典型的工控软件包括RTDB、HDB、HMI、REPORT、WEB五大部分，我们不可能将每一部分都做到国外产品如iFix的水平，为何不选取其中一部分作为重点把它做好呢？EcHmi从HMI入手，从2001年的1.0版开始，到目前的8.1版，历经5年时间，通过不断的应用、改进，相信能给您带来惊喜。
[b]高效的C脚本[/b]
EcHmi的脚本采用CScript，脚本历经两次升级，目前的脚本系统采用虚拟机方式，由编译器编译成字节码，由虚拟机直接执行字节码，效率很高。虚拟机的功能十分强大，支持指针、数组、递归函数调用。
脚本分为图形脚本、窗口脚本、控制过程脚本。
内置函数包含数据访问类、图形控制类、画面（窗口）控制类、ActiveX访问类和标准ANSIC的一些函数（比如字符串处理、数学计算等），而且方便扩充内置函数，扩充内置函数时不需要修改编译系统。只需在虚拟机里定义扩充函数的实现即可。
[b]ActiveX支持[/b]
EcHmi的每一个画面都是ActiveX容器，因此您可以插入ActiveX控件，并可用脚本来访问ActiveX的属性和方法，以达到EcHmi和ActiveX交换数据的目的。
[b]OPC数据接口[/b]
OPC技术基于COM/DCOM技术的国际通用的工业控制过程数据交换规范。EcHmi中内置了OPC 2.0Client。OPC也是目前EcHmi唯一的驱动接口，当然你也可以很方便的定义和实现您自己的驱动接口，挂接不支持OPC的设备。
[b]简单易用的动画向导[/b]
使用向导来产生动画脚本，[b]您只需要点几下鼠标就行了[/b]。
系统提供了数值显示、百分比填充、移动、缩放、旋转、仪表指针、边线/文本颜色、实体填充颜色、显示/隐藏、条件闪烁等动画向导，由向导直接生成可见可控的脚本。因此无需手工编写脚本就能产生丰富多彩、表达直观的动态界面。当然对于懂C语言的工程组态工程师来讲，也可以直接手工编写脚本。
[b]功能强大易用的界面制作系统[/b]
采用GDIPLUS和GDI混合编程，采用世界坐标映射，方便对图形的编辑调整。可对任何类型的图形(包括图片)进行任意角度的旋转、整体调控。并提供了图型之间的对齐、等分排列功能。
[b]系统资源占用低、稳定可靠[/b]
EcHmi采用VC++编写，同时采用高效的图形显示技术和高性能的CScript脚本系统，中等规模的工程(<1000点)的CPU占用率在一般的P4 2.0G CPU下< 5%
EcHmi从1.0到目前的8.1历经5年多，经过不断的实际工程应用、改进，已经很成熟。
下载EcHmi8.1免费版(内含说明书)
[url=http://www.kipway.com]http://www.kipway.com[/url]
热门招聘
相关主题
- 请教无法启动MSMQ（消息列队）...
[3353] - 免费正版elecworks 2013电气...[17569]
- wincc输入输出域如何输入负数...[3053]
- xArrow组态软件[3123]
- 软件版擂台赛第26期 HMI报表...[2172]
- 西门子STEP7编程软件如何建立...[3319]
- 免费的3D组态软件态神v0.9携...[10507]
- 力控与关系数据库的数据交互...[2611]
- 组态王和6种主流PLC\单片机M...[2276]
- 请求组态王技术支持[2403]
官方公众号
智造工程师
-
客服
-
小程序
-
公众号
工控网智造工程师好文精选
