CDrawGroup0&64611-33283q4529912982390 &64611-33283q4529912982390 CDrawRect&64611-57283q428991298239 &64611-57283q428991298239 {#Label:"Value:"} Arial%%%%%$$$$&&ABC0&60011-33283q430998182390 &60011-33283q43099818239 {if(Format("%f", GetTagValue(#TagName:AnalogValue_->Name))="%f", if(StrStrPos(GetTagValue(#TagName:AnalogValue_->Name), ",")>0, "ERROR", Format("%0."+Trunc(#Decimal:2)+"f", #TagName:AnalogValue_->DisplayValue)), Format("%0."+Trunc(#Decimal:2)+"f", #TagName:AnalogValue_->DisplayValue))} Arial%%%%%$$$$&&ABC0&62311-33283q5529918082390  CMouseKeyO yDim posX, posY posX = $GetCursorX() posY = $GetCursorY() $ShowInplaceInput($#TagName:AnalogValue_->Name, posX, posY) Dim posX, posY posX = StFunction1__(271, 0) posY = StFunction1__(272, 0) Call StFunction1__(338, 3, StGetMnTagVal__(39, 0, 0, 59, 0, "#TagName") , posX, posY) #Disable:0%% #Disable&62311-33283q552991808239 ... Arial%%%%%$$$$&&ABC!0&64611-33283q5989920382390 O  Dim res res = $ShowMessageBox($Ext("Are you sure you want to reset the value '" & $Format("%0." & $Trunc($#Decimal:2) & "f", $#TagName:AnalogValue_->DisplayValue) & "' ?"), 4+48, $Ext("Reset Value")) If res=6 Then $#TagName:AnalogValue_->DisplayValue = 0 End If tDim res res = StFunction1__(340, 3, StFunction1__(31, 1, "Are you sure you want to reset the value '" & StFunction1__(43, 2, "%0." & StFunction1__(7, 1, StGetMnVal__(2, "Decimal")) & "f", StGetMnTagVal__(39, 0, 0, 67, 0, "#TagName") ) & "' ?"), 4+48, StFunction1__(31, 1, "Reset Value")) If res=6 Then Call StSetMnTagVal__(39, 0, 0, 67, 0, 5, 4, "#TagName", 0) End If #Disable:0%% #Disable&64611-33283q598992038239  Arial%%%%%$$$$&&ABC! CDrawBitmap**   (  h