| 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 electromagnetic/TestEm11/src/Detecto
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 "G4UIcmdWithAnInteger.hh"
39 #include "G4UIcmdWithoutParameter.hh"
40 #include "G4UIcommand.hh"
41 #include "G4UIdirectory.hh"
42 #include "G4UIparameter.hh"
43
44 #include <sstream>
45
46 //....oooOO0OOooo........oooOO0OOooo........oo
47
48 DetectorMessenger::DetectorMessenger(DetectorC
49 {
50 fTestemDir = new G4UIdirectory("/testem/");
51 fTestemDir->SetGuidance(" detector control."
52
53 fDetDir = new G4UIdirectory("/testem/det/");
54 fDetDir->SetGuidance("detector construction
55
56 fNbAbsorCmd = new G4UIcmdWithAnInteger("/tes
57 fNbAbsorCmd->SetGuidance("Set number of Abso
58 fNbAbsorCmd->SetParameterName("NbAbsor", fal
59 fNbAbsorCmd->SetRange("NbAbsor>0");
60 fNbAbsorCmd->AvailableForStates(G4State_PreI
61 fNbAbsorCmd->SetToBeBroadcasted(false);
62
63 fAbsorCmd = new G4UIcommand("/testem/det/set
64 fAbsorCmd->SetGuidance("Set the absor nb, th
65 fAbsorCmd->SetGuidance(" absor number : fro
66 fAbsorCmd->SetGuidance(" material name");
67 fAbsorCmd->SetGuidance(" thickness (with un
68 //
69 G4UIparameter* AbsNbPrm = new G4UIparameter(
70 AbsNbPrm->SetGuidance("absor number : from 1
71 AbsNbPrm->SetParameterRange("AbsorNb>0");
72 fAbsorCmd->SetParameter(AbsNbPrm);
73 //
74 G4UIparameter* MatPrm = new G4UIparameter("m
75 MatPrm->SetGuidance("material name");
76 fAbsorCmd->SetParameter(MatPrm);
77 //
78 G4UIparameter* ThickPrm = new G4UIparameter(
79 ThickPrm->SetGuidance("thickness of absorber
80 ThickPrm->SetParameterRange("thickness>0.");
81 fAbsorCmd->SetParameter(ThickPrm);
82 //
83 G4UIparameter* unitPrm = new G4UIparameter("
84 unitPrm->SetGuidance("unit of thickness");
85 G4String unitList = G4UIcommand::UnitsList(G
86 unitPrm->SetParameterCandidates(unitList);
87 fAbsorCmd->SetParameter(unitPrm);
88 //
89 fAbsorCmd->AvailableForStates(G4State_PreIni
90 fAbsorCmd->SetToBeBroadcasted(false);
91
92 fNdivCmd = new G4UIcommand("/testem/det/nDiv
93 fNdivCmd->SetGuidance("Divide the absor nb :
94 fNdivCmd->SetGuidance(" absor number : from
95 fNdivCmd->SetGuidance(" number of divisions
96 //
97 G4UIparameter* AbsNbPar = new G4UIparameter(
98 AbsNbPar->SetGuidance("absor number : from 1
99 AbsNbPar->SetParameterRange("AbsorNb>0");
100 fNdivCmd->SetParameter(AbsNbPar);
101 //
102 G4UIparameter* NdivPrm = new G4UIparameter("
103 NdivPrm->SetGuidance("nb of divisions > 0");
104 NdivPrm->SetParameterRange("NdivNb>0");
105 fNdivCmd->SetParameter(NdivPrm);
106 //
107 fNdivCmd->AvailableForStates(G4State_PreInit
108 fNdivCmd->SetToBeBroadcasted(false);
109
110 fSizeYZCmd = new G4UIcmdWithADoubleAndUnit("
111 fSizeYZCmd->SetGuidance("Set sizeYZ of the a
112 fSizeYZCmd->SetParameterName("SizeYZ", false
113 fSizeYZCmd->SetRange("SizeYZ>0.");
114 fSizeYZCmd->SetUnitCategory("Length");
115 fSizeYZCmd->AvailableForStates(G4State_PreIn
116 fSizeYZCmd->SetToBeBroadcasted(false);
117 }
118
119 //....oooOO0OOooo........oooOO0OOooo........oo
120
121 DetectorMessenger::~DetectorMessenger()
122 {
123 delete fNbAbsorCmd;
124 delete fAbsorCmd;
125 delete fNdivCmd;
126 delete fSizeYZCmd;
127 delete fDetDir;
128 delete fTestemDir;
129 }
130
131 //....oooOO0OOooo........oooOO0OOooo........oo
132
133 void DetectorMessenger::SetNewValue(G4UIcomman
134 {
135 if (command == fNbAbsorCmd) {
136 fDetector->SetNbOfAbsor(fNbAbsorCmd->GetNe
137 }
138
139 if (command == fAbsorCmd) {
140 G4int num;
141 G4double tick;
142 G4String unt, mat;
143 std::istringstream is(newValue);
144 is >> num >> mat >> tick >> unt;
145 G4String material = mat;
146 tick *= G4UIcommand::ValueOf(unt);
147 fDetector->SetAbsorMaterial(num, material)
148 fDetector->SetAbsorThickness(num, tick);
149 }
150
151 if (command == fNdivCmd) {
152 G4int num, ndiv;
153 std::istringstream is(newValue);
154 is >> num >> ndiv;
155 fDetector->SetNbOfDivisions(num, ndiv);
156 }
157
158 if (command == fSizeYZCmd) {
159 fDetector->SetAbsorSizeYZ(fSizeYZCmd->GetN
160 }
161 }
162
163 //....oooOO0OOooo........oooOO0OOooo........oo
164