WINCC C語言腳本-

1、趨勢面板char * str_a = NULL;int Hi;int Lo;str_a = GetTagChar("TrendTagName1"Lo= GetTagSWord("TrendLo"Hi= GetTagSWord("TrendHi"SetPropWord(lpszPictureName,"qushi","TrendIndex",0;SetPropChar(lpszPictureName,"qushi","TrendTagName",str_a;

2、SetPropWord(lpszPictureName,"qushi","ValueAxisBeginValue",Lo; SetPropWord(lpszPictureName,"qushi","ValueAxisEndV alue",Hi; 獲取位號SetTagChar("TrendTagName1","ProcessValueArchivePT111" /Return-Type: BOOL SetTagSWord("TrendHi",200;SetT

3、agSWord("TrendLo",0;SetTagByte("Trenden",1; -調(diào)用登陸函數(shù)-#pragma code("useadmin.dll"#include "PWRT_API.H"#pragma code(if (strcmp(GetTagChar("CurrentUser",""=0PWRTLogin('c'-時間同步-void SetCpuTime(#pragma code("kernel32.dll"void Ge

4、tLocalTime(SYSTEMTIME *lpst;#pragma code(;SYSTEMTIME timeBOOL ret;/printf("Start function SetCpuTimern"GetLocalTime(&time;ret= SetTagMultiWait("%d%d%d%d%d%d%d","data_year",time.wYear-2000,"data_month",time.wMonth,"data_day",time.wDay,"data_h

5、our",time.wHour,"data_MINUTE",time.wMinute,"data_SECOND",time.wSecond,"data_FLAG",1-對話框調(diào)用-BOOL A;BOOL B;HWND hwnd=NULL;int RetMsg;A=GetTagBit("TJ_ANNIU" /Return-Type: BOOLhwnd=FindWindow(NULL,"WinCC-運行系統(tǒng)- "if (A=0RetMsg =MessageBox (hwnd, "

6、確定要停機(jī)?", "停機(jī)警告", MB_OKCANCEL|MB_SYSTEMMODAL|MB_SETFOREGROUND;if (RetMsg=IDOKSetTagBit("TJ_ANNIU",1;MessageBox (hwnd, "停機(jī)", "停機(jī)警告", MB_OK|MB_SYSTEMMODAL|MB_SETFOREGROUND;SetTagBit("TJ_ANNIU",0;else B=0;else-聲音報警-#pragma code("Winmm.dll"

7、VOID WINAPI PlaySoundA(char* pszSound,char* hmode,DWORD dwflag;#pragma code(if(GetTagFloat("LIST555">500PlaySoundA("D:DCSDATACG_winccHornHorn_Attention.wav",NULL,1;if(GetTagFloat("LIST555"<300PlaySoundA("D:DCSDATACG_winccHornalsndmgr.wav",NULL,1;-全局腳本-聲音

8、報警-#pragma code("Winmm.dll"VOID WINAPI PlaySoundA(char* pszSound,char* hmode,DWORD dwflag;#pragma code(if (GetTagBit("XY"=0if(GetTagFloat("LIST555">500 /熱井液位PlaySoundA("D:DCSDATACG_winccHorn熱井液位高1.wav",NULL,0;if(GetTagFloat("LIST555"<300 /熱井液位P

9、laySoundA("D:DCSDATACG_winccHorn熱井液位低1.wav",NULL,0;if(GetTagFloat("TE421A">100 | GetTagFloat("TE421B">100 | GetTagFloat("TE423A">100 | GetTagFloat("TE423B">100 | GetTagFloat("TE425">100 | GetTagFloat("TE427">100

10、| GetTagFloat("TE442">100 /軸瓦溫度PlaySoundA("D:DCSDATACG_winccHorn軸瓦溫度高1.wav",NULL,0;if(GetTagFloat("TIE485">45 /冷油器出口油溫PlaySoundA("D:DCSDATACG_winccHorn冷油器出口油溫高.wav",NULL,0;if(GetTagFloat("PT091"<0.5 /進(jìn)汽壓力PlaySoundA("D:DCSDATACG_winccHor

11、n蒸汽壓力低.wav",NULL,0;if(GetTagFloat("PT109">40 /真空低PlaySoundA("D:DCSDATACG_winccHorn排汽壓力高.wav",NULL,0;if(GetTagFloat("PT131"<0.13 /潤滑油壓力低PlaySoundA("D:DCSDATACG_winccHorn潤滑油壓力低1.wav",NULL,0;if(GetTagFloat("PDT213">0.05 | GetTagFloat("

12、;PDT215">0.05 | GetTagBit("PDS071"=0 | GetTagBit("PDS073"=0 /濾油器差壓PlaySoundA("D:DCSDATACG_winccHorn濾油器差壓高.wav",NULL,0;if(GetTagFloat("PT121"<0.65 /主油泵出口壓力PlaySoundA("D:DCSDATACG_winccHorn主油泵出口壓力低.wav",NULL,0;if(GetTagFloat("LIST551&qu

13、ot;<-190 /油箱油位PlaySoundA("D:DCSDATACG_winccHorn油箱油位低.wav",NULL,0;if(GetTagFloat("VE735A">52 | GetTagFloat("VE737A">52 | GetTagFloat("VE745A">52 | GetTagBit("XE202"=1 | GetTagBit("XE204"=1 | GetTagBit("XE206"=1 /振動大Play

14、SoundA("D:DCSDATACG_winccHorn軸瓦振動高.wav",NULL,0;if(GetTagFloat("ZE769">0.4 | GetTagFloat("ZE769"<-0.4 | GetTagBit("ZE208"=1 /汽機(jī)轉(zhuǎn)子軸向位移PlaySoundA("D:DCSDATACG_winccHorn軸相位移高.wav",NULL,0;if(GetTagFloat("ZDE785">3 | GetTagFloat("ZD

15、E785"<-2 | GetTagBit("VE209"=1 /汽機(jī)轉(zhuǎn)子脹差PlaySoundA("D:DCSDATACG_winccHorn脹差高.wav",NULL,0;if(GetTagFloat("AI_0094">3240 /轉(zhuǎn)速PlaySoundA("D:DCSDATACG_winccHorn汽輪機(jī)轉(zhuǎn)速高.wav",NULL,0;if(GetTagBit("DI_0175"=1 | GetTagBit("DI_0180"=1 /保護(hù)跳閘PlaySoundA("D:DCSDATACG_winccHorn發(fā)電機(jī)保護(hù)跳閘.wav",NULL,0;if(GetTagBit("DI_0177"=1 | GetTagBit("DI_0181"=1 /定子轉(zhuǎn)子一點接地PlaySoundA("D:DCSDATACG_winccHorn發(fā)電機(jī)轉(zhuǎn)子接地.wav",NULL,0;if(GetTagBit("DI_0176"=1 /過負(fù)荷PlaySoundA(&q