[u/mrichter/AliRoot.git] / TGeant3 / TPaveTree.cxx

///////////////////////////////////////////////////////////////////////////////
//                                                                           //
//  Interface Class to the Geant3.21 MonteCarlo                              //
//  Author :    Rene Brun   08/12/98                                         //
//                                                                           //
//  A TPaveTree is a TPaveLabel  specialized to draw Geant GDtree            //
//                                                                           //
//  When a TPaveTree object is drawn in a canvas, one can:                   //
//    - double click to draw the spec                                        //
//    - select pop-up item DrawTree to draw its tree                         //
//    - select pop-up item DrawTreeParent to draw its parent tree            //
//                                                                           //
//Begin_Html
/*
<img src="picts/TPaveTreeClass.gif">
*/
//End_Html
//                                                                           //
///////////////////////////////////////////////////////////////////////////////
#include <fstream.h>
#include <iostream.h>

#include <TROOT.h>
#include <TVirtualPad.h>
#include <Buttons.h>
#include "TPaveTree.h"
#include "TGeant3.h"

static TGeant3 *geant3=(TGeant3*)gMC;


ClassImp(TPaveTree)

//_____________________________________________________________________________
TPaveTree::TPaveTree(): TPaveLabel()
{
  //
  // Default Constructor
  //
}

//_____________________________________________________________________________
TPaveTree::TPaveTree(Coord_t x1, Coord_t y1,Coord_t x2, Coord_t  y2, 
		     const Text_t *label)
  :TPaveLabel(x1,y1,x2,y2,label,"br")
{
  //
  // TPaveTree normal constructor
  //
  SetName(label);
}

//_____________________________________________________________________________
TPaveTree::~TPaveTree()
{
  //
  // Standard Destructor
  //
}

//_____________________________________________________________________________
TPaveTree::TPaveTree(const TPaveTree &PaveTree)
{
  //
  // Copy Constructor
  //
  ((TPaveTree&)PaveTree).Copy(*this);
}

//_____________________________________________________________________________
void TPaveTree::Copy(TObject &obj)
{
  //
  //  Copy this PaveTree to PaveTree
  //
  TPaveLabel::Copy(obj);
}

//_____________________________________________________________________________
void TPaveTree::DrawSpec()
{
  //
  //  Draw specs of the volume in this TPaveTree
  //
  gMC->DrawOneSpec(GetLabel());
}

//_____________________________________________________________________________
void TPaveTree::DrawTree(Int_t levmax, Int_t isel)
{
  //
  //  Draw tree of the volume in this TPaveTree
  //
  geant3->Gdtree(GetLabel(),levmax,isel);
}

//_____________________________________________________________________________
void TPaveTree::DrawTreeParent(Int_t levmax, Int_t isel)
{
  //
  //  Draw parent tree of the volume in this TPaveTree
  //
  geant3->GdtreeParent(GetLabel(),levmax,isel);
}

//_____________________________________________________________________________
void TPaveTree::ExecuteEvent(Int_t event, Int_t px, Int_t py)
{
  //
  // Process mouse events.
  // Invokes TPabeLabel::ExecuteEvent. In case of a double click
  // draw specs of volume corresponding to this TPaveTree
  //
  
  TPaveLabel::ExecuteEvent(event,px,py);
  
  if (event == kButton1Double) {
    //printf("TPaveTree::ExecuteEvent\n");
    gPad->SetCursor(kWatch);
    gMC->DrawOneSpec(GetLabel());
  }
}

//_____________________________________________________________________________
void TPaveTree::SavePrimitive(ofstream &out, Option_t *)
{
  //
  // Save primitive as a C++ statement(s) on output stream out
  //
  char quote = '"';
  out<<"   "<<endl;
  if (gROOT->ClassSaved(TPaveTree::Class())) {
    out<<"   ";
  } else {
    out<<"   TPaveTree *";
  }
  out<<"pvar = new TPaveTree("<<fX1<<","<<fY1<<","<<fX2<<","<<fY2
     <<","<<quote<<fLabel<<quote<<","<<quote<<fOption<<quote<<");"<<endl;
  
  SaveFillAttributes(out,"pvar",0,1001);
  SaveLineAttributes(out,"pvar",1,1,1);
  SaveTextAttributes(out,"pvar",22,0,1,62,0);
  
  out<<"   pvar->Draw();"<<endl;
}
Commit	Line	Data
fe4da5cc	1	///////////////////////////////////////////////////////////////////////////////
	2	// //
	3	// Interface Class to the Geant3.21 MonteCarlo //
	4	// Author : Rene Brun 08/12/98 //
	5	// //
	6	// A TPaveTree is a TPaveLabel specialized to draw Geant GDtree //
	7	// //
	8	// When a TPaveTree object is drawn in a canvas, one can: //
	9	// - double click to draw the spec //
	10	// - select pop-up item DrawTree to draw its tree //
	11	// - select pop-up item DrawTreeParent to draw its parent tree //
	12	// //
	13	//Begin_Html
	14	/*
1439f98e	15	<img src="picts/TPaveTreeClass.gif">
fe4da5cc	16	*/
	17	//End_Html
	18	// //
	19	///////////////////////////////////////////////////////////////////////////////
	20	#include <fstream.h>
	21	#include <iostream.h>
	22
	23	#include <TROOT.h>
	24	#include <TVirtualPad.h>
	25	#include <Buttons.h>
	26	#include "TPaveTree.h"
	27	#include "TGeant3.h"
	28
cfce8870	29	static TGeant3 geant3=(TGeant3)gMC;
	30
	31
fe4da5cc	32	ClassImp(TPaveTree)
	33
	34	//_____________________________________________________________________________
	35	TPaveTree::TPaveTree(): TPaveLabel()
	36	{
	37	//
	38	// Default Constructor
	39	//
	40	}
	41
	42	//_____________________________________________________________________________
	43	TPaveTree::TPaveTree(Coord_t x1, Coord_t y1,Coord_t x2, Coord_t y2,
	44	const Text_t *label)
	45	:TPaveLabel(x1,y1,x2,y2,label,"br")
	46	{
	47	//
	48	// TPaveTree normal constructor
	49	//
	50	SetName(label);
	51	}
	52
	53	//_____________________________________________________________________________
	54	TPaveTree::~TPaveTree()
	55	{
	56	//
	57	// Standard Destructor
	58	//
	59	}
	60
	61	//_____________________________________________________________________________
	62	TPaveTree::TPaveTree(const TPaveTree &PaveTree)
	63	{
	64	//
	65	// Copy Constructor
	66	//
	67	((TPaveTree&)PaveTree).Copy(*this);
	68	}
	69
	70	//_____________________________________________________________________________
	71	void TPaveTree::Copy(TObject &obj)
	72	{
	73	//
	74	// Copy this PaveTree to PaveTree
	75	//
	76	TPaveLabel::Copy(obj);
	77	}
	78
	79	//_____________________________________________________________________________
	80	void TPaveTree::DrawSpec()
	81	{
	82	//
	83	// Draw specs of the volume in this TPaveTree
	84	//
cfce8870	85	gMC->DrawOneSpec(GetLabel());
fe4da5cc	86	}
	87
	88	//_____________________________________________________________________________
	89	void TPaveTree::DrawTree(Int_t levmax, Int_t isel)
	90	{
	91	//
	92	// Draw tree of the volume in this TPaveTree
	93	//
fe4da5cc	94	geant3->Gdtree(GetLabel(),levmax,isel);
	95	}
	96
	97	//_____________________________________________________________________________
	98	void TPaveTree::DrawTreeParent(Int_t levmax, Int_t isel)
	99	{
	100	//
	101	// Draw parent tree of the volume in this TPaveTree
	102	//
fe4da5cc	103	geant3->GdtreeParent(GetLabel(),levmax,isel);
	104	}
	105
	106	//_____________________________________________________________________________
	107	void TPaveTree::ExecuteEvent(Int_t event, Int_t px, Int_t py)
	108	{
	109	//
	110	// Process mouse events.
	111	// Invokes TPabeLabel::ExecuteEvent. In case of a double click
	112	// draw specs of volume corresponding to this TPaveTree
	113	//
fe4da5cc	114
	115	TPaveLabel::ExecuteEvent(event,px,py);
	116
	117	if (event == kButton1Double) {
	118	//printf("TPaveTree::ExecuteEvent\n");
	119	gPad->SetCursor(kWatch);
cfce8870	120	gMC->DrawOneSpec(GetLabel());
fe4da5cc	121	}
	122	}
	123
	124	//_____________________________________________________________________________
	125	void TPaveTree::SavePrimitive(ofstream &out, Option_t *)
	126	{
	127	//
	128	// Save primitive as a C++ statement(s) on output stream out
	129	//
	130	char quote = '"';
	131	out<<" "<<endl;
	132	if (gROOT->ClassSaved(TPaveTree::Class())) {
	133	out<<" ";
	134	} else {
	135	out<<" TPaveTree *";
	136	}
	137	out<<"pvar = new TPaveTree("<<fX1<<","<<fY1<<","<<fX2<<","<<fY2
	138	<<","<<quote<<fLabel<<quote<<","<<quote<<fOption<<quote<<");"<<endl;
	139
	140	SaveFillAttributes(out,"pvar",0,1001);
	141	SaveLineAttributes(out,"pvar",1,1,1);
	142	SaveTextAttributes(out,"pvar",22,0,1,62,0);
	143
	144	out<<" pvar->Draw();"<<endl;
	145	}