00001 {
00002 gStyle->SetOptTitle(false);
00003 TFile *_file0 = TFile::Open("ECM.root");
00004 TListIter iter(_file0->GetListOfKeys());
00005
00006 TCanvas * c = new TCanvas("c","**",400,400);
00007 c->cd();
00008
00009 iter.Reset();
00010 int i=0;
00011 TH1D * h = NULL;
00012
00013 while( (h = (TH1D *)((TKey*) iter.Next())->ReadObj()))
00014 {
00015
00016 TString is;
00017 is+=i;
00018
00019
00020 c->cd();
00021 h->Draw("");
00022
00023 char cname[100];
00024 sprintf(cname,"%d.gif",i++);
00025 c->Print(cname);
00026
00027 }
00028
00029 }
