/home/cern/BDSIM_new/utils/display/BDSPopUp.C

00001 /* Display for BDSIM code     
00002 Author: Olivier Dadoun, Laboratoire de l'Accelerateur Lineaire (LAL-IN2P3), Orsay (France)
00003 <mailto:> dadoun@lal.in2p3.fr, 2005
00004 Last modified 06.12.2005
00005 */
00006 #ifndef ROOT_TText
00007 #include "TText.h"
00008 #endif
00009 #include "BDSConstant.h"
00010 #include "BDSPopUp.h"
00011 ClassImp(BDSPopUp) 
00012 
00013 BDSPopUp::BDSPopUp(TString name, short type,Float_t len, Float_t s,
00014                    Float_t k0, Float_t k1, Float_t k2, Float_t k3,
00015                    Float_t angle, Float_t aper_x, Float_t aper_y)
00016 : TCanvas("echo_canvas","Optics Specs.",960,10,330,200)
00017 {
00018         TString temp;
00019         TString string_type;
00020         
00021         TText *t0 = new TText(0.02,0.9,"Opticals Elements specs.");
00022         temp= "Name: " + name;
00023 
00024         string_type=Form(typestr(type));
00025         temp = temp + " Type :" + string_type;
00026         TText *t1 = new TText(0.02,0.7,temp);
00027         temp=Form("@ %f m with a length of %f m",s,len);
00028         TText *t2 = new TText(0.02,0.6,temp);
00029         temp=Form("Aperture: X = %f m, Y = %f m",aper_x,aper_y);
00030         TText *t3 = new TText(0.02,0.5,temp);
00031         temp=Form("k1=%f, k2=%f",k0,k1);
00032         TText *t4 = new TText(0.02,0.3,temp);
00033         temp=Form("k3=%f, k4=%f",k2,k3);
00034         TText *t5 = new TText(0.02,0.2,temp);
00035         temp=Form("angle=%f",angle);
00036         TText *t6 = new TText(0.02,0.1,temp);
00037         
00038         t0->SetTextColor(2);
00039         t0->SetTextAlign(12);
00040         t0->SetTextSize(0.11);
00041         t1->SetTextAlign(12);
00042         t1->SetTextSize(0.09);
00043         t2->SetTextAlign(12);
00044         t2->SetTextSize(0.09);
00045         t3->SetTextAlign(12);
00046         t3->SetTextSize(0.09);
00047         t4->SetTextAlign(12);
00048         t4->SetTextSize(0.09);  
00049         t5->SetTextAlign(12);
00050         t5->SetTextSize(0.09);  
00051         t6->SetTextAlign(12);
00052         t6->SetTextSize(0.09);  
00053         
00054         t0->Draw();
00055         t1->Draw();
00056         t2->Draw();
00057         t3->Draw();
00058         t4->Draw();
00059         t5->Draw();
00060         t6->Draw();
00061 }

Generated on Wed Mar 5 17:25:25 2008 for BDSIM by  doxygen 1.5.3