控制GT面板屏幕
使用数据类型表中描述的变量,从PLC选择可用于激活或更改指定GT屏幕的功能块。
输入
屏幕编号
通信超时
输入/输出
通过GT上的触控操作禁用屏幕更改
激活新屏幕
GT基本通信位区域
GT基本通信字区域
输出
当屏幕未在通信超时期内切换时打开
所有用于编程此函数的输入和输出变量已在POU头中声明。 所有编程语言使用相同的POU头。
_VAR
VAR
bActivateNewPage: BOOL:=FALSE;
wNewPageNo: WORD:=0;
g_bStartPage: BOOL:=FALSE;
fbChangeScreen: GT_CtrlActivateScreen;
bHoldPage: BOOL:=FALSE;
END_VAR
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 9 ;
NETWORK_BODY
B(B_VARIN,,g_GT_WordArea,13,7,15,9,);
B(B_VARIN,,g_GT_BitArea,13,6,15,8,);
B(B_VARIN,,bActivateNewPage,13,5,15,7,);
B(B_VARIN,,bHoldPage,13,4,15,6,);
B(B_VARIN,,wNewPageNo,13,2,15,4,);
B(B_VARIN,,T#3s,13,3,15,5,);
B(B_FB,GT_ActivateScreen!,fbChangeScreen,15,1,34,9,,?BwScreenNum?BtComTimeOut?BbDisableUserChange?AbDisableUserChange?BbActivateScreen?AbActivateScreen?BdutGTBitArea?AdutGTBitArea?BdutGTWordArea?AdutGTWordArea?AbError);
L(1,0,1,9);
END_NETWORK_BODY
END_NET_WORK
END_BODY
fb_GT_ActivateScreen(wScreenNum := wNewPageNo,
tComTimeOut := T#3s,
bDisableUserChange := bHoldPage,
bActivateScreen := bActivateNewPage,
dutGTBitArea := g_GT_BitArea,
dutGTWordArea := g_GT_WordArea,
bErrorActivateScreen => bErrorActivateScreen);