Geant4 Cross Reference |
1 // 1 // 2 // ******************************************* 2 // ******************************************************************** 3 // * License and Disclaimer 3 // * License and Disclaimer * 4 // * 4 // * * 5 // * The Geant4 software is copyright of th 5 // * The Geant4 software is copyright of the Copyright Holders of * 6 // * the Geant4 Collaboration. It is provided 6 // * the Geant4 Collaboration. It is provided under the terms and * 7 // * conditions of the Geant4 Software License 7 // * conditions of the Geant4 Software License, included in the file * 8 // * LICENSE and available at http://cern.ch/ 8 // * LICENSE and available at http://cern.ch/geant4/license . These * 9 // * include a list of copyright holders. 9 // * include a list of copyright holders. * 10 // * 10 // * * 11 // * Neither the authors of this software syst 11 // * Neither the authors of this software system, nor their employing * 12 // * institutes,nor the agencies providing fin 12 // * institutes,nor the agencies providing financial support for this * 13 // * work make any representation or warran 13 // * work make any representation or warranty, express or implied, * 14 // * regarding this software system or assum 14 // * regarding this software system or assume any liability for its * 15 // * use. Please see the license in the file 15 // * use. Please see the license in the file LICENSE and URL above * 16 // * for the full disclaimer and the limitatio 16 // * for the full disclaimer and the limitation of liability. * 17 // * 17 // * * 18 // * This code implementation is the result 18 // * This code implementation is the result of the scientific and * 19 // * technical work of the GEANT4 collaboratio 19 // * technical work of the GEANT4 collaboration. * 20 // * By using, copying, modifying or distri 20 // * By using, copying, modifying or distributing the software (or * 21 // * any work based on the software) you ag 21 // * any work based on the software) you agree to acknowledge its * 22 // * use in resulting scientific publicati 22 // * use in resulting scientific publications, and indicate your * 23 // * acceptance of all terms of the Geant4 Sof 23 // * acceptance of all terms of the Geant4 Software license. * 24 // ******************************************* 24 // ******************************************************************** 25 // 25 // 26 // Hadrontherapy advanced example for Geant4 << 26 // This is the *BASIC* version of Hadrontherapy, a Geant4-based application 27 // See more at: https://twiki.cern.ch/twiki/bi << 27 // See more at: http://g4advancedexamples.lngs.infn.it/Examples/hadrontherapy >> 28 // >> 29 // Visit the Hadrontherapy web site (http://www.lns.infn.it/link/Hadrontherapy) to request >> 30 // the *COMPLETE* version of this program, together with its documentation; >> 31 // Hadrontherapy (both basic and full version) are supported by the Italian INFN >> 32 // Institute in the framework of the MC-INFN Group >> 33 // 28 34 29 #include "HadrontherapyEventActionMessenger.hh 35 #include "HadrontherapyEventActionMessenger.hh" 30 36 31 #include "HadrontherapyEventAction.hh" 37 #include "HadrontherapyEventAction.hh" 32 #include "G4UIdirectory.hh" 38 #include "G4UIdirectory.hh" 33 #include "G4UIcmdWithAString.hh" 39 #include "G4UIcmdWithAString.hh" 34 #include "G4UIcmdWithAnInteger.hh" 40 #include "G4UIcmdWithAnInteger.hh" 35 #include "G4SystemOfUnits.hh" << 36 #include "G4RunManager.hh" << 37 #include "G4UnitsTable.hh" << 38 << 39 41 40 ////////////////////////////////////////////// 42 ///////////////////////////////////////////////////////////////////////////// 41 HadrontherapyEventActionMessenger::Hadronthera 43 HadrontherapyEventActionMessenger::HadrontherapyEventActionMessenger(HadrontherapyEventAction* EvAct) 42 :eventAction(EvAct) 44 :eventAction(EvAct) 43 { 45 { 44 eventDir = new G4UIdirectory("/event/"); 46 eventDir = new G4UIdirectory("/event/"); 45 eventDir->SetGuidance("Permits controls on s 47 eventDir->SetGuidance("Permits controls on simulation events"); 46 48 47 DrawCmd = new G4UIcmdWithAString("/event/dra 49 DrawCmd = new G4UIcmdWithAString("/event/drawTracks",this); 48 DrawCmd->SetGuidance("Draw the tracks in the 50 DrawCmd->SetGuidance("Draw the tracks in the event"); 49 DrawCmd->SetGuidance(" Choice : none,charge 51 DrawCmd->SetGuidance(" Choice : none,charged, all, neutral"); 50 DrawCmd->SetParameterName("choice",true); 52 DrawCmd->SetParameterName("choice",true); 51 DrawCmd->SetDefaultValue("all"); 53 DrawCmd->SetDefaultValue("all"); 52 DrawCmd->SetCandidates("none charged all neu 54 DrawCmd->SetCandidates("none charged all neutral"); 53 DrawCmd->AvailableForStates(G4State_Idle); 55 DrawCmd->AvailableForStates(G4State_Idle); 54 56 55 PrintCmd = new G4UIcmdWithAnInteger("/event/ 57 PrintCmd = new G4UIcmdWithAnInteger("/event/printEventNumber",this); 56 PrintCmd->SetGuidance("Print the event numbe 58 PrintCmd->SetGuidance("Print the event number of modulo n"); 57 PrintCmd->SetParameterName("EventNb",false); 59 PrintCmd->SetParameterName("EventNb",false); 58 PrintCmd->SetRange("EventNb>0"); 60 PrintCmd->SetRange("EventNb>0"); 59 PrintCmd->AvailableForStates(G4State_Idle); 61 PrintCmd->AvailableForStates(G4State_Idle); 60 } 62 } 61 63 62 ////////////////////////////////////////////// 64 ///////////////////////////////////////////////////////////////////////////// 63 HadrontherapyEventActionMessenger::~Hadronther 65 HadrontherapyEventActionMessenger::~HadrontherapyEventActionMessenger() 64 { 66 { 65 delete DrawCmd; 67 delete DrawCmd; 66 delete PrintCmd; 68 delete PrintCmd; 67 delete eventDir; 69 delete eventDir; 68 } 70 } 69 71 70 ////////////////////////////////////////////// 72 ///////////////////////////////////////////////////////////////////////////// 71 void HadrontherapyEventActionMessenger::SetNew 73 void HadrontherapyEventActionMessenger::SetNewValue(G4UIcommand* command, 72 G4St 74 G4String newValue) 73 { 75 { 74 if(command == DrawCmd) 76 if(command == DrawCmd) 75 {eventAction->SetDrawFlag(newValue);} 77 {eventAction->SetDrawFlag(newValue);} 76 78 77 if(command == PrintCmd) 79 if(command == PrintCmd) 78 {eventAction->SetPrintModulo(PrintCmd->Get 80 {eventAction->SetPrintModulo(PrintCmd->GetNewIntValue(newValue));} 79 } 81 } 80 82