最近弄焦化四车对位系统，项目中，WINCC与S7-200PLC通过PC Access 软件，用CP243-1以太网模块进行连接。Wincc版本是6.2 sp3版本，WINCC读取变量值后，使用全局脚本对变量进行算术运算。测试几次发现全局脚本似乎没有工作，没有得到所需要的运算值。计算机属性里“启动全局脚本”已经勾选，触发器也设置了（触发类型：变量变化时触发，变量TJJMZ1）。脚本程序如下。

Option Explicit

Function action

Dim TJJMZ1_N,TJJXZ1_N,TJJWZ1_N

Set TJJMZ1_N=HMIRuntime.Tags("TJJMZ1")

Set TJJXZ1_N=HMIRuntime.Tags("TJJXZ1")

Set TJJWZ1_N=HMIRuntime.Tags("TJJWZ1")

TJJMZ1_N.Read

TJJXZ1_N.Read

TJJWZ1_N.Read

If  TJJMZ1_N.Value>=1 And  TJJMZ1_N.Value<11 Then 

    TJJWZ1_N.Value=80+(TJJMZ1_N.Value-1)*3

End If

If  TJJMZ1_N.Value>11 And  TJJMZ1_N.Value<=65 Then 

    TJJWZ1_N.Value=110+(TJJMZ1_N.Value-11)*10

End If

TJJWZ1_N.Write

If  TJJMZ1_N.Value>=1 And  TJJMZ1_N.Value<11 Then 

    TJJXZ1_N.Value=TJJMZ1_N.Value-10

End If

If  TJJMZ1_N.Value>11 And  TJJMZ1_N.Value<=65 Then 

    TJJXZ1_N.Value=TJJMZ1_N.Value-30

End If

TJJXZ1_N.Write

End Function