]> git.uio.no Git - u/mrichter/AliRoot.git/blob - RICH/CreateConfig.C
Additional protection in case of zero magnetic field (Yu.Belikov)
[u/mrichter/AliRoot.git] / RICH / CreateConfig.C
1 class KirConfig
2 {
3 RQ_OBJECT()
4 public:
5   enum EDetectors {kPIPE=1,kITS=2,kTPC=4,kTRD=8,kTOF=16,kFRAME=32,kMAG=64,kCRT=128,kHALL=256,kPHOS=512,kSTART=1024,kFMD=2048,kABSO=4096,
6                    kPMD=8192,kDIPO=16384,kEMCAL=32768,kVZERO=65536,kMUON=131072,kZDC=262144,kSHILD=524288};
7   enum EProcesses {kDCAY=1,kPAIR=2,kCOMP=4,kPHOT=8,kPFIS=16,kDRAY=32,kANNI=64,kBREM=128,kMUNU=256,kCKOV=512,kHADR=1024,kLOSS=2048,kMULS=4096,
8                    kRAYL=8192};
9   enum EGenTypes  {kGun1=100,kGun7,kPythia7,kHijing,kHijingPara};
10   
11           KirConfig(const char*sFileName);
12          ~KirConfig()                    {Info("ctor","");fMain->Cleanup(); delete fMain;}
13   void    AddDetector(Int_t id)          {fDetectors+=id; if(id==kTRD || id==kTOF) fDetButGrp->SetButton(kFRAME);}
14   void    RemoveDetector(Int_t id)       {fDetectors-=id; if(id==kFRAME) {fDetButGrp->SetButton(kTRD,kFALSE);fDetButGrp->SetButton(kTOF,kFALSE);}}
15   void    AddProcess(Int_t id)           {fProcesses+=id;}
16   void    RemoveProcess(Int_t id)        {fProcesses-=id;}
17   Bool_t  IsDetectorOn(Int_t id)    const{return fDetectors&id;}
18   Bool_t  IsProcessOn(Int_t id)     const{return fProcesses&id;}
19   Float_t Eta2Theta(Float_t arg)    const{return (180./TMath::Pi())*2.*TMath::ATan(TMath::Exp(-arg));}
20   void    CreateConfigFile();
21 protected:
22   TGMainFrame  *fMain;//main window poiter
23   TGComboBox   *fRichVersionCombo;  TGButton *fRichTopChkBtn,*fRichDeclusterChkBtn,*fRichSagChkBtn,*fRichRadioSrcChkBtn;//RICH
24   TGButton     *fMagFldChkBtn;                               //MAG
25   TGComboBox   *fGenTypeCombo,*fGenPartIdCombo,*fGenMomCombo,*fGenChamberCombo; TGNumberEntry *fGenNprimEntry;//GEN
26   Int_t         fDetectors; TGButtonGroup *fDetButGrp;       //DETECTORS
27   Int_t         fProcesses;
28   char         *fFileName;
29 };//class KirConfig
30          
31 KirConfig::KirConfig(const char *sFileName)
32 {   
33   fFileName=sFileName;
34   fDetectors=0;
35 // Create main frame       
36   fMain=new TGMainFrame(gClient->GetRoot(),500,400);
37 //  fMain->Connect("CloseWindow()","KirConfig",this,"CloseWindow()");   
38   fMain->AddFrame(pHorFrame=new TGHorizontalFrame(fMain,100,200));
39 //RICH
40   pHorFrame->AddFrame(pVerFrame=new TGVerticalFrame(pHorFrame,100,200));  
41   pVerFrame->AddFrame(pRichGrpFrm=new TGGroupFrame(pHorFrame,"RICH"));
42   pRichGrpFrm->AddFrame(fRichVersionCombo=new TGComboBox(pRichGrpFrm,100));
43   fRichVersionCombo->AddEntry("no RICH",-1);
44   fRichVersionCombo->AddEntry("version 0",0);  
45   fRichVersionCombo->AddEntry("version 1",1);
46   fRichVersionCombo->Select(1);  fRichVersionCombo->Resize(160,20);
47   pRichGrpFrm->AddFrame(fRichTopChkBtn=new TGCheckButton(pRichGrpFrm,"Rotate to Top?"));
48   pRichGrpFrm->AddFrame(fRichDeclusterChkBtn=new TGCheckButton(pRichGrpFrm,"Declustering")); fRichDeclusterChkBtn->SetState(kButtonDown);
49   pRichGrpFrm->AddFrame(fRichSagChkBtn=new TGCheckButton(pRichGrpFrm,"Wire sagita?"));       fRichSagChkBtn->SetState(kButtonDown);
50   pRichGrpFrm->AddFrame(fRichRadioSrcChkBtn=new TGCheckButton(pRichGrpFrm,"Radioactive source"));
51 //Generator  
52   pVerFrame->AddFrame(pGenGrpFrm=new TGGroupFrame(pHorFrame,"Generator"));
53   pGenGrpFrm->AddFrame(fGenTypeCombo=new TGComboBox(pGenGrpFrm,100));
54   fGenTypeCombo->AddEntry("gun to single chamber",kGun1);  
55   fGenTypeCombo->AddEntry("gun to all chambers",kGun7);
56   fGenTypeCombo->AddEntry("7 guns on top of Pythia",kPythia7);
57   fGenTypeCombo->AddEntry("HIJING",kHijing);
58   fGenTypeCombo->AddEntry("parametrized HIJING",kHijingPara);
59   fGenTypeCombo->AddEntry("Sr90 source",kSr90);
60   fGenTypeCombo->Select(kHijingPara);
61   fGenTypeCombo->Resize(160,20);
62   
63   pGenGrpFrm->AddFrame(fGenPartIdCombo=new TGComboBox(pGenGrpFrm,100)); //PID for guns
64   fGenPartIdCombo->AddEntry("Pion+",kPiPlus);
65   fGenPartIdCombo->AddEntry("Pion-",kPiMinus);
66   fGenPartIdCombo->AddEntry("Kaon+",kKPlus);
67   fGenPartIdCombo->AddEntry("Kaon-",kKMinus);
68   fGenPartIdCombo->AddEntry("Proton",kProton);
69   fGenPartIdCombo->AddEntry("AntiProton",kProtonBar);
70   fGenPartIdCombo->Select(kPiPlus);  fGenPartIdCombo->Resize(160,20);
71
72   pGenGrpFrm->AddFrame(fGenMomCombo=new TGComboBox(pGenGrpFrm,100)); //particle energy for guns
73   fGenMomCombo->AddEntry("1.5 GeV",15);
74   fGenMomCombo->AddEntry("2.0 Gev",20);
75   fGenMomCombo->AddEntry("2.5 GeV",25);
76   fGenMomCombo->AddEntry("3.0 GeV",30);
77   fGenMomCombo->AddEntry("3.5 GeV",35);
78   fGenMomCombo->AddEntry("4.0 GeV",40);
79   fGenMomCombo->AddEntry("4.5 GeV",45);
80   fGenMomCombo->Select(40);  fGenMomCombo->Resize(160,20);
81   
82   pGenGrpFrm->AddFrame(fGenChamberCombo=new TGComboBox(pGenGrpFrm,100)); //chamber number in case of gun1
83   for(int i=1;i<=7;i++) fGenChamberCombo->AddEntry(Form("Chamber %i",i),i);
84   fGenChamberCombo->Select(4); fGenChamberCombo->Resize(160,20);
85   
86   pGenGrpFrm->AddFrame(pGenNprimFrm=new TGGroupFrame(pGenGrpFrm,"Number of primaries"));//number of primiries in case of HIJING
87   pGenNprimFrm->AddFrame(fGenNprimEntry=new TGNumberEntry(pGenNprimFrm,500));
88   
89 // Magnetic Field
90   pVerFrame->AddFrame(pFldGrpFrm=new TGGroupFrame(pHorFrame,"Magnetic Field"));
91   pFldGrpFrm->AddFrame(fMagFldChkBtn=new TGCheckButton(pFldGrpFrm,"On/Off"));
92   fMagFldChkBtn->SetState(kButtonDown);
93 //Detectors
94   pHorFrame->AddFrame(fDetButGrp=new TGButtonGroup(pHorFrame,"Detectors"));
95   fDetButGrp->Connect("Pressed(Int_t)","KirConfig",this,"AddDetector(Int_t)");
96   fDetButGrp->Connect("Released(Int_t)","KirConfig",this,"RemoveDetector(Int_t)");
97   new TGCheckButton(fDetButGrp,"PIPE"  ,kPIPE));         
98   new TGCheckButton(fDetButGrp,"ITS"   ,kITS));         
99   new TGCheckButton(fDetButGrp,"TPC"   ,kTPC));
100   new TGCheckButton(fDetButGrp,"TRD"   ,kTRD));
101   new TGCheckButton(fDetButGrp,"TOF"   ,kTOF));         
102   new TGCheckButton(fDetButGrp,"FRAME" ,kFRAME));         
103   new TGCheckButton(fDetButGrp,"MAG"   ,kMAG));         
104   new TGCheckButton(fDetButGrp,"CRT"   ,kCRT));         
105   new TGCheckButton(fDetButGrp,"HALL"  ,kHALL));         
106   new TGCheckButton(fDetButGrp,"PHOS"  ,kPHOS));         
107   new TGCheckButton(fDetButGrp,"START" ,kSTART));         
108   new TGCheckButton(fDetButGrp,"FMD"   ,kFMD));         
109   new TGCheckButton(fDetButGrp,"ABSO"  ,kABSO));         
110   new TGCheckButton(fDetButGrp,"PMD"   ,kPMD));         
111   new TGCheckButton(fDetButGrp,"DIPO"  ,kDIPO));         
112   new TGCheckButton(fDetButGrp,"EMCAL" ,kEMCAL));         
113   new TGCheckButton(fDetButGrp,"VZERO" ,kVZERO));         
114   new TGCheckButton(fDetButGrp,"MUON"  ,kMUON));         
115   new TGCheckButton(fDetButGrp,"ZDC"   ,kZDC));         
116   new TGCheckButton(fDetButGrp,"SHILD" ,kSHILD));         
117 //Processes  
118   pHorFrame->AddFrame(pProcButGrp=new TGButtonGroup(pHorFrame,"Processes"));
119   pProcButGrp->Connect("Pressed(Int_t)","KirConfig",this,"AddProcess(Int_t)");
120   pProcButGrp->Connect("Released(Int_t)","KirConfig",this,"RemoveProcess(Int_t)");
121   new TGCheckButton(pProcButGrp,"DCAY decay",kDCAY));  pProcButGrp->SetButton(kDCAY);       
122   new TGCheckButton(pProcButGrp,"PAIR pair production",kPAIR));  pProcButGrp->SetButton(kPAIR);       
123   new TGCheckButton(pProcButGrp,"COMP Compton",kCOMP));  pProcButGrp->SetButton(kCOMP);
124   new TGCheckButton(pProcButGrp,"PHOT",kPHOT));  pProcButGrp->SetButton(kPHOT);
125   new TGCheckButton(pProcButGrp,"PFIS Photofission",kPFIS));  
126   new TGCheckButton(pProcButGrp,"DRAY delta electrons",kDRAY));  
127   new TGCheckButton(pProcButGrp,"ANNI annihilation",kANNI));  pProcButGrp->SetButton(kANNI);       
128   new TGCheckButton(pProcButGrp,"BREM Bremstraslung",kBREM));  pProcButGrp->SetButton(kBREM);       
129   new TGCheckButton(pProcButGrp,"MUNU",kMUNU));  pProcButGrp->SetButton(kMUNU);       
130   new TGCheckButton(pProcButGrp,"CKOV Cerenkovs",kCKOV));  pProcButGrp->SetButton(kCKOV);       
131   new TGCheckButton(pProcButGrp,"HADR Hadronic interactions ",kHADR));  pProcButGrp->SetButton(kHADR);       
132   new TGCheckButton(pProcButGrp,"LOSS",kLOSS));  pProcButGrp->SetButton(kLOSS);       
133   new TGCheckButton(pProcButGrp,"MULS",kMULS));  pProcButGrp->SetButton(kMULS);       
134   new TGCheckButton(pProcButGrp,"RAYL",kRAYL));  pProcButGrp->SetButton(kRAYL);       
135 //File    
136   fMain->AddFrame(pFileHorFrm=new TGHorizontalFrame(fMain,100,200));
137   pFileHorFrm->AddFrame(pCreateBtn=new TGTextButton(pFileHorFrm,"Create"));
138   pCreateBtn->Connect("Clicked()","KirConfig",this,"CreateConfigFile()");                                 
139   pFileHorFrm->AddFrame(new TGLabel(pFileHorFrm,Form(" config file as %s",fFileName)));  
140   
141   fMain->MapSubwindows();   
142   fMain->Layout();
143   fMain->SetWindowName("Create AliROOT Config script");
144   fMain->MapWindow();      
145 }//KirCondig::ctor
146           
147 void KirConfig::CreateConfigFile()
148 {   
149   FILE *fp=fopen(fFileName,"w"); if(!fp){Info("CreateConfigFile","Cannot open output file:%sn",fFileName);return;}
150   
151   fprintf(fp,"void Config()\n");
152   fprintf(fp,"{\n");
153   fprintf(fp,"  ::Info(\"RICH private config\",\"Start\");\n\n"); 
154 //Random
155   fprintf(fp,"  gRandom->SetSeed(123456);//put 0 to use system time\n\n");    
156 //Geant  
157   fprintf(fp,"  gSystem->Load(\"libgeant321\");\n");
158   fprintf(fp,"  new TGeant3(\"C++ Interface to Geant3\");\n\n");
159 //File
160   fprintf(fp,"  AliRunLoader *pAL=AliRunLoader::Open(\"galice.root\",AliConfig::GetDefaultEventFolderName(),\"recreate\");\n");    
161   fprintf(fp,"  pAL->SetCompressionLevel(2);\n");
162   fprintf(fp,"  pAL->SetNumberOfEventsPerFile(1000);\n");
163   fprintf(fp,"  gAlice->SetRunLoader(pAL);\n\n");
164 //Decayer  
165   fprintf(fp,"  TVirtualMCDecayer *pDecayer=new AliDecayerPythia();\n");
166   fprintf(fp,"  pDecayer->SetForceDecay(kAll);\n"); 
167   fprintf(fp,"  pDecayer->Init();\n"); 
168   fprintf(fp,"  gMC->SetExternalDecayer(pDecayer);\n\n");
169 //Physics
170   if(IsProcessOn(kDCAY)) fprintf(fp,"  gMC->SetProcess(\"DCAY\",1);");  else fprintf(fp,"  gMC->SetProcess(\"DCAY\",0);");
171   if(IsProcessOn(kPAIR)) fprintf(fp,"  gMC->SetProcess(\"PAIR\",1);\n");else fprintf(fp,"  gMC->SetProcess(\"PAIR\",0);\n");
172   if(IsProcessOn(kCOMP)) fprintf(fp,"  gMC->SetProcess(\"COMP\",1);");  else fprintf(fp,"  gMC->SetProcess(\"COMP\",0);");
173   if(IsProcessOn(kPHOT)) fprintf(fp,"  gMC->SetProcess(\"PHOT\",1);\n");else fprintf(fp,"  gMC->SetProcess(\"PHOT\",0);\n");
174   if(IsProcessOn(kPFIS)) fprintf(fp,"  gMC->SetProcess(\"PFIS\",1);");  else fprintf(fp,"  gMC->SetProcess(\"PFIS\",0);");
175   if(IsProcessOn(kDRAY)) fprintf(fp,"  gMC->SetProcess(\"DRAY\",1);\n");else fprintf(fp,"  gMC->SetProcess(\"DRAY\",0);\n");
176   if(IsProcessOn(kANNI)) fprintf(fp,"  gMC->SetProcess(\"ANNI\",1);");  else fprintf(fp,"  gMC->SetProcess(\"ANNI\",0);");
177   if(IsProcessOn(kBREM)) fprintf(fp,"  gMC->SetProcess(\"BREM\",1);\n");else fprintf(fp,"  gMC->SetProcess(\"BREM\",0);\n");
178   if(IsProcessOn(kMUNU)) fprintf(fp,"  gMC->SetProcess(\"MUNU\",1);");  else fprintf(fp,"  gMC->SetProcess(\"MUNU\",0);");
179   if(IsProcessOn(kCKOV)) fprintf(fp,"  gMC->SetProcess(\"CKOV\",1);\n");else fprintf(fp,"  gMC->SetProcess(\"CKOV\",0);\n");
180   if(IsProcessOn(kHADR)) fprintf(fp,"  gMC->SetProcess(\"HADR\",1);");  else fprintf(fp,"  gMC->SetProcess(\"HADR\",0);");
181   if(IsProcessOn(kLOSS)) fprintf(fp,"  gMC->SetProcess(\"LOSS\",2);\n");else fprintf(fp,"  gMC->SetProcess(\"LOSS\",0);\n");
182   if(IsProcessOn(kMULS)) fprintf(fp,"  gMC->SetProcess(\"MULS\",1);");  else fprintf(fp,"  gMC->SetProcess(\"MULS\",0);");
183   if(IsProcessOn(kRAYL)) fprintf(fp,"  gMC->SetProcess(\"RAYL\",1);\n");else fprintf(fp,"  gMC->SetProcess(\"RAYL\",0);\n");
184   
185   fprintf(fp,"  gMC->SetCut(\"CUTGAM\",0.001); ");  fprintf(fp,"  gMC->SetCut(\"CUTELE\",0.001); ");
186   fprintf(fp,"  gMC->SetCut(\"CUTNEU\",0.001);\n"); fprintf(fp,"  gMC->SetCut(\"CUTHAD\",0.001); ");
187   fprintf(fp,"  gMC->SetCut(\"CUTMUO\",0.001); ");  fprintf(fp,"  gMC->SetCut(\"BCUTE\" ,0.001);\n");
188   fprintf(fp,"  gMC->SetCut(\"BCUTM\" ,0.001); ");  fprintf(fp,"  gMC->SetCut(\"DCUTE\" ,0.001); ");
189   fprintf(fp,"  gMC->SetCut(\"DCUTM\" ,0.001);\n");  fprintf(fp,"  gMC->SetCut(\"PPCUTM\",0.001); ");
190   fprintf(fp,"  gMC->SetCut(\"TOFMAX\",1e10);\n\n"); 
191 //Field
192   if(fMagFldChkBtn->GetState()==kButtonDown) fprintf(fp,"  gAlice->SetField();\n\n");else fprintf(fp,"  gAlice->SetField(0);\n\n");
193   fprintf(fp,"  pAL->CdGAFile();\n\n");                                 //????       
194 //BODY-ALIC 
195   fprintf(fp,"  new AliBODY(\"BODY\",\"Alice envelop\");\n\n");
196 //RICH
197   if(fRichVersionCombo->GetSelected() != -1){  
198     if(fRichTopChkBtn->GetState()==kButtonDown)       fprintf(fp,"  AliRICHParam::AngleRot(0);\n");
199     if(fRichDeclusterChkBtn->GetState()!=kButtonDown) fprintf(fp,"  AliRICHParam::SetDeclustering(kFALSE);\n");
200     if(fRichSagChkBtn->GetState()!=kButtonDown)       fprintf(fp,"  AliRICHParam::SetWireSag(kFALSE);\n");
201     if(fRichRadioSrcChkBtn->GetState()==kButtonDown)  fprintf(fp,"  AliRICHParam::SetRadioSrc(kTRUE);\n");
202     switch(fRichVersionCombo->GetSelected()){//RICH
203       case 0:   fprintf(fp,"  pRICH=new AliRICHv0(\"RICH\",\"RICH version 0\");\n"); break;   
204       case 1:   fprintf(fp,"  pRICH=new AliRICHv1(\"RICH\",\"RICH version 1\");\n"); break;   
205     }
206     fprintf(fp,"  ::Info(\"RICH private config\",\"version %i\");\n\n",fRichVersionCombo->GetSelected()); 
207   }
208 //Generator
209   switch(fGenTypeCombo->GetSelected()){
210     case kHijingPara: 
211       fprintf(fp,"  AliGenHIJINGpara *pGen=new AliGenHIJINGpara(%i);\n",(int)fGenNprimEntry->GetNumber());
212       fprintf(fp,"  pGen->SetMomentumRange(0,999); pGen->SetThetaRange(%f,%f); pGen->SetPhiRange(0,360);\n",Eta2Theta(8),Eta2Theta(-8));
213       fprintf(fp,"  pGen->SetOrigin(0,0,0);  pGen->SetSigma(0,0,0);\n");
214       fprintf(fp,"  pGen->Init();\n");
215     break;
216     case kGun1:     
217       fprintf(fp,"  AliGenFixed *pGen=new AliGenFixed(1);\n");  
218       fprintf(fp,"  pGen->SetPart(%i); pGen->SetOrigin(0,0,0);\n",fGenPartIdCombo->GetSelected());  
219       fprintf(fp,"  pGen->SetMomentum(%3.1f); pGen->SetTheta(pRICH->C(%i)->ThetaD()-2); pGen->SetPhi(pRICH->C(%i)->PhiD()); \n",
220                     float(fGenMomCombo->GetSelected())/10,fGenChamberCombo->GetSelected(),fGenChamberCombo->GetSelected());            
221       fprintf(fp,"  pGen->Init();\n");
222     break;    
223     case kGun7:   
224       fprintf(fp,"  AliGenCocktail *pCocktail=new AliGenCocktail();\n");
225       fprintf(fp,"  for(int i=1;i<=7;i++){\n");
226       fprintf(fp,"    AliGenFixed *pFixed=new AliGenFixed(1);\n");
227       fprintf(fp,"    pFixed->SetPart(%i); pFixed->SetMomentum(2.5+i*0.4); pFixed->SetOrigin(0,0,0);\n",fGenPartIdCombo->GetSelected());
228       fprintf(fp,"    pFixed->SetPhi(pRICH->C(i)->PhiD()); pFixed->SetTheta(pRICH->C(i)->ThetaD()-2);\n");                             
229       fprintf(fp,"    pCocktail->AddGenerator(pFixed,Form(\"Fixed %i\",i),1);\n  }\n");  
230       fprintf(fp,"  pCocktail->Init();\n");
231     break;
232     case kPythia7:      
233       fprintf(fp,"  AliGenCocktail *pCocktail=new AliGenCocktail();\n");
234       fprintf(fp,"  for(int i=1;i<=7;i++){\n");
235       fprintf(fp,"    AliGenFixed *pFixed=new AliGenFixed(1);\n");
236       fprintf(fp,"    pFixed->SetPart(%i); pFixed->SetMomentum(2.5+i*0.4); pFixed->SetOrigin(0,0,0);\n",fGenPartIdCombo->GetSelected());
237       fprintf(fp,"    pFixed->SetPhiRange(pRICH->C(i)->PhiD()); pFixed->SetThetaRange(pRICH->C(i)->ThetaD()-2);\n");                             
238       fprintf(fp,"    pCocktail->AddGenerator(pFixed,Form(\"Fixed %i\",i),1);\n  }\n");  
239       fprintf(fp,"  AliGenPythia *pPythia = new AliGenPythia(-1);\n");
240       fprintf(fp,"  pPythia->SetMomentumRange(0,999999); pPythia->SetPhiRange(20,80); pPythia->SetThetaRange(75,115);\n");
241       fprintf(fp,"  pPythia->SetYRange(-12,12);  pPythia->SetPtRange(0,1000);  pPythia->SetStrucFunc(kCTEQ4L);\n");
242       fprintf(fp,"  pPythia->SetProcess(kPyMb);  pPythia->SetEnergyCMS(14000);\n");      
243       fprintf(fp,"  pCocktail->AddGenerator(pPythia,\"Pythia\",1);\n");  
244       fprintf(fp,"  pCocktail->Init();\n");
245     case kSr90:  
246       fprintf(fp,"  AliGenRadioactive *pGen=new AliGenRadioactive(kSr90,%i);\n",(int)fGenNprimEntry->GetNumber());
247       fprintf(fp,"  pGen->SetOrigin(0,0,0);  pGen->SetSigma(0.1,0.1,0.05);\n");      
248       fprintf(fp,"  pGen->Init();\n");
249     break;  
250     case kHijing:  
251       fprintf(fp,"  AliGenHijing *pGen=new AliGenHijing(-1); pGen->SetEnergyCMS(5500); pGen->SetReferenceFrame(\"CMS\");\n");
252       fprintf(fp,"  pGen->SetProjectile(\"A\", 208, 82); pGen->SetTarget(\"A\", 208, 82);\n");      
253       fprintf(fp,"  pGen->SetJetQuenching(0); pGen->SetShadowing(0);\n");
254       fprintf(fp,"  pGen->KeepFullEvent(); pGen->SetSelectAll(0); \n");
255       fprintf(fp,"  pGen->SetImpactParameterRange(0., 5.);\n");
256       fprintf(fp,"  pGen->Init();\n");
257     break;  
258   }
259 //central before RICH detectors                  
260   if(IsDetectorOn(kPIPE)) fprintf(fp,"\n  new AliPIPEv0(\"PIPE\",\"Beam Pipe\");\n");
261   if(IsDetectorOn(kSHILD))fprintf(fp,"\n  new AliSHILv2(\"SHIL\",\"Shielding Version 2\");\n");  
262   if(IsDetectorOn(kITS)){
263     fprintf(fp,"\n  AliITSvPPRasymmFMD *pIts =new AliITSvPPRasymmFMD(\"ITS\",\"ITS PPR detailed version\");\n");
264     fprintf(fp,"  pIts->SetMinorVersion(2); pIts->SetReadDet(kTRUE);\n");
265     fprintf(fp,"  pIts->SetThicknessDet1(200.); pIts->SetThicknessDet2(200.);\n");
266     fprintf(fp,"  pIts->SetThicknessChip1(200.); pIts->SetThicknessChip2(200.);\n");
267     fprintf(fp,"  pIts->SetRails(0); pIts->SetCoolingFluid(1);\n");
268     fprintf(fp,"  pIts->SetEUCLID(0);\n");
269   }  
270   if(IsDetectorOn(kTPC)) {fprintf(fp,"\n  AliTPC *pTpc=new AliTPCv2(\"TPC\",\"Default\"); pTpc->SetSecAU(-1);pTpc->SetSecAL(-1);\n");}  
271   if(IsDetectorOn(kFRAME))fprintf(fp,"\n  AliFRAMEv2 *pFrame=new AliFRAMEv2(\"FRAME\",\"Space Frame\"); pFrame->SetHoles(1);\n");
272   if(IsDetectorOn(kTRD)){
273     fprintf(fp,"\n  AliTRD *pTrd=new AliTRDv1(\"TRD\",\"TRD slow simulator\");\n");
274     fprintf(fp,"  pTrd->SetGasMix(1); pTrd->SetPHOShole(); pTrd->SetRICHhole();pTrd->CreateTR();\n");
275   }  
276   if(IsDetectorOn(kTOF))   fprintf(fp,"\n  new AliTOFv4T0(\"TOF\", \"normal TOF\");\n");
277 //central after RICH detectors  
278   if(IsDetectorOn(kMAG))  fprintf(fp,"\n  new AliMAG(\"MAG\",\"Magnet\");\n");  
279   if(IsDetectorOn(kHALL)) fprintf(fp,"\n  new AliHALL(\"HALL\",\"Alice Hall\");\n");
280 //forward detectors  
281   if(IsDetectorOn(kFMD))   fprintf(fp,"\n  new AliFMDv1(\"FMD\",\"normal FMD\");\n");
282   if(IsDetectorOn(kABSO))  fprintf(fp,"\n  new AliABSOv0(\"ABSO\",\"Muon absorber\");\n");
283   if(IsDetectorOn(kDIPO))  fprintf(fp,"\n  new AliDIPOv2(\"DIPO\",\"Dipole version 2\");\n");
284   if(IsDetectorOn(kMUON))  fprintf(fp,"\n  new AliMUONv1(\"MUON\",\"default\");\n");
285   if(IsDetectorOn(kPMD))   fprintf(fp,"\n  new AliPMDv1(\"PMD\",\"normal PMD\");\n");
286   if(IsDetectorOn(kSTART)) fprintf(fp,"\n  new AliSTARTv1(\"START\",\"START Detector\");\n");
287   if(IsDetectorOn(kVZERO)) fprintf(fp,"\n  new AliVZEROv2(\"VZERO\",\"normal VZERO\");\n");
288   if(IsDetectorOn(kZDC))   fprintf(fp,"\n  new AliZDCv2(\"ZDC\",\"normal ZDC\");\n");
289 //different phase space detectors  
290   if(IsDetectorOn(kPHOS))  fprintf(fp,"\n  new AliPHOSv1(\"PHOS\",\"IHEP\");\n");
291   if(IsDetectorOn(kEMCAL)) fprintf(fp,"\n  new AliEMCALv1(\"EMCAL\",\"G56_2_55_19_104_14\");\n");
292   if(IsDetectorOn(kCRT))   fprintf(fp,"\n  new AliCRTv0(\"CRT\",\"normal ACORDE\");\n");
293
294   fprintf(fp,"\n  ::Info(\"RICH private config\",\"Stop\");\n"); 
295   fprintf(fp,"}\n");
296   fclose(fp);  
297   
298 //  fMain->CloseWindow();
299 }//CreateConfigFile
300
301 KirConfig *p;
302 void CreateConfig()
303 {
304    p=new KirConfig("Config.C");
305 }   
306