Hall-D Software  alpha
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Groups Pages
ccal_cluster_et.C
Go to the documentation of this file.
1 // hnamepath: /ccal/clusN
2 // hnamepath: /ccal/clusE
3 // hnamepath: /ccal/clusETot
4 // hnamepath: /ccal/clusT
5 
6 {
7 
8  TDirectory *dir = (TDirectory*)gDirectory->FindObjectAny("ccal");
9  if(dir) dir->cd();
10 
11  TH1I* clusN = (TH1I*)gDirectory->FindObjectAny( "clusN" );
12  TH1I* clusE = (TH1I*)gDirectory->FindObjectAny( "clusE" );
13  TH1I* clusETot = (TH1I*)gDirectory->FindObjectAny( "clusETot" );
14  TH1I* clusT = (TH1I*)gDirectory->FindObjectAny( "clusT" );
15 
16  if(gPad == NULL){
17 
18  TCanvas *c1 = new TCanvas( "c1", "CCAL Monitor", 800, 800 );
19  c1->cd(0);
20  c1->Draw();
21  c1->Update();
22  }
23 
24  if( !gPad ) return;
25  TCanvas* c1 = gPad->GetCanvas();
26  c1->Divide( 2, 2 );
27 
28  if( clusN ){
29 
30  clusN->SetStats( 0 );
31  clusN->SetFillColor( kCyan-10 );
32  c1->cd( 1 );
33  clusN->Draw();
34  }
35 
36  if( clusE ){
37 
38  clusE->SetStats( 0 );
39  clusE->SetFillColor( kCyan-10 );
40  clusE->GetXaxis()->SetRangeUser(0,12000);
41  c1->cd( 2 );
42  clusE->Draw();
43  }
44 
45  if( clusETot ){
46 
47  clusETot->SetStats( 0 );
48  clusETot->SetFillColor( kCyan-10 );
49  clusETot->GetXaxis()->SetRangeUser(0,12000);
50  c1->cd( 4 );
51  clusETot->Draw();
52  }
53 
54  if( clusT ){
55 
56  clusT->SetStats( 0 );
57  clusT->SetFillColor( kCyan-10 );
58  clusT->GetXaxis()->SetRangeUser(-100,300);
59  c1->cd( 3 );
60  clusT->Draw();
61  }
62 
63 }
Double_t c1[2][NMODULES]
Definition: tw_corr.C:68
TDirectory * dir
Definition: bcal_hist_eff.C:31