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 // This example is provided by the Geant4-DNA 27 // Any report or published results obtained us 28 // shall cite the following Geant4-DNA collabo 29 // Med. Phys. 37 (2010) 4692-4708 30 // The Geant4-DNA web site is available at htt 31 // 32 // If you use this example, please cite the fo 33 // Rad. Prot. Dos. 133 (2009) 2-11 34 35 #include "G4Event.hh" 36 #include "G4AnalysisManager.hh" 37 #include "Randomize.hh" 38 39 #include "EventAction.hh" 40 #include "RunAction.hh" 41 42 EventAction::EventAction(RunAction* run) 43 :fRun(run) 44 {} 45 46 EventAction::~EventAction() 47 {} 48 49 void EventAction::BeginOfEventAction(const G4E 50 { 51 G4int evtNb = evt->GetEventID(); 52 fRun->SetNumEvent(evtNb); 53 fRun->SetDoseN(0); 54 fRun->SetDoseC(0); 55 } 56 57 void EventAction::EndOfEventAction(const G4Eve 58 { 59 G4AnalysisManager* man = G4AnalysisManager:: 60 61 // Save total absorbed dose in phantom 62 63 if (fRun->GetDoseN()>0 || fRun->GetDoseC()>0 64 { 65 // Fill ntuple #4 66 man->FillNtupleDColumn(4,0,fRun->GetDoseN( 67 man->FillNtupleDColumn(4,1,fRun->GetDoseC( 68 man->AddNtupleRow(4); 69 70 G4cout << " ===> The incident alpha part 71 G4cout << " -----> total absorbed dose w 72 G4cout << " -----> total absorbed dose w 73 G4cout << G4endl; 74 } 75 else 76 { 77 G4cout << " ===> Sorry, the incident alp 78 G4cout << G4endl; 79 } 80 } 81