V 10
1
LANG:1 8 (NoName)
PANEL,-1 -1 937 671 N {224,223,227} 2
"$1"
"$2"
"#uses \"trd_wienerHostsP2.ctl\"
#uses \"trd_wienerChannelsP2.ctl\"
#uses \"dcsUiBase.ctc\"
main()
{
        string SM;
  	string sDomain = $1;
	string sNode = $2;
        
        SM = substr($2, 2, 2);
              
       	fwCU_connectState(\"ChState\",sDomain+\"::\"+sNode);
        
        switch (SM) 
        {
        case \"00\" : fillWienerChSM00();
          break;
        case \"08\" : fillWienerChSM08();
          break;
        }
        
	removeSymbol(myModuleName(), myPanelName(), \"panel00\");
	removeSymbol(myModuleName(), myPanelName(), \"panel01\");
	removeSymbol(myModuleName(), myPanelName(), \"panel02\"); 
	removeSymbol(myModuleName(), myPanelName(), \"panel03\");
	removeSymbol(myModuleName(), myPanelName(), \"panel04\");
	removeSymbol(myModuleName(), myPanelName(), \"panel05\");
	removeSymbol(myModuleName(), myPanelName(), \"panel06\");
	removeSymbol(myModuleName(), myPanelName(), \"panel07\");
	removeSymbol(myModuleName(), myPanelName(), \"panel08\");
	removeSymbol(myModuleName(), myPanelName(), \"panel09\");
	removeSymbol(myModuleName(), myPanelName(), \"panel10\");
	removeSymbol(myModuleName(), myPanelName(), \"panel11\");
//	removeSymbol(myModuleName(), myPanelName(), \"panel12\");

// Row no. 1       
	addSymbol(myModuleName(), myPanelName(),\"trd_LV/trd_wienerRefChannelSmall.pnl\", \"panel00\", 
                  makeDynString(\"$frameTitle:\"+\"DIGITAL 3.3V\",\"$sDpName:\"+\"trd_lv:\"+wienerCh[10]), 50,122,0,1,1);
	addSymbol(myModuleName(), myPanelName(),\"trd_LV/trd_wienerRefChannelSmall.pnl\", \"panel01\", 
                  makeDynString(\"$frameTitle:\"+\"PCU POWER\",\"$sDpName:\"+\"trd_lv:\"+wienerCh[12]), 340,122,0,1,1);
	addSymbol(myModuleName(), myPanelName(),\"trd_LV/trd_wienerRefChannelSmall.pnl\", \"panel02\", 
                  makeDynString(\"$frameTitle:\"+\"DCS-PDB POWER\",\"$sDpName:\"+\"trd_lv:\"+wienerCh[11]), 630,122,0,1,1);
// Row no. 2
	addSymbol(myModuleName(), myPanelName(),\"trd_LV/trd_wienerRefChannelSmall.pnl\", \"panel03\", 
                  makeDynString(\"$frameTitle:\"+\"ANALOG 1.8V\",\"$sDpName:\"+\"trd_lv:\"+wienerCh[5]), 70,262,0,1,1);
	addSymbol(myModuleName(), myPanelName(),\"trd_LV/trd_wienerRefChannelSmall.pnl\", \"panel04\", 
                  makeDynString(\"$frameTitle:\"+\"DIGITAL 1.8V\",\"$sDpName:\"+\"trd_lv:\"+wienerCh[6]), 340,262,0,1,1);
	addSymbol(myModuleName(), myPanelName(),\"trd_LV/trd_wienerRefChannelSmall.pnl\", \"panel05\", 
                  makeDynString(\"$frameTitle:\"+\"ANALOG 3.3V\",\"$sDpName:\"+\"trd_lv:\"+wienerCh[9]), 610,262,0,1,1);
// Row no. 3
	addSymbol(myModuleName(), myPanelName(),\"trd_LV/trd_wienerRefChannelSmall.pnl\", \"panel06\", 
                  makeDynString(\"$frameTitle:\"+\"ANALOG 1.8V\",\"$sDpName:\"+\"trd_lv:\"+wienerCh[3]), 70,402,0,1,1);
	addSymbol(myModuleName(), myPanelName(),\"trd_LV/trd_wienerRefChannelSmall.pnl\", \"panel07\", 
                  makeDynString(\"$frameTitle:\"+\"DIGITAL 1.8V\",\"$sDpName:\"+\"trd_lv:\"+wienerCh[4]), 340,402,0,1,1);
	addSymbol(myModuleName(), myPanelName(),\"trd_LV/trd_wienerRefChannelSmall.pnl\", \"panel08\", 
                  makeDynString(\"$frameTitle:\"+\"ANALOG 3.3V\",\"$sDpName:\"+\"trd_lv:\"+wienerCh[8]), 610,402,0,1,1);
// Row no. 4
	addSymbol(myModuleName(), myPanelName(),\"trd_LV/trd_wienerRefChannelSmall.pnl\", \"panel09\", 
                  makeDynString(\"$frameTitle:\"+\"ANALOG 1.8V\",\"$sDpName:\"+\"trd_lv:\"+wienerCh[1]), 70,542,0,1,1);
	addSymbol(myModuleName(), myPanelName(),\"trd_LV/trd_wienerRefChannelSmall.pnl\", \"panel10\", 
                  makeDynString(\"$frameTitle:\"+\"DIGITAL 1.8V\",\"$sDpName:\"+\"trd_lv:\"+wienerCh[2]), 340,542,0,1,1);
	addSymbol(myModuleName(), myPanelName(),\"trd_LV/trd_wienerRefChannelSmall.pnl\", \"panel11\", 
                  makeDynString(\"$frameTitle:\"+\"ANALOG 3.3V\",\"$sDpName:\"+\"trd_lv:\"+wienerCh[7]), 610,542,0,1,1);        
// Wiener monitor
//	addSymbol(myModuleName(), myPanelName(),\"trd_LV/trd_wienerMonitorP2.pnl\", \"panel12\", makeDynString(\"\"), 280,12,0,1,1);        
        
        
}

ChState(string node, string state)
{
	string color;
	fwCU_getStateColor(node, state, color);
	setMultiValue(\"txtChStatus\",\"text\",state,\"txtChStatus\",\"backCol\",color);
}

" 0
 E E E E 1 0 0 0  0 0
""0  1
E E 2
"CBRef" "1"
"EClose" E
""
DISPLAY_LAYER, 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0
LAYER, 0 
1
LANG:1 6 Layer1
2 717
"txtChStatus"
""
1 10 10 E E E 1 E 1 E N "_WindowText" E N {204,204,204} E E
 E E
932 0 0 0 0 0
E E E
0
1
LANG:1 0 

1
"dashclr"N "_Transparent"
"main()
{

}" 0
 E 0 1 1 0 1 E U  1 E 40 40 216 56
1 2 0 "0s" 0 0 0 65 0 0  40 40 1
1
LANG:1 87 -*-Arial-bold-r-normal-*-16-*-100-100-*-*-iso8859-1|-16,0,0,0,697,0,0,0,0,0,0,0,0,Arial
0 ""
1
LANG:1 10 RAMPING UP
30 739
"FRAME5"
""
1 60 323 E E E 1 E 1 E N "_WindowText" E N {0,0,0} E E
 E E
974 0 0 0 0 0
E E E
1
1
LANG:1 0 

1
"dashclr"N "_Transparent"
"main()
{
  string f = \"Arial,12,-1,5,75,0,0,0,0,0\"; 
  this.font = f;
  this.color(\"blue\");
  this.text = \"  LAYERS  0-1  \";  
}" 0
 E 0 0 1 0 1 E 1 0 1 -10 207 0 E 60 323 891 451
1
LANG:1 98 -*-MS Shell Dlg-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,505,0,0,0,0,0,0,0,0,MS Shell Dlg
0 ""
1
LANG:1 11 Frame Title
30 743
"FRAME9"
""
1 60 323 E E E 1 E 1 E N "_WindowText" E N {0,0,0} E E
 E E
982 0 0 0 0 0
E E E
1
1
LANG:1 0 

1
"dashclr"N "_Transparent"
"main()
{
  string f = \"Arial,12,-1,5,75,0,0,0,0,0\"; 
  this.font = f;
  this.color(\"blue\");
  this.text = \"  LAYERS  2-3  \";  
}" 0
 E 0 0 1 0 1 E 1 0 1 -10 67 0 E 60 323 891 451
1
LANG:1 98 -*-MS Shell Dlg-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,505,0,0,0,0,0,0,0,0,MS Shell Dlg
0 ""
1
LANG:1 11 Frame Title
30 747
"FRAME13"
""
1 60 323 E E E 1 E 1 E N "_WindowText" E N {0,0,0} E E
 E E
990 0 0 0 0 0
E E E
1
1
LANG:1 0 

1
"dashclr"N "_Transparent"
"main()
{
  string f = \"Arial,12,-1,5,75,0,0,0,0,0\"; 
  this.font = f;
  this.color(\"blue\");
  this.text = \"  LAYERS  4-5  \";  
}" 0
 E 0 0 1 0 1 E 1 0 1 -10 -73 0 E 60 323 891 451
1
LANG:1 98 -*-MS Shell Dlg-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,505,0,0,0,0,0,0,0,0,MS Shell Dlg
0 ""
1
LANG:1 11 Frame Title
30 751
"FRAME17"
""
1 60 323 E E E 1 E 1 E N "_WindowText" E N {0,0,0} E E
 E E
998 0 0 0 0 0
E E E
1
1
LANG:1 0 

1
"dashclr"N "_Transparent"
"main()
{
  string f = \"Arial,12,-1,5,75,0,0,0,0,0\"; 
  this.font = f;
  this.color(\"blue\");
  this.text = \" Common digital 3.3V \";  
}" 0
 E 0 0 1 0 1 E 0.325301204819277 0 1 20.4819277108434 -213 0 E 60 323 891 451
1
LANG:1 98 -*-MS Shell Dlg-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,505,0,0,0,0,0,0,0,0,MS Shell Dlg
0 ""
1
LANG:1 11 Frame Title
30 753
"FRAME19"
""
1 60 323 E E E 1 E 1 E N "_WindowText" E N {0,0,0} E E
 E E
1002 0 0 0 0 0
E E E
1
1
LANG:1 0 

1
"dashclr"N "_Transparent"
"main()
{
  string f = \"Arial,12,-1,5,75,0,0,0,0,0\"; 
  this.font = f;
  this.color(\"blue\");
  this.text = \" PCU power \";  
}" 0
 E 0 0 1 0 1 E 0.325301204819277 0 1 310.481927710843 -213 0 E 60 323 891 451
1
LANG:1 98 -*-MS Shell Dlg-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,505,0,0,0,0,0,0,0,0,MS Shell Dlg
0 ""
1
LANG:1 11 Frame Title
30 755
"FRAME21"
""
1 60 323 E E E 1 E 1 E N "_WindowText" E N {0,0,0} E E
 E E
1006 0 0 0 0 0
E E E
1
1
LANG:1 0 

1
"dashclr"N "_Transparent"
"main()
{
  string f = \"Arial,12,-1,5,75,0,0,0,0,0\"; 
  this.font = f;
  this.color(\"blue\");
  this.text = \" DCS-PDB power \";  
}" 0
 E 0 0 1 0 1 E 0.325301204819277 0 1 600.481927710843 -213 0 E 60 323 891 451
1
LANG:1 98 -*-MS Shell Dlg-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,505,0,0,0,0,0,0,0,0,MS Shell Dlg
0 ""
1
LANG:1 11 Frame Title
6 756
"RECTANGLE9"
""
1 480 100 E E E 1 E 1 E N "_Transparent" E N "_Transparent" E E
 E E
1008 0 0 0 0 0
E E E
0
1
LANG:1 0 

1
"dashclr"N "_Transparent"
"main()
{
  string path;
  path = getPath(PROJ_PATH + \"/pictures/\");
//  DebugN(path);
  this.fill(\"[pattern,[fit,bmp,wienerPL512.bmp]]\");
  this.visible = TRUE;
}" 0
 E 0 1 1 0 1 E 0.692307692307692 0 0.777777777777778 377.692307692308 12.2222222222222 0 E 480 10 740 100
30 757
"FRAME1"
""
1 580 133 E E E 1 E 1 E N "_WindowText" E N {0,0,0} E E
 E E
1010 0 0 0 0 0
E E E
1
1
LANG:1 0 

1
"dashclr"N "_Transparent"
"#uses \"trd_wienerHostsP2.ctl\"
#uses \"trd_wienerChannelsP2.ctl\"
#uses \"dcsUiBase.ctc\"
main()
{
  string f = \"Arial Black,8,-1,5,50,0,0,0,0,0\"; 
  this.font = f;
  this.text = \"W-IE-NE-R monitor\";   
  
        int i, ping;
        string SM, num, colour;
        
        SM = substr($2, 2, 2);
        
        switch (SM) 
        {
        case \"00\" : fillWienerHostSM00();
          break;
        case \"08\" : fillWienerHostSM08();
          break;
        }

// Write wieXXX on objetcs            
    for (i = 0; i < dynlen(wienerHosts); i++)  
      {
        sprintf(num, \"%02d\", i+1);       
        setValue(\"wiener\"+num, \"text\", substr(wienerHosts[i+1],0,12));                                                                 
      }

// Start monitoring (always)     
  while(TRUE)
  {
    for (i = 0; i < dynlen(wienerHosts); i++)
      {
        sprintf(num, \"%02d\", i+1);
        colour = dcsUiBase_TestNetworkConnection(wienerHosts[i+1]) ? \"FwStateOKPhysics\" : \"FwStateAttention3\";
        setValue(\"wiener\"+num, \"backCol\", colour);
      }
/*  JUST TESTING IN MUENSTER       
    ping = system(\"cmd /MIN /c ping -n 1 -w 1000 wiener03.trd.net\"); 
    if (ping = 1) 
      colour = \"green\";
    else
      colour = \"yellow\";
    DebugN(\"----------------->   \"+ping);
    setValue(\"wiener03\", \"backCol\", colour);
*/    
    delay(5,0);
  }  
}  " 0
 E 0 0 1 0 1 E 1.09090909090909 0 0.62992125984252 -352.727272727272 -73.7795275590552 0 E 580 133 911 261
1
LANG:1 98 -*-MS Shell Dlg-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,505,0,0,0,0,0,0,0,0,MS Shell Dlg
0 ""
1
LANG:1 14 Wiener Monitor
2 758
"wiener02"
""
1 430 30 E E E 1 E 1 E N {0,0,0} E N "_Button" E E
 E E
1012 0 0 0 0 0
E E E
0
1
LANG:1 0 

1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  1 E 377 33 453 49
1 2 0 "0s" 0 0 0 65 0 0  377 33 1
1
LANG:1 87 -*-Arial-bold-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,758,0,0,0,0,0,0,0,0,Arial
0 ""
1
LANG:1 1 -
2 759
"wiener05"
""
1 430 30 E E E 1 E 1 E N {0,0,0} E N "_Button" E E
 E E
1014 0 0 0 0 0
E E E
0
1
LANG:1 0 

1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  1 E 289 61 365 77
1 2 0 "0s" 0 0 0 65 0 0  289 61 1
1
LANG:1 87 -*-Arial-bold-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,758,0,0,0,0,0,0,0,0,Arial
0 ""
1
LANG:1 1 -
2 760
"wiener01"
""
1 430 30 E E E 1 E 1 E N {0,0,0} E N "_Button" E E
 E E
1016 0 0 0 0 0
E E E
0
1
LANG:1 0 

1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  1 E 289 33 365 49
1 2 0 "0s" 0 0 0 65 0 0  289 33 1
1
LANG:1 87 -*-Arial-bold-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,758,0,0,0,0,0,0,0,0,Arial
0 ""
1
LANG:1 1 -
2 761
"wiener06"
""
1 430 28.0000000000001 E E E 1 E 1 E N {0,0,0} E N "_Button" E E
 E E
1018 0 0 0 0 0
E E E
0
1
LANG:1 0 

1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  1 E 377 61 453 77
1 2 0 "0s" 0 0 0 65 0 0  377 61 1
1
LANG:1 87 -*-Arial-bold-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,758,0,0,0,0,0,0,0,0,Arial
0 ""
1
LANG:1 1 -
2 762
"wiener04"
""
1 430 30 E E E 1 E 1 E N {0,0,0} E N "_Button" E E
 E E
1020 0 0 0 0 0
E E E
0
1
LANG:1 0 

1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  1 E 554 33 630 49
1 2 0 "0s" 0 0 0 65 0 0  554 33 1
1
LANG:1 87 -*-Arial-bold-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,758,0,0,0,0,0,0,0,0,Arial
0 ""
1
LANG:1 1 -
2 763
"wiener03"
""
1 430 30 E E E 1 E 1 E N {0,0,0} E N "_Button" E E
 E E
1022 0 0 0 0 0
E E E
0
1
LANG:1 0 

1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  1 E 465 33 541 49
1 2 0 "0s" 0 0 0 65 0 0  465 33 1
1
LANG:1 87 -*-Arial-bold-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,758,0,0,0,0,0,0,0,0,Arial
0 ""
1
LANG:1 1 -
2 764
"wiener07"
""
1 430 30 E E E 1 E 1 E N {0,0,0} E N "_Button" E E
 E E
1024 0 0 0 0 0
E E E
0
1
LANG:1 0 

1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  1 E 465 61 541 77
1 2 0 "0s" 0 0 0 65 0 0  465 61 1
1
LANG:1 87 -*-Arial-bold-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,758,0,0,0,0,0,0,0,0,Arial
0 ""
1
LANG:1 1 -
2 765
"wiener08"
""
1 430 30 E E E 1 E 1 E N {0,0,0} E N "_Button" E E
 E E
1026 0 0 0 0 0
E E E
0
1
LANG:1 0 

1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  1 E 554 61 630 77
1 2 0 "0s" 0 0 0 65 0 0  554 61 1
1
LANG:1 87 -*-Arial-bold-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,758,0,0,0,0,0,0,0,0,Arial
0 ""
1
LANG:1 1 -
0
LAYER, 1 
1
LANG:1 6 Layer2
0
LAYER, 2 
1
LANG:1 6 Layer3
0
LAYER, 3 
1
LANG:1 6 Layer4
0
LAYER, 4 
1
LANG:1 6 Layer5
0
LAYER, 5 
1
LANG:1 6 Layer6
0
LAYER, 6 
1
LANG:1 6 Layer7
0
LAYER, 7 
1
LANG:1 6 Layer8
0
0