Geant4  9.6.p02
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Groups Pages
ML2Acc1Messenger.cc
Go to the documentation of this file.
1 //
2 // ********************************************************************
3 // * License and Disclaimer *
4 // * *
5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. *
10 // * *
11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitation of liability. *
17 // * *
18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Software license. *
24 // ********************************************************************
25 //
26 // The code was written by :
27 // ^Claudio Andenna claudio.andenna@ispesl.it, claudio.andenna@iss.infn.it
28 // *Barbara Caccia barbara.caccia@iss.it
29 // with the support of Pablo Cirrone (LNS, INFN Catania Italy)
30 // with the contribute of Alessandro Occhigrossi*
31 //
32 // ^INAIL DIPIA - ex ISPESL and INFN Roma, gruppo collegato Sanità, Italy
33 // *Istituto Superiore di Sanità and INFN Roma, gruppo collegato Sanità, Italy
34 // Viale Regina Elena 299, 00161 Roma (Italy)
35 // tel (39) 06 49902246
36 // fax (39) 06 49387075
37 //
38 // more information:
39 // http://g4advancedexamples.lngs.infn.it/Examples/medical-linac
40 //
41 //*******************************************************//
42 
43 
44 #include "ML2Acc1Messenger.hh"
45 #include "ML2Acc1.hh"
46 #include "G4SystemOfUnits.hh"
47 #include "G4UIcmdWithAString.hh"
48 #include "G4UIcmdWithAnInteger.hh"
50 
52 {
53  idEnergy=new G4UIcmdWithAnInteger("/accelerator/idEnergy",this);
54  idEnergy->SetDefaultValue(6);
55  pAcc1->setidEnergy(6);
56 
57  leavesA=new G4UIcmdWithADoubleAndUnit("/accelerator/leavesA", this);
58  leavesA->SetDefaultUnit("mm");
59  leavesA->SetDefaultValue(300.);
60  pAcc1->setLeavesAx(300.*mm);
61 
62  leavesB=new G4UIcmdWithADoubleAndUnit("/accelerator/leavesB", this);
63  leavesB->SetDefaultUnit("mm");
64  leavesB->SetDefaultValue(300.);
65  pAcc1->setLeavesBx(300.*mm);
66 
67  aperture1X=new G4UIcmdWithADoubleAndUnit("/accelerator/aperture1X", this);
68  aperture1X->SetDefaultUnit("mm");
69  aperture1X->SetDefaultValue(100.);
70  pAcc1->setJaw1X(100.*mm);
71 
72  aperture1Y=new G4UIcmdWithADoubleAndUnit("/accelerator/aperture1Y", this);
73  aperture1Y->SetDefaultUnit("mm");
74  aperture1Y->SetDefaultValue(100.);
75  pAcc1->setJaw1Y(100.*mm);
76 
77  aperture2X=new G4UIcmdWithADoubleAndUnit("/accelerator/aperture2X", this);
78  aperture2X->SetDefaultUnit("mm");
79  aperture2X->SetDefaultValue(-100.);
80  pAcc1->setJaw2X(-100.*mm);
81 
82  aperture2Y=new G4UIcmdWithADoubleAndUnit("/accelerator/aperture2Y", this);
83  aperture2Y->SetDefaultUnit("mm");
84  aperture2Y->SetDefaultValue(-100.);
85  pAcc1->setJaw2Y(-100.*mm);
86 }
87 
89 {
90  delete idEnergy;
91  delete aperture1X;
92  delete aperture2X;
93  delete aperture1Y;
94  delete aperture2Y;
95  delete leavesA;
96  delete leavesB;
97 }
99 {
100  if (cmd==aperture1X)
101  {
102  aperture1X->GetNewUnitValue(newValue);
103  pAcc1->setJaw1X(aperture1X->GetNewDoubleValue(newValue));
104  }
105 
106  if (cmd==aperture1Y)
107  {
108  aperture1Y->GetNewUnitValue(newValue);
109  pAcc1->setJaw1Y(aperture1Y->GetNewDoubleValue(newValue));
110  }
111 
112  if (cmd==aperture2X)
113  {
114  aperture2X->GetNewUnitValue(newValue);
115  pAcc1->setJaw2X(aperture2X->GetNewDoubleValue(newValue));
116  }
117  if (cmd==aperture2Y)
118  {
119  aperture2Y->GetNewUnitValue(newValue);
120  pAcc1->setJaw2Y(aperture2Y->GetNewDoubleValue(newValue));
121  }
122 
123  if (cmd==leavesA)
124  {pAcc1->setLeavesAx(leavesA->GetNewDoubleValue(newValue));}
125 
126  if (cmd==leavesB)
127  {pAcc1->setLeavesBx(leavesA->GetNewDoubleValue(newValue));}
128 
129 
130  if (cmd==idEnergy)
131  {pAcc1->setidEnergy(idEnergy->GetNewIntValue(newValue));}
132 }