V 10
1
LANG:1 2 HV
PANEL,403 311 225 443 N {204,204,204} 0
EEE E E 1 -1 -1 0  20 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
6 49
"Border1"
""
1 10 340 E E E 1 E 1 E N {0,0,0} E N {255,255,204} E E
 E E
42 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  1 E 10 10 210 340
2 50
"Text3"
""
1 10 10 E E E 1 E 1 E N {0,0,0} E N {255,204,153} E E
 E E
43 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  1 E 12 12 208 33
1 2 0 "s" 0 0 0 65 0 0  12 12
 1
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-110-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
1
LANG:1 23 Channel / Card Controll
13 10
"LVonCH"
""
1 110 80 E E E 1 E 1 E N "_3DText" E N {255,255,153} E E
 E E
10 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 117 -microsoft windows-Courier New-bold-r-normal-*-*-120-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,49,Courier New
0 ""
108 78 202 112
T 
1
LANG:1 8 LV CH ON
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int hv,icard;
const int max = 4;
//char *datapoint[max];
//[20]= {\"HVcaMask\", \"HVchVolt\", \"HVchITrp\",  \"HVchRamp\"};
string datapoint1;
int i,j;
dyn_string valset; 
dyn_float initValue;



dpGet(\"HVch.Numb:_original.._value\", hv);
valset=makeDynString(\"LVcaTrip\",\"LVcaMask\",\"LVch_Vcc\",\"LVch_Vdd\",\"LVchVCSV\",\"LVchPINV\",\"LVchDTrp\",\"LVchCTrp\",\"LVchTTrp\",\"LVchTLim\",\"LVchCLKS\",\"LVchCLKR\",\"LVchVOut\");
initValue=makeDynFloat(46,15,3.5,4,4,6,50,50,50,60,0,0,1);
 for(j=1; j<=13; j++)
    {
	if(j<=2)
	  {
// swithcing on all LV Cards 
       icard=hv/4;
//       sprintf(datapoint1, \"Crate00.LV_card%02d.%s.Send.Send.Send:_original.._value\",icard,valset[j]);
//       dpSetWait(datapoint1, initValue[j]);
 	  }
// swithcing on all LV Channels 
 	else
      {
      sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",hv,valset[j] );
      dpSetWait(datapoint1, initValue[j]);
      }
   }
   
  
      setValue(\"\", \"backCol\", \"Red\"); 
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);       
     setValue(\"\", \"backCol\", \"{255,255,153}\");
}

// SimpleCtrlScript {EP_setDP}
// DP1 {Crate1.HVchRamp}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 12
"HVonCH"
""
1 20 80 E E E 1 E 1 E N "_3DText" E N {255,255,153} E E
 E E
12 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 117 -microsoft windows-Courier New-bold-r-normal-*-*-120-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,49,Courier New
0 ""
18 78 112 112
T 
1
LANG:1 8 HV CH ON
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int i,icard;
const int max = 4;
string datapoint;
int hv;

//char *datapoint[max];
//[20]= {\"HVcaMask\", \"HVchVolt\", \"HVchITrp\",  \"HVchRamp\"};
string datapoint1;

dpGet(\"HVch.Numb:_original.._value\", hv);
icard=hv/8;
//sprintf(datapoint1, \"Crate00.HV_card%02d.%s.Send:_original.._value\",icard,\"HVcaMask\" );
//dpSetWait(datapoint1, 255);
sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",hv,\"HVchVolt\" );
dpSetWait(datapoint1, 100);
DebugN( datapoint1, hv );
sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",hv,\"HVchITrp\" );
dpSetWait(datapoint1, 1100);
sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",hv,\"HVchRamp\" );
dpSetWait(datapoint1, 3);



  
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);       
}

// SimpleCtrlScript {EP_setDP}
// DP1 {Crate1.HVchRamp}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 14
"HVoffCH"
""
1 20 110 E E E 1 E 1 E N "_3DText" E N {255,255,153} E E
 E E
14 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 117 -microsoft windows-Courier New-bold-r-normal-*-*-120-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,49,Courier New
0 ""
18 108 112 142
T 
1
LANG:1 9 HV CH OFF
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int i,icard;
const int max = 4;
string datapoint;
int hv;

//char *datapoint[max];
//[20]= {\"HVcaMask\", \"HVchVolt\", \"HVchITrp\",  \"HVchRamp\"};
string datapoint1;

dpGet(\"HVch.Numb:_original.._value\", hv);
icard=hv/8;

sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",hv,\"HVchVolt\" );
dpSetWait(datapoint1, 0);
sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",hv,\"HVchITrp\" );
dpSetWait(datapoint1, 1100);
sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",hv,\"HVchRamp\" );
dpSetWait(datapoint1, 3);
//sprintf(datapoint1, \"Crate00.HV_card%02d.%s.Send:_original.._value\",icard,\"HVcaMask\" );
//dpSetWait(datapoint1, 0);
  
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);       
}

// SimpleCtrlScript {EP_setDP}
// DP1 {Crate1.HVchRamp}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 15
"LVoffCH"
""
1 132 210 E E E 1 E 1 E N "_3DText" E N {255,255,153} E E
 E E
15 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 117 -microsoft windows-Courier New-bold-r-normal-*-*-120-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,49,Courier New
0 ""
108 108 202 142
T 
1
LANG:1 9 LV CH OFF
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int hv,icard;
const int max = 4;
//char *datapoint[max];
//[20]= {\"HVcaMask\", \"HVchVolt\", \"HVchITrp\",  \"HVchRamp\"};
string datapoint1;
int i,j;
dyn_string valset; 
dyn_float initValue;



dpGet(\"HVch.Numb:_original.._value\", hv);
valset=makeDynString(\"LVcaTrip\",\"LVcaMask\",\"LVch_Vcc\",\"LVch_Vdd\",\"LVchVCSV\",\"LVchPINV\",\"LVchDTrp\",\"LVchCTrp\",\"LVchTTrp\",\"LVchTLim\",\"LVchCLKS\",\"LVchCLKR\",\"LVchVOut\");
initValue=makeDynFloat(46,15,0.,0.,0.,0.,50,50,50,60,0,0,0);
 for(j=1; j<=13; j++)
    {
	if(j<=2)
	  {
// swithcing on all LV Cards 
//       icard=hv/4;
//       sprintf(datapoint1, \"Crate00.LV_card%02d.%s.Send:_original.._value\",icard,valset[j]);
//       dpSetWait(datapoint1, initValue[j]);
 	  }
// swithcing on all LV Channels 
 	else
      {
      sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",hv,valset[j] );
      dpSetWait(datapoint1, initValue[j]);
      }
   }
   
      setValue(\"\", \"backCol\", \"Red\");
 
  
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);       
 
      setValue(\"\", \"backCol\", \"{255,255,153}\");
}

// SimpleCtrlScript {EP_setDP}
// DP1 {Crate1.HVchRamp}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 16
"SendHVch"
""
1 20 50 E E E 1 E 1 E N {0,0,0} E N {255,204,153} E E
 E E
15 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-110-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
18 48 112 82
T 
1
LANG:1 7 SEND CH
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int hv;

  dpGet(\"HVch.Numb:_original.._value\", hv);
  hv=hv+100;
  hv = hv | (( 3 & 0x00ff )<<8);
  //DebugN( \" Ewa's hv\", hv);
  dpSetWait(\"Crate00.Controller.CCch_Set.Send:_original.._value\", hv);
 
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);
}

// SimpleCtrlScript {EP_setDP}
// DP1 {Crate00.Elmb_0.CCco_Set}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 17
"ReadHVch"
""
1 494 170 E E E 1 E 1 E N {0,0,0} E N {255,204,153} E E
 E E
16 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-110-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
18 138 112 172
T 
1
LANG:1 7 READ CH
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int hv;

  dpGet(\"HVch.Numb:_original.._value\", hv);
  hv=hv+100;
  dpSetWait(\"Crate00.Controller.CCchRead.Send:_original.._value\", hv);
 
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);
}

// SimpleCtrlScript {EP_setDP}
// DP1 {Crate00.Elmb_0.CCco_Set}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 18
"SendLVch"
""
1 110 50 E E E 1 E 1 E N {0,0,0} E N {255,204,153} E E
 E E
17 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-110-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
108 48 202 82
T 
1
LANG:1 7 SEND CH
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int lv;

  dpGet(\"HVch.Numb:_original.._value\", lv);
  lv = lv | (( 3 & 0x00ff )<<8);
  dpSetWait(\"Crate00.Controller.CCch_Set.Send:_original.._value\", lv);
 
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);
}

// SimpleCtrlScript {EP_setDP}
// DP1 {Crate00.Elmb_0.CCco_Set}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 19
"ReadLVch"
""
1 110 140 E E E 1 E 1 E N {0,0,0} E N {255,204,153} E E
 E E
18 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-110-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
108 138 202 172
T 
1
LANG:1 7 READ CH
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int lv;
int try;

  dpGet(\"HVch.Numb:_original.._value\", lv);
  dpSetWait(\"Crate00.Controller.CCchRead.Send:_original.._value\", lv);
dpGet(\"Crate00.Controller.CCchRead.Send:_original.._value\",try);
 DebugN(\"read\",try);
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);
}

// SimpleCtrlScript {EP_setDP}
// DP1 {Crate00.Elmb_0.CCco_Set}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 22
"Button9"
""
1 110 237 E E E 1 E 1 E N {0,0,0} E N {255,255,153} E E
 E E
21 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 117 -microsoft windows-Courier New-bold-r-normal-*-*-120-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,49,Courier New
0 ""
108 235 202 269
T 
1
LANG:1 8 LV CA ON
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int hv,icard;
string datapoint1;
int i,j;
dyn_string valset; 
dyn_float initValue;


dpGet(\"HVch.Numb:_original.._value\", hv);
icard=hv/4;

for (i=icard*4;i<=icard*4+3;i++){

valset=makeDynString(\"LVcaTrip\",\"LVcaMask\",\"LVch_Vcc\",\"LVch_Vdd\",\"LVchVCSV\",\"LVchPINV\",\"LVchDTrp\",\"LVchCTrp\",\"LVchTTrp\",\"LVchTLim\",\"LVchCLKS\",\"LVchCLKR\",\"LVchVOut\");
initValue=makeDynFloat(46,15,3.5,4,4,6,50,50,50,60,0,0,1);
 for(j=1; j<=13; j++)
    {
	if(j<=2)
	  {
      }
 	else
      {
      sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",i,valset[j] );
      dpSetWait(datapoint1, initValue[j]);
//DebugN(\"i\", i ,\"hv\", hv,\"valset[j]\", valset[j], \"initValue[j]\", initValue[j]);
      }

   }
   
      setValue(\"\", \"backCol\", \"Red\");
      //DebugN(\" LV channel\", i);  
  
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);       
 }
      setValue(\"\", \"backCol\", \"{255,255,153}\");
}
// SimpleCtrlScript {EP_setDP}
// DP1 {Crate1.HVchRamp}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 23
"CardONHV"
""
1 20 237 E E E 1 E 1 E N {0,0,0} E N {255,255,153} E E
 E E
22 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 117 -microsoft windows-Courier New-bold-r-normal-*-*-120-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,49,Courier New
0 ""
18 235 112 269
T 
1
LANG:1 8 HV CA ON
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int i,icard;
const int max = 4;
string datapoint;
int hv;

//char *datapoint[max];
//[20]= {\"HVcaMask\", \"HVchVolt\", \"HVchITrp\",  \"HVchRamp\"};
string datapoint1;

dpGet(\"HVch.Numb:_original.._value\", hv);
icard=hv/8;

for (i=icard*8;i<=icard*8+7;i++){
  //sprintf(datapoint1, \"Crate00.HV_card%02d.%s.Send:_original.._value\",icard,\"HVcaMask\" );
  //dpSetWait(datapoint1, 255);
  sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",i,\"HVchVolt\" );
  dpSetWait(datapoint1, 100);
  sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",i,\"HVchITrp\" );
  dpSetWait(datapoint1, 1100);
  sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",i,\"HVchRamp\" );
  dpSetWait(datapoint1, 3);


      setValue(\"\", \"backCol\", \"Red\");
      //DebugN(\" HV channel\", i);  
  
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);       
 }
      setValue(\"\", \"backCol\", \"{255,255,153}\");
}

// SimpleCtrlScript {EP_setDP}
// DP1 {Crate1.HVchRamp}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 24
"CardOFFHV"
""
1 20 267 E E E 1 E 1 E N {0,0,0} E N {255,255,153} E E
 E E
23 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 117 -microsoft windows-Courier New-bold-r-normal-*-*-120-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,49,Courier New
0 ""
18 265 112 299
T 
1
LANG:1 9 HV CA OFF
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int i,icard;
const int max = 4;
string datapoint;
int hv;

//char *datapoint[max];
//[20]= {\"HVcaMask\", \"HVchVolt\", \"HVchITrp\",  \"HVchRamp\"};
string datapoint1;

dpGet(\"HVch.Numb:_original.._value\", hv);
icard=hv/8;

for (i=icard*8;i<=icard*8+7;i++){
  sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",i,\"HVchVolt\" );
  dpSetWait(datapoint1, 0);
  sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",i,\"HVchITrp\" );
  dpSetWait(datapoint1, 1100);
  sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",i,\"HVchRamp\" );
  dpSetWait(datapoint1, 3);
//sprintf(datapoint1, \"Crate00.HV_card%02d.%s.Send:_original.._value\",icard,\"HVcaMask\" );
//dpSetWait(datapoint1, 0);


      setValue(\"\", \"backCol\", \"Red\");
      //DebugN(\" HV channel\", i);  
  
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);       
 }
      setValue(\"\", \"backCol\", \"{255,255,153}\");
}
// SimpleCtrlScript {EP_setDP}
// DP1 {Crate1.HVchRamp}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 25
"Button12"
""
1 132 367 E E E 1 E 1 E N {0,0,0} E N {255,255,153} E E
 E E
24 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 117 -microsoft windows-Courier New-bold-r-normal-*-*-120-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,49,Courier New
0 ""
108 265 202 299
T 
1
LANG:1 9 LV CA OFF
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int hv,icard;
const int max = 4;
//char *datapoint[max];
//[20]= {\"HVcaMask\", \"HVchVolt\", \"HVchITrp\",  \"HVchRamp\"};
string datapoint1;
int i,j;
dyn_string valset; 
dyn_float initValue;

dpGet(\"HVch.Numb:_original.._value\", hv);
icard=hv/4;

for (i=icard*4;i<=icard*4+3;i++){

dpGet(\"HVch.Numb:_original.._value\", hv);
valset=makeDynString(\"LVcaTrip\",\"LVcaMask\",\"LVch_Vcc\",\"LVch_Vdd\",\"LVchVCSV\",\"LVchPINV\",\"LVchDTrp\",\"LVchCTrp\",\"LVchTTrp\",\"LVchTLim\",\"LVchCLKS\",\"LVchCLKR\",\"LVchVOut\");
initValue=makeDynFloat(46*2.5,15,0.*50,0*50,0*25,0*20,50/2,50/2,128+50,128+60,0,0,0);
 for(j=1; j<=13; j++)
    {
	if(j<=2)
	  {
// swithcing on all LV Cards 
       icard=hv/4;
//       sprintf(datapoint1, \"Crate00.LV_card%02d.%s.Send:_original.._value\",icard,valset[j]);
//       dpSetWait(datapoint1, initValue[j]);
 	  }
// swithcing on all LV Channels 
 	else
      {
      sprintf(datapoint1, \"Crate00.Channel%02d.%s.Send:_original.._value\",i,valset[j] );
      dpSetWait(datapoint1, initValue[j]);
//  DebugN(\"i\", i ,\"hv\", hv,\"valset[j]\", valset[j], \"initValue\", initValue[j]);
      }
   }
      setValue(\"\", \"backCol\", \"Red\");
      //DebugN(\" LV channel\", i);  
  
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);       
 }
  setValue(\"\", \"backCol\", \"{255,255,153}\");
}



// SimpleCtrlScript {EP_setDP}
// DP1 {Crate1.HVchRamp}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 26
"SendCard"
""
1 20 207 E E E 1 E 1 E N {0,0,0} E N {255,204,153} E E
 E E
25 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-110-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
18 205 112 239
T 
1
LANG:1 9 SEND CARD
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int hv, icard, channel, i;

dpGet(\"HVch.Numb:_original.._value\", hv); 
icard=hv/8;

for (i=icard*8;i<=icard*8+7;i++){


  channel=i+100;
  channel = channel | (( 3 & 0x00ff )<<8);

dpSetWait(\"Crate00.Controller.CCch_Set.Send:_original.._value\", channel);
delay(0,10);
 
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);
 }
}

// SimpleCtrlScript {EP_setDP}
// DP1 {Crate00.Elmb_0.CCco_Set}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 27
"ReadCard"
""
1 494 327 E E E 1 E 1 E N {0,0,0} E N {255,204,153} E E
 E E
26 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-110-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
18 295 112 329
T 
1
LANG:1 9 READ CARD
"// SimpleCtrlScriptStart {invalid}

main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int hv, icard, channel, i;

dpGet(\"HVch.Numb:_original.._value\", hv); 
icard=hv/8;

for (i=icard*8;i<=icard*8+7;i++){

//DebugN(\"hv\", hv ,\"icard\", icard,\"i\", i);
channel=i+100;
dpSetWait(\"Crate00.Controller.CCchRead.Send:_original.._value\", channel);
//    dpGet(\"HVch.Numb:_original.._value\", hv);
//   delay(500);  
//  hv=hv+1;
//DebugN(\"i\", i,\"channel\", channel); 
// dpSetWait(\"Crate00.Elmb_0.CCco_Set:_original.._value\", hv);
 
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);
 }
}

// SimpleCtrlScript {EP_setDP}
// DP1 {Crate00.Elmb_0.CCco_Set}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 28
"Button15"
""
1 110 207 E E E 1 E 1 E N {0,0,0} E N {255,204,153} E E
 E E
27 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-110-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
108 205 202 239
T 
1
LANG:1 4 SEND
"// SimpleCtrlScriptStart {invalid}

main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int lv, icard, channel, i;
int set;

dpGet(\"HVch.Numb:_original.._value\", lv); 
icard=lv/4;

for (i=icard*4;i<=icard*4+3;i++){
 //sprintf(function, \"SET%d\",i);

 SET(i);
//DebugN(\"lv\", lv ,\"icard\", icard,\"i\", i);
dpGet(\"Crate00.Controller.CCch_Set.Send:_original.._value\",set);
//DebugN(\"i\", i,\"ELMB set \",set); 
 //delay(10);
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);
 }
}

SET(int i)
{
int channel;
//DebugN(\"try \",i);
delay(0,50);
channel = i | (( 3 & 0x00ff )<<8);
dpSetWait(\"Crate00.Controller.CCch_Set.Send:_original.._value\", channel);
}

// SimpleCtrlScript {EP_setDP}
// DP1 {Crate00.Elmb_0.CCco_Set}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E E
13 29
"Button16"
""
1 110 297 E E E 1 E 1 E N {0,0,0} E N {255,204,153} E E
 E E
28 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-110-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
108 295 202 329
T 
1
LANG:1 4 READ
"// SimpleCtrlScriptStart {invalid}

main()
{
  EP_setDP();
}

EP_setDP()
{
dyn_errClass err;
int lv, icard, channel, i;

dpGet(\"HVch.Numb:_original.._value\", lv); 
icard=lv/4;

for (i=icard*4;i<=icard*4+3;i++){

//DebugN(\"lv\", lv ,\"icard\", icard,\"i\", i);
channel=i;
dpSetWait(\"Crate00.Controller.CCchRead.Send:_original.._value\", channel);

delay(0,10);
//DebugN(\"channel\", channel); 
 
  err = getLastError();
  if (dynlen(err) > 0)
    errorDialog(err);
 }
}


// SimpleCtrlScript {EP_setDP}
// DP1 {Crate00.Elmb_0.CCco_Set}
// Config1 {:_original.._value}
// Type1 {int}
// Value1 {1}
// SimpleCtrlScriptEnd {EP_setDP}
" 0
 E E 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