Geant4 Cross Reference |
1 // 1 2 // ******************************************* 3 // * License and Disclaimer 4 // * 5 // * The Geant4 software is copyright of th 6 // * the Geant4 Collaboration. It is provided 7 // * conditions of the Geant4 Software License 8 // * LICENSE and available at http://cern.ch/ 9 // * include a list of copyright holders. 10 // * 11 // * Neither the authors of this software syst 12 // * institutes,nor the agencies providing fin 13 // * work make any representation or warran 14 // * regarding this software system or assum 15 // * use. Please see the license in the file 16 // * for the full disclaimer and the limitatio 17 // * 18 // * This code implementation is the result 19 // * technical work of the GEANT4 collaboratio 20 // * By using, copying, modifying or distri 21 // * any work based on the software) you ag 22 // * use in resulting scientific publicati 23 // * acceptance of all terms of the Geant4 Sof 24 // ******************************************* 25 // 26 /// \file DetectorMessenger.cc 27 /// \brief Implementation of the DetectorMesse 28 // 29 // 30 //....oooOO0OOooo........oooOO0OOooo........oo 31 //....oooOO0OOooo........oooOO0OOooo........oo 32 33 #include "DetectorMessenger.hh" 34 35 #include "DetectorConstruction.hh" 36 37 #include "G4UIcmdWithADoubleAndUnit.hh" 38 #include "G4UIcmdWithAString.hh" 39 #include "G4UIcmdWithoutParameter.hh" 40 #include "G4UIcommand.hh" 41 #include "G4UIdirectory.hh" 42 #include "G4UIparameter.hh" 43 44 //....oooOO0OOooo........oooOO0OOooo........oo 45 46 DetectorMessenger::DetectorMessenger(DetectorC 47 { 48 fTestemDir = new G4UIdirectory("/testhadr/") 49 fTestemDir->SetGuidance("commands specific t 50 51 G4bool broadcast = false; 52 fDetDir = new G4UIdirectory("/testhadr/det/" 53 fDetDir->SetGuidance("detector construction 54 55 fMaterCmd = new G4UIcmdWithAString("/testhad 56 fMaterCmd->SetGuidance("Select material of t 57 fMaterCmd->SetParameterName("choice", false) 58 fMaterCmd->AvailableForStates(G4State_PreIni 59 60 fSizeCmd = new G4UIcmdWithADoubleAndUnit("/t 61 fSizeCmd->SetGuidance("Set size of the box") 62 fSizeCmd->SetParameterName("Size", false); 63 fSizeCmd->SetRange("Size>0."); 64 fSizeCmd->SetUnitCategory("Length"); 65 fSizeCmd->AvailableForStates(G4State_PreInit 66 67 fIsotopeCmd = new G4UIcommand("/testhadr/det 68 fIsotopeCmd->SetGuidance("Build and select a 69 fIsotopeCmd->SetGuidance(" symbol of isotop 70 // 71 G4UIparameter* symbPrm = new G4UIparameter(" 72 symbPrm->SetGuidance("isotope symbol"); 73 fIsotopeCmd->SetParameter(symbPrm); 74 // 75 G4UIparameter* ZPrm = new G4UIparameter("Z", 76 ZPrm->SetGuidance("Z"); 77 ZPrm->SetParameterRange("Z>0"); 78 fIsotopeCmd->SetParameter(ZPrm); 79 // 80 G4UIparameter* APrm = new G4UIparameter("A", 81 APrm->SetGuidance("A"); 82 APrm->SetParameterRange("A>0"); 83 fIsotopeCmd->SetParameter(APrm); 84 // 85 G4UIparameter* densityPrm = new G4UIparamete 86 densityPrm->SetGuidance("density of material 87 densityPrm->SetParameterRange("density>0."); 88 fIsotopeCmd->SetParameter(densityPrm); 89 // 90 G4UIparameter* unitPrm = new G4UIparameter(" 91 unitPrm->SetGuidance("unit of density"); 92 G4String unitList = G4UIcommand::UnitsList(G 93 unitPrm->SetParameterCandidates(unitList); 94 fIsotopeCmd->SetParameter(unitPrm); 95 // 96 fIsotopeCmd->AvailableForStates(G4State_PreI 97 } 98 99 //....oooOO0OOooo........oooOO0OOooo........oo 100 101 DetectorMessenger::~DetectorMessenger() 102 { 103 delete fMaterCmd; 104 delete fSizeCmd; 105 delete fIsotopeCmd; 106 delete fDetDir; 107 delete fTestemDir; 108 } 109 110 //....oooOO0OOooo........oooOO0OOooo........oo 111 112 void DetectorMessenger::SetNewValue(G4UIcomman 113 { 114 if (command == fMaterCmd) { 115 fDetector->SetMaterial(newValue); 116 } 117 118 if (command == fSizeCmd) { 119 fDetector->SetSize(fSizeCmd->GetNewDoubleV 120 } 121 122 if (command == fIsotopeCmd) { 123 G4int Z; 124 G4int A; 125 G4double dens; 126 G4String name, unt; 127 std::istringstream is(newValue); 128 is >> name >> Z >> A >> dens >> unt; 129 dens *= G4UIcommand::ValueOf(unt); 130 fDetector->MaterialWithSingleIsotope(name, 131 fDetector->SetMaterial(name); 132 } 133 } 134 135 //....oooOO0OOooo........oooOO0OOooo........oo 136