File indexing completed on 2025-02-23 09:20:51
0001
0002
0003
0004
0005
0006
0007
0008
0009
0010
0011
0012
0013
0014
0015
0016
0017
0018
0019
0020
0021
0022
0023
0024
0025
0026
0027
0028
0029
0030
0031
0032
0033 #include "DetectorMessenger.hh"
0034
0035 #include "DetectorConstruction.hh"
0036
0037 #include "G4UIcmdWithADoubleAndUnit.hh"
0038 #include "G4UIcmdWithAString.hh"
0039 #include "G4UIcmdWithAnInteger.hh"
0040 #include "G4UIdirectory.hh"
0041
0042
0043
0044 DetectorMessenger::DetectorMessenger(DetectorConstruction* Det) : fDetector(Det)
0045 {
0046 fTestemDir = new G4UIdirectory("/testem/");
0047 fTestemDir->SetGuidance(" detector control.");
0048
0049 fDetDir = new G4UIdirectory("/testem/det/");
0050 fDetDir->SetGuidance("detector construction commands");
0051
0052 fMaterCmd = new G4UIcmdWithAString("/testem/det/setMat", this);
0053 fMaterCmd->SetGuidance("Select material of the box.");
0054 fMaterCmd->SetParameterName("choice", false);
0055 fMaterCmd->AvailableForStates(G4State_PreInit, G4State_Idle);
0056 fMaterCmd->SetToBeBroadcasted(false);
0057
0058 fRadiusCmd = new G4UIcmdWithADoubleAndUnit("/testem/det/setRadius", this);
0059 fRadiusCmd->SetGuidance("Set radius of the absorber");
0060 fRadiusCmd->SetParameterName("Radius", false);
0061 fRadiusCmd->SetRange("Radius>0.");
0062 fRadiusCmd->SetUnitCategory("Length");
0063 fRadiusCmd->AvailableForStates(G4State_PreInit, G4State_Idle);
0064 fRadiusCmd->SetToBeBroadcasted(false);
0065
0066 fNbLayersCmd = new G4UIcmdWithAnInteger("/testem/det/setNbOfLayers", this);
0067 fNbLayersCmd->SetGuidance("Set number of layers");
0068 fNbLayersCmd->SetParameterName("NbLayers", false);
0069 fNbLayersCmd->SetRange("NbLayers>0");
0070 fNbLayersCmd->AvailableForStates(G4State_PreInit);
0071 fNbLayersCmd->SetToBeBroadcasted(false);
0072 }
0073
0074
0075
0076 DetectorMessenger::~DetectorMessenger()
0077 {
0078 delete fMaterCmd;
0079 delete fRadiusCmd;
0080 delete fNbLayersCmd;
0081 delete fDetDir;
0082 delete fTestemDir;
0083 }
0084
0085
0086
0087 void DetectorMessenger::SetNewValue(G4UIcommand* command, G4String newValue)
0088 {
0089 if (command == fMaterCmd) {
0090 fDetector->SetMaterial(newValue);
0091 }
0092
0093 if (command == fRadiusCmd) {
0094 fDetector->SetRadius(fRadiusCmd->GetNewDoubleValue(newValue));
0095 }
0096
0097 if (command == fNbLayersCmd) {
0098 fDetector->SetNbOfLayers(fNbLayersCmd->GetNewIntValue(newValue));
0099 }
0100 }
0101
0102