| 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 //GEANT4 - Depth-of-Interaction enabled Positr
27
28 //Authors and contributors
29
30 // Author list to be updated, with names of co
31
32 // Abdella M. Ahmed (1, 2), Andrew Chacon (1,
33 // Hideaki Tashima (3), Go Akamatsu (3), Akram
34 // Susanna Guatelli (2), and Mitra Safavi-Naei
35
36 // (1) Australian Nuclear Science and Technolo
37 // (2) University of Wollongong, Australia
38 // (3) National Institute of Radiological Scie
39
40 #include "G4UIdirectory.hh"
41 #include "G4UIcmdWithAnInteger.hh"
42 #include "G4UIcmdWithADouble.hh"
43 #include "G4UIcmdWithAString.hh"
44 #include "G4UIcmdWithoutParameter.hh"
45
46 #include "doiPETDetectorConstruction.hh"
47 #include "doiPETDetectorConstructionMessenger.
48 #include "G4UIcmdWithADoubleAndUnit.hh"
49
50 #include "G4UIcmdWith3VectorAndUnit.hh"
51
52
53 ////////// Constructor ///////////////////////
54 doiPETDetectorConstructionMessenger::doiPETDet
55 :Detector (det)
56 {
57 Dir = new G4UIdirectory("/changePhantom/");
58 Dir->SetGuidance("Choose the phantom");
59
60 ChoosePhantomCmd = new G4UIcmdWithAString("/
61 ChoosePhantomCmd->SetGuidance("Select Phanto
62 ChoosePhantomCmd->SetParameterName("choice",
63 ChoosePhantomCmd->AvailableForStates(G4State
64
65 // Change Phantom position
66 changeThePhantomPositionCmd = new G4UIcmdWit
67 changeThePhantomPositionCmd -> SetGuidance("
68 changeThePhantomPositionCmd -> SetParameterN
69 changeThePhantomPositionCmd -> SetDefaultUni
70 changeThePhantomPositionCmd -> SetUnitCandid
71 changeThePhantomPositionCmd -> AvailableForS
72
73 //Change Phantom Length and Radius
74 changePhantomRadiusCmd = new G4UIcmdWithADou
75 changePhantomRadiusCmd->SetGuidance("Set rad
76 changePhantomRadiusCmd->SetParameterName("ra
77 changePhantomRadiusCmd->SetUnitCategory("Len
78 changePhantomRadiusCmd->SetRange("radius>0")
79 changePhantomRadiusCmd->AvailableForStates(G
80
81 //Change the length of the phantom
82 changePhantomLengthCmd = new G4UIcmdWithADou
83 changePhantomLengthCmd->SetGuidance("Set len
84 changePhantomLengthCmd->SetParameterName("le
85 changePhantomLengthCmd->SetUnitCategory("Len
86 changePhantomLengthCmd->SetRange("length>0")
87 changePhantomLengthCmd->AvailableForStates(G
88
89 //Change the number of sleeves to be placed
90 changeNumOfSleevesCmd = new G4UIcmdWithAnInt
91 changeNumOfSleevesCmd->SetParameterName("cho
92 changeNumOfSleevesCmd->AvailableForStates(G4
93
94
95 }
96
97 ////////// Destructor ////////////////////////
98 doiPETDetectorConstructionMessenger::~doiPETDe
99 {
100 delete Dir;
101 delete ChoosePhantomCmd;
102
103 delete changeThePhantomPositionCmd;
104 delete changePhantomRadiusCmd;
105 delete changePhantomLengthCmd;
106 delete changeNumOfSleevesCmd;
107
108
109 }
110
111 ////////// SetNewValue ///////////////////////
112 void doiPETDetectorConstructionMessenger::SetN
113 {
114 if ( command == ChoosePhantomCmd ) Detector-
115 else if (command == changeThePhantomPosition
116 {
117 G4ThreeVector size = changeThePhantomPosit
118 Detector -> SetPhantomPosition(size);
119 }
120 else if (command == changePhantomRadiusCmd)
121 {
122 Detector->SetPhantomRadius(changePhantomRa
123 }
124 else if (command == changePhantomLengthCmd)
125 {
126 Detector->SetPhantomLength(changePhantomLe
127 }
128 else if (command == changeNumOfSleevesCmd)
129 {
130 Detector->SetNumberOfSleeves(changeNumOfSl
131 }
132 }
133
134
135