Audi assembly MP377 WinCC CN.docx

Audi assembly MP377 WinCC CN.docx

《Audi assembly MP377 WinCC CN.docx》由会员分享，可在线阅读，更多相关《Audi assembly MP377 WinCC CN.docx（10页珍藏版）》请在冰点文库上搜索。

AudiassemblyMP377WinCCCN

AudiCCAssembly

MP377WinCCflexible

RevisionIndex

no.

date

author

revision

00

28.04.2009

Frauenthaler

Creation（Version1-0）

TableofContents

1.OverviewWinCCflexible4

1.1.项目纵览5

1.2.工作区6

1.3.工具箱7

1.4.属性纵览7

2.原稿8

2.1.建立_PLC_内部释放8

2.2.Common_Fill_IDs8

2.3.MoviMot_Drive_Umrechnung8

2.4.Open_Home_Picture9

2.5.Show_Interface9

2.6.StartUpPanel9

2.7.Wair_n_sec11

1.

纵览WinCCflexible

此纵览显示了WinCCflexible的不同视窗

此单元简要描述WinCCflexible的结构，详细的细节请查阅WinCCflexible入门索引

1.1.项目纵览

如果打开WinCCflexible的项目纵览视窗在右侧

所有的附件和所有可以使用的项目编辑器一树形图分布，以及你可以进入项目属性对设备进行HMI设备的设置

通过双击一个单元（例如

MM_FTM06_Pic1_P01_P08）此单元在工作区被打开

T

1.2.工作区

在1.1段涉及的已经在工作区打开了一个单元。

在此区域就可以进行改动，如果有需要工具箱在右侧的空白区，它包括标准图形，例如一条线，文本…

如果加入一个标准框加入工作区直接拖拽

工具箱也包括复杂的图形例如显示一条信息或使用者自定义块

例如输送单元为使用者自定义块，就需要在工作区进行编辑

所有WinCCflexible单元可以设定工作区的边线

1.3.

工具箱

工具箱包括目标的选择，你可以添加到你的屏幕上，例如图形目标或操作者控制单元。

另外，工具箱也提供图书馆功能目标模板和花边的集合

1.4.属性纵览

属性纵览是用来编辑属性的，例如，屏幕的颜色，属性纵览只在个别的编辑器中才被使用

2.

原稿

2.1.Build_PLC_InternalRelease

建立一个内部的标签"_PLC_InternalRelease"

ThisscriptiscalledbyValueChangedof此原稿被叫做"_PLC_Commissioning"and"_PLC_Key_State"

的更改值

根源:

IfSmartTags（"_PanelTags\_PLC_Commissioning"）AndSmartTags（"_PanelTags\_PLC_Key_State"）Then

SmartTags（"_PanelTags\_PLC_InternalRelease"）=True

Else

SmartTags（"_PanelTags\_PLC_InternalRelease"）=False

EndIf

2.2.Common_Fill_IDs

ThisscriptisusedfortheinitializationoftheID–Numbers.

Source:

Dimi

Fori=0To200

SmartTags（"_PanelTags\_IDNumbers\_IDNumber_"&i）=i

Next

2.3.MoviMot_Drive_Umrechnung

ThecalculationfortheMoviMotdataisdoneinthisscript.

Source:

OnErrorResumeNext

SmartTags（"_PanelTags\_DetailPicture\_PT_DP_AS_V1000_SetSpeed1_Hz"）=Abs（50/1500*SmartTags（"_PanelTags\_DetailPicture\_PT_DP_AS_V1000_SetSpeed1"）*SmartTags（"_PanelTags\_DetailPicture\_PT_DP_AS_V1004_FacConv"）*SmartTags（"_PanelTags\_DetailPicture\_PT_DP_AS_V1003_FacCorr"））

SmartTags（"_PanelTags\_DetailPicture\_PT_DP_AS_V1001_SetSpeed2_Hz"）=Abs（50/1500*SmartTags（"_PanelTags\_DetailPicture\_PT_DP_AS_V1001_SetSpeed2"）*SmartTags（"_PanelTags\_DetailPicture\_PT_DP_AS_V1004_FacConv"）*SmartTags（"_PanelTags\_DetailPicture\_PT_DP_AS_V1003_FacCorr"））

SmartTags（"_PanelTags\_DetailPicture\_PT_DP_AS_V1002_SetSpeed3_Hz"）=Abs（50/1500*SmartTags（"_PanelTags\_DetailPicture\_PT_DP_AS_V1002_SetSpeed3"）*SmartTags（"_PanelTags\_DetailPicture\_PT_DP_AS_V1004_FacConv"）*SmartTags（"_PanelTags\_DetailPicture\_PT_DP_AS_V1003_FacCorr"））

2.4.Open_Home_Picture

Thisscriptopensthehomepicture.

Source:

ActivateScreenByNumberSmartTags（"__Settings\__Common\__StartPictureNumber"）,0

2.5.Show_Interface

ShowsandconfigurestheInterfacepicture

iDB_Number:

numberoftheDBatthePLCforthisinterface

Source:

IfiDB_Number>0Then

SmartTags（"_PanelTags\_Interface\_IF_DB_Number"）=iDB_Number

ActivateScreen"_Common_Pictures\_Interfaces\_IF_Interface",0

EndIf

2.6.StartUpPanel

GeneralStartupdefinitionsaredoneinthisscript（likesettingupthestartpicture,…）.

Source:

DimxWrongConfig

DimiPanelNr,iPlantNr

DimaiPanelConfiguration

'1..99:

FTM01

'101..199:

FTM02

'201..299:

FTM03

'501..599:

FTM06

'Definethestartpictureforeachpannel

'FTM01（8）

'FTM02（6）

'FTM03（9）

'FTM04（8）

'FTM05（8）

'FTM06（12）

'FTM07（5）

aiPanelConfiguration=Array（_

Array（17,17,17,17,17,17,17,17）,_

Array（17,17,17,17,17,17）,_

Array（17,17,17,17,17,17,17,17,17）,_

Array（17,17,17,17,17,17,17,17）,_

Array（17,17,17,17,17,17,17,17）,_

Array（17,17,17,17,17,17,17,17,17,17,17,17）,_

Array（17,17,17,17,17）_

）

xWrongConfig=False

SelectCaseSmartTags（"__Settings\__PanelID"）

'Dummy

Case-1:

SmartTags（"__Settings\__Common\__PanelDB"）=61

SmartTags（"__Settings\__Common\__StartPictureNumber"）=100

CaseElse

iPlantNr=SmartTags（"__Settings\__PanelID"）\100

iPanelNr=SmartTags（"__Settings\__PanelID"）Mod100

IfLBound（aiPanelConfiguration）<=iPlantNrAndUBound（aiPanelConfiguration）>=iPlantNrThen

IfIsArray（aiPanelConfiguration（iPlantNr））Then

IfLBound（aiPanelConfiguration（iPlantNr））<=iPanelNr-1AndUBound（aiPanelConfiguration（iPlantNr））>=iPanelNr-1Then

SmartTags（"__Settings\__Common\__PanelDB"）=60+iPanelNr

SmartTags（"__Settings\__Common\__StartPictureNumber"）=aiPanelConfiguration（iPlantNr）（iPanelNr-1）

Else

xWrongConfig=True

EndIf

Else

xWrongConfig=True

EndIf

Else

xWrongConfig=True

EndIf

EndSelect

IfxWrongConfig=TrueThen

SmartTags（"__Settings\__Common\__PanelDB"）=0

SmartTags（"__Settings\__Common\__StartPictureNumber"）=2

Else

SetConnectionModehmiOnline,"PLC_1"

EndIf

2.7.Wair_n_sec

Thisscriptwaitsnseconds.

ifxStart<>0thestarttimewillbeset

iMaxSecsetsthemaximumvaluefortheendtime（onlyusedwhendtStartSec=0）

Source:

DimdtNow,iInternSec

DimstrPic

IfxStart<>0Then

SmartTags（"_PanelTags\_Common\_PT_C_StartTime"）=Now

SmartTags（"_PanelTags\_Common\_PT_C_StartDelay"）=iMaxSec

SmartTags（"_PanelTags\_Common\_PT_C_ActStartDelay"）=0

EndIf

IfiSec>100Then

iInternSec=100

Else

iInternSec=iSec

EndIf

dtNow=SmartTags（"_PanelTags\_Common\_PT_C_StartTime"）

WhileDateDiff（"s",dtNow,Now）

SmartTags（"_PanelTags\_Common\_PT_C_ActStartDelay"）=DateDiff（"s",dtNow,Now）

Wend