| 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 // Previous authors: G. Guerrieri, S. Guatelli
27 // Authors (since 2007): S. Guatelli, Universi
28 //
29 #include "G4HumanPhantomMessenger.hh"
30 #include "G4HumanPhantomConstruction.hh"
31
32 #include "G4UIdirectory.hh"
33 #include "G4UIcmdWithAString.hh"
34 #include "G4UIcmdWithoutParameter.hh"
35
36 #include "globals.hh"
37
38 #include "G4RunManager.hh"
39
40 G4HumanPhantomMessenger::G4HumanPhantomMesseng
41 :fUserPhantom(myUsrPhtm),fBps(false)
42 {
43 fPhantomDir = new G4UIdirectory("/phantom/")
44 fPhantomDir->SetGuidance("Set Your Phantom."
45
46 fDir = new G4UIdirectory("/bodypart/");
47 fDir->SetGuidance("Add Body Part to Phantom"
48
49 fModelCmd = new G4UIcmdWithAString("/phantom
50 fModelCmd->SetGuidance("Set sex of Phantom:
51 fModelCmd->SetParameterName("phantomModel",t
52 fModelCmd->SetDefaultValue("MIRD");
53 fModelCmd->SetCandidates("MIRD ORNLFemale OR
54 fModelCmd->AvailableForStates(G4State_PreIni
55
56 fSexCmd = new G4UIcmdWithAString("/phantom/s
57 fSexCmd->SetGuidance("Set sex of Phantom: Ma
58 fSexCmd->SetParameterName("phantomSex",true)
59 fSexCmd->SetDefaultValue("Female");
60 fSexCmd->SetCandidates("Male Female");
61 fSexCmd->AvailableForStates(G4State_PreInit,
62
63 fBodypartCmd = new G4UIcmdWithAString("/body
64 fBodypartCmd->SetGuidance("Add a Body Part t
65 fBodypartCmd->SetParameterName("bpName",true
66 fBodypartCmd->AvailableForStates(G4State_Pre
67
68 fEndCmd = new G4UIcmdWithoutParameter("/phan
69 fEndCmd->SetGuidance("Build your Phantom.");
70 fEndCmd->AvailableForStates(G4State_PreInit,
71 }
72
73 G4HumanPhantomMessenger::~G4HumanPhantomMessen
74 {
75 delete fModelCmd;
76 delete fSexCmd;
77 delete fBodypartCmd;
78 delete fEndCmd;
79 delete fPhantomDir;
80 delete fDir;
81 }
82
83 void G4HumanPhantomMessenger::SetNewValue(G4UI
84
85 if( command == fModelCmd )
86 {
87 fUserPhantom->SetPhantomModel(newValue);
88 }
89 if( command == fSexCmd )
90 {
91 fUserPhantom->SetPhantomSex(newValue);
92 }
93 if( command == fBodypartCmd )
94 {
95 AddBodyPart(newValue);
96 }
97 if( command == fEndCmd )
98 {
99 G4cout <<
100 " ****************>>>> NEW PHANTOM CONSTRUCT
101 << G4endl;
102 }
103 }
104
105 void G4HumanPhantomMessenger::AddBodyPart(G4S
106 {
107 char* str = new char[newBodyPartSensitivity.
108
109 strcpy(str, newBodyPartSensitivity.c_str());
110
111 std::string bpart = strtok(str," ");
112
113 std::string sensitivity = strtok(nullptr," "
114
115 if(sensitivity=="yes"){
116 fBps=true;
117 }else{
118 fBps=false;
119 }
120
121 G4cout << " >>> Body Part = " << bpart << "\
122 << " >>> Sensitivity = " << sensitivity <<
123
124 fUserPhantom->SetBodyPartSensitivity(bpart,f
125 }
126
127