MCGS用脚本设置屏幕背光和声音

MCGS用脚本设置屏幕背光和声音

用MCGS软件控制TPC的声音、背光及IP地址设置，方便在用户工程中对系统的控制。
运行环境为WINCE系统，测试型号：1061Ti和1062K。

（1）打开 设备窗口，在设备组态窗口，打开“设备工具箱”，查看是否有“TPC系统控制”，
没有就在设备管理中找“所有设备”－－“通用设备”－－“TPC系统控制”，然后双击“TPC系统控制”，把“TPC系统控制”添加到设备窗口中. 
（2）双击 设备0--TPC系统控制，进入设备编辑窗口，在右边就有：IP地址、蜂鸣开关、蜂鸣长度、背光自动关闭、背光持续时长等。
（3）然后设置对应的变量进行连接好就可以在脚本中操作了。
 

(4)建循环策略，点亮背光

，条件是控制的信号变量为非0时

'检查外部信号有效时，来点亮屏幕背光
'首次时是点亮屏，再按是切换屏

‘ScnBright：为背光自动开关

if ScnBright.value=1 then
   用户窗口.窗口0.Open()
   currentWnd=0
   ScnBright.value=0
   !Sleep(2000)

else if ScnBright.value=0 then
'背光已开时，切换窗口
if currentWnd=0 then
   用户窗口.状态控制.Open()
   currentWnd=1
   !Sleep(2000)
else 
  if currentWnd=1 then 
    用户窗口.流程图.Open()
    currentWnd=2
    !Sleep(2000)
  else 
     if currentWnd=2 then
       用户窗口.窗口0.Open()
       currentWnd=0
       !Sleep(2000)
     endif
  endif

endif

endif

（5）屏幕无操作时，还原背光设置

也是建一个循环策略，设置1秒钟，条件用 前面的 点亮背光 当为0时

last_Actn=!GetLastMouseActionTime()
curr_Time=!TimeGetCurrentTime()
dely_Value=!TimeGetSpan(curr_Time,last_Actn)

if dely_Value>ScnBrtTime then
  ScnBright=1
endif