Cluster size algotithm for deconvoluted cluster + minors
[u/mrichter/AliRoot.git] / HMPID / Hconfig.C
1 //+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++//
2 //Change log:  21st June 2007 by Levente Molnar
3 //             Detector description upgrade: ITS,ToF,Absorber, Dipole, V0, Emcal
4 //+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++//
5
6
7 #include <TPDGCode.h>
8
9 Bool_t gGun1      =kFALSE;
10 Bool_t gGun7      =kFALSE;
11 Bool_t gGunZ      =kFALSE;
12 Bool_t gBox       =kFALSE;
13 Bool_t gHijing    =kFALSE;
14 Bool_t gHijingPara=kFALSE;
15 Bool_t gPythia    =kFALSE;
16
17 class HmpConfig : public TGMainFrame
18 {
19 RQ_OBJECT()
20 public:
21           HmpConfig(const char*sFileName);
22          ~HmpConfig()                    {Info("ctor","");Cleanup();}
23          
24   enum EVersOpts  {kNo=101,kVer0,kVer1,kVer2,kTest, kDeclust=301,kSagita,kFeedback,kElNoise,kQe0=400,kQeNorm,kFlatIdx,kOptics};
25   enum EGenTypes  {kGunZ=1,kGun1,kGun7,kBox,kHijing,kHijingPara,kPythia,kHmpLib,kNotUsed=999};
26   
27   enum EDetectors {kPIPE=1,kITS,kTPC,kTRD,kTOF,kFRAME,kMAG,kACORDE,kHALL,kPHOS,kT0,kFMD,kABSO,kPMD,kDIPO,kEMCAL,kVZERO,kMUON,kZDC,kSHILD};
28   enum EProcesses {kDCAY=1,kPAIR,kCOMP,kPHOT,kPFIS,kDRAY,kANNI,kBREM,kMUNU,kCKOV,kHADR,kLOSS,kMULS,kRAYL,kALL};
29   enum EBatchFlags{kAll=55,kHmp,kDdl,kDat,kRoo,kVtx,kTrk,kHlt,kPid,kAln,kRecoPar};
30   enum EMagField  {kFld0,kFld2,kFld4,kFld5,kFld_2,kFld_4,kFld_5};
31   
32   Float_t Eta2Theta      (Float_t arg)  const{return (180./TMath::Pi())*2.*TMath::ATan(TMath::Exp(-arg));}
33   
34   void GuiHmp (TGHorizontalFrame *pMainF);  void WriteHmp (FILE *pF);  void HmpSlot   (Int_t ver);
35   void GuiPhys (TGHorizontalFrame *pMainF);  void WritePhys (FILE *pF);  void PhysAddSlot(Int_t); void PhysRemSlot(Int_t);
36   void GuiGen  (TGCompositeFrame  *pMainF);  void WriteGen  (FILE *pF);  void GenAddSlot (Int_t); void GenRemSlot (Int_t);
37   void GuiDet  (TGHorizontalFrame *pMainF);  void WriteDet  (FILE *pF);  void DetAddSlot (Int_t); void DetRemSlot (Int_t);
38   void GuiBatch(TGHorizontalFrame *pMainF);  void WriteBatch(        );  void SlotBatch  (Int_t); void SlotRec    (Bool_t); 
39   
40   void    WriteConfig();
41   void    ExitSlot();
42      
43   TGButtonGroup *fVerBG,*fOptBG,*fQeBG; //Hmp widgets  
44   TGButtonGroup *fMagBG;                //mag field widgets   
45   TGButton      *fDecayerB;             //external decayer widgets
46   
47   TGComboBox        *fGenPidCO,*fGenPminCO,*fGenPmaxCO,*fGenChamCO,*fGenNprimCO; //generator widgets combos
48   TGCompositeFrame  *fGenF;                                                     //generator widgets frames     
49   TGButtonGroup     *fGenBG;                                                    //generator widgets
50   
51   TGButtonGroup *fDetBG,*fProcBG;                                               //detectors and processes sections
52   TGCheckButton *fSimB,*fTraB;   TGButtonGroup *fSdiBG,*fDigBG,*fRawBG;         //sim section
53   TGCheckButton *fRecB;          TGButtonGroup *fInpBG,*fCluBG,*fTrkBG;         //rec section
54       //batch control widgets
55
56    char         *fFileName;
57 };//class HmpConfig
58 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
59 HmpConfig::HmpConfig(const char *sFileName):TGMainFrame(gClient->GetRoot(),700,400)
60 {
61   fFileName=sFileName;
62
63   AddFrame(pMainF=new TGHorizontalFrame(this,100,200)); //main horizontal frame
64   
65   GuiHmp (pMainF);
66   GuiGen  (pMainF);   
67   GuiDet  (pMainF);
68   GuiPhys (pMainF);
69   GuiBatch(pMainF);  
70   
71 //File    
72   AddFrame(pFileHF=new TGHorizontalFrame(this,100,200));
73   pFileHF->AddFrame(pCrtTB=new TGTextButton(pFileHF,"Create"));
74   pCrtTB->Connect("Clicked()","HmpConfig",this,"ExitSlot()");                                 
75   pFileHF->AddFrame(new TGLabel(pFileHF,Form(" config file as %s",fFileName)));  
76   
77   MapSubwindows();   
78   Resize(GetDefaultSize());
79   SetWindowName("Create AliROOT scripts");
80   MapWindow(); 
81 }//ctor
82 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
83 void HmpConfig::GuiHmp(TGHorizontalFrame *pMainHF)
84 {
85   pMainHF->AddFrame(pLeftVF=new TGVerticalFrame(pMainHF,100,200));  
86   pLeftVF->AddFrame(pHmpGF=new TGGroupFrame(pLeftVF,"HMPID"));
87   pHmpGF->AddFrame(fVerBG=new TGButtonGroup(pHmpGF,""));  fVerBG->Connect("Pressed(Int_t)" ,"HmpConfig",this,"HmpVerSlot(Int_t)");
88     new TGRadioButton(fVerBG,   "No"         ,kNo       );   
89     new TGRadioButton(fVerBG,   "ver0"       ,kVer0     );
90     new TGRadioButton(fVerBG,   "ver1"       ,kVer1     );  
91     new TGRadioButton(fVerBG,   "ver2"       ,kVer2     ); fVerBG->SetButton(kVer2);
92   pHmpGF->AddFrame(fOptBG=new TGButtonGroup(pHmpGF,""));  fOptBG->Connect("Pressed(Int_t)" ,"HmpConfig",this,"HmpVerSlot(Int_t)");
93     new TGCheckButton(fOptBG,"Test run position"   ,kTest);       
94     new TGCheckButton(fOptBG,"Unfold cluster    "  ,kDeclust);      fOptBG->SetButton(kDeclust);
95     new TGCheckButton(fOptBG,"Wire sagitta      "  ,kSagita);       fOptBG->SetButton(kSagita);
96     new TGCheckButton(fOptBG,"Photon feedback   "  ,kFeedback);     fOptBG->SetButton(kFeedback); 
97     new TGCheckButton(fOptBG,"Electronic noise  "  ,kElNoise);     // fOptBG->SetButton(kElNoise); 
98     new TGCheckButton(fOptBG,"C6F14 N=1.292     "  ,kFlatIdx);     
99     new TGCheckButton(fOptBG,"Plot optics       "  ,kOptics);     
100   pHmpGF->AddFrame(fQeBG=new TGButtonGroup(pHmpGF,""));
101     new TGRadioButton(fQeBG,"QE=0"                 ,kQe0);       
102     new TGRadioButton(fQeBG,"QE normal"            ,kQeNorm);       fQeBG->SetButton(kQeNorm);
103   pLeftVF->AddFrame(fDecayerB=new TGCheckButton(pLeftVF,"Puthia decayer On/Off"));  fDecayerB->SetState(kButtonDown);
104   pLeftVF->AddFrame(fMagBG=new TGButtonGroup(pLeftVF,"Mag field")); 
105     new TGRadioButton(fMagBG,   "0.5 T"      ,kFld5   );
106     new TGRadioButton(fMagBG,   "0.4 T"      ,kFld4   );
107     new TGRadioButton(fMagBG,   "0.2 T"      ,kFld2   );  fMagBG->SetButton(kFld2);
108     new TGRadioButton(fMagBG,   "0 T"        ,kFld0   );   
109     new TGRadioButton(fMagBG,   "-0.2 T"     ,kFld_2  );
110     new TGRadioButton(fMagBG,   "-0.4 T"     ,kFld_4  );
111     new TGRadioButton(fMagBG,   "-0.5 T"     ,kFld_5  );
112 }//Hmp()
113 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
114 void HmpConfig::HmpVerSlot(Int_t ver)  
115 {
116   if(ver==kTest)    {fMagBG->SetButton(kFld0); fGenBG->SetButton(kGunZ); }
117
118 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
119 void HmpConfig::WriteHmp(FILE *pF)
120 {
121   if(!fVerBG->GetButton(kNo)->GetState()){
122     TString title;
123     if(!fOptBG->GetButton(kSagita)  ->GetState())             fprintf(pF,"  AliHMPIDParam::fgIsWireSagita=kFALSE;\n");
124     if(!fOptBG->GetButton(kFeedback)->GetState())             title+=" NoFeedBack ";
125     if( fOptBG->GetButton(kElNoise) ->GetState())             fprintf(pF,"  AliHMPIDDigitizer::DoNoise(kTRUE);\n");
126     if( fOptBG->GetButton(kTest)    ->GetState())             title+=" TestBeam ";
127     if( fOptBG->GetButton(kOptics)  ->GetState())             title+=" ShowOptics ";
128     if( fOptBG->GetButton(kFlatIdx) ->GetState())             title+=" FlatIdx ";
129     if(title.Length()==0) title="Default";
130     
131     if     (fVerBG->GetButton(kVer0)->GetState())           fprintf(pF,"  new AliHMPIDv0(\"Gel %s\");\n\n",title.Data());    
132     else if(fVerBG->GetButton(kVer1)->GetState())           fprintf(pF,"  new AliHMPIDv1(\"HMPID\",\"%s\");\n\n",title.Data());   
133     else if(fVerBG->GetButton(kVer2)->GetState())           fprintf(pF,"  new AliHMPIDv2(\"HMPID\",\"%s\");\n\n",title.Data());   
134   }
135 }
136 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
137 void HmpConfig::GuiPhys(TGHorizontalFrame *pMainHF)
138 {
139   pMainHF->AddFrame(fProcBG=new TGButtonGroup(pMainHF,"Procs"));
140   fProcBG->Connect("Pressed(Int_t)" ,"HmpConfig",this,"PhysAddSlot(Int_t)");
141   fProcBG->Connect("Released(Int_t)","HmpConfig",this,"PhysRemSlot(Int_t)");
142     new TGCheckButton(fProcBG,"ALL  ON/OFF"                 ,kALL)) ;
143     new TGCheckButton(fProcBG,"DCAY Decay"                  ,kDCAY));  fProcBG->SetButton(kDCAY);       
144     new TGCheckButton(fProcBG,"PAIR Pair production"        ,kPAIR));  fProcBG->SetButton(kPAIR);       
145     new TGCheckButton(fProcBG,"COMP Compton"                ,kCOMP));  fProcBG->SetButton(kCOMP);
146     new TGCheckButton(fProcBG,"PHOT"                        ,kPHOT));  fProcBG->SetButton(kPHOT);
147     new TGCheckButton(fProcBG,"PFIS Photofission"           ,kPFIS));  
148     new TGCheckButton(fProcBG,"DRAY Delta electrons"        ,kDRAY));  
149     new TGCheckButton(fProcBG,"ANNI Annihilation"           ,kANNI));  fProcBG->SetButton(kANNI);       
150     new TGCheckButton(fProcBG,"BREM Bremstraslung"          ,kBREM));  fProcBG->SetButton(kBREM);       
151     new TGCheckButton(fProcBG,"MUNU Muon-Nuclear"           ,kMUNU));  fProcBG->SetButton(kMUNU);       
152     new TGCheckButton(fProcBG,"CKOV Cerenkovs"              ,kCKOV));  fProcBG->SetButton(kCKOV);       
153     new TGCheckButton(fProcBG,"HADR Hadronic interactions " ,kHADR));  fProcBG->SetButton(kHADR);       
154     new TGCheckButton(fProcBG,"LOSS Energy losses"          ,kLOSS));  fProcBG->SetButton(kLOSS);       
155     new TGCheckButton(fProcBG,"MULS Multiple scattering"    ,kMULS));  fProcBG->SetButton(kMULS);       
156     new TGCheckButton(fProcBG,"RAYL Rayleigh scattering"    ,kRAYL));  fProcBG->SetButton(kRAYL);       
157 }
158 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
159 void HmpConfig::PhysAddSlot(Int_t id)
160 {//slot is invoked when any of physics check button is pressed
161   if(id==kALL)  //if the pressed check button is kALL then switch on all the buttons 
162     for(int i=1;i<=fProcBG->GetCount();i++) 
163       fProcBG->SetButton(i,kButtonDown);
164 }
165 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
166 void  HmpConfig::PhysRemSlot(Int_t id)
167 {//slot is invoked when any of physics check button is released
168   if(id==kALL) //if the released check button is kALL then switch off all the buttons 
169     for(int i=1;i<=fProcBG->GetCount();i++) 
170       fProcBG->SetButton(i,kButtonUp);
171 }
172 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
173 void HmpConfig::WritePhys(FILE *pF)
174 {
175   if(fProcBG->GetButton(kDCAY)->GetState()) fprintf(pF,"  gMC->SetProcess(\"DCAY\",1);  ");else fprintf(pF,"  gMC->SetProcess(\"DCAY\",0);  ");
176   if(fProcBG->GetButton(kPAIR)->GetState()) fprintf(pF,"  gMC->SetProcess(\"PAIR\",1);  ");else fprintf(pF,"  gMC->SetProcess(\"PAIR\",0);  ");
177   if(fProcBG->GetButton(kCOMP)->GetState()) fprintf(pF,"  gMC->SetProcess(\"COMP\",1);\n");else fprintf(pF,"  gMC->SetProcess(\"COMP\",0);\n");
178   if(fProcBG->GetButton(kPHOT)->GetState()) fprintf(pF,"  gMC->SetProcess(\"PHOT\",1);  ");else fprintf(pF,"  gMC->SetProcess(\"PHOT\",0);  ");
179   if(fProcBG->GetButton(kPFIS)->GetState()) fprintf(pF,"  gMC->SetProcess(\"PFIS\",1);  ");else fprintf(pF,"  gMC->SetProcess(\"PFIS\",0);  ");
180   if(fProcBG->GetButton(kDRAY)->GetState()) fprintf(pF,"  gMC->SetProcess(\"DRAY\",1);\n");else fprintf(pF,"  gMC->SetProcess(\"DRAY\",0);\n");
181   if(fProcBG->GetButton(kANNI)->GetState()) fprintf(pF,"  gMC->SetProcess(\"ANNI\",1);  ");else fprintf(pF,"  gMC->SetProcess(\"ANNI\",0);  ");
182   if(fProcBG->GetButton(kBREM)->GetState()) fprintf(pF,"  gMC->SetProcess(\"BREM\",1);  ");else fprintf(pF,"  gMC->SetProcess(\"BREM\",0);  ");
183   if(fProcBG->GetButton(kMUNU)->GetState()) fprintf(pF,"  gMC->SetProcess(\"MUNU\",1);\n");else fprintf(pF,"  gMC->SetProcess(\"MUNU\",0);\n");
184   if(fProcBG->GetButton(kCKOV)->GetState()) fprintf(pF,"  gMC->SetProcess(\"CKOV\",1);  ");else fprintf(pF,"  gMC->SetProcess(\"CKOV\",0);  ");
185   if(fProcBG->GetButton(kHADR)->GetState()) fprintf(pF,"  gMC->SetProcess(\"HADR\",1);  ");else fprintf(pF,"  gMC->SetProcess(\"HADR\",0);  ");
186   if(fProcBG->GetButton(kLOSS)->GetState()) fprintf(pF,"  gMC->SetProcess(\"LOSS\",2);\n");else fprintf(pF,"  gMC->SetProcess(\"LOSS\",0);\n");
187   if(fProcBG->GetButton(kMULS)->GetState()) fprintf(pF,"  gMC->SetProcess(\"MULS\",1);  ");else fprintf(pF,"  gMC->SetProcess(\"MULS\",0);  ");
188   if(fProcBG->GetButton(kRAYL)->GetState()) fprintf(pF,"  gMC->SetProcess(\"RAYL\",1);\n");else fprintf(pF,"  gMC->SetProcess(\"RAYL\",0);\n");
189   
190   fprintf(pF,"\n");  
191   fprintf(pF,"  gMC->SetCut(\"CUTGAM\",0.001);  "); fprintf(pF,"  gMC->SetCut(\"CUTELE\",0.001);  "); fprintf(pF,"  gMC->SetCut(\"CUTNEU\",0.001);\n"); 
192   fprintf(pF,"  gMC->SetCut(\"CUTHAD\",0.001);  "); fprintf(pF,"  gMC->SetCut(\"CUTMUO\",0.001);  "); fprintf(pF,"  gMC->SetCut(\"BCUTE\" ,0.001);\n");
193   fprintf(pF,"  gMC->SetCut(\"BCUTM\" ,0.001);  "); fprintf(pF,"  gMC->SetCut(\"DCUTE\" ,0.001);  "); fprintf(pF,"  gMC->SetCut(\"DCUTM\" ,0.001);\n"); 
194   fprintf(pF,"  gMC->SetCut(\"PPCUTM\",0.001);  "); fprintf(pF,"  gMC->SetCut(\"TOFMAX\",1e10);\n\n"); 
195 }//WritePhys()
196 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
197 void HmpConfig::GuiGen(TGCompositeFrame *pMainF)
198 {//generator configurator implemented as group of radio buttons
199   pMainF->AddFrame(fGenF=new TGVerticalFrame(pMainF));//add generator vertical frame to horizontal main frame
200   fGenF->AddFrame(fGenBG=new TGButtonGroup(fGenF,"Gene"));//add type button group to vertical generator frame
201   fGenBG->Connect("Pressed(Int_t)","HmpConfig",this,"GenAddSlot(Int_t)"); fGenBG->Connect("Released(Int_t)","HmpConfig",this,"GenRemSlot(Int_t)");
202     new TGCheckButton(fGenBG,"gun along z"           ,kGunZ);
203     new TGCheckButton(fGenBG,"gun to 1 chamber"      ,kGun1);
204     new TGCheckButton(fGenBG,"gun to 7 chambers"     ,kGun7);
205     new TGCheckButton(fGenBG,"box HMPID phase space"  ,kBox );  
206     new TGCheckButton(fGenBG,"HIJING"                ,kHijing);
207     new TGCheckButton(fGenBG,"HIJING para"           ,kHijingPara);
208     new TGCheckButton(fGenBG,"Pythia"                ,kPythia);
209     new TGCheckButton(fGenBG,"HMPID lib"              ,kHmpLib);
210 //N prims for box and Hijing para    
211   fGenF->AddFrame(fGenNprimCO=new TGComboBox(fGenF,100)); //add N prims combo to generator vertical frame
212   fGenNprimCO->AddEntry("not used"    ,kNotUsed);
213   fGenNprimCO->AddEntry("N prim=1"    ,1);
214   fGenNprimCO->AddEntry("N prim=2"    ,2);
215   fGenNprimCO->AddEntry("N prim=5"    ,5);
216   fGenNprimCO->AddEntry("N prim=10"   ,10);
217   fGenNprimCO->AddEntry("N prim=20"   ,20);
218   fGenNprimCO->AddEntry("N prim=50"   ,50);
219   fGenNprimCO->AddEntry("N prim=100"  ,100);
220   fGenNprimCO->AddEntry("N prim=500"  ,500);
221   fGenNprimCO->AddEntry("N prim=1000" ,1000);
222   fGenNprimCO->AddEntry("N prim=10000",10000);
223   fGenNprimCO->AddEntry("N prim=80000",80000);  fGenNprimCO->Resize(160,20);   fGenNprimCO->Select(kNotUsed);
224 //PID    
225   fGenF->AddFrame(fGenPidCO=new TGComboBox(fGenF,100)); //add pid combo to generator vertical frame
226   fGenPidCO->AddEntry("not used"   ,kNotUsed);
227   fGenPidCO->AddEntry("electron"   ,kElectron);
228   fGenPidCO->AddEntry("positron"   ,kPositron);
229   fGenPidCO->AddEntry("pion +"     ,kPiPlus);
230   fGenPidCO->AddEntry("pion -"     ,kPiMinus);
231   fGenPidCO->AddEntry("kaon +"     ,kKPlus);
232   fGenPidCO->AddEntry("kaon -"     ,kKMinus);
233   fGenPidCO->AddEntry("kaon 0"     ,kK0Short);    
234   fGenPidCO->AddEntry("proton"     ,kProton);
235   fGenPidCO->AddEntry("antiproton" ,kProtonBar);
236   fGenPidCO->AddEntry("lambda"     ,kLambda0);
237   fGenPidCO->AddEntry("antilambda" ,kLambda0Bar);  fGenPidCO->Resize(160,20); fGenPidCO->Select(kNotUsed);
238 //Pmin  
239   fGenF->AddFrame(fGenPminCO=new TGComboBox(fGenF,100)); //add Pmin combo to generator vertical frame  
240   fGenPminCO->AddEntry("not used",kNotUsed);
241   for(Int_t i=5;i<=295;i+=5) fGenPminCO->AddEntry(Form("Pmin=%3.1f GeV",0.1*i), i); fGenPminCO->Resize(160,20); fGenPminCO->Select(kNotUsed);
242 //Pmax  
243   fGenF->AddFrame(fGenPmaxCO=new TGComboBox(fGenF,100)); //add Pmax combo to generator vertical frame
244   fGenPmaxCO->AddEntry("not used",kNotUsed);
245   for(Int_t i=10;i<=295;i+=5) fGenPmaxCO->AddEntry(Form("Pmax=%3.1f GeV",0.1*i), i);  fGenPmaxCO->Resize(160,20); fGenPmaxCO->Select(kNotUsed);
246 //Chamber number  
247   fGenF->AddFrame(fGenChamCO=new TGComboBox(fGenF,100)); //add chamber number combo to generator vertical frame
248   fGenChamCO->AddEntry("not used",kNotUsed);
249   for(int i=1;i<=7;i++) fGenChamCO->AddEntry(Form("Chamber %i",i),i);  fGenChamCO->Resize(160,20); fGenChamCO->Select(kNotUsed);
250 }//GuiGen()
251 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
252 void HmpConfig::GenAddSlot(Int_t id)
253 {//is invoked when any of generator check button is pressed
254   if(id==kGunZ){
255     fGenBG->GetButton(kGun1)->SetEnabled(kFALSE);  fGenF->HideFrame(fGenNprimCO); fGenF->HideFrame(fGenPmaxCO);
256     fGenBG->GetButton(kGun7)->SetEnabled(kFALSE);                                
257     fGenBG->GetButton(kBox )->SetEnabled(kFALSE);  fGenPidCO->Select(kProton);    fGenPminCO->Select(25);
258                                                    fGenF->HideFrame(fGenChamCO);
259     gGunZ=!gGunZ;
260   } 
261   if(id==kGun1){
262     fGenBG->GetButton(kGunZ)->SetEnabled(kFALSE);  fGenF->HideFrame(fGenNprimCO); fGenF->HideFrame(fGenPmaxCO); 
263     fGenBG->GetButton(kGun7)->SetEnabled(kFALSE);  fGenPidCO->Select(kProton);    fGenPminCO->Select(25); fGenChamCO->Select(4);
264     fGenBG->GetButton(kBox )->SetEnabled(kFALSE);  
265     gGun1=!gGun1;
266   }
267   if(id==kGun7){
268     fGenBG->GetButton(kGunZ)->SetEnabled(kFALSE);  fGenF->HideFrame(fGenNprimCO);
269     fGenBG->GetButton(kGun1)->SetEnabled(kFALSE);                                fGenPidCO->Select(kProton); 
270     fGenBG->GetButton(kBox )->SetEnabled(kFALSE);  fGenF->HideFrame(fGenPmaxCO); fGenPminCO->Select(25);
271                                                    fGenF->HideFrame(fGenChamCO); 
272     gGun7=!gGun7;
273   } 
274   if(id==kBox){
275     fGenBG->GetButton(kGunZ)->SetEnabled(kFALSE);                                fGenNprimCO->Select(500);
276     fGenBG->GetButton(kGun1)->SetEnabled(kFALSE);                                fGenPidCO  ->Select(kProton);
277     fGenBG->GetButton(kGun7)->SetEnabled(kFALSE);                                fGenPminCO ->Select(15);       fGenPmaxCO->Select(15); 
278                                                    fGenF->HideFrame(fGenChamCO);
279     gBox=!gBox;
280   }
281   if(id==kHijing){
282 //    fGenBG->GetButton(kHijing)->ChangeBackground(0xff0000);
283     fGenBG->GetButton(kHijingPara)->SetEnabled(kFALSE);
284     fGenBG->GetButton(kPythia)->SetEnabled(kFALSE);
285     gHijing=!gHijing;
286   }
287   if(id==kHijingPara){
288     fGenBG->GetButton(kHijing)->SetEnabled(kFALSE);   fGenNprimCO->Select(500);
289     fGenBG->GetButton(kPythia)->SetEnabled(kFALSE);
290     gHijingPara=!gHijingPara;
291   }
292   if(id==kPythia){
293     fGenBG->GetButton(kHijing)->SetEnabled(kFALSE);
294     fGenBG->GetButton(kHijingPara)->SetEnabled(kFALSE);
295     gPythia=!gPythia;
296   }
297 }//GenAddSlot()
298 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
299 void HmpConfig::GenRemSlot(Int_t id)
300 {//is invoked when any of generator check button is released
301   if(id==kGunZ&&!gGunZ){
302     fGenBG->GetButton(kGun1)->SetEnabled();  fGenF->ShowFrame(fGenNprimCO);                                                                  
303     fGenBG->GetButton(kGun7)->SetEnabled();                                     fGenPidCO  ->Select(kNotUsed);
304     fGenBG->GetButton(kBox )->SetEnabled();  fGenF->ShowFrame(fGenPmaxCO);      fGenPminCO ->Select(kNotUsed);
305   } 
306   if(id==kGun1&&!gGun1){
307     fGenBG->GetButton(kGunZ)->SetEnabled();  fGenF->ShowFrame(fGenNprimCO);
308     fGenBG->GetButton(kGun7)->SetEnabled();                                     fGenPidCO  ->Select(kNotUsed);
309     fGenBG->GetButton(kBox )->SetEnabled();  fGenF->ShowFrame(fGenPmaxCO);      fGenPminCO ->Select(kNotUsed);  
310                                                                                 fGenChamCO ->Select(kNotUsed); 
311   }
312   if(id==kGun7&&!gGun7){
313     fGenBG->GetButton(kGunZ)->SetEnabled();  fGenF->ShowFrame(fGenNprimCO);
314     fGenBG->GetButton(kGun1)->SetEnabled();                                     fGenPidCO  ->Select(kNotUsed);
315     fGenBG->GetButton(kBox )->SetEnabled();  fGenF->ShowFrame(fGenPmaxCO);      fGenPminCO ->Select(kNotUsed); 
316                                              fGenF->ShowFrame(fGenChamCO); 
317   } 
318   if(id==kBox&&!gBox){
319     fGenBG->GetButton(kGunZ)->SetEnabled();                                     fGenNprimCO->Select(kNotUsed);
320     fGenBG->GetButton(kGun1)->SetEnabled();                                     fGenPidCO  ->Select(kNotUsed);
321     fGenBG->GetButton(kGun7)->SetEnabled();                                     fGenPminCO ->Select(kNotUsed);   fGenPmaxCO->Select(kNotUsed);
322                                                                                 fGenChamCO ->Select(kNotUsed);
323   }
324   if(id==kHijing&&!gHijing){
325 //    fGenBG->GetButton(kHijing)->ChangeBackground(0xbebebe);
326     fGenBG->GetButton(kHijingPara)->SetEnabled();
327     fGenBG->GetButton(kPythia)->SetEnabled();
328   }
329   if(id==kHijingPara&&!gHijingPara){
330     fGenBG->GetButton(kHijing)->SetEnabled();                                   fGenNprimCO->Select(kNotUsed);
331     fGenBG->GetButton(kPythia)->SetEnabled();
332   }
333   if(id==kPythia&&!gPythia){
334     fGenBG->GetButton(kHijing)->SetEnabled();
335     fGenBG->GetButton(kHijingPara)->SetEnabled();
336   }
337 }//GenRemSlot()
338 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
339 void HmpConfig::WriteGen(FILE *pF)
340 {
341   Int_t pid=fGenPidCO->GetSelected();
342   Float_t pmin=0.1*fGenPminCO->GetSelected(); //particle momentum, GeV
343   Float_t pmax=0.1*fGenPmaxCO->GetSelected(); //particle momentum, GeV
344   
345   if(fGenBG->GetButton(kHijing)->GetState()==kButtonDown     ||
346      fGenBG->GetButton(kHijingPara)->GetState()==kButtonDown ||
347      fGenBG->GetButton(kPythia)->GetState()==kButtonDown) {;}
348   else {fprintf(pF,"  AliGenCocktail *pG=new AliGenCocktail();\n\n");}
349   
350   if(fGenBG->GetButton(kGunZ)->GetState()==kButtonDown)//1 particle along Z axis 
351     fprintf(pF,"  AliGenFixed *pGz=new AliGenFixed(1); pGz->SetPart(%i); pGz->SetMomentum(%.1f); pGz->SetOrigin(0,0,-200); pG->AddGenerator(pGz,\"Gz\",1);\n",pid,pmin);
352   
353   if(fGenBG->GetButton(kGun1)->GetState()==kButtonDown){//1 gun towards 1 HMPID chamber
354     switch(fGenChamCO->GetSelected()){
355      case 1: fprintf(pF,"  AliGenFixed *pG1=new AliGenFixed(1); pG1->SetPart(%i); pG1->SetMomentum(%.1f);\n",pid,pmin); 
356              fprintf(pF,"               pG1->SetTheta(109.5);   pG1->SetPhi(10);  pG->AddGenerator(pG1,\"g1\",1);\n"); break;
357      case 2: fprintf(pF,"  AliGenFixed *pG2=new AliGenFixed(1); pG2->SetPart(%i); pG2->SetMomentum(%.1f);\n",pid,pmin);
358              fprintf(pF,"               pG2->SetTheta( 90.0);   pG2->SetPhi(10);  pG->AddGenerator(pG2,\"g2\",1);\n"); break;
359      case 3: fprintf(pF,"  AliGenFixed *pG3=new AliGenFixed(1); pG3->SetPart(%i); pG3->SetMomentum(%.1f);\n",pid,pmin);
360              fprintf(pF,"               pG3->SetTheta(109.5);   pG3->SetPhi(30);  pG->AddGenerator(pG3,\"g3\",1);\n"); break;
361      case 4: fprintf(pF,"  AliGenFixed *pG4=new AliGenFixed(1); pG4->SetPart(%i); pG4->SetMomentum(%.1f);\n",pid,pmin);
362              fprintf(pF,"               pG4->SetTheta( 87.0);   pG4->SetPhi(30);  pG->AddGenerator(pG4,\"g4\",1);\n"); break;
363      case 5: fprintf(pF,"  AliGenFixed *pG5=new AliGenFixed(1); pG5->SetPart(%i); pG5->SetMomentum(%.1f);\n",pid,pmin);
364              fprintf(pF,"               pG5->SetTheta( 70.5);   pG5->SetPhi(30);  pG->AddGenerator(pG5,\"g5\",1);\n"); break;
365      case 6: fprintf(pF,"  AliGenFixed *pG6=new AliGenFixed(1); pG6->SetPart(%i); pG6->SetMomentum(%.1f);\n",pid,pmin);
366              fprintf(pF,"               pG6->SetTheta( 90.0);   pG6->SetPhi(50);  pG->AddGenerator(pG6,\"g6\",1);\n"); break;
367      case 7: fprintf(pF,"  AliGenFixed *pG7=new AliGenFixed(1); pG7->SetPart(%i); pG7->SetMomentum(%.1f);\n",pid,pmin);
368              fprintf(pF,"               pG7->SetTheta( 70.5);   pG7->SetPhi(50);  pG->AddGenerator(pG7,\"g7\",1);\n"); break;
369     }    
370   }
371   
372   if(fGenBG->GetButton(kGun7)->GetState()==kButtonDown){//7 guns towards 7 HMPID chambers
373     fprintf(pF,"  AliGenFixed *pG1=new AliGenFixed(1); pG1->SetPart(%i); pG1->SetMomentum(%.1f);pG1->SetTheta(109.5-3); pG1->SetPhi(10);\n",pid,pmin); 
374     fprintf(pF,"               pG->AddGenerator(pG1,\"g1\",1);\n");
375     fprintf(pF,"  AliGenFixed *pG2=new AliGenFixed(1); pG2->SetPart(%i); pG2->SetMomentum(%.1f);pG2->SetTheta( 90.0-3); pG2->SetPhi(10);\n",pid,pmin); 
376     fprintf(pF,"               pG->AddGenerator(pG2,\"g2\",1);\n");
377     fprintf(pF,"  AliGenFixed *pG3=new AliGenFixed(1); pG3->SetPart(%i); pG3->SetMomentum(%.1f);pG3->SetTheta(109.5-3); pG3->SetPhi(30);\n",pid,pmin); 
378     fprintf(pF,"               pG->AddGenerator(pG3,\"g3\",1);\n");
379     fprintf(pF,"  AliGenFixed *pG4=new AliGenFixed(1); pG4->SetPart(%i); pG4->SetMomentum(%.1f);pG4->SetTheta( 90.0-3); pG4->SetPhi(30);\n",pid,pmin); 
380     fprintf(pF,"               pG->AddGenerator(pG4,\"g4\",1);\n");
381     fprintf(pF,"  AliGenFixed *pG5=new AliGenFixed(1); pG5->SetPart(%i); pG5->SetMomentum(%.1f);pG5->SetTheta( 70.0-3); pG5->SetPhi(30);\n",pid,pmin); 
382     fprintf(pF,"               pG->AddGenerator(pG5,\"g5\",1);\n");
383     fprintf(pF,"  AliGenFixed *pG6=new AliGenFixed(1); pG6->SetPart(%i); pG6->SetMomentum(%.1f);pG6->SetTheta( 90.0-3); pG6->SetPhi(50);\n",pid,pmin); 
384     fprintf(pF,"               pG->AddGenerator(pG6,\"g6\",1);\n");
385     fprintf(pF,"  AliGenFixed *pG7=new AliGenFixed(1); pG7->SetPart(%i); pG7->SetMomentum(%.1f);pG7->SetTheta( 70.0-3); pG7->SetPhi(50);\n",pid,pmin); 
386     fprintf(pF,"               pG->AddGenerator(pG7,\"g7\",1);\n");
387   }  
388     
389   if(fGenBG->GetButton(kBox)->GetState()==kButtonDown){// box towards HMPID phase space
390     fprintf(pF,"  AliGenBox *pB=new AliGenBox(%i);      pB->SetPart(%i);       pB->SetMomentumRange(%.1f,%.1f);\n",(int)fGenNprimCO->GetSelected(),pid,pmin,pmax); 
391     fprintf(pF,"             pB->SetThetaRange(65,115); pB->SetPhiRange(5,55); pG->AddGenerator(pB,\"b\",1);\n");
392   }     
393   
394   if(fGenBG->GetButton(kHijing)->GetState()==kButtonDown){//normal HIJING
395     fprintf(pF,"  AliGenHijing *pH=new AliGenHijing(-1);           pH->SetEnergyCMS(5500);        pH->SetReferenceFrame(\"CMS\");\n");
396     fprintf(pF,"                pH->SetProjectile(\"A\", 208, 82);   pH->SetTarget(\"A\", 208, 82);   pH->SetJetQuenching(0);\n");      
397     fprintf(pF,"                pH->SetShadowing(0);               pH->KeepFullEvent();           pH->SetSelectAll(0);\n");
398     fprintf(pF,"                pH->SetImpactParameterRange(0, 5); //fermi\n");
399     fprintf(pF,"                AliGenerator *gener = (AliGenerator*)pH; \n");
400     fprintf(pF,"                gener->SetOrigin(0, 0, 0);    // vertex position \n");
401     fprintf(pF,"                gener->SetSigma(0, 0, 5.3);   // Sigma in (X,Y,Z) (cm) on IP position \n");
402     fprintf(pF,"                gener->SetCutVertexZ(1.);     // Truncate at 1 sigma \n");
403     fprintf(pF,"                gener->SetVertexSmear(kPerEvent);  \n");
404     fprintf(pF,"                gener->SetTrackingFlag(1); \n");
405     fprintf(pF,"                gener->Init(); \n\n");
406   }
407   
408   if(fGenBG->GetButton(kHijingPara)->GetState()==kButtonDown){//parametrized HIJING 
409     fprintf(pF,"  AliGenHIJINGpara *pHP=new AliGenHIJINGpara(%i);\n",(int)fGenNprimCO->GetSelected());
410     fprintf(pF,"  pHP->SetMomentumRange(0,999); pHP->SetThetaRange(%f,%f); pHP->SetPhiRange(0,360);\n",Eta2Theta(8),Eta2Theta(-8));
411     fprintf(pF,"                AliGenerator *gener = (AliGenerator*)pHP; \n");
412     fprintf(pF,"                gener->SetOrigin(0, 0, 0);    // vertex position \n");
413     fprintf(pF,"                gener->SetSigma(0, 0, 5.3);   // Sigma in (X,Y,Z) (cm) on IP position \n");
414     fprintf(pF,"                gener->SetCutVertexZ(1.);     // Truncate at 1 sigma \n");
415     fprintf(pF,"                gener->SetVertexSmear(kPerEvent);  \n");
416     fprintf(pF,"                gener->SetTrackingFlag(1); \n");
417     fprintf(pF,"                gener->Init(); \n\n");
418   }
419       
420   if(fGenBG->GetButton(kPythia)->GetState()==kButtonDown){//Pythia
421     fprintf(pF,"  AliGenPythia *pP=new AliGenPythia(-1);\n");
422     fprintf(pF,"  pP->SetMomentumRange(0,999);\n");
423     fprintf(pF,"  pP->SetYRange(-12,12);  pP->SetPtRange(0,1000);      pP->SetStrucFunc(kCTEQ4L);\n");
424     fprintf(pF,"  pP->SetProcess(kPyMb);  pP->SetEnergyCMS(14000);\n");      
425     fprintf(pF,"                AliGenerator *gener = (AliGenerator*)pP; \n");
426     fprintf(pF,"                gener->SetOrigin(0, 0, 0);    // vertex position \n");
427     fprintf(pF,"                gener->SetSigma(0, 0, 5.3);   // Sigma in (X,Y,Z) (cm) on IP position \n");
428     fprintf(pF,"                gener->SetCutVertexZ(1.);     // Truncate at 1 sigma \n");
429     fprintf(pF,"                gener->SetVertexSmear(kPerEvent);  \n");
430     fprintf(pF,"                gener->SetTrackingFlag(1); \n");
431     fprintf(pF,"                gener->Init(); \n\n");
432   }
433   if(fGenBG->GetButton(kHijing)->GetState()==kButtonDown     ||
434      fGenBG->GetButton(kHijingPara)->GetState()==kButtonDown ||
435      fGenBG->GetButton(kPythia)->GetState()==kButtonDown) continue;
436   else fprintf(pF,"  pG->Init();\n\n");
437 }//WriteGenerator()
438 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
439 void HmpConfig::GuiDet(TGHorizontalFrame *pMainHF)
440 {
441   pMainHF->AddFrame(fDetBG=new TGButtonGroup(pMainHF,"Dets"));
442   fDetBG->Connect("Pressed(Int_t)" ,"HmpConfig",this,"DetAddSlot(Int_t)");
443   fDetBG->Connect("Released(Int_t)","HmpConfig",this,"DetRemSlot(Int_t)");
444     new TGCheckButton(fDetBG,"PIPE"  ,kPIPE));     new TGCheckButton(fDetBG,"ITS"   ,kITS));   new TGCheckButton(fDetBG,"TPC"   ,kTPC));
445     new TGCheckButton(fDetBG,"TRD"   ,kTRD));      new TGCheckButton(fDetBG,"TOF"   ,kTOF));   new TGCheckButton(fDetBG,"FRAME" ,kFRAME));         
446     new TGCheckButton(fDetBG,"MAG"   ,kMAG));      new TGCheckButton(fDetBG,"ACORDE",kACORDE));new TGCheckButton(fDetBG,"HALL"  ,kHALL));         
447     new TGCheckButton(fDetBG,"PHOS"  ,kPHOS));     new TGCheckButton(fDetBG,"T0"    ,kT0));    new TGCheckButton(fDetBG,"FMD"   ,kFMD));         
448     new TGCheckButton(fDetBG,"ABSO"  ,kABSO));     new TGCheckButton(fDetBG,"PMD"   ,kPMD));   new TGCheckButton(fDetBG,"DIPO"  ,kDIPO));         
449     new TGCheckButton(fDetBG,"EMCAL" ,kEMCAL));    new TGCheckButton(fDetBG,"VZERO" ,kVZERO)); new TGCheckButton(fDetBG,"MUON"  ,kMUON));         
450     new TGCheckButton(fDetBG,"ZDC"   ,kZDC));      new TGCheckButton(fDetBG,"SHILD" ,kSHILD));         
451 }
452 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
453 void HmpConfig::DetAddSlot(Int_t id)
454 {//slot is invoked when any detector check button is pressed
455   if(id==kTRD || id==kTOF)     //TRD and TOF geometries depend on FRAME 
456     fDetBG->SetButton(kFRAME);
457 }
458 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
459 void HmpConfig::DetRemSlot(Int_t id)
460 {//slot is invoked when any detector check button is released
461   if(id==kFRAME){
462     fDetBG->SetButton(kTRD,kFALSE); //switch off TRD and TOF when FRAME is switched off by user hence TRD&TOF depend on FRAME
463     fDetBG->SetButton(kTOF,kFALSE);
464   }
465 }
466 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
467 void HmpConfig::WriteDet(FILE *pF)
468 {
469 //CORE detectors                  
470   if(fDetBG->GetButton(kPIPE )->GetState()) fprintf(pF,"\n  new AliPIPEv3(\"PIPE\",\"Beam Pipe\");\n");
471   if(fDetBG->GetButton(kSHILD)->GetState()) fprintf(pF,"\n  new AliSHILv3(\"SHIL\",\"Shielding Version 2\");\n");  
472   if(fDetBG->GetButton(kITS  )->GetState()){
473     fprintf(pF,"\n AliITSvPPRasymmFMD *ITS  = new AliITSvPPRasymmFMD(\"ITS\",\"ITS PPR detailed version with asymmetric services\");\n");
474     fprintf(pF,"\n  ITS->SetMinorVersion(2);\n");  
475     fprintf(pF,"\n  ITS->SetReadDet(kFALSE);\n");       
476     fprintf(pF,"\n  ITS->SetThicknessDet1(200.);\n"); 
477     fprintf(pF,"\n  ITS->SetThicknessDet2(200.); \n");
478     fprintf(pF,"\n  ITS->SetThicknessChip1(150.);\n");
479     fprintf(pF,"\n  ITS->SetThicknessChip2(150.);\n");
480     fprintf(pF,"\n  ITS->SetRails(0);\n");      
481     fprintf(pF,"\n  ITS->SetCoolingFluid(1);\n");
482     fprintf(pF,"\n  ITS->SetEUCLID(0);\n");
483   }  
484   
485   if(fDetBG->GetButton(kTPC  )->GetState())  fprintf(pF,"\n  new AliTPCv2(\"TPC\",\"Default\");\n");
486   if(fDetBG->GetButton(kFRAME)->GetState())  fprintf(pF,"\n  AliFRAMEv2 *pFrame=new AliFRAMEv2(\"FRAME\",\"Space Frame\"); pFrame->SetHoles(1);\n");
487   if(fDetBG->GetButton(kTRD  )->GetState())  fprintf(pF,"\n  AliTRD *pTrd=new AliTRDv1(\"TRD\",\"TRD slow simulator\");\n");  
488   if(fDetBG->GetButton(kTOF  )->GetState())  {
489     fprintf(pF,"\n  AliTOF *TOF = new AliTOFv6T0(\"TOF\", \"normal TOF\");\n");
490     fprintf(pF,"\n  Int_t TOFSectors[18]={-1,0,0,-1,-1,-1,0,0,-1,0,0,0,0,-1,-1,0,0,0};\n");
491     fprintf(pF,"\n  TOF->SetTOFSectors(TOFSectors);\n");
492   }
493 //central detectors  behind HMPID
494   if(fDetBG->GetButton(kMAG  )->GetState()) fprintf(pF,"\n  new AliMAG(\"MAG\",\"Magnet\");\n");  
495   if(fDetBG->GetButton(kHALL )->GetState()) fprintf(pF,"\n  new AliHALL(\"HALL\",\"Alice Hall\");\n");
496 //forward detectors  
497   if(fDetBG->GetButton(kFMD  )->GetState()) fprintf(pF,"\n  AliFMD *FMD = new AliFMDv1(\"FMD\",\"normal FMD\");\n");
498   if(fDetBG->GetButton(kABSO )->GetState()) fprintf(pF,"\n  AliABSO *ABSO = new AliABSOv3(\"ABSO\",\"Muon absorber\");\n");
499   if(fDetBG->GetButton(kDIPO )->GetState()) fprintf(pF,"\n  AliDIPO *DIPO = new AliDIPOv3(\"DIPO\",\"Dipole version 3\");\n");
500   if(fDetBG->GetButton(kMUON )->GetState()) fprintf(pF,"\n  AliMUON *MUON = new AliMUONv1(\"MUON\",\"default\");\n");
501   if(fDetBG->GetButton(kPMD  )->GetState()) fprintf(pF,"\n  AliPMD *PMD = new AliPMDv1(\"PMD\",\"normal PMD\");\n");
502   if(fDetBG->GetButton(kT0)->GetState())    fprintf(pF,"\n  AliT0 *T0 = new AliT0v1(\"T0\",\"T0 Detector\");\n");
503   if(fDetBG->GetButton(kVZERO)->GetState()) fprintf(pF,"\n  AliVZERO *VZERO = new AliVZEROv7(\"VZERO\",\"normal VZERO\");\n");
504   if(fDetBG->GetButton(kZDC  )->GetState()) fprintf(pF,"\n  AliZDC *ZDC = new AliZDCv2(\"ZDC\",\"normal ZDC\");\n");
505 //different phase space detectors  
506   if(fDetBG->GetButton(kPHOS )->GetState()) fprintf(pF,"\n  AliPHOS *PHOS = new AliPHOSv1(\"PHOS\",\"IHEP\");\n");
507   if(fDetBG->GetButton(kEMCAL)->GetState()) fprintf(pF,"\n  AliEMCAL *EMCAL = new AliEMCALv2(\"EMCAL\",\"SHISH_77_TRD1_2X2_FINAL_110DEG\");\n");
508   if(fDetBG->GetButton(kACORDE  )->GetState()) fprintf(pF,"\n  AliACORDE *ACORDE = new AliACORDEv0(\"ACORDE\",\"normal ACORDE\");\n");
509 }
510 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
511 void HmpConfig::GuiBatch(TGHorizontalFrame *pMainF)
512 {
513   TGGroupFrame *pSimF=new TGGroupFrame(pMainF,"Simu"); pMainF->AddFrame(pSimF);    
514   pSimF->AddFrame(fSimB =new TGCheckButton(pSimF,"Enable"));      fSimB->Connect("Toggled(Bool_t)","HmpConfig",this,"SlotSim(Bool_t)"); 
515   pSimF->AddFrame(fTraB =new TGCheckButton(pSimF,"Transport")); 
516   pSimF->AddFrame(fSdiBG=new TGButtonGroup(pSimF,""));
517   pSimF->AddFrame(fDigBG=new TGButtonGroup(pSimF,""));
518   pSimF->AddFrame(fRawBG=new TGButtonGroup(pSimF,""));
519     new TGRadioButton(fSdiBG,  "No SDigits"      ,kNo   );   
520     new TGRadioButton(fSdiBG,  "SDigits CORE"    ,kAll  );  
521     new TGRadioButton(fSdiBG,  "SDigits HMPID"   ,kHmp  );   
522     new TGRadioButton(fDigBG,  "No Digits"       ,kNo   );   
523     new TGRadioButton(fDigBG,  "Digits CORE"     ,kAll  );  
524     new TGRadioButton(fDigBG,  "Digits HMPID"    ,kHmp  );   
525     new TGRadioButton(fRawBG,  "No RAW files"    ,kNo   );   
526     new TGRadioButton(fRawBG,  "RAW DDL"         ,kDdl  );
527     new TGRadioButton(fRawBG,  "RAW DATE"        ,kDat  );
528     new TGRadioButton(fRawBG,  "RAW ROOT"        ,kRoo  );
529     
530     
531   TGCompositeFrame *pRecF=new TGGroupFrame(pMainF,"Reco"); pMainF->AddFrame(pRecF);    
532   pRecF->AddFrame(fRecB =new TGCheckButton(pRecF,"Enable"));  fRecB->Connect("Toggled(Bool_t)","HmpConfig",this,"SlotRec(Bool_t)"); 
533   pRecF->AddFrame(fInpBG=new TGButtonGroup(pRecF,""   ));       
534   pRecF->AddFrame(fCluBG=new TGButtonGroup(pRecF,""   ));       
535   pRecF->AddFrame(fTrkBG=new TGButtonGroup(pRecF,""   ));     fTrkBG->Connect("Pressed(Int_t)","HmpConfig",this,"SlotBatch(Int_t)");  
536     new TGRadioButton(fInpBG,  "From sim"        ,kNo     );  
537     new TGRadioButton(fInpBG,  "From DDL"        ,kDdl    );  
538     new TGRadioButton(fInpBG,  "From DATE"       ,kDat    );  
539     new TGRadioButton(fInpBG,  "From ROOT"       ,kRoo    );  
540     new TGRadioButton(fCluBG,  "No Clusters"     ,kNo     );  
541     new TGRadioButton(fCluBG,  "Clusters CORE"   ,kAll    );  
542     new TGRadioButton(fCluBG,  "Clusters HMPID"  ,kHmp    );   
543
544     new TGCheckButton(fTrkBG,  "Apply RecoParam" ,kRecoPar);  
545
546     new TGCheckButton(fTrkBG,  "Load Align data" ,kAln    );  
547     new TGCheckButton(fTrkBG,  "Prim vertex"     ,kVtx    );  
548     new TGCheckButton(fTrkBG,  "ESD tracks"      ,kTrk    );  
549     new TGCheckButton(fTrkBG,  "Assign PID"      ,kPid    );
550     
551   fSimB->SetState(kButtonDown); fTraB->SetState(kButtonDown); fSdiBG->SetButton(kHmp); fDigBG->SetButton(kHmp); fRawBG->SetButton(kNo);
552   fRecB->SetState(kButtonDown);                               fInpBG->SetButton(kNo);  fCluBG->SetButton(kHmp); 
553 }
554 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
555 void HmpConfig::SlotSim(Bool_t isChk)
556 {
557   if(isChk){
558     fTraB                  ->SetState(kButtonDown);
559     
560     fSdiBG->GetButton(kNo )->SetState(kButtonEngaged);
561     fSdiBG->GetButton(kAll)->SetState(kButtonEngaged);
562     fSdiBG->GetButton(kHmp)->SetState(kButtonDown);
563     
564     fDigBG->GetButton(kNo )->SetState(kButtonEngaged);
565     fDigBG->GetButton(kAll)->SetState(kButtonEngaged);
566     fDigBG->GetButton(kHmp)->SetState(kButtonDown);
567     
568     fRawBG->GetButton(kNo )->SetState(kButtonDown);
569     fRawBG->GetButton(kDdl)->SetState(kButtonEngaged);
570     fRawBG->GetButton(kDat)->SetState(kButtonEngaged);
571     fRawBG->GetButton(kRoo)->SetState(kButtonEngaged);    
572   }else{
573     fTraB                  ->SetState(kButtonDisabled);
574     
575     fSdiBG->GetButton(kNo )->SetState(kButtonDisabled);
576     fSdiBG->GetButton(kAll)->SetState(kButtonDisabled);
577     fSdiBG->GetButton(kHmp)->SetState(kButtonDisabled);
578     
579     fDigBG->GetButton(kNo )->SetState(kButtonDisabled);
580     fDigBG->GetButton(kAll)->SetState(kButtonDisabled);
581     fDigBG->GetButton(kHmp)->SetState(kButtonDisabled);
582     
583     fRawBG->GetButton(kNo )->SetState(kButtonDisabled);
584     fRawBG->GetButton(kDdl)->SetState(kButtonDisabled);
585     fRawBG->GetButton(kDat)->SetState(kButtonDisabled);
586     fRawBG->GetButton(kRoo)->SetState(kButtonDisabled);    
587   }  
588 }
589 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
590 void HmpConfig::SlotRec(Bool_t isChk)
591 {
592   if(isChk){
593     fInpBG->GetButton(kNo) ->SetState(kButtonDown);
594     fInpBG->GetButton(kDdl)->SetState(kButtonEngaged);
595     fInpBG->GetButton(kDat)->SetState(kButtonEngaged);
596     fInpBG->GetButton(kRoo)->SetState(kButtonEngaged);
597     
598     fCluBG->GetButton(kNo) ->SetState(kButtonEngaged);
599     fCluBG->GetButton(kAll)->SetState(kButtonEngaged);
600     fCluBG->GetButton(kHmp)->SetState(kButtonDown);
601     
602     fTrkBG->GetButton(kRecoPar)->SetState(kButtonEngaged);
603     fTrkBG->GetButton(kAln)->SetState(kButtonEngaged);
604     fTrkBG->GetButton(kVtx)->SetState(kButtonEngaged);
605     fTrkBG->GetButton(kTrk)->SetState(kButtonEngaged);
606     fTrkBG->GetButton(kPid)->SetState(kButtonEngaged);
607   }else{
608     fInpBG->GetButton(kNo) ->SetState(kButtonDisabled);
609     fInpBG->GetButton(kDdl)->SetState(kButtonDisabled);
610     fInpBG->GetButton(kDat)->SetState(kButtonDisabled);
611     fInpBG->GetButton(kRoo)->SetState(kButtonDisabled);
612     
613     fCluBG->GetButton(kNo) ->SetState(kButtonDisabled);
614     fCluBG->GetButton(kAll)->SetState(kButtonDisabled);
615     fCluBG->GetButton(kHmp)->SetState(kButtonDisabled);
616     
617     fTrkBG->GetButton(kRecoPar)->SetState(kButtonDisabled);
618     fTrkBG->GetButton(kAln)->SetState(kButtonDisabled);
619     fTrkBG->GetButton(kVtx)->SetState(kButtonDisabled);
620     fTrkBG->GetButton(kTrk)->SetState(kButtonDisabled);
621     fTrkBG->GetButton(kPid)->SetState(kButtonDisabled);
622   }
623 }
624 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
625 void HmpConfig::SlotBatch(Int_t id)
626 {//slot is invoked when any button in fTrkBG is pressed
627   if(id==kTrk){
628     fSdiBG->SetButton(kAll); 
629     fDigBG->SetButton(kAll);
630     fCluBG->SetButton(kAll);
631     fDetBG->SetButton(kITS);
632     fDetBG->SetButton(kTPC);
633     fDetBG->SetButton(kTRD);
634   }
635 }
636 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
637 void HmpConfig::WriteBatch()
638 {//creates Batch.C file
639   TString det;
640   if(fDetBG->GetButton(kITS  )->GetState())  det+="ITS ";
641   if(fDetBG->GetButton(kTPC  )->GetState())  det+="TPC ";
642   if(fDetBG->GetButton(kTRD  )->GetState())  det+="TRD ";
643   if(fDetBG->GetButton(kTOF  )->GetState())  det+="TOF ";
644   if(!fVerBG->GetButton(kNo)->GetState())    det+="HMPID ";
645   char *sBatchName="sim";
646   FILE *fp=fopen(Form("%s.C",sBatchName),"w"); if(!fp){Info("CreateSim","Cannot open output file: %s.C",sBatchName);return;}
647   
648                                                     fprintf(fp,"void %s(Int_t iNevt=1,Bool_t isDbg=kFALSE,char *sCfg=\"Config.C\")\n{\n",sBatchName);
649                                                     fprintf(fp,"  gSystem->Exec(\"rm -rf hlt hough gphysi* fort* ZZZ* raw*\");  //remove garbage\n"); 
650                                                     fprintf(fp,"  gBenchmark->Start(\"ALICE\"); TDatime time;      //start benchmarking\n\n");
651                                                        
652                                                     fprintf(fp,"  if(isDbg) AliLog::SetGlobalDebugLevel(AliLog::kDebug);\n");
653 //simulation section  
654   if(fSimB->GetState()){                            fprintf(fp,"  gSystem->Exec(\"rm -rf *.root \");               //remove previous simulation\n"); 
655                                                     fprintf(fp,"  gSystem->Exec(\"rm -rf *.date \");               //remove previous simulation\n"); 
656                                                     fprintf(fp,"  AliSimulation *pSim=new AliSimulation(sCfg);   //init simulation\n");
657                                                        
658     if(fTraB->GetState())                           fprintf(fp,"  pSim->SetRunSimulation(kTRUE);                 //transport and hits creation\n");
659     else                                            fprintf(fp,"  pSim->SetRunSimulation(kFALSE);                //no transport and hits creation\n");
660     
661     if     (fSdiBG->GetButton(kNo )->GetState())    fprintf(fp,"  pSim->SetMakeSDigits(\"\");                      //no sdigits\n");
662     else if(fSdiBG->GetButton(kAll)->GetState())    fprintf(fp,"  pSim->SetMakeSDigits(\"%s\");                   //sdigits for all\n",det.Data());
663     else if(fSdiBG->GetButton(kHmp)->GetState())    fprintf(fp,"  pSim->SetMakeSDigits(\"HMPID\");                 //sdigits for HMPID\n");
664     
665     if     (fDigBG->GetButton(kNo )->GetState())    fprintf(fp,"  pSim->SetMakeDigits(\"\");                       //no digits\n");
666     else if(fDigBG->GetButton(kAll)->GetState())    fprintf(fp,"  pSim->SetMakeDigits(\"%s\");                    //digits for all\n",det.Data());
667     else if(fDigBG->GetButton(kHmp)->GetState())    fprintf(fp,"  pSim->SetMakeDigits(\"HMPID\");                  //digits for HMPID\n");
668     
669     if     (fRawBG->GetButton(kDdl)->GetState())    fprintf(fp,"  pSim->SetWriteRawData(\"%s\");                  //raw data as DDL\n",det.Data());
670     else if(fRawBG->GetButton(kDat)->GetState())    fprintf(fp,"  pSim->SetWriteRawData(\"%s\",\"raw.date\");     //raw data as DATE\n",det.Data());
671     else if(fRawBG->GetButton(kRoo)->GetState())    fprintf(fp,"  pSim->SetWriteRawData(\"%s\",\"raw.root\");     //raw data as ROOT\n",det.Data());
672
673                                                     fprintf(fp,"  pSim->SetRunHLT(\"\");                           //no HLT stuff\n");   
674                                                     fprintf(fp,"  pSim->SetQA(kFALSE);                             //no QA\n");
675                                                     fprintf(fp,"  pSim->Run(iNevt);                                //run iNevt events\n  delete pSim;\n\n");
676   }//sim section
677                                                     fprintf(fp,"  cout<<\"!!!!!!!!!!!!Info in <sim.C>: Start time: \";time.Print();\n");
678                                                     fprintf(fp,"  cout<<\"!!!!!!!!!!!!Info in <sim.C>: Stop  time: \";time.Set();  time.Print();\n");
679                                                     fprintf(fp,"  gBenchmark->Show(\"ALICE\");\n");
680   
681                                                     fprintf(fp,"  gSystem->Exec(\"touch ZZZ______finished_______SSS\");\n");
682                                                     fprintf(fp,"  gSystem->Exec(\"aliroot rec.C &\");\n}\n");
683   fclose(fp);  
684 // rec section
685   char *sBatchName="rec";
686   FILE *fp=fopen(Form("%s.C",sBatchName),"w"); if(!fp){Info("CreateRec","Cannot open output file: %s.C",sBatchName);return;}
687   
688                                                     fprintf(fp,"void %s()\n{\n",sBatchName);
689                                                     fprintf(fp,"  gSystem->Exec(\"rm -rf *RRR \");  //remove garbage\n"); 
690
691   if(fRecB->GetState()){
692                                                     fprintf(fp,"  AliReconstruction *pRec=new AliReconstruction;\n");
693                                                     fprintf(fp,"  gBenchmark->Start(\"ALICE\"); TDatime time;      //start benchmarking\n\n");
694                                                     
695     //---------------------------------------------
696     if     (fTrkBG->GetButton(kRecoPar)->GetState())
697       { 
698          fprintf(fp,"  AliHMPIDRecoParam * hmpidRecoParam = AliHMPIDRecoParam::GetUserModeParam(); //Get the HMPID reco param\n"); 
699          fprintf(fp,"  hmpidRecoParam->SetUserCutMode(kFALSE);                                     //Switch to RecoParam from OCDB cuts\n");
700          fprintf(fp,"  hmpidRecoParam->SetUserCut(4,4,4,4,4,4,4);                                  //eg cut for UserCutSigma (Values: ch0, ch1, ..,ch6)\n");
701          fprintf(fp,"  AliHMPIDReconstructor::SetRecoParam(hmpidRecoParam);                        //Pass the RecoPar to the Reconstructor\n");
702       }
703     //---------------------------------------------                                                    
704                                                     
705     if     (fInpBG->GetButton(kNo )->GetState())    fprintf(fp,"  pRec->SetInput(\"\");                       //from digits\n");   
706     else if(fInpBG->GetButton(kDdl)->GetState())    fprintf(fp,"  pRec->SetInput(\"./\");                     //from raw data in DDL format\n");                                            
707     else if(fInpBG->GetButton(kDat)->GetState())    fprintf(fp,"  pRec->SetInput(\"raw.date\");          //from raw data in DATE format\n");                                            
708     else if(fInpBG->GetButton(kRoo)->GetState())    fprintf(fp,"  pRec->SetInput(\"raw.root\");               //from raw data in ROOT format\n");                                            
709     
710     if     (fCluBG->GetButton(kAll) ->GetState())   fprintf(fp,"  pRec->SetRunLocalReconstruction(\"%s\");   //clusters for all detectors\n",det.Data());
711     else if(fCluBG->GetButton(kHmp) ->GetState())   fprintf(fp,"  pRec->SetRunLocalReconstruction(\"HMPID\"); //clusters for HMPID only\n");
712     else if(fCluBG->GetButton(kNo)  ->GetState())   fprintf(fp,"  pRec->SetRunLocalReconstruction(\"\");      //no clusters\n");
713     
714     
715     
716     if     (fTrkBG->GetButton(kAln)->GetState())    fprintf(fp,"  pRec->SetLoadAlignData(\"%s\");            //with misalignment\n",det.Data());     
717     else                                            fprintf(fp,"  pRec->SetLoadAlignData(\"\");               //no misalignment\n");     
718   
719     if     (fTrkBG->GetButton(kVtx)->GetState())    fprintf(fp,"  pRec->SetRunVertexFinder(kTRUE);          //primary vertex\n");
720     else                                            fprintf(fp,"  pRec->SetRunVertexFinder(kFALSE);         //no primary vertex\n");    
721     
722     if     (fTrkBG->GetButton(kTrk)   ->GetState()) fprintf(fp,"  pRec->SetRunTracking(\"%s\");              //tracking\n",det.Data());
723     else                                            fprintf(fp,"  pRec->SetRunTracking(\"\");                 //no tracking\n");    
724     
725     if     (fTrkBG->GetButton(kPid)   ->GetState()) fprintf(fp,"  pRec->SetFillESD(\"%s\");                  //prob vect\n",det.Data());      
726     else                                            fprintf(fp,"  pRec->SetFillESD(\"\");                     //no prob vect\n");
727     
728                                                     fprintf(fp,"  pRec->Run();delete pRec;\n\n");         
729   }//rec part                                                       
730 //benchmarks  
731                                                     fprintf(fp,"  cout<<\"!!!!!!!!!!!!Info in <rec.C>: Start time: \";time.Print();\n");
732                                                     fprintf(fp,"  cout<<\"!!!!!!!!!!!!Info in <rec.C>: Stop  time: \";time.Set();  time.Print();\n");
733                                                     fprintf(fp,"  gBenchmark->Show(\"ALICE\");\n");
734   
735                                                     fprintf(fp,"  gSystem->Exec(\"touch ZZZ______finished_______RRR\");\n}\n");
736   fclose(fp);  
737 }//WriteBatch()
738 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
739 void HmpConfig::ExitSlot()
740 {
741 //slot to be invoked by clik on the Create button  
742   if(fSimB->GetState()) WriteConfig();
743   WriteBatch();
744   SendCloseMessage();
745   gApplication->Terminate(0);
746 }
747 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
748 void HmpConfig::WriteConfig()
749 {   
750   FILE *pF=fopen(fFileName,"w"); if(!pF){Info("CreateConfigFile","Cannot open output file:%sn",fFileName);return;}
751   
752   fprintf(pF,"void Config()\n");
753   fprintf(pF,"{\n");
754   fprintf(pF,"\n  ::Info(\"\\n\\n\\n----------> HMPID private config\",\"Start\");\n"); 
755 //Random
756   fprintf(pF,"  gRandom->SetSeed(123456);//put 0 to use system time\n\n");    
757 //File
758   fprintf(pF,"  AliRunLoader *pAL=AliRunLoader::Open(\"galice.root\",AliConfig::GetDefaultEventFolderName(),\"recreate\");\n");    
759   fprintf(pF,"  pAL->SetCompressionLevel(2);\n");
760   fprintf(pF,"  pAL->SetNumberOfEventsPerFile(1000);\n");
761   fprintf(pF,"  gAlice->SetRunLoader(pAL);\n\n");
762 //Decayer  
763   if(fDecayerB->GetState()==kButtonDown){
764     fprintf(pF,"  gSystem->Load(\"liblhapdf.so\"); // Parton density functions \n");
765     fprintf(pF,"  gSystem->Load(\"libEGPythia6.so\");   // TGenerator interface \n");
766     fprintf(pF,"  gSystem->Load(\"libpythia6.so\");   // Pythia \n");
767     fprintf(pF,"  gSystem->Load(\"libAliPythia6.so\");   // ALICE specifics implementations \n\n");
768 //Geant  
769     fprintf(pF,"  gSystem->Load(\"libgeant321\");\n");
770     fprintf(pF,"  new TGeant3TGeo(\"C++ Interface to Geant3\");\n\n");
771   
772     fprintf(pF,"  AliDecayer *pDecayer=new AliDecayerPythia();\n");
773     fprintf(pF,"  pDecayer->SetForceDecay(kAll);\n"); 
774     fprintf(pF,"  pDecayer->Init();\n"); 
775     fprintf(pF,"  gMC->SetExternalDecayer(pDecayer);\n\n");
776   }
777   WritePhys(pF); //physics processes
778   
779 //Field
780        if(fMagBG->GetButton(kFld0)->GetState())     fprintf(pF,"  gAlice->SetField(new AliMagFMaps(\"Maps\",\"Maps\",2,0,10,2));       //no field\n\n");
781   else if(fMagBG->GetButton(kFld2)->GetState())     fprintf(pF,"  gAlice->SetField(new AliMagFMaps(\"Maps\",\"Maps\",2,1,10,0));//0.2 Tesla field\n\n");
782   else if(fMagBG->GetButton(kFld4)->GetState())     fprintf(pF,"  gAlice->SetField(new AliMagFMaps(\"Maps\",\"Maps\",2,1,10,1));//0.4 Tesla field\n\n");
783   else if(fMagBG->GetButton(kFld5)->GetState())     fprintf(pF,"  gAlice->SetField(new AliMagFMaps(\"Maps\",\"Maps\",2,1,10,2));//0.5 Tesla field\n\n");
784   else if(fMagBG->GetButton(kFld_2)->GetState())    fprintf(pF,"  gAlice->SetField(new AliMagFMaps(\"Maps\",\"Maps\",2,-1,10,0));//-0.2 Tesla field\n\n");
785   else if(fMagBG->GetButton(kFld_4)->GetState())    fprintf(pF,"  gAlice->SetField(new AliMagFMaps(\"Maps\",\"Maps\",2,-1,10,1));//-0.4 Tesla field\n\n");
786   else if(fMagBG->GetButton(kFld_5)->GetState())    fprintf(pF,"  gAlice->SetField(new AliMagFMaps(\"Maps\",\"Maps\",2,-1,10,2));//-0.5 Tesla field\n\n");
787   
788   fprintf(pF,"  pAL->CdGAFile();\n\n");                                 //????       
789 //Generator 
790   WriteGen(pF);//generator
791 //BODY-ALIC 
792   fprintf(pF,"  new AliBODY(\"BODY\",\"Alice envelop\");\n\n");
793 //HMPID
794   WriteHmp(pF);  //private HMPID part
795   WriteDet(pF);  //other detectors
796 //end of Config.C file:  
797   fprintf(pF,"\n  ::Info(\"----------> HMPID private config\",\"Stop\\n\\n\\n\");\n");
798 //
799   fprintf(pF,"}\n");
800   fclose(pF);  
801 }//WriteConfig()
802 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
803 void Hconfig()
804 {
805    new HmpConfig("Config.C");
806 }