%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC0%%%%%$$$$&&ABC%%%%%$$$$&&ABC XBMP ({$Ext("Trend Full Screen")}%%%%%$$$$&&ABC 0f37c3a4e014b900d5a9a0857c3f0721~~~   Dim fileName fileName = $GetAppPath() & "Web\temp.trendcfg" $FileDelete(fileName) $TrendFile2="Temp" $TrendSave2 = $Toggle($TrendSave2)Dim fileName fileName = StFunction1__(230, 0) & "Web\temp.trendcfg" Call StFunction1__(75, 1, fileName) Call StSetMnTagVal__(594, 0, 0, 0, 0, 8, 4, "", "Temp") Call StSetMnTagVal__(592, 0, 0, 0, 0, 8, 5, "", StFunction1__(251, 1, StGetMnTagVal__(592, 0, 0, 0, 0, "") ))$btrendFlag = 13Call StSetMnTagVal__(595, 0, 0, 0, 0, 8, 1, "", 1) X"Arial鸶%%%%%$$$$&&ABC*燂 %%%%%$$$$&&ABC%%%%%$$$$&&ABC+ &115811440283q133299-368239  ~ &115811440283q133299-368239"Tahoma2%%%%%$$$$&&ABC0100EditTrSet.Gridhor20"Tahoma!%%%%%$$$$&&ABC TrendDuration TrendDateTimeEditTrSet.Cursor TrendDecimal%%%%%$$$$&&ABC0100EditTrSet.Gridver20"Tahoma2%%%%%$$$$&&ABC @TrendSelChs[0].Tag {TrendSelChs[0].Label}TagTrendSelChs[0].MinimumTrendSelChs[0].Maximum%%%%%$$$$&&ABC{TrendSelChs[0].Desc}{TrendSelChs[0].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[1].Tag {TrendSelChs[1].Label}TagTrendSelChs[1].MinimumTrendSelChs[1].Maximum%%%%%$$$$&&ABC{TrendSelChs[1].Desc}{TrendSelChs[1].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[2].Tag {TrendSelChs[2].Label}TagTrendSelChs[2].MinimumTrendSelChs[2].Maximum%%%%%$$$$&&ABC{TrendSelChs[2].Desc}{TrendSelChs[2].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[3].Tag {TrendSelChs[3].Label}TagTrendSelChs[3].MinimumTrendSelChs[3].Maximum%%%%%$$$$&&ABC{TrendSelChs[3].Desc}{TrendSelChs[3].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[4].Tag {TrendSelChs[4].Label}TagTrendSelChs[4].MinimumTrendSelChs[4].Maximum%%%%%$$$$&&ABC{TrendSelChs[4].Desc}{TrendSelChs[4].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[5].Tag {TrendSelChs[5].Label}TagTrendSelChs[5].MinimumTrendSelChs[5].Maximum%%%%%$$$$&&ABC{TrendSelChs[5].Desc}{TrendSelChs[5].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[6].Tag {TrendSelChs[6].Label}TagTrendSelChs[6].MinimumTrendSelChs[6].Maximum%%%%%$$$$&&ABC{TrendSelChs[6].Desc}{TrendSelChs[6].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[7].Tag {TrendSelChs[7].Label}TagTrendSelChs[7].MinimumTrendSelChs[7].Maximum%%%%%$$$$&&ABC{TrendSelChs[7].Desc}{TrendSelChs[7].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[8].Tag {TrendSelChs[8].Label}TagTrendSelChs[8].MinimumTrendSelChs[8].Maximum%%%%%$$$$&&ABC{TrendSelChs[8].Desc}{TrendSelChs[8].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[9].Tag {TrendSelChs[9].Label}TagTrendSelChs[9].MinimumTrendSelChs[9].Maximum%%%%%$$$$&&ABC{TrendSelChs[9].Desc}{TrendSelChs[9].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[10].Tag {TrendSelChs[10].Label}TagTrendSelChs[10].MinimumTrendSelChs[10].Maximum%%%%%$$$$&&ABC{TrendSelChs[10].Desc}{TrendSelChs[10].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[11].Tag {TrendSelChs[11].Label}TagTrendSelChs[11].MinimumTrendSelChs[11].Maximum%%%%%$$$$&&ABC{TrendSelChs[11].Desc}{TrendSelChs[11].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[12].Tag {TrendSelChs[12].Label}TagTrendSelChs[12].MinimumTrendSelChs[12].Maximum%%%%%$$$$&&ABC{TrendSelChs[12].Desc}{TrendSelChs[12].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[13].Tag {TrendSelChs[13].Label}TagTrendSelChs[13].MinimumTrendSelChs[13].Maximum%%%%%$$$$&&ABCK{TrendSelChs[13].Desc}{TrendSelChs[13].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[14].Tag {TrendSelChs[14].Label}TagTrendSelChs[14].MinimumTrendSelChs[14].Maximum%%%%%$$$$&&ABC{TrendSelChs[14].Desc}{TrendSelChs[14].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[15].Tag {TrendSelChs[15].Label}TagTrendSelChs[15].MinimumTrendSelChs[15].Maximum%%%%%$$$$&&ABCK{TrendSelChs[15].Desc}{TrendSelChs[15].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[16].Tag {TrendSelChs[16].Label}TagTrendSelChs[16].MinimumTrendSelChs[16].Maximum%%%%%$$$$&&ABC{TrendSelChs[16].Desc}{TrendSelChs[16].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[17].Tag {TrendSelChs[17].Label}TagTrendSelChs[17].MinimumTrendSelChs[17].Maximum%%%%%$$$$&&ABCN{TrendSelChs[17].Desc}{TrendSelChs[17].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[18].Tag {TrendSelChs[18].Label}TagTrendSelChs[18].MinimumTrendSelChs[18].Maximum%%%%%$$$$&&ABC{TrendSelChs[18].Desc}{TrendSelChs[18].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[19].Tag {TrendSelChs[19].Label}TagTrendSelChs[19].MinimumTrendSelChs[19].Maximum%%%%%$$$$&&ABC{TrendSelChs[19].Desc}{TrendSelChs[19].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[20].Tag {TrendSelChs[20].Label}TagTrendSelChs[20].MinimumTrendSelChs[20].Maximum%%%%%$$$$&&ABCW{TrendSelChs[20].Desc}{TrendSelChs[20].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[21].Tag {TrendSelChs[21].Label}TagTrendSelChs[21].MinimumTrendSelChs[21].Maximum%%%%%$$$$&&ABCWW{TrendSelChs[21].Desc}{TrendSelChs[21].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[22].Tag {TrendSelChs[22].Label}TagTrendSelChs[22].MinimumTrendSelChs[22].Maximum%%%%%$$$$&&ABC{TrendSelChs[22].Desc}{TrendSelChs[22].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[23].Tag {TrendSelChs[23].Label}TagTrendSelChs[23].MinimumTrendSelChs[23].Maximum%%%%%$$$$&&ABC{TrendSelChs[23].Desc}{TrendSelChs[23].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[24].Tag {TrendSelChs[24].Label}TagTrendSelChs[24].MinimumTrendSelChs[24].Maximum%%%%%$$$$&&ABC{TrendSelChs[24].Desc}{TrendSelChs[24].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[25].Tag {TrendSelChs[25].Label}TagTrendSelChs[25].MinimumTrendSelChs[25].Maximum%%%%%$$$$&&ABC{TrendSelChs[25].Desc}{TrendSelChs[25].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[26].Tag {TrendSelChs[26].Label}TagTrendSelChs[26].MinimumTrendSelChs[26].Maximum%%%%%$$$$&&ABC{TrendSelChs[26].Desc}{TrendSelChs[26].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[27].Tag {TrendSelChs[27].Label}TagTrendSelChs[27].MinimumTrendSelChs[27].Maximum%%%%%$$$$&&ABCW{TrendSelChs[27].Desc}{TrendSelChs[27].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[28].Tag {TrendSelChs[28].Label}TagTrendSelChs[28].MinimumTrendSelChs[28].Maximum%%%%%$$$$&&ABCWW{TrendSelChs[28].Desc}{TrendSelChs[28].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[29].Tag {TrendSelChs[29].Label}TagTrendSelChs[29].MinimumTrendSelChs[29].Maximum%%%%%$$$$&&ABCW{TrendSelChs[29].Desc}{TrendSelChs[29].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[30].Tag {TrendSelChs[30].Label}TagTrendSelChs[30].MinimumTrendSelChs[30].Maximum%%%%%$$$$&&ABCW{TrendSelChs[30].Desc}{TrendSelChs[30].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC@TrendSelChs[31].Tag {TrendSelChs[31].Label}TagTrendSelChs[31].MinimumTrendSelChs[31].Maximum%%%%%$$$$&&ABCW{TrendSelChs[31].Desc}{TrendSelChs[31].Unit}%%%%%$$$$&&ABC50%%%%%$$$$&&ABC SelectionRemoveHide Pen StyleFFScaleLabelFxCurrent<FCursor<FChannel Unit< Min(F Max(F Valor Mn.FF Valor Mx.FFMdiaFFDesvios PadroFF QuantidadeFF  6TrendAddedPoints TrendSel.SCR TrendPointNum%%%%%$$$$&&ABCTrendIndicator"Tahoma OnLineHistoryRun/StopRun/StopPeriod Window ZoomHorizontal Zoom Vertical ZoomZoom InZoom Out Cancel ZoomLegend Properties Pen Style TrendAddPointAdd Pen Remove PenMultiple SectionsEditTrSet.CursorEnabledCursorTrendAutoScale Auto Scale TrendPrintPrint Controle Estatstico de Processo%%%%%$$$$&&ABC0  ~  Arial%%%%%$$$$&&ABC bUpdateTrend21 TrendSave2 TrendLoad2{TrendFile2}.trendcfg%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC52267820480.000000VBScript%'Variables available on this screen can be declared and initialized here. 'Procedures available on this screen can be implemented here Dim tickCount,bFlag,bFlag2 'This procedure is executed just once when this screen is open. Sub Screen_OnOpen() $TrendAutoScale = $Toggle($TrendAutoScale) tickCount = $GetTickCount() bFlag = 0 bFlag2=0 End Sub 'This procedure is executed continuously while this screen is open. Sub Screen_WhileOpen() If ($GetTickCount() > tickCount+50) And bFlag = 0 Then $TrendFile2="Temp" $TrendLoad2 = $Toggle($TrendLoad2) bFlag= 1 End If If $FindFile($GetAppPath() & "Web\temp.trendcfg") > 0 And $btrendFlag =1 And bFlag2=0 Then tickCount = $GetTickCount() bFlag2=1 End If If ($GetTickCount() > tickCount+50) And bFlag2 = 1 Then $Close("TrendScreenSize") $Open("Trend") End If End Sub 'This procedure is executed just once when this screen is closed. Sub Screen_OnClose() End Subj Dim tickCount,bFlag,bFlag2 Sub Screen_OnOpen() Call StSetMnTagVal__(575, 0, 0, 0, 0, 1, 7, "", StFunction1__(251, 1, StGetMnTagVal__(575, 0, 0, 0, 0, "") )) tickCount = StFunction1__(91, 0) bFlag = 0 bFlag2=0 End Sub Sub Screen_WhileOpen() If (StFunction1__(91, 0) > tickCount+50) And bFlag = 0 Then Call StSetMnTagVal__(594, 0, 0, 0, 0, 1, 17, "", "Temp") Call StSetMnTagVal__(593, 0, 0, 0, 0, 1, 18, "", StFunction1__(251, 1, StGetMnTagVal__(593, 0, 0, 0, 0, "") )) bFlag= 1 End If If StFunction1__(77, 1, StFunction1__(230, 0) & "Web\temp.trendcfg") > 0 And StGetMnTagVal__(595, 0, 0, 0, 0, "") =1 And bFlag2=0 Then tickCount = StFunction1__(91, 0) bFlag2=1 End If If (StFunction1__(91, 0) > tickCount+50) And bFlag2 = 1 Then Call StFunction1__(34, 1, "TrendScreenSize") Call StFunction1__(33, 1, "Trend") End If End Sub Sub Screen_OnClose() End SubSRPrrrrq?Q                                 BTRENDFLAG TRENDFILE2 TRENDSAVE2@TRENDSELCHS[0].TAG@TRENDSELCHS[10].TAG@TRENDSELCHS[11].TAG@TRENDSELCHS[12].TAG@TRENDSELCHS[13].TAG@TRENDSELCHS[14].TAG@TRENDSELCHS[15].TAG@TRENDSELCHS[16].TAG@TRENDSELCHS[17].TAG@TRENDSELCHS[18].TAG@TRENDSELCHS[19].TAG@TRENDSELCHS[1].TAG@TRENDSELCHS[20].TAG@TRENDSELCHS[21].TAG@TRENDSELCHS[22].TAG@TRENDSELCHS[23].TAG@TRENDSELCHS[24].TAG@TRENDSELCHS[25].TAG@TRENDSELCHS[26].TAG@TRENDSELCHS[27].TAG@TRENDSELCHS[28].TAG@TRENDSELCHS[29].TAG@TRENDSELCHS[2].TAG@TRENDSELCHS[30].TAG@TRENDSELCHS[31].TAG@TRENDSELCHS[3].TAG@TRENDSELCHS[4].TAG@TRENDSELCHS[5].TAG@TRENDSELCHS[6].TAG@TRENDSELCHS[7].TAG@TRENDSELCHS[8].TAG@TRENDSELCHS[9].TAG BUPDATETREND2EDITTRSET.CURSOREDITTRSET.CURSORENABLEDEDITTRSET.GRIDHOREDITTRSET.GRIDVER ONLINEHISTORYTRENDADDEDPOINTS TRENDADDPOINTTRENDAUTOSCALE TRENDDATETIME TRENDDECIMAL TRENDDURATIONTRENDINDICATOR TRENDLOAD2 TRENDPOINTNUM TRENDPRINTTRENDSELCHS[0].DESCTRENDSELCHS[0].LABELTRENDSELCHS[0].MAXIMUMTRENDSELCHS[0].MINIMUMTRENDSELCHS[0].UNITTRENDSELCHS[10].DESCTRENDSELCHS[10].LABELTRENDSELCHS[10].MAXIMUMTRENDSELCHS[10].MINIMUMTRENDSELCHS[10].UNITTRENDSELCHS[11].DESCTRENDSELCHS[11].LABELTRENDSELCHS[11].MAXIMUMTRENDSELCHS[11].MINIMUMTRENDSELCHS[11].UNITTRENDSELCHS[12].DESCTRENDSELCHS[12].LABELTRENDSELCHS[12].MAXIMUMTRENDSELCHS[12].MINIMUMTRENDSELCHS[12].UNITTRENDSELCHS[13].DESCTRENDSELCHS[13].LABELTRENDSELCHS[13].MAXIMUMTRENDSELCHS[13].MINIMUMTRENDSELCHS[13].UNITTRENDSELCHS[14].DESCTRENDSELCHS[14].LABELTRENDSELCHS[14].MAXIMUMTRENDSELCHS[14].MINIMUMTRENDSELCHS[14].UNITTRENDSELCHS[15].DESCTRENDSELCHS[15].LABELTRENDSELCHS[15].MAXIMUMTRENDSELCHS[15].MINIMUMTRENDSELCHS[15].UNITTRENDSELCHS[16].DESCTRENDSELCHS[16].LABELTRENDSELCHS[16].MAXIMUMTRENDSELCHS[16].MINIMUMTRENDSELCHS[16].UNITTRENDSELCHS[17].DESCTRENDSELCHS[17].LABELTRENDSELCHS[17].MAXIMUMTRENDSELCHS[17].MINIMUMTRENDSELCHS[17].UNITTRENDSELCHS[18].DESCTRENDSELCHS[18].LABELTRENDSELCHS[18].MAXIMUMTRENDSELCHS[18].MINIMUMTRENDSELCHS[18].UNITTRENDSELCHS[19].DESCTRENDSELCHS[19].LABELTRENDSELCHS[19].MAXIMUMTRENDSELCHS[19].MINIMUMTRENDSELCHS[19].UNITTRENDSELCHS[1].DESCTRENDSELCHS[1].LABELTRENDSELCHS[1].MAXIMUMTRENDSELCHS[1].MINIMUMTRENDSELCHS[1].UNITTRENDSELCHS[20].DESCTRENDSELCHS[20].LABELTRENDSELCHS[20].MAXIMUMTRENDSELCHS[20].MINIMUMTRENDSELCHS[20].UNITTRENDSELCHS[21].DESCTRENDSELCHS[21].LABELTRENDSELCHS[21].MAXIMUMTRENDSELCHS[21].MINIMUMTRENDSELCHS[21].UNITTRENDSELCHS[22].DESCTRENDSELCHS[22].LABELTRENDSELCHS[22].MAXIMUMTRENDSELCHS[22].MINIMUMTRENDSELCHS[22].UNITTRENDSELCHS[23].DESCTRENDSELCHS[23].LABELTRENDSELCHS[23].MAXIMUMTRENDSELCHS[23].MINIMUMTRENDSELCHS[23].UNITTRENDSELCHS[24].DESCTRENDSELCHS[24].LABELTRENDSELCHS[24].MAXIMUMTRENDSELCHS[24].MINIMUMTRENDSELCHS[24].UNITTRENDSELCHS[25].DESCTRENDSELCHS[25].LABELTRENDSELCHS[25].MAXIMUMTRENDSELCHS[25].MINIMUMTRENDSELCHS[25].UNITTRENDSELCHS[26].DESCTRENDSELCHS[26].LABELTRENDSELCHS[26].MAXIMUMTRENDSELCHS[26].MINIMUMTRENDSELCHS[26].UNITTRENDSELCHS[27].DESCTRENDSELCHS[27].LABELTRENDSELCHS[27].MAXIMUMTRENDSELCHS[27].MINIMUMTRENDSELCHS[27].UNITTRENDSELCHS[28].DESCTRENDSELCHS[28].LABELTRENDSELCHS[28].MAXIMUMTRENDSELCHS[28].MINIMUMTRENDSELCHS[28].UNITTRENDSELCHS[29].DESCTRENDSELCHS[29].LABELTRENDSELCHS[29].MAXIMUMTRENDSELCHS[29].MINIMUMTRENDSELCHS[29].UNITTRENDSELCHS[2].DESCTRENDSELCHS[2].LABELTRENDSELCHS[2].MAXIMUMTRENDSELCHS[2].MINIMUMTRENDSELCHS[2].UNITTRENDSELCHS[30].DESCTRENDSELCHS[30].LABELTRENDSELCHS[30].MAXIMUMTRENDSELCHS[30].MINIMUMTRENDSELCHS[30].UNITTRENDSELCHS[31].DESCTRENDSELCHS[31].LABELTRENDSELCHS[31].MAXIMUMTRENDSELCHS[31].MINIMUMTRENDSELCHS[31].UNITTRENDSELCHS[3].DESCTRENDSELCHS[3].LABELTRENDSELCHS[3].MAXIMUMTRENDSELCHS[3].MINIMUMTRENDSELCHS[3].UNITTRENDSELCHS[4].DESCTRENDSELCHS[4].LABELTRENDSELCHS[4].MAXIMUMTRENDSELCHS[4].MINIMUMTRENDSELCHS[4].UNITTRENDSELCHS[5].DESCTRENDSELCHS[5].LABELTRENDSELCHS[5].MAXIMUMTRENDSELCHS[5].MINIMUMTRENDSELCHS[5].UNITTRENDSELCHS[6].DESCTRENDSELCHS[6].LABELTRENDSELCHS[6].MAXIMUMTRENDSELCHS[6].MINIMUMTRENDSELCHS[6].UNITTRENDSELCHS[7].DESCTRENDSELCHS[7].LABELTRENDSELCHS[7].MAXIMUMTRENDSELCHS[7].MINIMUMTRENDSELCHS[7].UNITTRENDSELCHS[8].DESCTRENDSELCHS[8].LABELTRENDSELCHS[8].MAXIMUMTRENDSELCHS[8].MINIMUMTRENDSELCHS[8].UNITTRENDSELCHS[9].DESCTRENDSELCHS[9].LABELTRENDSELCHS[9].MAXIMUMTRENDSELCHS[9].MINIMUMTRENDSELCHS[9].UNIT