当前位置：文档之家 › 全局脚本

全局脚本

  • 格式：pdf
  • 大小：115.67 KB
  • 文档页数：8

1.整点归档#include "apdefap.h"int gscAction( void ){//整点归档程序,可在整点进行归档//startarchive为归档事件的变量#pragma code("kernel32.dll");void GetLocalTime(SYSTEMTIME*lpsz);#pragma code();SYSTEMTIME time;int t1;int a1;GetLocalTime(&time);//SetTagWord("Varname",time.wYear);//SetTagWord("Varname",time.wMonth);//SetTagWord("Varname",time.wDayOfWeek); //SetTagWord("Varname",time.wDay);//SetTagWord("Varname",time.wHour);//SetTagWord("Varname",time.wMinute);//SetTagWord("Varname",time.wSecond);//SetTagWord("Varname",time.wMilliseconds);//整分归档,设定时器为1秒//t1=time.wSecond;//整时归档,设定时器为1分t1=time.wMinute;//SetTagWord("Varname",t1);//用此变量作为归档的事件变量;a1=GetTagBit("startarchive");if(t1==00){if (a1==1)SetTagBit("startarchive",0);elseSetTagBit("startarchive",1);}return(0) ;}2.#pragma option(mbcs)float TT2;float HH2;float C8,C9,C10,C11,C12,C13;float lnPws,Pws,P,D;float tmpp;C8=-5.8002206E+03;C9=1.3914993E+00;C10=-4.8640239E-02;C11=4.1764768E-05;C12=-1.4452093E-08;C13=6.5459673E+00;//5_1//开始计算//测试临时内部变量//T1为温度,H1为相对湿度,D1为绝对湿度TT2=GetTagFloat("TT5_1_V_Real")+273.15; HH2=GetTagFloat("HT5_1_V_Real");//计算lnPwslnPws=C8/TT2;lnPws=lnPws+C10*TT2;lnPws=lnPws+C11*TT2*TT2;tmpp=lnPws;lnPws=lnPws+C12*TT2*TT2*TT2;lnPws=lnPws+C13*log( TT2);//计算Pws,绝对湿度Pws=exp(lnPws);P=HH2*0.01*Pws;D=622*P/(101325-P);//计算完的数据写回SetTagFloat("DT5_1",D);//计算完成//6_1//开始计算//测试临时内部变量//T1为温度,H1为相对湿度,D1为绝对湿度TT2=GetTagFloat("TT6_1_V_Real")+273.15; HH2=GetTagFloat("HT6_1_V_Real");//计算lnPwslnPws=C8/TT2;lnPws=lnPws+C10*TT2;lnPws=lnPws+C11*TT2*TT2; tmpp=lnPws;lnPws=lnPws+C12*TT2*TT2*TT2; lnPws=lnPws+C13*log( TT2);//计算Pws,绝对湿度Pws=exp(lnPws);P=HH2*0.01*Pws;D=622*P/(101325-P);//计算完的数据写回SetTagFloat("DT6_1",D);//计算完成3.#include "apdefap.h"int gscAction( void ){#pragma option(mbcs)//计算电功率int d1,d2,d3;d1=GetTagWord("HR1_A_PI"); //Return-Type: WORD d2=GetTagWord("HR1_A_PV"); //Return-Type: WORD d3=d1*d2/1000.0;SetTagWord("HR1_A_KW",d3); //Return-Type: BOOLd1=GetTagWord("HR1_B_PI"); //Return-Type: WORD d2=GetTagWord("HR1_B_PV"); //Return-Type: WORD d3=d1*d2/1000.0;SetTagWord("HR1_B_KW",d3); //Return-Type: BOOLd1=GetTagWord("HR1_C_PI"); //Return-Type: WORD d2=GetTagWord("HR1_C_PV"); //Return-Type: WORD d3=d1*d2/1000.0;SetTagWord("HR1_C_KW",d3); //Return-Type: BOOL //////d1=GetTagWord("HR2_A_PI"); //Return-Type: WORD d2=GetTagWord("HR2_A_PV"); //Return-Type: WORD d3=d1*d2/1000.0;SetTagWord("HR2_A_KW",d3); //Return-Type: BOOL d1=GetTagWord("HR2_B_PI"); //Return-Type: WORDd2=GetTagWord("HR2_B_PV"); //Return-Type: WORD d3=d1*d2/1000.0;SetTagWord("HR2_B_KW",d3); //Return-Type: BOOLd1=GetTagWord("HR2_C_PI"); //Return-Type: WORD d2=GetTagWord("HR2_C_PV"); //Return-Type: WORD d3=d1*d2/1000.0;SetTagWord("HR2_C_KW",d3); //Return-Type: BOOLd1=GetTagWord("HR3_A_PI"); //Return-Type: WORD d2=GetTagWord("HR3_A_PV"); //Return-Type: WORD d3=d1*d2/1000.0;SetTagWord("HR3_A_KW",d3); //Return-Type: BOOLd1=GetTagWord("HR3_B_PI"); //Return-Type: WORD d2=GetTagWord("HR3_B_PV"); //Return-Type: WORD d3=d1*d2/1000.0;SetTagWord("HR3_B_KW",d3); //Return-Type: BOOLd1=GetTagWord("HR3_C_PI"); //Return-Type: WORD d2=GetTagWord("HR3_C_PV"); //Return-Type: WORD d3=d1*d2/1000.0;SetTagWord("HR3_C_KW",d3); //Return-Type: BOOLd1=GetTagWord("HR4_A_PI"); //Return-Type: WORD d2=GetTagWord("HR4_A_PV"); //Return-Type: WORD d3=d1*d2/1000.0;SetTagWord("HR4_A_KW",d3); //Return-Type: BOOLd1=GetTagWord("HR4_B_PI"); //Return-Type: WORD d2=GetTagWord("HR4_B_PV"); //Return-Type: WORD d3=d1*d2/1000.0;SetTagWord("HR4_B_KW",d3); //Return-Type: BOOLd1=GetTagWord("HR4_C_PI"); //Return-Type: WORD d2=GetTagWord("HR4_C_PV"); //Return-Type: WORD d3=d1*d2/1000.0;SetTagWord("HR4_C_KW",d3); //Return-Type: BOOLreturn 0;}。

合集下载

WINCC中报警脚本

WINCC中报警脚本

1、PLC做报警监测，将变量发送到WINCC,WINCC通过变量触发报警，报警可用以下简短语句，#pragma code ("Winmm.dll ")VOID WINAPI PlaySoundA ( char* pszSound, char* hmode, DWORD dwflag );#pragma code()PlaySoundA("D:\\baojin.wav",NULL,1);当然，如果想连续报警可将1改为0x0001| 0x0008；2、通过全局脚本实现。

BOOL GMsgFunction( char* pszMsgData){MSG_RTDATA_STRUCT mRT;if (mRT.dwMsgState==MSG_STATE_COME)//报警到达，开始报警{#pragma code ("Winmm.dll ")VOID WINAPI PlaySoundA ( char* pszSound, char* hmode, DWORD dwflag );#pragma code()PlaySoundA("D:\\baojin.wav",NULL,0x0001| 0x0008 );}if (mRT.dwMsgState==MSG_STATE_GO || mRT.dwMsgState==MSG_STATE_QUIT)//报警离开或确认后，停止报警{#pragma code ("Winmm.dll ")VOID WINAPI PlaySoundA ( char* pszSound, char* hmode, DWORD dwflag );#pragma code()PlaySoundA("NULL",NULL,1 );//播放空文件}return( TRUE );}这种方法要在报警设置中勾上“触发一个动作”，连接到GMsgFunction函数。

wincc 全局脚本c程序功能

wincc 全局脚本c程序功能

wincc 全局脚本c程序功能
wincc全局脚本c程序实现什么功能
尤其是其中的变量d、及s_state作用。

问题补充：还有一个疑问：“当时间大于2013年9月1日后，画面将产生报警dataalm,报警dataalm2,故障fault，然后再清楚报警dataalm,dataalm2，但是故障将一直有。

”
中的fault会对系统正常运行有影响吗？
图片说明：1，wincc 全局脚本c程序解读
最佳答案
d是一个解锁密码，d为1时，清楚所有报警和故障。

s_state变量是wincc的一个变量，就是d。

当d为0时，有一个内部状态机，状态值为e，该值为0,1,2，反复循环。

当e为2时，自动清楚两个报警；
当e为1时，时间大于2013年7月1日，将产生报警dataalm；
当e为1时，时间大于2013年9月1日，将再产生一个报警dataalm2和故障fault；
也就是说，时间大于2013年7月1日，画面将反复产
生dataalm报警，然后再清楚该报警；
当时间大于2013年9月1日后，画面将产生报警dataalm,报警dataalm2,故障fault，然后再清楚报警dataalm,dataalm2，但是故障将一直有。

如何使用 WinCC 全局脚本访问系统时钟

如何使用 WinCC 全局脚本访问系统时钟

如何使用WinCC 全局脚本访问系统时钟？
说明：
使用下列函数设置或读取系统时间：
∙SetSystemTime
∙SetLocalTime
∙GetSystemTime
∙GetLocalTime
系统中本地计算机时间和格林威治时间是有区别的。

函数“SetSystemTime / GetSystemTime”用于设置或读取格林威治时间。

函数“SetLocalTime / GetLocalTime”用于设置或读取本地计算机时间。

两种时间会因地理的时区不同而改变，也会受到冬令时和夏令时的影响。

两个函数使用方法相同。

操作本地计算机时间的函数是Windows 系统函数，因此它独立于WinCC 函数“GetLocalTimeString”或WinCC 早期版本的“GetLocalTime”函数。

Time_Functions.zip
图. 01
创建环境
在该FAQ 中的画面和下载，创建在WinCC Professional V11 SP2 中。

条目号:59558655 日期:2012-05-04。

传奇及时雨脚本挖矿赚钱脚本

传奇及时雨脚本挖矿赚钱脚本

如果[待存物品][数量]>0
那么调用<自动存物>
如果[待售物品][数量]>0
那么调用<自动售物>
如果[自己][武器][名称]<>"$武器" && [$武器][数量]=0
那么调用<武器购买>
调用<武器修理>
调用<杂物购买>
调用<药品购买>
<出发>
系统显示[准备出发]
找到NPC[比奇传送员,0,330,270]
那么调用<回城>
<全局脚本结束>
<挂机脚本开始>
<回城>
关闭全局脚本
躲避PKER关闭
停止战斗
如果[0,329,268][距离]>200
那么使用[回城卷]
否则跳转到<总控>
如果[回城卷][数量]<1
那么走到[0,329,268]
等待[3000]毫秒
跳转到<回城>
<总控>
$衣服="新手衣(男)"
$武器="鹤嘴锄"
$项链="绿色项链"
$左手镯="骑士手镯"
$右手镯="骑士手镯"
$头盔="黑铁头盔"
$左戒指="力量戒指"
$右戒指="力量戒指"
<全局脚本开lt;回城>
如果[金矿][数量]>7
那么调用<回城>