// The following are special comments used by RootSpy to know
// which histograms to fetch for the macro.
//

// hnamepath: /CDC/cdc_ped_mean
// hnamepath: /CDC/cdc_ped_width
// hnamepath: /CDC/cdc_windata_ped_mean
// hnamepath: /CDC/cdc_windata_ped_width


{

  TDirectory *CDCdir = (TDirectory*)gDirectory->FindObjectAny("CDC");

  if(!CDCdir) return;
	
  CDCdir->cd();

  TH1D *cdc_ped_mean   = (TH1D*)gDirectory->FindObjectAny("cdc_ped_mean");
  TH1D *cdc_ped_width   = (TH1D*)gDirectory->FindObjectAny("cdc_ped_width");

  TH1D *cdc_windata_ped_mean   = (TH1D*)gDirectory->FindObjectAny("cdc_windata_ped_mean");
  TH1D *cdc_windata_ped_width   = (TH1D*)gDirectory->FindObjectAny("cdc_windata_ped_width");

  // Just for testing
  if(gPad == NULL){
    TCanvas *c1 = new TCanvas("c1");
    c1->cd(0);
    c1->Draw();
    c1->Update();
  }
  
  if(!gPad) return;

  if (!cdc_ped_mean) return;
  if (!cdc_ped_width) return;

  cdc_ped_mean->SetFillColor(38);
  cdc_ped_width->SetFillColor(591);

  cdc_windata_ped_mean->SetFillColor(38);
  cdc_windata_ped_width->SetFillColor(591);

  TCanvas *c1 = gPad->GetCanvas();
  c1->Divide(2, 2);
  
  c1->cd(1);
  if(cdc_ped_mean) cdc_ped_mean->Draw();

  c1->cd(2);
  if(cdc_ped_width) cdc_ped_width->Draw();

  c1->cd(3);
  if(cdc_windata_ped_mean) cdc_windata_ped_mean->Draw();

  c1->cd(4);
  if(cdc_windata_ped_width) cdc_windata_ped_width->Draw();

}