WINCC动画脚本集萃Word文档下载推荐.docx
- 文档编号:22266138
- 上传时间:2023-02-03
- 格式:DOCX
- 页数:13
- 大小:16.35KB
WINCC动画脚本集萃Word文档下载推荐.docx
《WINCC动画脚本集萃Word文档下载推荐.docx》由会员分享,可在线阅读,更多相关《WINCC动画脚本集萃Word文档下载推荐.docx(13页珍藏版)》请在冰豆网上搜索。
)){
i=i+30;
if(i==360)(i=0);
returni;
**物料水平右移动(几何---位置X)(停车后,物料回到原点)**
int
a=350;
)
&
&
(a<
=730))
a+=20;
if(a>
=720)
(a=350);
}
if(!
GetTagBit("
returna;
物料水平右移动(几何---位置X)(停车后,物料停在该点)
if
(a>
}
物料向上移动(几何---位置Y)(停车后,物料停在该点)
b=450;
(b>
=290))
b-=10;
(b<
=280)
(b=450);
returnb;
年月日(静态文本)
char*_main(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName)
time_t
timer;
structtm*ptm;
char*p;
time(&
timer);
ptm=localtime(&
p=SysMalloc(9);
sprintf(p,"
%04d/%02d/%02d"
ptm->
tm_year-100+2000,ptm->
tm_mon+1,ptm->
tm_mday);
return(p);
时分秒(静态文本)
%02d:
%02d"
tm_hour,ptm->
tm_min,ptm->
tm_sec);
登陆到指定的用户名无须手动输入(按钮操作)
voidOnLButtonDown(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName,UINTnFlags,intx,inty)
#pragmacode("
useadmin.dll"
)
PWRT_API.H"
#pragmacode()
PWRTSilentLogin("
用户名"
"
口令"
);
**显示登陆对话框无须热键(按钮操作)**
#pragmacode("
PWRT_api.h"
#pragmacode()
PWRTLogin('
c'
退出WINCC运行(按钮操作)
{
DeactivateRTProject();
单位递增按钮(到上限不提示出错)
voidOnClick(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName)
DWORDvalue;
value=GetTagDWord("
AI标签"
if(value>
90)(value=上限);
elsevalue=value+10;
SetTagDWord("
value);
单位递减按钮(到下限不提示出错)
if(value<
10)(value=下限);
elsevalue=value-10;
**单位递增按钮(到上限提示出错)**
HWNDhWnd=NULL;
hWnd=FindWindow(NULL,"
Wincc-运行系统-"
=90)(value=value+10);
elseMessageBox(hWnd,"
已到达上限值!
"
"
错误"
MB_OK|MB_ICONWARNING|MB_APPLMODAL);
**单位递减按钮(到下限提示出错)**
0)(value=value-10);
已到达下限值!
错误"
**自动登陆到指定的用户(画面属性--其它—授权)**
return(0X0);
**询问框(最好用于单机启动,组启也可,2个按钮,NO不操作)**
HWNDhWnd=NULL;
int上位启动信号;
WinCCC-Course"
if(GetTagBit("
DI备妥"
))
上位启动信号=MessageBox(hWnd,"
电源已备妥,您现在确定要启动吗?
启动!
MB_YESNO|MB_ICONQUESTION|MB_APPLMODAL);
printf("
\r\nExample3\r\n"
if(上位启动信号==IDNO)
(printf("
UserselectedNObutton\r\n"
));
else(SetTagByte("
上位启动信号"
1));
else
MessageBox(hWnd,"
电源未备妥,请查证后重试!
MB_OK|MB_ICONHAND|MB_APPLMODAL);
**询问框(最好用于单机启动,组启也可,3个按钮,NO复位)**
int上位启动信号;
电源已备妥,您现在确定要启动吗?
MB_YESNOCANCEL|MB_ICONQUESTION|MB_APPLMODAL);
if(上位启动信号==IDCANCEL)
else
{
if
(上位启动信号==IDYES)
(SetTagByte("
else
0));
}
电源未备妥,请查证后重试!
**搅拌器左侧扇页(几何—宽度)**
h=50;
u=0;
if((h>
0)&
(h<
=50))
(h-=2);
returnh;
if((u>
=0)&
(u<
50))
(u+=2);
returnu;
u=0;
h=50;
)){
**搅拌器左侧扇页(几何—位置X,右侧扇页没有位置变化)**
h=75;
u=125;
=75)&
125))
(h+=2);
if((u<
=125)&
(u>
75))
(u-=2);
u=125;
h=75;
**显示层按钮**
SubX6309X94AE2X0000X0000_X6309X94AE2X0000X60C5_X6309X94AE2X0000X653E_OnLButtonDown(ByValItem,ByValFlags,ByValx,ByValy)
DimobjScreen
DimCountLayer
SetobjScreen=HMIRuntime.Screens("
layer"
ForCountLayer=1To32Step1
objScreen.Layers(CountLayer).Visible=vbFalse
Next
objScreen.Layers(n).Visible=vbTrue
EndSub
n=层数+1
初始画面程序(画面空地--属性--事件--其它--打开画面--动作)
**打印按钮**
WinExec("
PRTSCR.EXE-hardcopy"
SW_SHOWNORMAL);
**一个圈代表电机两种状态**
char*opentag="
DI1电机运行信号"
;
char*closetag="
DI2电机运行信号"
BOOLopen,close;
open=GetTagBit(opentag);
close=GetTagBit(closetag);
if(open)
returnCO_GREEN;
if(close)
returnCO_BLUE;
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- WINCC 动画 脚本