WINCC动画脚本集萃

1、WINCC电机风扇旋转（几何-初步角度）：#includelong_main(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName)staticDWORDf=20;if(GetTagBit(DI电机运行信号)f=f+30;if(f=360)(f=0);returnf;电机风扇旋转（几何-结束角度）：#includelong_main(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName)staticDWORDi=80;if(GetTagBit(DI电机

2、运行信号)i=i+30;if(i=360)(i=0);returni;*物料水平右搬动（几何-地址X）（停车后，物料回到原点）*#includelong_main(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName)staticinta=350;if(GetTagBit(DI电机运行信号)&(a=720)(a=350);if(!GetTagBit(DI电机运行信号)(a=350);returna;物料水平右搬动（几何-地址X）（停车后，物料停在该点）#includelong_main(char*lpszPictureNa

3、me,char*lpszObjectName,char*lpszPropertyName)staticinta=350;if(GetTagBit(DI电机运行信号)&(a=720)(a=350);returna;物料向上搬动（几何-地址Y）（停车后，物料停在该点）#includelong_main(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName)staticintb=450;if(GetTagBit(DI电机运行信号)&(b=290)b-=10;if(btm_year-100+2000,ptm-tm_mon+1,pt

4、m-tm_mday);return(p);时分秒（静态文本）#includechar*_main(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName)time_ttimer;structtm*ptm;char*p;time(&timer);ptm=localtime(&timer);p=SysMalloc(9);sprintf(p,%02d:%02d:%02d,ptm-tm_hour,ptm-tm_min,ptm-tm_sec);return(p);登陆到指定的用户名不用手动输入（按钮操作）#includevoidOnL

5、ButtonDown(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName,UINTnFlags,intx,inty)#pragmacode()#include#pragmacode()PWRTSilentLogin(用户名,口令);*显示登陆对话框不用热键（按钮操作）*#includevoidOnLButtonDown(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName,UINTnFlags,intx,inty)#pragmacode()#incl

6、ude#pragmacode()PWRTLogin(c);退出WINCC运行（按钮操作）#includevoidOnLButtonDown(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName,UINTnFlags,intx,inty)DeactivateRTProject();单位递加按钮（到上限不提示出错）#includevoidOnClick(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName)DWORDvalue;value=GetTagDW

7、ord(AI标签);if(value90)(value=elsevalue=value+10;上限);SetTagDWord(AI标签,value);单位递减按钮（到下限不提示出错）#includevoidOnClick(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName)DWORDvalue;value=GetTagDWord(AI标签);if(value10)(value=elsevalue=value-10;下限);SetTagDWord(AI标签,value);*单位递加按钮（到上限提示出错）*#includev

8、oidOnClick(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName)DWORDvalue;HWNDhWnd=NULL;hWnd=FindWindow(NULL,Wincc-运行系统-);value=GetTagDWord(AI标签);if(value0)(value=value-10);elseMessageBox(hWnd,已到达下限值！,错误,MB_OK|MB_ICONWARNING|MB_APPLMODAL);SetTagDWord(AI标签,value);*自动登陆到指定的用户（画面属性-其他授权）*#in

9、cludelong_main(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName)#pragmacode()#include#pragmacode()PWRTSilentLogin(用户名,口令);return(0X0);*咨询框（最好用于单机启动，组启也可，2个按钮，NO不操作）*#includevoidOnLButtonDown(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName,UINTnFlags,intx,inty)HWNDhWnd=NU

10、LL;int上位启动信号;hWnd=FindWindow(NULL,WinCCC-Course);if(GetTagBit(DI备妥)上位启动信号=MessageBox(hWnd,电源已备妥，您现在确定要启动吗,启动！,MB_YESNO|MB_ICONQUESTION|MB_APPLMODAL);printf(rnExample3rn);if(上位启动信号=IDNO)(printf(UserselectedNObuttonrn);else(SetTagByte(上位启动信号,1);elseMessageBox(hWnd,电源未备妥，请查证后重试！,启动！,MB_OK|MB_ICONHAND|M

11、B_APPLMODAL);*咨询框（最好用于单机启动，组启也可，3个按钮，NO复位）*#includevoidOnLButtonDown(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName,UINTnFlags,intx,inty)HWNDhWnd=NULL;int上位启动信号;hWnd=FindWindow(NULL,WinCCC-Course);if(GetTagBit(DI备妥)上位启动信号=MessageBox(hWnd,电源已备妥，您现在确定要启动吗,启动！,MB_YESNOCANCEL|MB_ICONQUES

12、TION|MB_APPLMODAL);if(上位启动信号=IDCANCEL)(printf(UserselectedNObuttonrn);elseif(上位启动信号=IDYES)(SetTagByte(上位启动信号,1);else(SetTagByte(上位启动信号,0);elseMessageBox(hWnd,电源未备妥，请查证后重试！,启动！,MB_OK|MB_ICONHAND|MB_APPLMODAL);*搅拌器左侧扇页（几何宽度）*#includelong_main(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyN

13、ame)staticinth=50;staticintu=0;if(GetTagBit(DI电机运行信号)if(h0)&(h=0)&(u=75)&(h125)(h+=2);returnh;if(u75)(u-=2);returnu;u=125;h=75;returnh;returnu;if(!GetTagBit(DI电机运行信号)h=75;u=125;returnh;returnu;*显示层按钮*SubX6309X94AE2X0000X0000_X6309X94AE2X0000X60C5_X6309X94AE2X0000X653E_OnLButtonDown(ByValItem,ByValFl

14、ags,ByValx,ByValy)DimobjScreenDimCountLayerSetobjScreen=(layer)ForCountLayer=1To32Step1(CountLayer).Visible=vbFalseNext(n).Visible=vbTrueEndSubn=层数+1初始画面程序（画面空地-属性-事件-其他-打开画面-动作）*打印按钮*#includevoidOnLButtonDown(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName,UINTnFlags,intx,inty)WinExec(-hardcopy,SW_SHOWNORMAL);*一个圈代表电机两种状态*#includevoidOnClick(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName)char*opentag=DI1电机运行信号;char*closetag=DI2电机运行信号;BOOLopen,close;open=GetTagBit(o