BMP 0 `T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`T`TUntitledp'hg'hg  `TC 5$PMControlKeyPad.CurrentButton="Ctrl02_ChangeValue" ?Call StSetTagVal__(52, 0, 18, 0, 0, 5, 1, "Ctrl02_ChangeValue");$PMControlKeyPad.CurrentButton="" ControlTrend_ChangeValueFCall StSetTagVal__(52, 0, 18, 0, 0, 5, 1, "") ControlTrend_ChangeValue`T 8PMControlTrend.Tag<>"" and PMControlTrend.Expression<>""..`T6600.000000100 100.000000d00.000000100 100.000000d'hg'hg'hg  2PMControlKeyPad.CurrentButton="Ctrl02_ChangeValue"<<`T4Ctrl02_ChangeValue=00.000000100 100.000000d00.000000100 100.000000d Arial*ed*ed  Arial 0;@ 0;@ Change Courier New @3P @3P Value Courier Newhh  `TC 0$PMControlKeyPad.CurrentButton="Ctrl02_Next" :Call StSetTagVal__(52, 0, 18, 0, 0, 6, 1, "Ctrl02_Next") 4$PMControlKeyPad.CurrentButton="" ControlTrend_Next?Call StSetTagVal__(52, 0, 18, 0, 0, 6, 1, "") ControlTrend_Next`Thhh  +PMControlKeyPad.CurrentButton="Ctrl02_Next"..`T4Ctrl02_Next=00.000000100 100.000000d00.000000100 100.000000d Arialee  Arial + + Next Courier Newghgh  `TC 4$PMControlKeyPad.CurrentButton="Ctrl02_Previous" >Call StSetTagVal__(52, 0, 18, 0, 0, 7, 1, "Ctrl02_Previous") 8$PMControlKeyPad.CurrentButton="" ControlTrend_PreviousCCall StSetTagVal__(52, 0, 18, 0, 0, 7, 1, "") ControlTrend_Previous`Tghghgh  /PMControlKeyPad.CurrentButton="Ctrl02_Previous"66`T4Ctrl02_Previous=00.000000100 100.000000d00.000000100 100.000000d Arialjeje  Arial K K Previous Courier New`TCVBScriptK' Here you can declare variables and procedures and implement Line2=' some pre-defined procedures for screen. ' Declaration of variables ' Declaration of procedures ' Initialization of variables and tags Line9= Line10=' Implementation of pre-defined procedures. ' Note: The name of them can NOT be changed. ' This function is called when the screen is open. Sub Screen_OnOpen() End Sub ' This function is called while the screen is open. Sub Screen_WhileOpen() End Sub ' This function is called when the screen is closed. Sub Screen_OnClose() End Subk Sub Screen_OnOpen() End Sub Sub Screen_WhileOpen() End Sub Sub Screen_OnClose() End Sub`TC466PMControlKeyPad.CurrentButtonPMControlTrend.ExpressionPMControlTrend.Tag