Import Geant4 1.0.0 source tree

2016-06-08 15:28:20 +02:00
parent aaa409b6ee
commit ca1c8cb059
2995 changed files with 106830 additions and 299600 deletions
@@ -0,0 +1,83 @@
+// This code implementation is the intellectual property of
+// the 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: Em2RunActionMessenger.cc,v 1.1.4.1 1999/12/07 20:46:59 gunter Exp $
+// GEANT4 tag $Name: geant4-01-00 $
+//
+// 
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
+
+#include "Em2RunActionMessenger.hh"
+
+#include "Em2RunAction.hh"
+#include "G4UIdirectory.hh"
+#include "G4UIcmdWithAString.hh"
+#include "G4UIcmdWithAnInteger.hh"
+#include "G4ios.hh"
+#include "globals.hh"
+#include "Randomize.hh"
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
+
+Em2RunActionMessenger::Em2RunActionMessenger(Em2RunAction* run)
+:Em2Run(run)
+{ 
+  SaveCmd = new G4UIcmdWithAString("/run/save",this);
+  SaveCmd->SetGuidance("Save run statistic (histo)");
+  SaveCmd->SetGuidance("  Choice : on,off(default)");
+  SaveCmd->SetParameterName("choice",true);
+  SaveCmd->SetDefaultValue("on");
+  SaveCmd->SetCandidates("on off");
+  SaveCmd->AvailableForStates(Idle);
+  
+  RndmDir = new G4UIdirectory("/rndm/");
+  RndmDir->SetGuidance("Rndm status control.");
+  
+  RndmSaveCmd = new G4UIcmdWithAnInteger("/rndm/save",this);
+  RndmSaveCmd->SetGuidance("set frequency to save rndm status on external files.");
+  RndmSaveCmd->SetGuidance("freq = 0 not saved");
+  RndmSaveCmd->SetGuidance("freq > 0 saved on: beginOfRun.rndm");
+  RndmSaveCmd->SetGuidance("freq = 1 saved on:   endOfRun.rndm");
+  RndmSaveCmd->SetGuidance("freq = 2 saved on: endOfEvent.rndm");    
+  RndmSaveCmd->SetParameterName("frequency",false);
+  RndmSaveCmd->SetRange("frequency>=0 && frequency<=2");
+  RndmSaveCmd->AvailableForStates(PreInit,Idle); 
+         
+  RndmReadCmd = new G4UIcmdWithAString("/rndm/read",this);
+  RndmReadCmd->SetGuidance("get rndm status from an external file.");
+  RndmReadCmd->SetParameterName("fileName",true);
+  RndmReadCmd->SetDefaultValue ("beginOfRun.rndm");
+  RndmReadCmd->AvailableForStates(PreInit,Idle);
+}
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
+
+Em2RunActionMessenger::~Em2RunActionMessenger()
+{
+  delete SaveCmd;
+  delete RndmSaveCmd; delete RndmReadCmd; delete RndmDir;
+}
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
+
+void Em2RunActionMessenger::SetNewValue(G4UIcommand* command,G4String newValue)
+{ 
+  if (command == SaveCmd) Em2Run->SetSaveFlag(newValue);
+    
+  if (command == RndmSaveCmd)
+      Em2Run->SetRndmFreq(RndmSaveCmd->GetNewIntValue(newValue));
+		 
+  if (command == RndmReadCmd)
+    { G4cout << "\n---> rndm status restored from file: " << newValue << endl;
+      HepRandom::restoreEngineStatus(newValue);
+      HepRandom::showEngineStatus();
+    }   
+}
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....