用Delphi开发DLL来代替8581协议控制和采集华为PSM—A10电源(二)

匹配地址：

交流模拟量 11个 cid1=40 cid2=41

源代码网整理以下

一个交流屏 两路交流

源代码网整理以下

软件开发网 www.mscto.com

I是所得到的包头 7E

回报350包偏移

内容

返回报地址 软件开发网 www.mscto.com

30-31

输出电流A

I 85~I 92

32-33

输出电流B

I 93~I 100

34-35

输出电流C 软件开发网 www.mscto.com

I 101~I 108

36-37

1路交流A相电压 软件开发网 www.mscto.com

I 17~I 24

38-39

1路交流B相电压

I 25~I 32

40-41

1路交流C相电压

软件开发网 www.mscto.com

I 33~I 40

42-43

1路交流输出频率

I 41~I 48

44-45 软件开发网 www.mscto.com

2路交流A相电压

I 51~I 58

46-47

2路交流B相电压

I 59~I 66

48-49

2路交流C相电压

I 67~I 74

50-51

2路交流输出频率

I 75~I 82

源代码网整理以下

转化方法：

DataBuf[0] DataBuf[1] DataBuf[2] DataBuf[3] DataBuf[4] DataBuf[5] DataBuf[6] DataBuf[7]

软件开发网 www.mscto.com

源代码网整理以下

源代码网整理以下 软件开发网 www.mscto.com

floatTemp[0] floatTemp[1] floatTemp[2] floatTemp[3]

源代码网整理以下

源代码网整理以下

*10 再取整

源代码网整理以下

源代码网整理以下

integerTemp[0] integerTemp[1]

源代码网整理以下

使用Round()函数来执行取整操作

软件开发网 www.mscto.com

源代码网整理以下

交流开关量：cid1=40 cid2= 43 查看现场数据得 6个字节

序号

源代码网整理以下

内容

源代码网整理以下 软件开发网 www.mscto.com

字节

源代码网整理以下

1

源代码网整理以下

检测的开关数量M=0

源代码网整理以下

1

源代码网整理以下

M 2

源代码网整理以下 软件开发网 www.mscto.com

用户自定义状态数量P=3

源代码网整理以下

1

源代码网整理以下

M 3

源代码网整理以下

交流切换状态（自动E0H或手动E1H）

源代码网整理以下

1

源代码网整理以下 软件开发网 www.mscto.com

M 4

源代码网整理以下

照明状态（关E3H或开E2H）

源代码网整理以下

1

源代码网整理以下

M 5

源代码网整理以下

当前工作路号

源代码网整理以下

第一（E4），第二（E5），第三（E6）

源代码网整理以下

1

源代码网整理以下

源代码网整理以下

源代码网整理以下

源代码网整理以下

源代码网整理以下

回报350包偏移

内容

软件开发网 www.mscto.com

返回报地址

6.1

交流切换状态

I 19~I 20

6.2

照明状态

I 21~I 22

源代码网整理以下 软件开发网 www.mscto.com

取0手动 取1自动

取0关闭 取1工作

添加循环控制的问题 出错三次抛出错误

源代码网整理以下

源代码网整理以下

添加双字节转换为单字节的过程

{--------------得到转化字节的过程------------------------------------}

软件开发网 www.mscto.com

{-------@param input1: Byte 数据高位---------------------------------}

{-------@param input2: Byte 数据低位---------------------------------}

{-------@param reAssign: Byte 得到的数据-----------------------------}

{-------2005-06-27 add by Fane---------------------------------------}

procedure change2to1(input1,input2:byte;var reAssign: Byte);

源代码网整理以下

将reAssign声明为var，使用传引用方式传递参数

源代码网整理以下

源代码网整理以下

交流告警量：cid1=40 cid2=44 查看现场数据得 24个字节

源代码网整理以下

序号

源代码网整理以下

内容

字节

源代码网整理以下

本屏交流配电系统数量M

1

源代码网整理以下

1路输入线/相电压AB/A

1

源代码网整理以下

1路输入线/相电压BC/B

1

源代码网整理以下 软件开发网 www.mscto.com

1路输入线/相电压CA/C

1

源代码网整理以下

1路频率

1

源代码网整理以下

1路检测熔丝（或开关）数量M

1

源代码网整理以下

1路用户自定义告警数量P=8

软件开发网 www.mscto.com

1

源代码网整理以下

1路用户自定义字节

8×1

源代码网整理以下

软件开发网 www.mscto.com

2路输入线/相电压AB/A

1

源代码网整理以下

2路输入线/相电压BC/B

1

源代码网整理以下

2路输入线/相电压CA/C

1

源代码网整理以下

2路频率

1

源代码网整理以下

2路检测熔丝（或开关）数量M

1

源代码网整理以下

2路用户自定义告警数量P=0

1

源代码网整理以下

A相输入电流

1

源代码网整理以下

B相输入电流

1

源代码网整理以下

C相输入电流

1

源代码网整理以下 软件开发网 www.mscto.com

第一个自定义P=8 第2个自定义是0 注 20 20 忽略