wicc工程設計--基于wincc的運料小車空寂系統(tǒng)監(jiān)控界面設計.

1、工業(yè)組態(tài)課程設計 基于WinCC的運料小車空寂系統(tǒng)監(jiān)控界面設計1、 內(nèi)部變量2、內(nèi)部變量數(shù)據(jù)類型名稱作用flag1 二進制單動標志位控制單動flag2二進制自動標志位控制自動xiaochex無符號16位小車位置控制小車位置qianxiankaiguan二進制前限位開關限位開關houxiankaiguan 二進制后限位開關限位開關cheshachuxian二進制車沙出現(xiàn)控制小車沙出現(xiàn)loudoushanxiaoshi二進制漏斗沙控制漏斗沙出現(xiàn)T5無符號16位定時5S定時T7無符號16位定時7S定時loudoumen二進制漏斗門控制漏斗門xiaochemen二進制小車門控制小車門2、按鈕C動作程序

2、自動： SetTagDWord("flag1",1);單動： SetTagDWord("flag2",1);停止： SetTagDWord("flag1",0); SetTagDWord("flag1",0);復位： SetTagDWord("flag1",0); SetTagDWord("flag1",0);SetTagDWord("xiaochex",0);3、腳本程序a、單動程序：#include "apdefap.h"int g

3、scAction( void ) DWORD value,valueT5,valueT7; int bit1; SetTagDWord("T5",50); SetTagDWord("T7",70);SetTagDWord("loudoushanxiaoshi",1); bit1=GetTagDWord("flag1"); while(bit1) bit1=GetTagDWord("flag1"); value=GetTagDWord("xiaochex"); value+=1

4、0; if(value>640) value=640; SetTagDWord("xiaochex",value); SetTagDWord("qianxiankaiguan",1); /前限位開關變色 SetTagDWord("loudoumen",30); /漏斗門開 SetTagDWord("loudoushanxiaoshi",0); /漏斗沙消失 SetTagDWord("cheshachuxian",1); /車沙出現(xiàn) while(bit1) valueT7=GetTagDWo

5、rd("T7"); /定時7S valueT7-=1; if(valueT7<=0) valueT7=0; SetTagDWord("T7",valueT7); /車沙出現(xiàn) SetTagDWord("loudoumen",0); /漏斗門開關SetTagDWord("loudoushanxiaoshi",1); /漏斗沙出現(xiàn) SetTagDWord("qianxiankaiguan",0); /前限位開關變還色 while(bit1) value=GetTagDWord("xia

6、ochex"); value-=10; if(value<=0) value=0;SetTagDWord("xiaochex",value); while(bit1) SetTagDWord("xiachemen",1); /che門開 SetTagDWord("houxiankaiguan",1); /hou限位開關變色 valueT5=GetTagDWord("T5"); /定時5S valueT5-=1; if(valueT5<=0) valueT5=0; SetTagDWord(&qu

7、ot;cheshachuxian",0); SetTagDWord("houxiankaiguan",0); /hou限位開關huan色 SetTagDWord("xiachemen",0); SetTagDWord("flag1",0); SetTagDWord("T5",valueT5);bit1=GetTagDWord("flag1"); SetTagDWord("xiaochex",value); bit1=GetTagDWord("flag1&q

8、uot;); SetTagDWord("T7",valueT7); bit1=GetTagDWord("flag1"); SetTagDWord("xiaochex",value); bit1=GetTagDWord("flag1"); return 0; b、自動程序：#include "apdefap.h"int gscAction( void ) DWORD value,valueT5,valueT7; int bit1; while(bit2)SetTagDWord("T5&q

9、uot;,50); SetTagDWord("T7",70);SetTagDWord("loudoushanxiaoshi",1); bit1=GetTagDWord("flag2"); while(bit1) bit1=GetTagDWord("flag2"); value=GetTagDWord("xiaochex"); value+=10; if(value>640) value=640; SetTagDWord("xiaochex",value); SetTag

10、DWord("qianxiankaiguan",1); /前限位開關變色 SetTagDWord("loudoumen",30); /漏斗門開 SetTagDWord("loudoushanxiaoshi",0); /漏斗沙消失 SetTagDWord("cheshachuxian",1); /車沙出現(xiàn) while(bit1) valueT7=GetTagDWord("T7"); /定時7S valueT7-=1; if(valueT7<=0) valueT7=0; SetTagDWord

11、("T7",valueT7); /車沙出現(xiàn) SetTagDWord("loudoumen",0); /漏斗門開關SetTagDWord("loudoushanxiaoshi",1); /漏斗沙出現(xiàn) SetTagDWord("qianxiankaiguan",0); /前限位開關變還色 while(bit1) value=GetTagDWord("xiaochex"); value-=10; if(value<=0) value=0;SetTagDWord("xiaochex&qu

12、ot;,value); while(bit1) SetTagDWord("xiachemen",1); /che門開 SetTagDWord("houxiankaiguan",1); /hou限位開關變色 valueT5=GetTagDWord("T5"); /定時5S valueT5-=1; if(valueT5<=0) valueT5=0; SetTagDWord("cheshachuxian",0); SetTagDWord("houxiankaiguan",0); /hou限位開關huan色 SetTagDWord("xiachemen",0); SetTagDWord("flag2",0); SetTagDWord("T5",valueT5);bit1=GetTagDWord("flag2"); SetTagDWord("xiaochex",value); bit1=GetTagDWord("flag2"); SetTagDWord("T7&qu