This repository has been archived by the owner on May 3, 2024. It is now read-only.
-
Notifications
You must be signed in to change notification settings - Fork 5
/
Copy pathModifyJawFront.m
54 lines (46 loc) · 1.98 KB
/
ModifyJawFront.m
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
function plan = ModifyJawFront(plan, distance)
% ModifyJawFront is a delivery plan modification plugin for the
% TomoTherapy FMEA simulation tool. This plugin adjusts the front jaw
% positions by a given absolute distance, in mm. In this frame of
% reference, positive means a larger field width and vice versa.
%
% The following variables are required for proper execution:
% plan: a structure containing the TomoTherapy delivery plan. See
% LoadPlan for more information on the structure format.
% distance: a number (or string) indicating the deviation in front jaw
% positions, in mm.
%
% The following variable is returned upon succesful completion:
% plan: a structure, of the same format as the input delivery plan, with
% the modified jaws.
%
% Author: Mark Geurts, mark.w.geurts@gmail.com
% Copyright (C) 2014 University of Wisconsin Board of Regents
%
% This program is free software: you can redistribute it and/or modify it
% under the terms of the GNU General Public License as published by the
% Free Software Foundation, either version 3 of the License, or (at your
% option) any later version.
%
% This program is distributed in the hope that it will be useful, but
% WITHOUT ANY WARRANTY; without even the implied warranty of
% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General
% Public License for more details.
%
% You should have received a copy of the GNU General Public License along
% with this program. If not, see http://www.gnu.org/licenses/.
% If the second variable is not already numeric
if ~isnumeric(distance)
% Parse it as a double
distance = str2double(distance);
end
% Log event
Event(sprintf('Adjusting front jaws by %0.2f mm', distance));
% Loop through delivery plan events
for i = 1:size(plan.events, 1)
% If the event specifies front jaw
if strcmp(plan.events{i,2}, 'jawFront')
% Modify the event value
plan.events{i,3} = plan.events{i,3} + distance / 850;
end
end