void tiDose_balcony()
{
//=========Macro generated from canvas: c/c
//=========  (Tue Jan  7 13:47:21 2020) by ROOT version6.08/06
   TCanvas *c = new TCanvas("c", "c",95,175,834,600);
   gStyle->SetOptFit(1);
   c->Range(-128.8552,-1.93878,1159.697,13.95922);
   c->SetFillColor(0);
   c->SetBorderMode(0);
   c->SetBorderSize(2);
   c->SetRightMargin(0.04206731);
   c->SetBottomMargin(0.1219512);
   c->SetFrameBorderMode(0);
   c->SetFrameBorderMode(0);
   
   Double_t Graph0_fx1001[110] = {
   5,
   15,
   25,
   35,
   45,
   55,
   65,
   75,
   85,
   95,
   105,
   115,
   125,
   135,
   145,
   155,
   165,
   175,
   185,
   195,
   205,
   215,
   225,
   235,
   245,
   255,
   265,
   275,
   285,
   295,
   305,
   315,
   325,
   335,
   345,
   355,
   365,
   375,
   385,
   395,
   405,
   415,
   425,
   435,
   445,
   455,
   465,
   475,
   485,
   495,
   505,
   515,
   525,
   535,
   545,
   555,
   565,
   575,
   585,
   595,
   605,
   615,
   625,
   635,
   645,
   655,
   665,
   675,
   685,
   695,
   705,
   715,
   725,
   735,
   745,
   755,
   765,
   775,
   785,
   795,
   805,
   815,
   825,
   835,
   845,
   855,
   865,
   875,
   885,
   895,
   905,
   915,
   925,
   935,
   945,
   955,
   965,
   975,
   985,
   995,
   1005,
   1015,
   1025,
   1035,
   1045,
   1055,
   1065,
   1075,
   1085,
   1095};
   Double_t Graph0_fy1001[110] = {
   1.741195,
   1.896264,
   1.731825,
   1.778481,
   1.177849,
   1.863453,
   1.882088,
   1.864572,
   1.806774,
   1.720642,
   1.430822,
   1.359746,
   2.414053,
   1.52219,
   2.052748,
   1.288225,
   2.256807,
   1.79112,
   1.134931,
   1.747667,
   2.298846,
   1.965366,
   1.465942,
   1.458452,
   1.49628,
   1.351058,
   1.770784,
   1.547654,
   1.597182,
   1.75995,
   1.512579,
   1.364201,
   1.961267,
   1.898284,
   1.274535,
   1.876435,
   1.190147,
   1.62183,
   1.702183,
   1.471412,
   1.038516,
   1.616776,
   2.574452,
   2.007593,
   2.603134,
   1.245069,
   2.090178,
   1.856816,
   1.962822,
   2.28691,
   1.854679,
   1.009673,
   1.350572,
   2.29974,
   2.182184,
   1.862614,
   1.781488,
   2.204666,
   1.68155,
   1.843148,
   1.801498,
   2.15312,
   2.09037,
   2.236922,
   2.445546,
   2.527968,
   2.839636,
   2.31263,
   2.723562,
   2.508474,
   3.724648,
   2.82537,
   3.547342,
   2.97507,
   3.187734,
   2.775102,
   3.347586,
   2.699712,
   3.852302,
   4.077656,
   2.70563,
   3.356922,
   3.276008,
   3.830068,
   4.93123,
   4.389164,
   3.970978,
   4.12824,
   3.121354,
   3.57591,
   4.308002,
   3.550952,
   4.148258,
   2.751106,
   3.930366,
   5.305674,
   6.139412,
   5.35255,
   7.669278,
   7.921596,
   7.61009,
   11.33672,
   8.051786,
   8.056592,
   7.114286,
   9.28768,
   10.65739,
   8.681184,
   8.418066,
   9.297846};
   Double_t Graph0_fex1001[110] = {
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0};
   Double_t Graph0_fey1001[110] = {
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0};
   TGraphErrors *gre = new TGraphErrors(110,Graph0_fx1001,Graph0_fy1001,Graph0_fex1001,Graph0_fey1001);
   gre->SetName("Graph0");
   gre->SetTitle(" ; Z [cm]; Dose [Gy]");

   Int_t ci;      // for color index setting
   TColor *color; // for color definition with alpha
   ci = TColor::GetColor("#990000");
   gre->SetFillColor(ci);

   ci = TColor::GetColor("#990000");
   gre->SetLineColor(ci);
   gre->SetLineWidth(2);

   ci = TColor::GetColor("#990000");
   gre->SetMarkerColor(ci);
   gre->SetMarkerStyle(20);
   gre->SetMarkerSize(1.5);
   
   TH1F *Graph_Graph_Graph10011001 = new TH1F("Graph_Graph_Graph10011001"," ",110,0,1204);
   Graph_Graph_Graph10011001->SetMinimum(0);
   Graph_Graph_Graph10011001->SetMaximum(12.36942);
   Graph_Graph_Graph10011001->SetDirectory(0);
   Graph_Graph_Graph10011001->SetStats(0);

   ci = TColor::GetColor("#000099");
   Graph_Graph_Graph10011001->SetLineColor(ci);
   Graph_Graph_Graph10011001->GetXaxis()->SetTitle(" Z [cm]");
   Graph_Graph_Graph10011001->GetXaxis()->SetRange(1,101);
   Graph_Graph_Graph10011001->GetXaxis()->SetLabelFont(42);
   Graph_Graph_Graph10011001->GetXaxis()->SetLabelSize(0.035);
   Graph_Graph_Graph10011001->GetXaxis()->SetTitleSize(0.05);
   Graph_Graph_Graph10011001->GetXaxis()->SetTitleOffset(0.9);
   Graph_Graph_Graph10011001->GetXaxis()->SetTitleFont(42);
   Graph_Graph_Graph10011001->GetYaxis()->SetTitle(" Dose [Gy]");
   Graph_Graph_Graph10011001->GetYaxis()->SetLabelFont(42);
   Graph_Graph_Graph10011001->GetYaxis()->SetLabelSize(0.035);
   Graph_Graph_Graph10011001->GetYaxis()->SetTitleSize(0.05);
   Graph_Graph_Graph10011001->GetYaxis()->SetTitleOffset(0.95);
   Graph_Graph_Graph10011001->GetYaxis()->SetTitleFont(42);
   Graph_Graph_Graph10011001->GetZaxis()->SetLabelFont(42);
   Graph_Graph_Graph10011001->GetZaxis()->SetLabelSize(0.035);
   Graph_Graph_Graph10011001->GetZaxis()->SetTitleSize(0.035);
   Graph_Graph_Graph10011001->GetZaxis()->SetTitleFont(42);
   gre->SetHistogram(Graph_Graph_Graph10011001);
   
   gre->Draw("pae");
   
   Double_t Graph1_fx1002[110] = {
   5,
   15,
   25,
   35,
   45,
   55,
   65,
   75,
   85,
   95,
   105,
   115,
   125,
   135,
   145,
   155,
   165,
   175,
   185,
   195,
   205,
   215,
   225,
   235,
   245,
   255,
   265,
   275,
   285,
   295,
   305,
   315,
   325,
   335,
   345,
   355,
   365,
   375,
   385,
   395,
   405,
   415,
   425,
   435,
   445,
   455,
   465,
   475,
   485,
   495,
   505,
   515,
   525,
   535,
   545,
   555,
   565,
   575,
   585,
   595,
   605,
   615,
   625,
   635,
   645,
   655,
   665,
   675,
   685,
   695,
   705,
   715,
   725,
   735,
   745,
   755,
   765,
   775,
   785,
   795,
   805,
   815,
   825,
   835,
   845,
   855,
   865,
   875,
   885,
   895,
   905,
   915,
   925,
   935,
   945,
   955,
   965,
   975,
   985,
   995,
   1005,
   1015,
   1025,
   1035,
   1045,
   1055,
   1065,
   1075,
   1085,
   1095};
   Double_t Graph1_fy1002[110] = {
   1.3059,
   1.422199,
   1.298869,
   1.333862,
   0.8833866,
   1.397587,
   1.411567,
   1.398428,
   1.355079,
   1.290486,
   1.073117,
   1.019809,
   1.810542,
   1.141645,
   1.539561,
   0.9661698,
   1.692604,
   1.34334,
   0.8511968,
   1.310752,
   1.724134,
   1.474025,
   1.099456,
   1.093836,
   1.122211,
   1.013294,
   1.328089,
   1.160741,
   1.197889,
   1.319961,
   1.134435,
   1.02315,
   1.47095,
   1.423714,
   0.955901,
   1.407327,
   0.8926086,
   1.216373,
   1.276638,
   1.103558,
   0.7788854,
   1.212581,
   1.930841,
   1.505694,
   1.95235,
   0.9338014,
   1.567636,
   1.392614,
   1.472118,
   1.715186,
   1.39101,
   0.7572542,
   1.012929,
   1.724804,
   1.636638,
   1.396958,
   1.336116,
   1.6535,
   1.261164,
   1.382362,
   1.351124,
   1.61484,
   1.567776,
   1.677692,
   1.834158,
   1.895976,
   2.129728,
   1.734474,
   2.04267,
   1.881356,
   2.793486,
   2.119028,
   2.660506,
   2.231302,
   2.390802,
   2.081326,
   2.510692,
   2.024786,
   2.889226,
   3.058242,
   2.029224,
   2.517694,
   2.457004,
   2.872554,
   3.698418,
   3.291874,
   2.978232,
   3.096178,
   2.341014,
   2.681936,
   3.230994,
   2.663214,
   3.111194,
   2.063328,
   2.947776,
   3.979256,
   4.604552,
   4.014412,
   5.751956,
   5.941198,
   5.70757,
   8.502546,
   6.038838,
   6.042446,
   5.335714,
   6.965746,
   7.993034,
   6.510892,
   6.313554,
   6.973394};
   Double_t Graph1_fex1002[110] = {
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0};
   Double_t Graph1_fey1002[110] = {
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0,
   0};
   gre = new TGraphErrors(110,Graph1_fx1002,Graph1_fy1002,Graph1_fex1002,Graph1_fey1002);
   gre->SetName("Graph1");
   gre->SetTitle("Graph");

   ci = TColor::GetColor("#000099");
   gre->SetFillColor(ci);

   ci = TColor::GetColor("#000099");
   gre->SetLineColor(ci);

   ci = TColor::GetColor("#000099");
   gre->SetMarkerColor(ci);
   gre->SetMarkerStyle(22);
   gre->SetMarkerSize(1.5);
   
   TH1F *Graph_Graph_Graph10021002 = new TH1F("Graph_Graph_Graph10021002","Graph",110,0,1204);
   Graph_Graph_Graph10021002->SetMinimum(0);
   Graph_Graph_Graph10021002->SetMaximum(9.277075);
   Graph_Graph_Graph10021002->SetDirectory(0);
   Graph_Graph_Graph10021002->SetStats(0);

   ci = TColor::GetColor("#000099");
   Graph_Graph_Graph10021002->SetLineColor(ci);
   Graph_Graph_Graph10021002->GetXaxis()->SetLabelFont(42);
   Graph_Graph_Graph10021002->GetXaxis()->SetLabelSize(0.035);
   Graph_Graph_Graph10021002->GetXaxis()->SetTitleSize(0.035);
   Graph_Graph_Graph10021002->GetXaxis()->SetTitleFont(42);
   Graph_Graph_Graph10021002->GetYaxis()->SetLabelFont(42);
   Graph_Graph_Graph10021002->GetYaxis()->SetLabelSize(0.035);
   Graph_Graph_Graph10021002->GetYaxis()->SetTitleSize(0.035);
   Graph_Graph_Graph10021002->GetYaxis()->SetTitleFont(42);
   Graph_Graph_Graph10021002->GetZaxis()->SetLabelFont(42);
   Graph_Graph_Graph10021002->GetZaxis()->SetLabelSize(0.035);
   Graph_Graph_Graph10021002->GetZaxis()->SetTitleSize(0.035);
   Graph_Graph_Graph10021002->GetZaxis()->SetTitleFont(42);
   gre->SetHistogram(Graph_Graph_Graph10021002);
   
   gre->Draw("pe");
   
   TLegend *leg = new TLegend(0.5492788,0.7142857,0.7980769,0.815331,NULL,"brNDC");
   leg->SetBorderSize(1);
   leg->SetLineColor(1);
   leg->SetLineStyle(1);
   leg->SetLineWidth(0);
   leg->SetFillColor(0);
   leg->SetFillStyle(1001);
   TLegendEntry *entry=leg->AddEntry("NULL","4000 fb^{-1}","p");
   entry->SetLineColor(1);
   entry->SetLineStyle(1);
   entry->SetLineWidth(1);

   ci = TColor::GetColor("#990000");
   entry->SetMarkerColor(ci);
   entry->SetMarkerStyle(20);
   entry->SetMarkerSize(1.5);
   entry->SetTextFont(42);
   entry=leg->AddEntry("NULL","3000 fb^{-1}","p");
   entry->SetLineColor(1);
   entry->SetLineStyle(1);
   entry->SetLineWidth(1);

   ci = TColor::GetColor("#000099");
   entry->SetMarkerColor(ci);
   entry->SetMarkerStyle(22);
   entry->SetMarkerSize(1.5);
   entry->SetTextFont(42);
   leg->Draw();
   TLatex *   tex = new TLatex(0.15,0.83,"CMS-FLUKA Simulation");
tex->SetNDC();
   tex->SetTextFont(61);
   tex->SetTextSize(0.045);
   tex->SetLineWidth(2);
   tex->Draw();
      tex = new TLatex(0.15,0.81,"Preliminary");
tex->SetNDC();
   tex->SetTextAlign(13);
   tex->SetTextFont(52);
   tex->SetTextSize(0.045);
   tex->SetLineWidth(2);
   tex->Draw();
      tex = new TLatex(0.15,0.76,"Phase-2 geometry");
tex->SetNDC();
   tex->SetTextAlign(13);
   tex->SetTextFont(52);
   tex->SetTextSize(0.045);
   tex->SetLineWidth(2);
   tex->Draw();
      tex = new TLatex(0.3173077,0.9268293,"Absorbed dose at balconies");
tex->SetNDC();
   tex->SetTextAlign(15);
   tex->SetTextFont(42);
   tex->SetTextSize(0.053);
   tex->SetLineWidth(2);
   tex->Draw();
      tex = new TLatex(0.1,0.03,"CMS FLUKA Study v.3.7.20.0");
tex->SetNDC();
   tex->SetTextAlign(15);
   tex->SetTextFont(42);
   tex->SetTextSize(0.038);
   tex->SetLineWidth(2);
   tex->Draw();
      tex = new TLatex(0.15,0.71,"750 cm < R < 800 cm");
tex->SetNDC();
   tex->SetTextAlign(13);
   tex->SetTextFont(42);
   tex->SetTextSize(0.045);
   tex->SetLineWidth(2);
   tex->Draw();
   
   TPaveText *pt = new TPaveText(0.4821875,0.94,0.5178125,0.995,"blNDC");
   pt->SetName("title");
   pt->SetBorderSize(0);
   pt->SetFillColor(0);
   pt->SetFillStyle(0);
   pt->SetTextFont(42);
   AText = pt->AddText(" ");
   pt->Draw();
   c->Modified();
   c->cd();
   c->SetSelected(c);
}