%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC0%%%%%$$$$&&ABC%%%%%$$$$&&ABC XBMP RunMath[24]16 hh RunMath[24]06 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh(%%%%%$$$$&&ABC 0f37c3a4e014b900d5a9a0857c3f0721G:  R  Arial%%%%%$$$$&&ABC@f A Value Arial%%%%%$$$$&&ABCs@f&8081121283q974992438239 @&8081121283q974992438239 Unit Arial%%%%%$$$$&&ABCt@f&7431121283q776991108239 ?&7431121283q776991108239 Label Arial%%%%%$$$$&&ABC@f > Channel Arial%%%%%$$$$&&ABCU@f&5481121283q42899-438239 =&5481121283q42899-438239 Category Arial%%%%%$$$$&&ABCV@f&4571121283q26699-1148239 <&4571121283q26699-1148239  Arial%%%%%$$$$&&ABCV@f&4571121283q26699-1148239 Q&4571121283q26699-1148239 Instrument Arial%%%%%$$$$&&ABC3 H  Arial%%%%%$$$$&&ABCl&73511408283q157099-7028239l  sLblCmb[7]h0.0000000.000000h nSpyDevSel[7]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&73511408283q157099-7028239###############1 Courier New%%%%%$$$$&&ABCw&80211408283q176899-5718239w  sUnitCmb[7]h0.0000000.000000h nSpyDevSel[7]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&80211408283q176899-5718239#######1 Courier New%%%%%$$$$&&ABC;)&62011-40283q36499298239;) &62011-40283q36499298239;);(&61911-41283q36299298239;( &61911-41283q36299298239Start and Stop Spy"Arial%%%%%$$$$&&ABC<)&62011-40283q36699288239<) &62011-40283q36699288239Start and Stop Spy"Arial%%%%%$$$$&&ABCl&7351165283q88499-168239l  sLblCmb[0]h0.0000000.000000h nSpyDevSel[0]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000 &7351165283q88499-168239###############1 Courier New%%%%%$$$$&&ABCw&8021165283q1082991158239w  sUnitCmb[0]h0.0000000.000000h nSpyDevSel[0]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000 &8021165283q1082991158239#######1 Courier New%%%%%$$$$&&ABCl&73511114283q98299-1148239l  sLblCmb[1]h0.0000000.000000h nSpyDevSel[1]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&73511114283q98299-1148239###############1 Courier New%%%%%$$$$&&ABCw&80211114283q118099178239w  sUnitCmb[1]h0.0000000.000000h nSpyDevSel[1]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&80211114283q118099178239#######1 Courier New%%%%%$$$$&&ABCl&73511163283q108099-2128239l  sLblCmb[2]h0.0000000.000000h nSpyDevSel[2]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&73511163283q108099-2128239###############1 Courier New%%%%%$$$$&&ABCw&80211163283q127899-818239w  sUnitCmb[2]h0.0000000.000000h nSpyDevSel[2]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&80211163283q127899-818239#######1 Courier New%%%%%$$$$&&ABCl%&73511212283q117899-3108239l'  sLblCmb[3]h0.0000000.000000h nSpyDevSel[3]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&73511212283q117899-3108239###############1 Courier New%%%%%$$$$&&ABCw%&80211212283q137699-1798239w&  sUnitCmb[3]h0.0000000.000000h nSpyDevSel[3]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&80211212283q137699-1798239#######1 Courier New%%%%%$$$$&&ABClFV&73511261283q127699-4088239lHX  sLblCmb[4]h0.0000000.000000h nSpyDevSel[4]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&73511261283q127699-4088239###############1 Courier New%%%%%$$$$&&ABCwFV&80211261283q147499-2778239wGW  sUnitCmb[4]h0.0000000.000000h nSpyDevSel[4]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&80211261283q147499-2778239#######1 Courier New%%%%%$$$$&&ABClw&73511310283q137499-5068239ly  sLblCmb[5]h0.0000000.000000h nSpyDevSel[5]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&73511310283q137499-5068239###############1 Courier New%%%%%$$$$&&ABCww&80211310283q157299-3758239wx  sUnitCmb[5]h0.0000000.000000h nSpyDevSel[5]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&80211310283q157299-3758239#######1 Courier New%%%%%$$$$&&ABCl&73511359283q147299-6048239l  sLblCmb[6]h0.0000000.000000h nSpyDevSel[6]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&73511359283q147299-6048239###############1 Courier New%%%%%$$$$&&ABCw&80211359283q167099-4738239w  sUnitCmb[6]h0.0000000.000000h nSpyDevSel[6]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&80211359283q167099-4738239#######1 Courier New%%%%%$$$$&&ABC&8971165283q1240991788239  result[0]h0.0000000.000000h  nSpyDevSel[0]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&8971165283q1240991788239 ###########1 Courier New%%%%%$$$$&&ABC&89711408283q192699-5088239  result[7]h0.0000000.000000h  nSpyDevSel[7]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&89711408283q192699-5088239 ###########1 Courier New%%%%%$$$$&&ABC&89711114283q133899808239  result[1]h0.0000000.000000h  nSpyDevSel[1]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&89711114283q133899808239 ###########1 Courier New%%%%%$$$$&&ABC&89711163283q143699-188239  result[2]h0.0000000.000000h  nSpyDevSel[2]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&89711163283q143699-188239 ###########1 Courier New%%%%%$$$$&&ABC%&89711212283q153499-1168239&  result[3]h0.0000000.000000h  nSpyDevSel[3]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&89711212283q153499-1168239 ###########1 Courier New%%%%%$$$$&&ABCFV&89711261283q163299-2148239GW  result[4]h0.0000000.000000h  nSpyDevSel[4]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000&89711261283q163299-2148239 ###########1 Courier New%%%%%$$$$&&ABCw&89711310283q173099-3128239x  result[5]h0.0000000.000000h  nSpyDevSel[5]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000 &89711310283q173099-3128239 ###########1 Courier New%%%%%$$$$&&ABC&89711359283q182899-4108239  result[6]h0.0000000.000000h  nSpyDevSel[6]h00.00000011.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.0000000.000000!&89711359283q182899-4108239 ###########1 Courier New%%%%%$$$$&&ABCVi&45711438283q72499-1968239 B&45711438283q72499-1968239  Arial%%%%%$$$$&&ABCUi C  Arial%%%%%$$$$&&ABCi&61011438283q103899-358239 D&61011438283q103899-358239  Arial%%%%%$$$$&&ABCti&74311438283q123499288239 E&74311438283q123499288239  Arial%%%%%$$$$&&ABCsi&80811438283q1432991618239 F&80811438283q1432991618239  Arial%%%%%$$$$&&ABCi G  Arial%%%%%$$$$&&ABC , , hiV bToggleSpyNot bToggleSpyhOpen("Wait.scr")hWait.scr!hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhNot bSpyEnabledh I  Arial%%%%%$$$$&&ABC!$&82711-45283q944994018239$ J&82711-45283q944994018239 ( <%&82811-44283q946994018239%  Not bSpyEnabledh h00.000000100 100.000000dh00.000000100 100.000000dhK&82811-44283q946994018239 (   ,  , hiV bToggleSpyNot bToggleSpyhOpen("Wait.scr")hWait.scr!hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhM  Arial%%%%%$$$$&&ABC!&& N ( ''   bSpyEnabledh h00.000000100 100.000000dh00.000000100 100.000000dhO ( 81a 70&42611-33283q1189938239HH P&42611-33283q1189938239NHH HH(HH QtttQQQ;;;???QQPMMMzzzbbbQQQGCABBB}}}pnmFB@:;:uuuC?>222mmm»LJI+++dddMKJ)))\\\RPO&&&TTTUSR###LLLSQP$##EEE|||XVU###@@@sssYWV###;;;mmm~~~YWW$$$888gggwww\ZZ%%%666___}}}srr^\\%%%444YYYvvvppocaa'''333TTTnnnrqqjhg***333OOOgggrqqſmkjb`_\ZYZXW^\\geezxwkii+++333JJJ___ppoþ¿`^]SQP\YYjffrnnzvv{wwtqplih`]]SQQVUUwuttrq,,,333HHHZZZrqq½¿a_^[YXtqp½}yy^\\VTT{yxkjj<<<DDDUUUtsrþ¾{yxXUUtqp¾|{XUUMLLjjjggfTTTuttϿýlji][Z½daaGFFhggÿͿsqpa^^khhSQP¾̽\YYigfmkj½˼ϿʿXVVb`_ɻͽĿʿnllqnnjihĿȺ̼þɾ|zWUTpon̿þȸ˻½ȽZSRgdd}}̾¼ƷɺǽUPOxwvʾŶȹǽ\WVʽпĵǸϿƼľ}fbaȼξ³Ŷͽƻ~|mihǻͽĵ̼Żrnm½Ǻ̼ô˻źvrqƺʺɺĺ|wvŹɹȸúĸȸǸù÷ƷƿŶ¹¶Ŷƾĵ¹ĴŽô³ĽŽùlii|wu~njhĻ¸¸¸¸¸¸¸¸¸¸¸¸ùlhfsmkwqojfd~{zŻ·¸¸¸¸¸¸¸¸¸¸¸¸¸¸¸¸¸¸¸ùż~~rppomlmkjljjnmlrpozyxĿ¾ÿÿÿĿ¼¼ý¼¼¼¼¼¼¼$$Instrument SelectionP&4511168283q37499-2398239H hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh bSpyEnabledh "&4511168283q37499-2398239 bSpyEnabledh "Tahoma nSpyDevSel[0] sDevCmbArray nDevCmbAmount$$Category SelectionZ&5441168283q54099-1668239N hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh"bSpyEnabled Or (nSpyDevSel[0] = 0)&&h =#&5441168283q54099-1668239"bSpyEnabled Or (nSpyDevSel[0] = 0)&&h ="Tahoma nSpyModSel[0]sModCmbArray[0].Cmb0nModCmbAmount[0]$$Channel Selection hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhqbSpyEnabled Or (nSpyDevSel[0] = 0) Or ((StrLeft(sModCmbSel[0],1) <> "M") And (StrLeft(sModCmbSel[0], 1) <> "C"))jjh =AMAC$qbSpyEnabled Or (nSpyDevSel[0] = 0) Or ((StrLeft(sModCmbSel[0],1) <> "M") And (StrLeft(sModCmbSel[0], 1) <> "C"))jjh =AMAC"Tahoma nSpyCHSel[0]sCHCmbArray[0].Cmb0nCHCmbAmount[0]$$Instrument SelectionP&45111117283q47299-3378239H hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh bSpyEnabledh %&45111117283q47299-3378239 bSpyEnabledh "Tahoma nSpyDevSel[1] sDevCmbArray nDevCmbAmount$$Category SelectionZ&54411117283q63899-2648239N hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh&&54411117283q63899-2648239"bSpyEnabled Or (nSpyDevSel[1] = 0)&&h ="Tahoma nSpyModSel[1]sModCmbArray[0].Cmb1nModCmbAmount[1]$$Channel Selection hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh'pbSpyEnabled Or (nSpyDevSel[1] = 0) Or ((StrLeft(sModCmbSel[1],1) <> "M") And (StrLeft(sModCmbSel[1],1) <> "C"))jjh =AMAC"Tahoma nSpyCHSel[1]sCHCmbArray[0].Cmb1nCHCmbAmount[1]$$Instrument SelectionP&45111166283q57099-4358239H hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh bSpyEnabledh (&45111166283q57099-4358239 bSpyEnabledh "Tahoma nSpyDevSel[2] sDevCmbArray nDevCmbAmount$$Category SelectionZ&54411166283q73699-3628239N hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh)&54411166283q73699-3628239"bSpyEnabled Or (nSpyDevSel[2] = 0)&&h ="Tahoma nSpyModSel[2]sModCmbArray[0].Cmb2nModCmbAmount[2]$$Channel Selection hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh*pbSpyEnabled Or (nSpyDevSel[2] = 0) Or ((StrLeft(sModCmbSel[2],1) <> "M") And (StrLeft(sModCmbSel[2],1) <> "C"))jjh =AMAC"Tahoma nSpyCHSel[2]sCHCmbArray[0].Cmb2nCHCmbAmount[2]$$Instrument SelectionP(&45111215283q66899-5338239H+ hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh bSpyEnabledh +&45111215283q66899-5338239 bSpyEnabledh "Tahoma nSpyDevSel[3] sDevCmbArray nDevCmbAmount$$Category SelectionZ(&54411215283q83499-4608239N+ hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh,&54411215283q83499-4608239"bSpyEnabled Or (nSpyDevSel[3] = 0)&&h ="Tahoma nSpyModSel[3]sModCmbArray[0].Cmb3nModCmbAmount[3]$$Channel Selection(+ hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh-pbSpyEnabled Or (nSpyDevSel[3] = 0) Or ((StrLeft(sModCmbSel[3],1) <> "M") And (StrLeft(sModCmbSel[3],1) <> "C"))jjh =AMAC"Tahoma nSpyCHSel[3]sCHCmbArray[0].Cmb3nCHCmbAmount[3]$$Instrument SelectionPDY&45111264283q76699-6318239HD\ hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh bSpyEnabledh .&45111264283q76699-6318239 bSpyEnabledh "Tahoma nSpyDevSel[4] sDevCmbArray nDevCmbAmount$$Category SelectionZDY&54411264283q93299-5588239ND\ hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh"bSpyEnabled Or (nSpyDevSel[4] = 0)&&h =/&54411264283q93299-5588239"bSpyEnabled Or (nSpyDevSel[4] = 0)&&h ="Tahoma nSpyModSel[4]sModCmbArray[0].Cmb4nModCmbAmount[4]$$Channel SelectionDYD\ hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh0pbSpyEnabled Or (nSpyDevSel[4] = 0) Or ((StrLeft(sModCmbSel[4],1) <> "M") And (StrLeft(sModCmbSel[4],1) <> "C"))jjh =AMAC"Tahoma nSpyCHSel[4]sCHCmbArray[0].Cmb4nCHCmbAmount[4]$$Instrument SelectionPu&45111313283q86499-7298239Hu hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh bSpyEnabledh 1&45111313283q86499-7298239 bSpyEnabledh "Tahoma nSpyDevSel[5] sDevCmbArray nDevCmbAmount$$Category SelectionZu&54411313283q103099-6568239Nu hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh2&54411313283q103099-6568239"bSpyEnabled Or (nSpyDevSel[5] = 0)&&h ="Tahoma nSpyModSel[5]sModCmbArray[0].Cmb5nModCmbAmount[5]$$Channel Selectionuu hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh3pbSpyEnabled Or (nSpyDevSel[5] = 0) Or ((StrLeft(sModCmbSel[5],1) <> "M") And (StrLeft(sModCmbSel[5],1) <> "C"))jjh =AMAC"Tahoma nSpyCHSel[5]sCHCmbArray[0].Cmb5nCHCmbAmount[5]$$Instrument SelectionP&45111362283q96299-8278239H hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh bSpyEnabledh 4&45111362283q96299-8278239 bSpyEnabledh "Tahoma nSpyDevSel[6] sDevCmbArray nDevCmbAmount$$Category SelectionZ&54411362283q112899-7548239N hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh5&54411362283q112899-7548239"bSpyEnabled Or (nSpyDevSel[6] = 0)&&h ="Tahoma nSpyModSel[6]sModCmbArray[0].Cmb6nModCmbAmount[6]$$Channel Selection hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh6pbSpyEnabled Or (nSpyDevSel[6] = 0) Or ((StrLeft(sModCmbSel[6],1) <> "M") And (StrLeft(sModCmbSel[6],1) <> "C"))jjh =AMAC"Tahoma nSpyCHSel[6]sCHCmbArray[0].Cmb6nCHCmbAmount[6]$$Instrument SelectionP&45111411283q106099-9258239H hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh bSpyEnabledh 7&45111411283q106099-9258239 bSpyEnabledh "Tahoma nSpyDevSel[7] sDevCmbArray nDevCmbAmount$$Category SelectionZ&54411411283q122699-8528239N hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh"bSpyEnabled Or (nSpyDevSel[7] = 0)&&h =8&54411411283q122699-8528239"bSpyEnabled Or (nSpyDevSel[7] = 0)&&h ="Tahoma nSpyModSel[7]sModCmbArray[0].Cmb7nModCmbAmount[7]$$Channel Selection hiV nCmbNumber 1 hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh9pbSpyEnabled Or (nSpyDevSel[7] = 0) Or ((StrLeft(sModCmbSel[7],1) <> "M") And (StrLeft(sModCmbSel[7],1) <> "C"))jjh =AMAC"Tahoma nSpyCHSel[7]sCHCmbArray[0].Cmb7nCHCmbAmount[7]0.000000hiVVBScript8z' 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() Dim i i = 0 For i=0 To 7 Set_Result $dSpyValue[i], i, $dSpyValue[i]->Quality Next $sModCmbSel[0]= $sModCmbArray[$nSpyModSel[0]].Cmb0 $sModCmbSel[1]= $sModCmbArray[$nSpyModSel[1]].Cmb1 $sModCmbSel[2]= $sModCmbArray[$nSpyModSel[2]].Cmb2 $sModCmbSel[3]= $sModCmbArray[$nSpyModSel[3]].Cmb3 $sModCmbSel[4]= $sModCmbArray[$nSpyModSel[4]].Cmb4 $sModCmbSel[5]= $sModCmbArray[$nSpyModSel[5]].Cmb5 $sModCmbSel[6]= $sModCmbArray[$nSpyModSel[6]].Cmb6 $sModCmbSel[7]= $sModCmbArray[$nSpyModSel[7]].Cmb7 End Sub ' This function is called when the screen is closed. Sub Screen_OnClose() End Sub Sub Set_Result (var, aux, quality) $auxReal = var If $StrStr($Str($auxReal), "N") <> "" Then If $StrStr($Str($auxReal), "Q") <> "" Then $result[aux] = "Open TC" Else If $StrLeft($Str($auxReal ), 1) = "-" Then $result[aux] = "-Overload" Else $result[aux] = "+Overload" End If End If Else $result[aux] = $Format("%f", $auxReal) End If $result[aux]->Quality = quality End Sub K Sub Screen_OnOpen() End Sub Sub Screen_WhileOpen() Dim i i = 0 For i=0 To 7 Set_Result StGetMnTagVal__(275, i, 0, 0, 0, "") , i, StGetMnTagVal__(275, i, 0, 24, 0, "") Next Call StSetMnTagVal__(272, 0, 0, 0, 0, 1, 24, "", StGetMnTagVal__(263, StGetMnTagVal__(265, 0, 0, 0, 0, "") , 1, 0, 0, "") ) Call StSetMnTagVal__(272, 1, 0, 0, 0, 1, 25, "", StGetMnTagVal__(263, StGetMnTagVal__(265, 1, 0, 0, 0, "") , 2, 0, 0, "") ) Call StSetMnTagVal__(272, 2, 0, 0, 0, 1, 26, "", StGetMnTagVal__(263, StGetMnTagVal__(265, 2, 0, 0, 0, "") , 3, 0, 0, "") ) Call StSetMnTagVal__(272, 3, 0, 0, 0, 1, 27, "", StGetMnTagVal__(263, StGetMnTagVal__(265, 3, 0, 0, 0, "") , 4, 0, 0, "") ) Call StSetMnTagVal__(272, 4, 0, 0, 0, 1, 28, "", StGetMnTagVal__(263, StGetMnTagVal__(265, 4, 0, 0, 0, "") , 5, 0, 0, "") ) Call StSetMnTagVal__(272, 5, 0, 0, 0, 1, 29, "", StGetMnTagVal__(263, StGetMnTagVal__(265, 5, 0, 0, 0, "") , 6, 0, 0, "") ) Call StSetMnTagVal__(272, 6, 0, 0, 0, 1, 30, "", StGetMnTagVal__(263, StGetMnTagVal__(265, 6, 0, 0, 0, "") , 7, 0, 0, "") ) Call StSetMnTagVal__(272, 7, 0, 0, 0, 1, 31, "", StGetMnTagVal__(263, StGetMnTagVal__(265, 7, 0, 0, 0, "") , 8, 0, 0, "") ) End Sub Sub Screen_OnClose() End Sub Sub Set_Result (var, aux, quality) Call StSetMnTagVal__(408, 0, 0, 0, 0, 1, 40, "", var) If StFunction1__(61, 2, StFunction1__(25, 1, StGetMnTagVal__(408, 0, 0, 0, 0, "") ), "N") <> "" Then If StFunction1__(61, 2, StFunction1__(25, 1, StGetMnTagVal__(408, 0, 0, 0, 0, "") ), "Q") <> "" Then Call StSetMnTagVal__(406, aux, 0, 0, 0, 1, 43, "", "Open TC" ) Else If StFunction1__(65, 2, StFunction1__(25, 1, StGetMnTagVal__(408, 0, 0, 0, 0, "") ), 1) = "-" Then Call StSetMnTagVal__(406, aux, 0, 0, 0, 1, 46, "", "-Overload") Else Call StSetMnTagVal__(406, aux, 0, 0, 0, 1, 48, "", "+Overload") End If End If Else Call StSetMnTagVal__(406, aux, 0, 0, 0, 1, 52, "", StFunction1__(43, 2, "%f", StGetMnTagVal__(408, 0, 0, 0, 0, "") )) End If Call StSetMnTagVal__(406, aux, 0, 24, 0, 1, 54, "", quality) End Sub hiV^                           NSPYDEVSEL[7] SLBLCMB[7] SUNITCMB[7] NSPYDEVSEL[0] SLBLCMB[0] SUNITCMB[0] NSPYDEVSEL[1] SLBLCMB[1] SUNITCMB[1] NSPYDEVSEL[2] SLBLCMB[2] SUNITCMB[2] NSPYDEVSEL[3] SLBLCMB[3] SUNITCMB[3] NSPYDEVSEL[4] SLBLCMB[4] SUNITCMB[4] NSPYDEVSEL[5] SLBLCMB[5] SUNITCMB[5] NSPYDEVSEL[6] SLBLCMB[6] SUNITCMB[6] RESULT[0] RESULT[7] RESULT[1] RESULT[2] RESULT[3] RESULT[4] RESULT[5] RESULT[6] BSPYENABLED BTOGGLESPY BTOGGLESPY NCMBNUMBER NDEVCMBAMOUNT SDEVCMBARRAYNMODCMBAMOUNT[0] NSPYMODSEL[0]SMODCMBARRAY[0].CMB0NCHCMBAMOUNT[0] NSPYCHSEL[0]SCHCMBARRAY[0].CMB0 SMODCMBSEL[0]NMODCMBAMOUNT[1] NSPYMODSEL[1]SMODCMBARRAY[0].CMB1NCHCMBAMOUNT[1] NSPYCHSEL[1]SCHCMBARRAY[0].CMB1 SMODCMBSEL[1]NMODCMBAMOUNT[2] NSPYMODSEL[2]SMODCMBARRAY[0].CMB2NCHCMBAMOUNT[2] NSPYCHSEL[2]SCHCMBARRAY[0].CMB2 SMODCMBSEL[2]NMODCMBAMOUNT[3] NSPYMODSEL[3]SMODCMBARRAY[0].CMB3NCHCMBAMOUNT[3] NSPYCHSEL[3]SCHCMBARRAY[0].CMB3 SMODCMBSEL[3]NMODCMBAMOUNT[4] NSPYMODSEL[4]SMODCMBARRAY[0].CMB4NCHCMBAMOUNT[4] NSPYCHSEL[4]SCHCMBARRAY[0].CMB4 SMODCMBSEL[4]NMODCMBAMOUNT[5] NSPYMODSEL[5]SMODCMBARRAY[0].CMB5NCHCMBAMOUNT[5] NSPYCHSEL[5]SCHCMBARRAY[0].CMB5 SMODCMBSEL[5]NMODCMBAMOUNT[6] NSPYMODSEL[6]SMODCMBARRAY[0].CMB6NCHCMBAMOUNT[6] NSPYCHSEL[6]SCHCMBARRAY[0].CMB6 SMODCMBSEL[6]NMODCMBAMOUNT[7] NSPYMODSEL[7]SMODCMBARRAY[0].CMB7NCHCMBAMOUNT[7] NSPYCHSEL[7]SCHCMBARRAY[0].CMB7 SMODCMBSEL[7]