加载中…
个人资料
微博
  • 博客等级：
  • 博客积分：
  • 博客访问：
  • 关注人气：
  • 获赠金笔：0支
  • 赠出金笔：0支
  • 荣誉徽章：
正文 字体大小：大 中 小

WINCC常用C脚本

(2012-06-13 11:15:34)
标签：

wincc

脚本

c

文化

 分类： 自动控制

WINCC动画脚本
电机风扇旋转（几何---起始角度）：

#include "apdefap.h"

long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

static  DWORD  f=20;

if  (GetTagBit("DI电机运行信号"))  {     

f= f+30;

if (f==360) (f=0);

}

return f;

}

电机风扇旋转（几何---结束角度）：

#include "apdefap.h"

long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

static  DWORD  i=80;

if  (GetTagBit("DI电机运行信号")) {       

i = i+30;

if (i==360) (i=0);

}

return i;

}

**物料水平右移动（几何---位置X）（停车后，物料回到原点）**

#include "apdefap.h"

long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

static  int  a=350;

if  (GetTagBit("DI电机运行信号")  && (a<=730))  { 

   a+=20;

if (a>=720)  (a=350);

}

if (!GetTagBit("DI电机运行信号"))  (a=350);  

return a;

}

物料水平右移动（几何---位置X）（停车后，物料停在该点）

#include "apdefap.h"

long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

static  int  a=350;

if  (GetTagBit("DI电机运行信号")  && (a<=730))  { 

   a+=20;

if  (a>=720)  (a=350);

}    

return a;

}

 

物料向上移动（几何---位置Y）（停车后，物料停在该点）

#include "apdefap.h"

long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

static  int  b=450;

if  (GetTagBit("DI电机运行信号")  && (b>=290))  { 

   b-=10;

if  (b<=280)  (b=450);

}    

return b;

}

年月日（静态文本）

#include "apdefap.h"

char* _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

time_t  timer ;

struct tm *ptm;

char *p;

time(&timer);

ptm =localtime(&timer);

p =SysMalloc(9);

sprintf(p,"d/d/d",ptm->tm_year-100+2000,ptm->tm_mon+1,ptm->tm_mday);

return(p);

}

 

时分秒（静态文本）

#include "apdefap.h"

char* _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

time_t  timer ;

struct tm *ptm;

char *p;

time(&timer);

ptm =localtime(&timer);

p =SysMalloc(9);

sprintf(p,"d:d:d",ptm->tm_hour,ptm->tm_min,ptm->tm_sec);     

return(p);

}

登陆到指定的用户名无须手动输入（按钮操作）

#include "apdefap.h"

void OnLButtonDown(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName, UINT nFlags, int x, int y)

{

#pragma code("useadmin.dll")

#include "PWRT_API.H"

#pragma code()

PWRTSilentLogin("用户名", "口令");

}

 

**显示登陆对话框无须热键（按钮操作）**

#include "apdefap.h"

void OnLButtonDown(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName, UINT nFlags, int x, int y)

{

#pragma code ("useadmin.dll")

#include "PWRT_api.h"

#pragma code( )

  PWRTLogin('c');

}

 

退出WINCC运行（按钮操作）

#include "apdefap.h"

void OnLButtonDown(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName, UINT nFlags, int x, int y)

{

{

  DeactivateRTProject ();

}

}

单位递增按钮（到上限不提示出错）

#include "apdefap.h"

void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

DWORD value;

value=GetTagDWord("AI标签"); 

if (value>90) (value=上限);

else value=value+10;

SetTagDWord("AI标签",value);   

}

单位递减按钮（到下限不提示出错）

#include "apdefap.h"

void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

DWORD value;

value=GetTagDWord("AI标签"); 

if (value<10) (value=下限);

else value=value-10;

SetTagDWord("AI标签",value);   

}

**单位递增按钮（到上限提示出错）**

#include "apdefap.h"

void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

DWORD value;

HWND hWnd=NULL ; 

hWnd=FindWindow(NULL,"Wincc-运行系统- ");

value=GetTagDWord("AI标签"); 

if (value<=90) (value=value+10);

else MessageBox(hWnd,"已到达上限值！","错误",MB_OK|MB_ICONWARNING|MB_APPLMODAL);

SetTagDWord("AI标签",value);   

}

 

**单位递减按钮（到下限提示出错）**

#include "apdefap.h"

void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

DWORD value;

HWND hWnd=NULL ; 

hWnd=FindWindow(NULL,"Wincc-运行系统- ");

value=GetTagDWord("AI标签"); 

if (value>0) (value=value-10);

else MessageBox(hWnd," 已到达下限值！"," 错误",MB_OK|MB_ICONWARNING|MB_APPLMODAL);

SetTagDWord("AI标签",value);   

}

**自动登陆到指定的用户（画面属性--其它—**）**

#include "apdefap.h"

long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

#pragma code("useadmin.dll")

#include "PWRT_API.H"

#pragma code()

PWRTSilentLogin("用户名", "口令");

return(0X0);

}

 

**询问框（最好用于单机启动，组启也可，2个按钮，NO不操作）**

#include "apdefap.h"

void OnLButtonDown(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName, UINT nFlags, int x, int y)

{

HWND hWnd=NULL;

int 上位启动信号;

hWnd=FindWindow(NULL,"WinCC C-Course");

if (GetTagBit("DI备妥"))

{

上位启动信号=MessageBox(hWnd,"电源已备妥，您现在确定要启动吗？","启动！",

                MB_YESNO|MB_ICONQUESTION|MB_APPLMODAL);

printf("\r\nExample 3\r\n");

    if (上位启动信号==IDNO)   (printf("User selected NO button \r\n"));

    else (SetTagByte("上位启动信号",1));

}

else

MessageBox(hWnd,"电源未备妥，请查证后重试！","启动！",

           MB_OK|MB_ICONHAND|MB_APPLMODAL);

}

**询问框（最好用于单机启动，组启也可，3个按钮，NO复位）**

#include "apdefap.h"

void OnLButtonDown(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName, UINT nFlags, int x, int y)

{

HWND hWnd=NULL;

int上位启动信号;

hWnd=FindWindow(NULL,"WinCC C-Course");

if (GetTagBit("DI备妥"))

{

上位启动信号=MessageBox(hWnd," 电源已备妥，您现在确定要启动吗？","启动！",

                        MB_YESNOCANCEL|MB_ICONQUESTION|MB_APPLMODAL);

    if (上位启动信号==IDCANCEL)   (printf("User selected NO button \r\n")); 

    else

         {

          if  (上位启动信号==IDYES)  (SetTagByte("上位启动信号",1));

          else  (SetTagByte("上位启动信号",0));

          }

}

else

MessageBox(hWnd," 电源未备妥，请查证后重试！","启动！",

           MB_OK|MB_ICONHAND|MB_APPLMODAL);

}

 

**搅拌器左侧扇页（几何—宽度）**

#include "apdefap.h"

long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

static  int  h=50;

static  int  u=0;

if (GetTagBit("DI电机运行信号"))

{

if ((h>0)&&(h<=50))

{

(h-=2);

return h;

}

if ((u>=0)&&(u<50))

{

(u+=2);

return u;

}

u=0;

h=50;

return h;

return u;

}

if (!GetTagBit("DI电机运行信号")){

h=50;

u=0;

return h;

return u;

}

}

**搅拌器左侧扇页（几何—位置X，右侧扇页没有位置变化）**

#include "apdefap.h"

long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

static  int  h=75;

static  int  u=125;

if (GetTagBit("DI电机运行信号"))

{

if ((h>=75)&&(h<125))

{

(h+=2);

return h;

}

 

if ((u<=125)&&(u>75))

{

(u-=2);

return u;

}

u=125;

h=75;

return h;

return u;

}

if (!GetTagBit("DI电机运行信号")){

h=75;

u=125;

return h;

return u;

}

}

**显示层按钮**

Sub X6309X94AE2X0000X0000_X6309X94AE2X0000X60C5_X6309X94AE2X0000X653E_OnLButtonDown(ByVal Item, ByVal Flags, ByVal x, ByVal y)        

Dim objScreen

Dim CountLayer

Set objScreen = HMIRuntime.Screens("layer")

For CountLayer=1 To 32 Step 1

objScreen.Layers(CountLayer).Visible = vbFalse

Next

objScreen.Layers(n).Visible = vbTrue

End Sub

 

n=层数+1

初始画面程序（画面空地--属性--事件--其它--打开画面--动作）

 

**打印按钮**

#include "apdefap.h"

void OnLButtonDown(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName, UINT nFlags, int x, int y)

{

WinExec("PRTSCR.EXE -hardcopy",SW_SHOWNORMAL);

}

 

**一个圈代表电机两种状态**

#include "apdefap.h"

void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

char* opentag="DI1电机运行信号";

       char* closetag="DI2电机运行信号";

       BOOL open,close;

       open = GetTagBit(opentag);

       close = GetTagBit(closetag);

       if (open)

       return CO_GREEN;

       if (close)

       return CO_BLUE;

}

喜欢

0

阅读┊ 收藏 ┊ 喜欢▼ ┊打印┊举报/Report
前一篇：幸福的吃货
后一篇：WINCC常用功能
  

新浪BLOG意见反馈留言板　欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

Copyright © 1996 - 2022 SINA Corporation, All Rights Reserved

新浪公司 版权所有