Import Geant4 0.0.0 source tree

2016-06-01 15:25:35 +02:00
parent 54d6b71f95
commit b97f8d0df7
3237 changed files with 807095 additions and 0 deletions
@@ -0,0 +1,60 @@
+// This code implementation is the intellectual property of
+// the RD44 GEANT4 collaboration.
+//
+// By copying, distributing or modifying the Program (or any work
+// based on the Program) you indicate your acceptance of this statement,
+// and all its terms.
+//
+// $Id: G4EvManMessenger.cc,v 2.2 1998/07/12 03:42:25 urbi Exp $
+// GEANT4 tag $Name: geant4-00 $
+//
+// --------------------------------------------------------------------
+
+#include "G4EvManMessenger.hh"
+#include "G4EventManager.hh"
+#include "G4UIdirectory.hh"
+#include "G4UIcmdWithoutParameter.hh"
+#include "G4UIcmdWithAnInteger.hh"
+
+G4EvManMessenger::G4EvManMessenger(G4EventManager * fEvMan)
+:fEvManager(fEvMan)
+{
+  eventDirectory = new G4UIdirectory("/event/");
+  eventDirectory->SetGuidance("EventManager control commands.");
+
+  abortCmd = new G4UIcmdWithoutParameter("/event/abort",this);
+  abortCmd->SetGuidance("Abort current event.");
+  abortCmd->AvailableForStates(EventProc);
+
+  verboseCmd = new G4UIcmdWithAnInteger("/event/verbose",this);
+  verboseCmd->SetGuidance("Set Verbose level of event management category.");
+  verboseCmd->SetGuidance(" 0 : Silent");
+  verboseCmd->SetGuidance(" 1 : Stacking information");
+  verboseCmd->SetGuidance(" 2 : More...");
+  verboseCmd->SetParameterName("level",false);
+  verboseCmd->SetRange("level>=0");
+}
+
+G4EvManMessenger::~G4EvManMessenger()
+{
+  delete abortCmd;
+  delete verboseCmd;
+  delete eventDirectory;
+}
+
+void G4EvManMessenger::SetNewValue(G4UIcommand * command,G4String newValues)
+{
+  if( command == verboseCmd )
+  { fEvManager->SetVerboseLevel(verboseCmd->GetNewIntValue(newValues)); }
+  if( command == abortCmd )
+  { fEvManager->AbortCurrentEvent(); }
+}
+
+G4String G4EvManMessenger::GetCurrentValue(G4UIcommand * command)
+{
+  G4String cv;
+  if( command == verboseCmd )
+  { cv = verboseCmd->ConvertToString(fEvManager->GetVerboseLevel()); }
+  return cv;
+}
+