V 10
1
LANG:1 7 TRD PDB
PANEL,306 148 641 370 N "_3DFace" 0
EEE E E 1 -1 -1 0  40 30
"" 0 1
EE 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 29
"Text17"
""
1 40 200 E E E 1 E 1 E N {153,0,0} E N "_Transparent" E E
 E E
30 0 0 0 0 0
EE E
0
1
LANG:1 0 
1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  0 E 42 202 153 226
0 2 0 "s" 0 0 0 192 0 0  42 202
 1
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-180-100-100-*-*-iso8859-1|-21,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
1
LANG:1 8 Command:
2 34
"Text20"
""
1 40 300 E E E 1 E 1 E N {153,0,0} E N "_Transparent" E E
 E E
35 0 0 0 0 0
EE E
0
1
LANG:1 0 
1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  0 E 42 302 139 326
0 2 0 "s" 0 0 0 192 0 0  42 302
 1
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-180-100-100-*-*-iso8859-1|-21,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
1
LANG:1 8 Message:
6 77
"Border1"
""
1 10 110 E E E 1 E 1 E N "_Transparent" E N "_Transparent" E E
 E E
75 0 0 0 0 0
EE E
0
1
LANG:1 0 
1
"dashclr"N "_Transparent"
"main()
{
  string path;
  path = getPath(PROJ_PATH + \"/pictures/\");
//  DebugN(path);
  this.fill(\"[pattern,[fit,gif,aliceLogoSmall.gif]]\");
  this.visible = TRUE;
}" 0
 E 0 1 1 0 1 E U  0 E 10 10 110 110
2 78
"Text10"
""
1 130 10 E E E 1 E 1 E N {153,0,0} E N "_Transparent" E E
 E E
76 0 0 0 0 0
EE E
0
1
LANG:1 0 
1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  0 E 132 12 608 38
0 2 0 "s" 0 0 0 65 0 0  132 12
 1
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-220-100-100-*-*-iso8859-1|-24,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
1
LANG:1 9 ALICE TRD
2 79
"Text14"
""
1 130 40 E E E 1 E 1 E N {153,0,0} E N "_Transparent" E E
 E E
77 0 0 0 0 0
EE E
0
1
LANG:1 0 
1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  0 E 132 42 608 68
0 2 0 "s" 0 0 0 65 0 0  132 42
 1
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-220-100-100-*-*-iso8859-1|-24,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
1
LANG:1 30 Power Distribution Box Control
4 80
"Line2"
""
1 10 120 E E E 1 E 1 E N {153,0,0} E N {255,255,255} E E
 E E
78 0 0 0 0 0
EE E
0
1
LANG:1 0 
1
"dashclr"N "_Transparent"
E E 0 2 1 0 1 E  10 120 630 120
2 81
"Text29"
""
1 140 90 E E E 1 E 1 E N {153,0,0} E N "_Transparent" E E
 E E
79 0 0 0 0 0
EE E
0
1
LANG:1 0 
1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  0 E 142 92 618 118
0 2 0 "s" 0 0 0 66 0 0  142 92
 1
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-140-100-100-*-*-iso8859-1|-17,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
1
LANG:1 18 svn rev. 001 / JM 
30 82
"Configurationcommands"
""
1 20 250 E E E 1 E 1 E N "_3DText" E N "_Transparent" E E
 E E
80 0 0 0 0 0
EE E
1
1
LANG:1 0 
0
E E 0 1 1 0 1 E U  0 E 20 130 610 250
1
LANG:1 107 -microsoft windows-Arial-normal-r-normal-*-*-120-100-100-*-*-iso8859-1|-13,0,0,0,400,0,0,0,0,3,2,1,34,Arial
0 ""
1
LANG:1 26 PDB configuration commands
30 83
"Ack"
""
1 20 350 E E E 1 E 1 E N "_3DText" E N "_Transparent" E E
 E E
81 0 0 0 0 0
EE E
1
1
LANG:1 0 
0
E E 0 1 1 0 1 E U  0 E 20 270 610 350
1
LANG:1 107 -microsoft windows-Arial-normal-r-normal-*-*-120-100-100-*-*-iso8859-1|-13,0,0,0,400,0,0,0,0,3,2,1,34,Arial
0 ""
1
LANG:1 21 Server acknowledgment
2 87
"Text1"
""
1 40 160 E E E 1 E 1 E N {153,0,0} E N "_Transparent" E E
 E E
84 0 0 0 0 0
EE E
0
1
LANG:1 0 
1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  0 E 42 162 155 186
0 2 0 "s" 0 0 0 192 0 0  42 162
 1
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-180-100-100-*-*-iso8859-1|-21,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
1
LANG:1 10 DimServer:
14 38
"TextField15"
""
1 190 300 E E E 1 E 1 E N "_WindowText" E N "_Window" E E
 E E
39 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 107 -microsoft windows-Arial-normal-r-normal-*-*-120-100-100-*-*-iso8859-1|-13,0,0,0,400,0,0,0,0,3,2,1,34,Arial
0 ""
188 298 582 325
3 "s" 0 0 0 0 0 0 
E
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_textFieldIn();
}

EP_textFieldIn()
{
dyn_errClass err;

  if( !dpExists( \"alitrddcb2000_Acknowledge.Ack:_online.._value\"))
  {
    setValue(\"\", \"color\", \"_dpdoesnotexist\");
    return;
  }

  dpConnect(\"EP_textFieldInCB\",
            \"alitrddcb2000_Acknowledge.Ack:_online.._value\");
  err = getLastError();
  if (dynlen(err) > 0)
    setValue(\"\", \"color\", \"_dpdoesnotexist\");

}


EP_textFieldInCB(string dp, string sNewValue)
{
  setValue(\"\", \"text\", dpValToString(dp, sNewValue, TRUE) );
}

// SimpleCtrlScript {EP_textFieldIn}
// DP {ztt_dimfed_server_icl_ACK.Message}
// DPConfig {:_online.._value}
// DPType {string}
// UseDPUnit {TRUE}
// UseDPFormat {TRUE}
// SimpleCtrlScriptEnd {EP_textFieldIn}
" 0

E
13 64
"Button12"
""
1 480 200 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E E
65 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 107 -microsoft windows-Arial-normal-r-normal-*-*-120-100-100-*-*-iso8859-1|-13,0,0,0,400,0,0,0,0,3,2,1,34,Arial
0 ""
478 198 582 225
T 
1
LANG:1 4 SEND
"main()
{

  string s0;

  shape sh0 =  getShape(\"pdbCommand\");
     
  s0 = sh0.text;

/*  

  dyn_char ch;
  
  dyn_string dstr = strsplit(s0,\" |/,.;:-_\");
  for(int i=1;i<=dynlen(dstr);i++){
    if(dstr[i]!=\"\"){
      int in = dstr[i];
      dynAppend(ch, in);
    }
  }
 
*/


///////////////////////// ULIs stuff
/*
  blob source = s0;

//  DebugN(source, bloblen(source));

  dyn_char ch;
  for(int i=0;i<bloblen(source);i++){
    int val;
    blobGetValue(source,i,val,1);
    dynAppend(ch,val);
  }
  DebugN(ch);
  dpSet(\"ControlFero.Data\",ch,\"ControlFero.Target\",s1);
*/

///////////////////////// Jens stuff

string data = s0;
  DebugN(data);
  dpSet(\"alitrddcb2000_Command.Command\",data);

}" 0
 E E E
22 86
"ComboBox1"
""
1 190 160 E E E 1 E 1 E N "_WindowText" E N "_Window" E E
 E E
83 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 107 -microsoft windows-Arial-normal-r-normal-*-*-120-100-100-*-*-iso8859-1|-13,0,0,0,400,0,0,0,0,3,2,1,34,Arial
0 ""
188 158 422 185
4
1
LANG:1 13 alitrddcb2000
 0
1
LANG:1 13 alitrddcb2001
 0
1
LANG:1 13 alitrddcb2002
 0
1
LANG:1 13 alitrddcb2003
 0
"main()
{
 	this.text=\"Select DIM server...\";
}" 0

"main()
{
string dimServer;
dimServer = this.text;


  if (prodSite == \"ROBs from MSC\")
	{
  ChildPanelOn(\"mainMSC.pnl\", \"ALICE TRD ROB Tester\", makeDynString(\"\"), -5,-60);	
	}
	else
  ChildPanelOn(\"mainKA.pnl\", \"ALICE TRD ROB Tester\", makeDynString(\"\"), -5,-60);		

}" 0

E
 0 0
14 88
"pdbCommand"
""
1 190 200 E E E 1 E 1 E N "_WindowText" E N "_Window" E E
 E E
85 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 107 -microsoft windows-Arial-normal-r-normal-*-*-120-100-100-*-*-iso8859-1|-13,0,0,0,400,0,0,0,0,3,2,1,34,Arial
0 ""
188 198 422 225
3 "s" 0 0 0 0 0 0 
E
"// SimpleCtrlScriptStart {valid}
main()
{
  EP_textFieldIn();
}

EP_textFieldIn()
{
dyn_errClass err;

  if( !dpExists( \"alitrddcb2000_Command.Command:_online.._value\"))
  {
    setValue(\"\", \"color\", \"_dpdoesnotexist\");
    return;
  }

  dpConnect(\"EP_textFieldInCB\",
            \"alitrddcb2000_Command.Command:_online.._value\");
  err = getLastError();
  if (dynlen(err) > 0)
    setValue(\"\", \"color\", \"_dpdoesnotexist\");

}


EP_textFieldInCB(string dp, string sNewValue)
{
  setValue(\"\", \"text\", dpValToString(dp, sNewValue, FALSE) );
}

// SimpleCtrlScript {EP_textFieldIn}
// DP {alitrddcb2000_Command.Command}
// DPConfig {:_online.._value}
// DPType {string}
// UseDPUnit {FALSE}
// UseDPFormat {TRUE}
// SimpleCtrlScriptEnd {EP_textFieldIn}
" 0

E
14 89
"TextField1"
""
1 450 160 E E E 1 E 1 E N "_WindowText" E N "_Window" E E
 E E
85 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 107 -microsoft windows-Arial-normal-r-normal-*-*-120-100-100-*-*-iso8859-1|-13,0,0,0,400,0,0,0,0,3,2,1,34,Arial
0 ""
448 158 582 185
3 "s" 0 0 0 0 0 0 
E
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_textFieldIn();
}

EP_textFieldIn()
{
dyn_errClass err;

  if( !dpExists( \"alitrddcb2000_Channel08.Value:_online.._value\"))
  {
    setValue(\"\", \"color\", \"_dpdoesnotexist\");
    return;
  }

  dpConnect(\"EP_textFieldInCB\",
            \"alitrddcb2000_Channel08.Value:_online.._value\");
  err = getLastError();
  if (dynlen(err) > 0)
    setValue(\"\", \"color\", \"_dpdoesnotexist\");

}


EP_textFieldInCB(string dp, unsigned uNewValue)
{
	unsigned i = uNewValue;
	string strValue = dpValToString(dp, uNewValue, TRUE);
  setValue(\"\", \"text\", strValue);
  DebugN(uNewValue);
  DebugN(strValue);
	DebugN(sscanf(strValue, \"0x%8\", i));
	DebugN(i);
}

// SimpleCtrlScript {EP_textFieldIn}
// DP {alitrddcb2000_Channel08.Value}
// DPConfig {:_online.._value}
// DPType {unsigned}
// UseDPUnit {TRUE}
// UseDPFormat {TRUE}
// SimpleCtrlScriptEnd {EP_textFieldIn}
" 0

E
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