source: trunk/examples/advanced/xray_fluorescence/src/XrayFluoDetectorMessenger.cc @ 1187

Last change on this file since 1187 was 807, checked in by garnier, 16 years ago

update

File size: 6.1 KB
Line 
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//
27// $Id: XrayFluoDetectorMessenger.cc
28// GEANT4 tag $Name: xray_fluo-V03-02-00
29//
30// Author: Elena Guardincerri (Elena.Guardincerri@ge.infn.it)
31//
32// History:
33// -----------
34// 28 Nov 2001 Elena Guardincerri     Created
35//
36// -------------------------------------------------------------------
37
38#include "XrayFluoDetectorMessenger.hh"
39#include "XrayFluoDetectorConstruction.hh"
40#include "G4UIdirectory.hh"
41#include "G4UIcmdWithAString.hh"
42#include "G4UIcmdWithADoubleAndUnit.hh"
43#include "G4UIcmdWithoutParameter.hh"
44#include "G4UIcmdWithABool.hh"
45
46//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
47
48XrayFluoDetectorMessenger::XrayFluoDetectorMessenger(XrayFluoDetectorConstruction * Det)
49:Detector(Det)
50{ 
51  detDir = new G4UIdirectory("/apparate/");
52  detDir->SetGuidance("detector control.");
53
54  UpdateCmd = new G4UIcmdWithoutParameter("/apparate/update",this);
55  UpdateCmd->SetGuidance("Update apparate geometry.");
56  UpdateCmd->SetGuidance("This command MUST be applied before \"beamOn\" ");
57  UpdateCmd->SetGuidance("if you changed geometrical value(s): /apparate/GrainDiameter and /apparate/sampleGranularity");
58
59  UpdateCmd->AvailableForStates(G4State_Idle);
60
61  sampleCmd = new G4UIcmdWithAString("/apparate/sampleMaterial",this);
62  sampleCmd->SetGuidance("select a diferent material for the sample: materials can be: Dolorite, Anorthosite, Mars1, IceBasalt, HPGe OR choosen from Nist database (see /material/nist/listMaterials for details");
63  sampleCmd->SetParameterName("material",true);
64  sampleCmd->SetDefaultValue("mars1");
65  sampleCmd->AvailableForStates(G4State_Idle);
66
67  detectorCmd = new G4UIcmdWithAString("/apparate/detector",this);
68  detectorCmd->SetGuidance("select a diferent detectorType");
69  detectorCmd->SetParameterName("detector",true);
70  detectorCmd->SetDefaultValue("sili");
71  detectorCmd->SetCandidates("sili hpge");
72  detectorCmd->AvailableForStates(G4State_Idle);
73 
74  grainDiaCmd = new G4UIcmdWithADoubleAndUnit( "/apparate/GrainDiameter",this );
75  grainDiaCmd->SetGuidance( "Set diameter of grains" );
76  grainDiaCmd->SetGuidance( "After this, /apparate/update must be executed before BeamOn" );
77  grainDiaCmd->SetGuidance( "Default: 0.5 mm " );
78  grainDiaCmd->SetParameterName( "Grain Diameter", true, true );
79  grainDiaCmd->SetDefaultUnit( "mm" );
80  grainDiaCmd->SetUnitCategory( "Length" );
81  grainDiaCmd->AvailableForStates(G4State_Idle);
82
83  granularityFlagCmd= new G4UIcmdWithABool("/apparate/sampleGranularity",this);
84  granularityFlagCmd->SetGuidance("Set if sample granularity is present");
85  granularityFlagCmd->SetGuidance( "After this, /apparate/update must be executed before BeamOn" );
86  granularityFlagCmd->SetParameterName("Granularity Flag",true);
87  granularityFlagCmd->SetDefaultValue(false);
88  granularityFlagCmd->AvailableForStates(G4State_Idle);
89
90  OhmicPosThicknessCmd = new G4UIcmdWithADoubleAndUnit( "/apparate/ohmicPosThickness",this );
91  OhmicPosThicknessCmd->SetGuidance( "Changes thickness of the detector anode" );
92  OhmicPosThicknessCmd->SetGuidance( "After this, /apparate/update must be executed before BeamOn" );
93  OhmicPosThicknessCmd->SetGuidance( "Default: 0.005 mm " );
94  OhmicPosThicknessCmd->SetParameterName( "OhmicPos Thickness", true, true );
95  OhmicPosThicknessCmd->SetDefaultUnit( "mm" );
96  OhmicPosThicknessCmd->SetUnitCategory( "Length" );
97  OhmicPosThicknessCmd->AvailableForStates(G4State_Idle);
98}
99
100//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
101
102 XrayFluoDetectorMessenger::~XrayFluoDetectorMessenger()
103{
104  delete UpdateCmd;
105  delete detDir;
106}
107
108//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
109
110void XrayFluoDetectorMessenger::SetNewValue(G4UIcommand* command,G4String newValue)
111{
112 if( command == UpdateCmd )
113   { Detector->UpdateGeometry(); }
114
115 else if ( command == sampleCmd )
116   { Detector->SetSampleMaterial(newValue);}
117
118 else if ( command == detectorCmd )
119   { Detector->SetDetectorType(newValue);}
120
121 else if ( command == grainDiaCmd )
122   { 
123     G4double newSize = grainDiaCmd->GetNewDoubleValue(newValue); 
124     Detector->SetGrainDia(newSize);
125   }
126
127 else if ( command == granularityFlagCmd )
128   { 
129     Detector->DeleteGrainObjects();
130     G4bool newGranFlag = granularityFlagCmd->GetNewBoolValue(newValue);
131     Detector->SetSampleGranularity(newGranFlag);
132   }
133 else if ( command == OhmicPosThicknessCmd )
134   { 
135     G4double newSize = OhmicPosThicknessCmd->GetNewDoubleValue(newValue); 
136     Detector->SetOhmicPosThickness(newSize);
137   }
138}
139
140
141//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
142
143
144
145
146
147
148
149
150
Note: See TracBrowser for help on using the repository browser.