1 | <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" |
---|
2 | "http://www.w3.org/TR/REC-html40/loose.dtd"> |
---|
3 | <html> |
---|
4 | <head> |
---|
5 | <title>Description of set_object</title> |
---|
6 | <meta name="keywords" content="set_object"> |
---|
7 | <meta name="description" content="'set_object': GUI to edit a projection object"> |
---|
8 | <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> |
---|
9 | <meta name="generator" content="m2html © 2003 Guillaume Flandin"> |
---|
10 | <meta name="robots" content="index, follow"> |
---|
11 | <link type="text/css" rel="stylesheet" href="../m2html.css"> |
---|
12 | </head> |
---|
13 | <body> |
---|
14 | <a name="_top"></a> |
---|
15 | <div><a href="../index.html">Home</a> > <a href="index.html">.</a> > set_object.m</div> |
---|
16 | |
---|
17 | <!--<table width="100%"><tr><td align="left"><a href="../index.html"><img alt="<" border="0" src="../left.png"> Master index</a></td> |
---|
18 | <td align="right"><a href="index.html">Index for . <img alt=">" border="0" src="../right.png"></a></td></tr></table>--> |
---|
19 | |
---|
20 | <h1>set_object |
---|
21 | </h1> |
---|
22 | |
---|
23 | <h2><a name="_name"></a>PURPOSE <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2> |
---|
24 | <div class="box"><strong>'set_object': GUI to edit a projection object</strong></div> |
---|
25 | |
---|
26 | <h2><a name="_synopsis"></a>SYNOPSIS <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2> |
---|
27 | <div class="box"><strong>function varargout = set_object(varargin) </strong></div> |
---|
28 | |
---|
29 | <h2><a name="_description"></a>DESCRIPTION <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2> |
---|
30 | <div class="fragment"><pre class="comment">'set_object': GUI to edit a projection object |
---|
31 | ------------------------------------------------------------------------ |
---|
32 | function hset_object= set_object(data, PlotHandles,ZBounds) |
---|
33 | associated with the GUI set_object.fig |
---|
34 | |
---|
35 | OUTPUT: |
---|
36 | hset_object: handle of the GUI figure |
---|
37 | |
---|
38 | INTPUT: |
---|
39 | data: structure describing the object properties |
---|
40 | PlotHandles: handles for projection plots |
---|
41 | Zbounds: bounds on Z ( 3D case) |
---|
42 | |
---|
43 | AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA |
---|
44 | Copyright Joel Sommeria, 2008, LEGI / CNRS-UJF-INPG, sommeria@coriolis-legi.org. |
---|
45 | AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA |
---|
46 | This file is part of the toolbox UVMAT. |
---|
47 | |
---|
48 | UVMAT is free software; you can redistribute it and/or modify |
---|
49 | it under the terms of the GNU General Public License as published by |
---|
50 | the Free Software Foundation; either version 2 of the License, or |
---|
51 | (at your option) any later version. |
---|
52 | |
---|
53 | UVMAT is distributed in the hope that it will be useful, |
---|
54 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
---|
55 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
---|
56 | GNU General Public License (file UVMAT/COPYING.txt) for more details. |
---|
57 | AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA</pre></div> |
---|
58 | |
---|
59 | <!-- crossreference --> |
---|
60 | <h2><a name="_cross"></a>CROSS-REFERENCE INFORMATION <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2> |
---|
61 | This function calls: |
---|
62 | <ul style="list-style-image:url(../matlabicon.gif)"> |
---|
63 | <li><a href="msgbox_uvmat.html" class="code" title="function varargout = msgbox_uvmat(varargin)">msgbox_uvmat</a> 'msgbox_uvmat': associated with GUI msgbox_uvmat.fig to display message boxes, for error, warning or input calls</li><li><a href="read_set_object.html" class="code" title="function data=read_set_object(handles)">read_set_object</a> 'read_set_object': read the data on the 'set_object' interface</li><li><a href="set_title.html" class="code" title="function TITLE=set_title(Style,ProjMode)">set_title</a> 'set_title': defines the 'TITLE' of a projection object</li><li><a href="struct2xml.html" class="code" title="function t=struct2xml(Object,t,root_uid)">struct2xml</a> 'struct2xml': transform a matlab structure to a xml tree.</li><li><a href="update_obj.html" class="code" title="function Object_out=update_obj(UvData,IndexObj,ObjectData,PlotHandles)">update_obj</a> 'update_obj': update the object graph representation and its projection field, record it in the uvmat interface</li></ul> |
---|
64 | This function is called by: |
---|
65 | <ul style="list-style-image:url(../matlabicon.gif)"> |
---|
66 | <li><a href="mouse_up.html" class="code" title="function mouse_up(ggg,eventdata,handles)">mouse_up</a> 'mouse_up': function activated when the mouse button is released</li><li><a href="series.html" class="code" title="function varargout = series(varargin)">series</a> 'series': master function associated to the GUI series.m for analysis field series</li><li><a href="uvmat.html" class="code" title="function varargout = uvmat(varargin)">uvmat</a> 'uvmat': function associated with the GUI 'uvmat.fig' for images and data field visualization</li></ul> |
---|
67 | <!-- crossreference --> |
---|
68 | |
---|
69 | <h2><a name="_subfunctions"></a>SUBFUNCTIONS <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2> |
---|
70 | <ul style="list-style-image:url(../matlabicon.gif)"> |
---|
71 | <li><a href="#_sub1" class="code">function set_object_OpeningFcn(hObject, eventdata, handles, data, PlotHandles,ZBounds)</a></li><li><a href="#_sub2" class="code">function varargout = set_object_OutputFcn(hObject, eventdata, handles)</a></li><li><a href="#_sub3" class="code">function ObjectStyle_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub4" class="code">function xObject_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub5" class="code">function yObject_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub6" class="code">function zObject_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub7" class="code">function ProjMode_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub8" class="code">function TITLE_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub9" class="code">function Phi_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub10" class="code">function Theta_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub11" class="code">function update_slider(hObject, eventdata,handles)</a></li><li><a href="#_sub12" class="code">function DX_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub13" class="code">function DY_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub14" class="code">function DZ_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub15" class="code">function OPEN_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub16" class="code">function closefcn(gcbo,eventdata,parent_button)</a></li><li><a href="#_sub17" class="code">function PLOT_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub18" class="code">function MenuCoord_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub19" class="code">function YMin_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub20" class="code">function ZMin_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub21" class="code">function ZMax_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub22" class="code">function YMax_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub23" class="code">function XMin_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub24" class="code">function XMax_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub25" class="code">function SAVE_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub26" class="code">function z_slider_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub27" class="code">function XObject_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub28" class="code">function YObject_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub29" class="code">function ZObject_Callback(hObject, eventdata, handles)</a></li><li><a href="#_sub30" class="code">function HELP_Callback(hObject, eventdata, handles)</a></li></ul> |
---|
72 | <h2><a name="_source"></a>SOURCE CODE <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2> |
---|
73 | <div class="fragment"><pre>0001 <span class="comment">%'set_object': GUI to edit a projection object</span> |
---|
74 | 0002 <span class="comment">%------------------------------------------------------------------------</span> |
---|
75 | 0003 <span class="comment">% function hset_object= set_object(data, PlotHandles,ZBounds)</span> |
---|
76 | 0004 <span class="comment">% associated with the GUI set_object.fig</span> |
---|
77 | 0005 <span class="comment">%</span> |
---|
78 | 0006 <span class="comment">% OUTPUT:</span> |
---|
79 | 0007 <span class="comment">% hset_object: handle of the GUI figure</span> |
---|
80 | 0008 <span class="comment">%</span> |
---|
81 | 0009 <span class="comment">% INTPUT:</span> |
---|
82 | 0010 <span class="comment">% data: structure describing the object properties</span> |
---|
83 | 0011 <span class="comment">% PlotHandles: handles for projection plots</span> |
---|
84 | 0012 <span class="comment">% Zbounds: bounds on Z ( 3D case)</span> |
---|
85 | 0013 <span class="comment">%</span> |
---|
86 | 0014 <span class="comment">%AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA</span> |
---|
87 | 0015 <span class="comment">% Copyright Joel Sommeria, 2008, LEGI / CNRS-UJF-INPG, sommeria@coriolis-legi.org.</span> |
---|
88 | 0016 <span class="comment">%AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA</span> |
---|
89 | 0017 <span class="comment">% This file is part of the toolbox UVMAT.</span> |
---|
90 | 0018 <span class="comment">%</span> |
---|
91 | 0019 <span class="comment">% UVMAT is free software; you can redistribute it and/or modify</span> |
---|
92 | 0020 <span class="comment">% it under the terms of the GNU General Public License as published by</span> |
---|
93 | 0021 <span class="comment">% the Free Software Foundation; either version 2 of the License, or</span> |
---|
94 | 0022 <span class="comment">% (at your option) any later version.</span> |
---|
95 | 0023 <span class="comment">%</span> |
---|
96 | 0024 <span class="comment">% UVMAT is distributed in the hope that it will be useful,</span> |
---|
97 | 0025 <span class="comment">% but WITHOUT ANY WARRANTY; without even the implied warranty of</span> |
---|
98 | 0026 <span class="comment">% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the</span> |
---|
99 | 0027 <span class="comment">% GNU General Public License (file UVMAT/COPYING.txt) for more details.</span> |
---|
100 | 0028 <span class="comment">%AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA</span> |
---|
101 | 0029 |
---|
102 | 0030 <a name="_sub0" href="#_subfunctions" class="code">function varargout = set_object(varargin)</a> |
---|
103 | 0031 |
---|
104 | 0032 <span class="comment">% Last Modified by GUIDE v2.5 24-Nov-2008 14:29:06</span> |
---|
105 | 0033 |
---|
106 | 0034 <span class="comment">% Begin initialization code - DO NOT PLOT</span> |
---|
107 | 0035 gui_Singleton = 1; |
---|
108 | 0036 gui_State = struct(<span class="string">'gui_Name'</span>, mfilename, <span class="keyword">...</span> |
---|
109 | 0037 <span class="string">'gui_Singleton'</span>, gui_Singleton, <span class="keyword">...</span> |
---|
110 | 0038 <span class="string">'gui_OpeningFcn'</span>, @<a href="#_sub1" class="code" title="subfunction set_object_OpeningFcn(hObject, eventdata, handles, data, PlotHandles,ZBounds)">set_object_OpeningFcn</a>, <span class="keyword">...</span> |
---|
111 | 0039 <span class="string">'gui_OutputFcn'</span>, @<a href="#_sub2" class="code" title="subfunction varargout = set_object_OutputFcn(hObject, eventdata, handles)">set_object_OutputFcn</a>, <span class="keyword">...</span> |
---|
112 | 0040 <span class="string">'gui_LayoutFcn'</span>, [] , <span class="keyword">...</span> |
---|
113 | 0041 <span class="string">'gui_Callback'</span>, []); |
---|
114 | 0042 <span class="keyword">if</span> nargin & isstr(varargin{1}) |
---|
115 | 0043 gui_State.gui_Callback = str2func(varargin{1}); |
---|
116 | 0044 <span class="keyword">end</span> |
---|
117 | 0045 |
---|
118 | 0046 <span class="keyword">if</span> nargout |
---|
119 | 0047 [varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:}); |
---|
120 | 0048 <span class="keyword">else</span> |
---|
121 | 0049 gui_mainfcn(gui_State, varargin{:}); |
---|
122 | 0050 <span class="keyword">end</span> |
---|
123 | 0051 <span class="comment">% End initialization code - DO NOT PLOT</span> |
---|
124 | 0052 |
---|
125 | 0053 <span class="comment">%-------------------------------------------------------------------</span> |
---|
126 | 0054 <span class="comment">% --- Executes just before set_object is made visible.</span> |
---|
127 | 0055 <span class="comment">%INPUT:</span> |
---|
128 | 0056 <span class="comment">% handles: handles of the set_object interface elements</span> |
---|
129 | 0057 <span class="comment">%'IndexObj': NON USED ANYMORE (To suppress) index of the object (on the UvData list) that set_object will modify</span> |
---|
130 | 0058 <span class="comment">% if =[] or absent: index still undefined (create mode in uvmat)</span> |
---|
131 | 0059 <span class="comment">% if=0; no associated object (used for series), the button 'PLOT' is then unvisible</span> |
---|
132 | 0060 <span class="comment">%'data': read from an existing object selected in the interface</span> |
---|
133 | 0061 <span class="comment">% .TITLE : class of object ('POINTS','LINE',....)</span> |
---|
134 | 0062 <span class="comment">% .DX,DY,DZ; meshes for regular grids</span> |
---|
135 | 0063 <span class="comment">% .Coord: object position coordinates</span> |
---|
136 | 0064 <span class="comment">% .ParentButton: handle of the uicontrol object calling the interface</span> |
---|
137 | 0065 <span class="comment">% PlotHandles: set of handles of the elements contolling the plotting of the projected field:</span> |
---|
138 | 0066 <span class="comment">% if =[] or absent, no plot (mask mode in uvmat)</span> |
---|
139 | 0067 <span class="comment">% parameters on the uvmat interface (obtained by 'get_plot_handle.m')</span> |
---|
140 | 0068 <a name="_sub1" href="#_subfunctions" class="code">function set_object_OpeningFcn(hObject, eventdata, handles, data, PlotHandles,ZBounds)</a> |
---|
141 | 0069 |
---|
142 | 0070 <span class="comment">% Choose default command line output for set_object</span> |
---|
143 | 0071 handles.output = hObject; |
---|
144 | 0072 |
---|
145 | 0073 <span class="comment">% Update handles structure</span> |
---|
146 | 0074 guidata(hObject, handles); |
---|
147 | 0075 |
---|
148 | 0076 <span class="comment">%default</span> |
---|
149 | 0077 <span class="keyword">if</span> ~exist(<span class="string">'ZBound'</span>,<span class="string">'var'</span>) |
---|
150 | 0078 ZBound=0; <span class="comment">%default</span> |
---|
151 | 0079 <span class="keyword">end</span> |
---|
152 | 0080 set(hObject,<span class="string">'KeyPressFcn'</span>,{<span class="string">'keyboard_callback'</span>,handles})<span class="comment">%set keyboard action function (allow action on uvmat when set_object is in front)</span> |
---|
153 | 0081 set(handles.MenuCoord,<span class="string">'ListboxTop'</span>,1) |
---|
154 | 0082 <span class="keyword">if</span> ~exist(<span class="string">'PlotHandles'</span>,<span class="string">'var'</span>) |
---|
155 | 0083 PlotHandles=[]; |
---|
156 | 0084 <span class="keyword">end</span> |
---|
157 | 0085 desable_open=0;<span class="comment">%default: allow reading of object from xml file</span> |
---|
158 | 0086 desable_plot=0;<span class="comment">%default</span> |
---|
159 | 0087 SetData.PlotHandles=PlotHandles; |
---|
160 | 0088 <span class="keyword">if</span> exist(<span class="string">'data'</span>,<span class="string">'var'</span>) & isfield(data,<span class="string">'ParentButton'</span>) |
---|
161 | 0089 SetData.ParentButton=data.ParentButton; |
---|
162 | 0090 set(hObject,<span class="string">'DeleteFcn'</span>,{@<a href="#_sub16" class="code" title="subfunction closefcn(gcbo,eventdata,parent_button)">closefcn</a>,SetData.ParentButton})<span class="comment">%</span> |
---|
163 | 0091 <span class="keyword">end</span> |
---|
164 | 0092 set(hObject,<span class="string">'UserData'</span>,SetData) |
---|
165 | 0093 |
---|
166 | 0094 <span class="comment">% fill the interface as set in the input data:</span> |
---|
167 | 0095 <span class="keyword">if</span> exist(<span class="string">'data'</span>,<span class="string">'var'</span>) |
---|
168 | 0096 <span class="keyword">if</span> isfield(data,<span class="string">'desable_open'</span>) |
---|
169 | 0097 desable_open=data.desable_open;<span class="comment">%test to desable button OPEN (edit or display mode)</span> |
---|
170 | 0098 <span class="keyword">end</span> |
---|
171 | 0099 <span class="keyword">if</span> isfield(data,<span class="string">'desable_plot'</span>) |
---|
172 | 0100 desable_plot=data.desable_plot;<span class="comment">%test to desable button PLOT (display mode)</span> |
---|
173 | 0101 <span class="keyword">end</span> |
---|
174 | 0102 <span class="keyword">if</span> ~isfield(data,<span class="string">'NbDim'</span>)|~isequal(data.NbDim,3)<span class="comment">%2D case</span> |
---|
175 | 0103 set(handles.ZObject,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
176 | 0104 set(handles.z_slider,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
177 | 0105 <span class="keyword">else</span> |
---|
178 | 0106 set(handles.ZObject,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
179 | 0107 set(handles.z_slider,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
180 | 0108 <span class="keyword">if</span> isfield(data,<span class="string">'Coord'</span>) && size(data.Coord,2)==3 |
---|
181 | 0109 set(handles.ZObject,<span class="string">'String'</span>,num2str(data.Coord(1,3),4)) |
---|
182 | 0110 <span class="keyword">end</span> |
---|
183 | 0111 <span class="keyword">end</span> |
---|
184 | 0112 <span class="keyword">if</span> isfield(data,<span class="string">'ProjMode'</span>) && isfield(data,<span class="string">'Style'</span>) |
---|
185 | 0113 data.TITLE=<a href="set_title.html" class="code" title="function TITLE=set_title(Style,ProjMode)">set_title</a>(data.Style,data.ProjMode);<span class="comment">% define TITLE in set_object (POINTS, LINE, PATCH,...)</span> |
---|
186 | 0114 <span class="keyword">end</span> |
---|
187 | 0115 <span class="keyword">if</span> isfield(data,<span class="string">'TITLE'</span>) |
---|
188 | 0116 menutitle=get(handles.TITLE,<span class="string">'String'</span>); |
---|
189 | 0117 <span class="keyword">for</span> iline=1:length(menutitle) |
---|
190 | 0118 strmenu=menutitle{iline}; |
---|
191 | 0119 <span class="keyword">if</span> isequal(data.TITLE,strmenu) |
---|
192 | 0120 set(handles.TITLE,<span class="string">'Value'</span>,iline) |
---|
193 | 0121 <span class="keyword">break</span> |
---|
194 | 0122 <span class="keyword">end</span> |
---|
195 | 0123 <span class="keyword">end</span> |
---|
196 | 0124 <a href="#_sub8" class="code" title="subfunction TITLE_Callback(hObject, eventdata, handles)">TITLE_Callback</a>(hObject, eventdata, handles)<span class="comment">% enable edit boxes depending on TITLE</span> |
---|
197 | 0125 <span class="keyword">end</span> |
---|
198 | 0126 <span class="keyword">if</span> isfield(data,<span class="string">'fixedtitle'</span>)&isequal(data.fixedtitle,1) |
---|
199 | 0127 set(handles.TITLE,<span class="string">'enable'</span>,<span class="string">'off'</span>) |
---|
200 | 0128 <span class="keyword">end</span> |
---|
201 | 0129 <span class="keyword">if</span> isfield(data,<span class="string">'Style'</span>) |
---|
202 | 0130 menu=get(handles.ObjectStyle,<span class="string">'String'</span>); |
---|
203 | 0131 <span class="keyword">for</span> iline=1:length(menu) |
---|
204 | 0132 <span class="keyword">if</span> isequal(menu{iline},data.Style) |
---|
205 | 0133 set(handles.ObjectStyle,<span class="string">'Value'</span>,iline) |
---|
206 | 0134 <span class="keyword">break</span> |
---|
207 | 0135 <span class="keyword">end</span> |
---|
208 | 0136 <span class="keyword">end</span> |
---|
209 | 0137 <span class="keyword">end</span> |
---|
210 | 0138 <span class="keyword">if</span> isfield(data,<span class="string">'ProjMode'</span>) |
---|
211 | 0139 menu=get(handles.ProjMode,<span class="string">'String'</span>); |
---|
212 | 0140 <span class="keyword">for</span> iline=1:length(menu) |
---|
213 | 0141 <span class="keyword">if</span> isequal(menu{iline},data.ProjMode) |
---|
214 | 0142 set(handles.ProjMode,<span class="string">'Value'</span>,iline) |
---|
215 | 0143 <span class="keyword">break</span> |
---|
216 | 0144 <span class="keyword">end</span> |
---|
217 | 0145 <span class="keyword">end</span> |
---|
218 | 0146 <span class="keyword">end</span> |
---|
219 | 0147 <span class="keyword">if</span> isfield(data,<span class="string">'Coord'</span>) & size(data.Coord,2)>=2 |
---|
220 | 0148 sizcoord=size(data.Coord); |
---|
221 | 0149 <span class="keyword">for</span> i=1:sizcoord(1) |
---|
222 | 0150 XObject{i}=num2str(data.Coord(i,1),4); |
---|
223 | 0151 YObject{i}=num2str(data.Coord(i,2),4); |
---|
224 | 0152 <span class="keyword">end</span> |
---|
225 | 0153 set(handles.XObject,<span class="string">'String'</span>,XObject) |
---|
226 | 0154 set(handles.YObject,<span class="string">'String'</span>,YObject) |
---|
227 | 0155 <span class="comment">%set(handles.XObject,'String',mat2cell(data.Coord(:,1),sizcoord(1)))</span> |
---|
228 | 0156 <span class="comment">%set(handles.YObject,'String',mat2cell(data.Coord(:,2),sizcoord(1)))</span> |
---|
229 | 0157 <span class="keyword">if</span> sizcoord(2)>3 |
---|
230 | 0158 <span class="keyword">for</span> i=1:sizcoord(1) |
---|
231 | 0159 ZObject{i}=num2str(data.Coord(i,3),4); |
---|
232 | 0160 <span class="keyword">end</span> |
---|
233 | 0161 set(handles.ZObject,<span class="string">'String'</span>,ZObject) |
---|
234 | 0162 <span class="keyword">end</span> |
---|
235 | 0163 <span class="keyword">end</span> |
---|
236 | 0164 <span class="keyword">if</span> isfield(data,<span class="string">'DX'</span>) |
---|
237 | 0165 set(handles.DX,<span class="string">'String'</span>,num2str(data.DX,3)) |
---|
238 | 0166 <span class="keyword">end</span> |
---|
239 | 0167 <span class="keyword">if</span> isfield(data,<span class="string">'DY'</span>) |
---|
240 | 0168 set(handles.DY,<span class="string">'String'</span>,num2str(data.DY,3)) |
---|
241 | 0169 <span class="keyword">end</span> |
---|
242 | 0170 <span class="comment">%OBSOLETE (replaced by Range)</span> |
---|
243 | 0171 <span class="comment">% if isfield(data,'XMin')</span> |
---|
244 | 0172 <span class="comment">% set(handles.XMin,'String',num2str(data.XMin,3))</span> |
---|
245 | 0173 <span class="comment">% end</span> |
---|
246 | 0174 <span class="comment">% if isfield(data,'XMax')</span> |
---|
247 | 0175 <span class="comment">% set(handles.XMax,'String',num2str(data.XMax,3))</span> |
---|
248 | 0176 <span class="comment">% end</span> |
---|
249 | 0177 <span class="comment">% if isfield(data,'YMin')</span> |
---|
250 | 0178 <span class="comment">% set(handles.YMin,'String',num2str(data.YMin,3))</span> |
---|
251 | 0179 <span class="comment">% end</span> |
---|
252 | 0180 <span class="comment">% if isfield(data,'YMax')</span> |
---|
253 | 0181 <span class="comment">% set(handles.YMax,'String',num2str(data.YMax,3))</span> |
---|
254 | 0182 <span class="comment">% end</span> |
---|
255 | 0183 <span class="keyword">if</span> isfield(data,<span class="string">'RangeZ'</span>) && length(ZBounds) >= 2 |
---|
256 | 0184 set(handles.ZMax,<span class="string">'String'</span>,num2str(max(data.RangeZ),3)) |
---|
257 | 0185 DZ=max(data.RangeZ);<span class="comment">%slider step</span> |
---|
258 | 0186 <span class="keyword">if</span> ZBounds(2)~=ZBounds(1) |
---|
259 | 0187 rel_step(1)=min(DZ/(ZBounds(2)-ZBounds(1)),0.2);<span class="comment">%must be smaller than 1</span> |
---|
260 | 0188 rel_step(2)=0.1; |
---|
261 | 0189 set(handles.z_slider,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
262 | 0190 set(handles.z_slider,<span class="string">'Min'</span>,ZBounds(1)) |
---|
263 | 0191 set(handles.z_slider,<span class="string">'Max'</span>,ZBounds(2)) |
---|
264 | 0192 set(handles.z_slider,<span class="string">'SliderStep'</span>,rel_step) |
---|
265 | 0193 set(handles.z_slider,<span class="string">'Value'</span>,(ZBounds(1)+ZBounds(2))/2) |
---|
266 | 0194 <span class="keyword">end</span> |
---|
267 | 0195 <span class="keyword">end</span> |
---|
268 | 0196 <span class="keyword">if</span> isfield(data,<span class="string">'RangeX'</span>) |
---|
269 | 0197 set(handles.XMax,<span class="string">'String'</span>,num2str(max(data.RangeX),3)) |
---|
270 | 0198 set(handles.XMin,<span class="string">'String'</span>,num2str(min(data.RangeX),3)) |
---|
271 | 0199 <span class="keyword">end</span> |
---|
272 | 0200 <span class="keyword">if</span> isfield(data,<span class="string">'RangeY'</span>) |
---|
273 | 0201 set(handles.YMax,<span class="string">'String'</span>,num2str(max(data.RangeY),3)) |
---|
274 | 0202 set(handles.YMin,<span class="string">'String'</span>,num2str(min(data.RangeY),3)) |
---|
275 | 0203 <span class="keyword">end</span> |
---|
276 | 0204 <span class="keyword">if</span> isfield(data,<span class="string">'RangeZ'</span>) |
---|
277 | 0205 set(handles.ZMax,<span class="string">'String'</span>,num2str(max(data.RangeZ),3)) |
---|
278 | 0206 set(handles.ZMin,<span class="string">'String'</span>,num2str(min(data.RangeZ),3)) |
---|
279 | 0207 <span class="keyword">end</span> |
---|
280 | 0208 <span class="keyword">if</span> isfield(data,<span class="string">'Phi'</span>) |
---|
281 | 0209 set(handles.Phi,<span class="string">'String'</span>,num2str(data.Phi,3)) |
---|
282 | 0210 <span class="keyword">end</span> |
---|
283 | 0211 <span class="keyword">if</span> isfield(data,<span class="string">'Theta'</span>) |
---|
284 | 0212 set(handles.Theta,<span class="string">'String'</span>,num2str(data.Theta,3)) |
---|
285 | 0213 <span class="keyword">end</span> |
---|
286 | 0214 <span class="keyword">if</span> isfield(data,<span class="string">'Psi'</span>) |
---|
287 | 0215 set(handles.Psi,<span class="string">'String'</span>,num2str(data.Psi,3)) |
---|
288 | 0216 <span class="keyword">end</span> |
---|
289 | 0217 <span class="keyword">if</span> isfield(data,<span class="string">'DZ'</span>) |
---|
290 | 0218 set(handles.DZ,<span class="string">'String'</span>,num2str(data.DZ,3)) |
---|
291 | 0219 <span class="keyword">end</span> |
---|
292 | 0220 <span class="keyword">if</span> isfield(data,<span class="string">'CoordType'</span>) |
---|
293 | 0221 <span class="keyword">if</span> isequal(data.CoordType,<span class="string">'phys'</span>) |
---|
294 | 0222 set(handles.MenuCoord,<span class="string">'Value'</span>,1) |
---|
295 | 0223 <span class="keyword">elseif</span> isequal(data.CoordType,<span class="string">'px'</span>) |
---|
296 | 0224 set(handles.MenuCoord,<span class="string">'Value'</span>,2) |
---|
297 | 0225 <span class="keyword">end</span> |
---|
298 | 0226 <span class="keyword">end</span> |
---|
299 | 0227 <span class="keyword">end</span> |
---|
300 | 0228 <span class="keyword">if</span> desable_open |
---|
301 | 0229 set(handles.OPEN,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
302 | 0230 <span class="keyword">else</span> |
---|
303 | 0231 set(handles.OPEN,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
304 | 0232 <span class="keyword">end</span> |
---|
305 | 0233 <span class="keyword">if</span> desable_plot |
---|
306 | 0234 set(handles.PLOT,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
307 | 0235 <span class="keyword">else</span> |
---|
308 | 0236 set(handles.PLOT,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
309 | 0237 <span class="keyword">end</span> |
---|
310 | 0238 |
---|
311 | 0239 |
---|
312 | 0240 <span class="comment">% --- Outputs from this function are returned to the command line.</span> |
---|
313 | 0241 <a name="_sub2" href="#_subfunctions" class="code">function varargout = set_object_OutputFcn(hObject, eventdata, handles)</a> |
---|
314 | 0242 <span class="comment">% varargout cell array for returning output args (see VARARGOUT);</span> |
---|
315 | 0243 <span class="comment">% hObject handle to figure</span> |
---|
316 | 0244 <span class="comment">% eventdata reserved - to be defined in a future version of MATLAB</span> |
---|
317 | 0245 <span class="comment">% handles structure with handles and user data (see GUIDATA)</span> |
---|
318 | 0246 |
---|
319 | 0247 <span class="comment">% Get default command line output from handles structure</span> |
---|
320 | 0248 varargout{1} = handles.output; |
---|
321 | 0249 varargout{2}=handles; |
---|
322 | 0250 |
---|
323 | 0251 <span class="comment">%-----------------------------------------------</span> |
---|
324 | 0252 <span class="comment">% --- Executes on selection change in ObjectStyle.</span> |
---|
325 | 0253 <a name="_sub3" href="#_subfunctions" class="code">function ObjectStyle_Callback(hObject, eventdata, handles)</a> |
---|
326 | 0254 style_prev=get(handles.ObjectStyle,<span class="string">'UserData'</span>); |
---|
327 | 0255 str=get(handles.ObjectStyle,<span class="string">'String'</span>); |
---|
328 | 0256 val=get(handles.ObjectStyle,<span class="string">'Value'</span>); |
---|
329 | 0257 <span class="comment">% make correspondance between different object styles</span> |
---|
330 | 0258 <span class="comment">% if ~isequal(str{val},style_prev)</span> |
---|
331 | 0259 Xcolumn=get(handles.XObject,<span class="string">'String'</span>); |
---|
332 | 0260 Ycolumn=get(handles.YObject,<span class="string">'String'</span>); |
---|
333 | 0261 <span class="keyword">if</span> ischar(Xcolumn) |
---|
334 | 0262 sizchar=size(Xcolumn); |
---|
335 | 0263 <span class="keyword">for</span> icol=1:sizchar(1) |
---|
336 | 0264 Xcolumn_cell{icol}=Xcolumn(icol,:); |
---|
337 | 0265 <span class="keyword">end</span> |
---|
338 | 0266 Xcolumn=Xcolumn_cell; |
---|
339 | 0267 <span class="keyword">end</span> |
---|
340 | 0268 <span class="keyword">if</span> ischar(Ycolumn) |
---|
341 | 0269 sizchar=size(Ycolumn); |
---|
342 | 0270 <span class="keyword">for</span> icol=1:sizchar(1) |
---|
343 | 0271 Ycolumn_cell{icol}=Ycolumn(icol,:); |
---|
344 | 0272 <span class="keyword">end</span> |
---|
345 | 0273 Ycolumn=Ycolumn_cell; |
---|
346 | 0274 <span class="keyword">end</span> |
---|
347 | 0275 Zcolumn={};<span class="comment">%default</span> |
---|
348 | 0276 z_new={}; |
---|
349 | 0277 <span class="keyword">if</span> isequal(get(handles.ZObject,<span class="string">'Visible'</span>),<span class="string">'on'</span>) |
---|
350 | 0278 data.NbDim=3; <span class="comment">%test 3D object</span> |
---|
351 | 0279 Zcolumn=get(handles.ZObject,<span class="string">'String'</span>); |
---|
352 | 0280 <span class="keyword">if</span> ischar(Zcolumn) |
---|
353 | 0281 Zcolumn={Zcolumn}; |
---|
354 | 0282 <span class="keyword">end</span> |
---|
355 | 0283 <span class="keyword">end</span> |
---|
356 | 0284 x_new{1}=Xcolumn{1}; |
---|
357 | 0285 y_new{1}=Ycolumn{1}; |
---|
358 | 0286 <span class="keyword">if</span> ~isempty(Zcolumn) |
---|
359 | 0287 z_new{1}=Zcolumn{1}; |
---|
360 | 0288 <span class="keyword">end</span> |
---|
361 | 0289 <span class="keyword">if</span> isequal(str{val},<span class="string">'line'</span>) |
---|
362 | 0290 <span class="keyword">if</span> isequal(style_prev,<span class="string">'rectangle'</span>)|isequal(style_prev,<span class="string">'ellipse'</span>) |
---|
363 | 0291 XMax=get(handles.XMax,<span class="string">'String'</span>); |
---|
364 | 0292 YMax=get(handles.YMax,<span class="string">'String'</span>); |
---|
365 | 0293 x_new{2}=num2str(XMax,4); |
---|
366 | 0294 y_new{2}=num2str(YMax,4); |
---|
367 | 0295 set(handles.XObject,<span class="string">'String'</span>,x_new) |
---|
368 | 0296 set(handles.YObject,<span class="string">'String'</span>,y_new) |
---|
369 | 0297 set(handles.ZObject,<span class="string">'String'</span>,z_new) |
---|
370 | 0298 <span class="keyword">end</span> |
---|
371 | 0299 <span class="keyword">elseif</span> isequal(str{val},<span class="string">'polyline'</span>) |
---|
372 | 0300 <span class="keyword">elseif</span> isequal(str{val},<span class="string">'rectangle'</span>)| isequal(str{val},<span class="string">'ellipse'</span>) |
---|
373 | 0301 set(handles.XObject,<span class="string">'String'</span>,x_new) |
---|
374 | 0302 set(handles.YObject,<span class="string">'String'</span>,y_new) |
---|
375 | 0303 set(handles.ZObject,<span class="string">'String'</span>,z_new) |
---|
376 | 0304 <span class="keyword">end</span> |
---|
377 | 0305 <span class="comment">% end</span> |
---|
378 | 0306 |
---|
379 | 0307 |
---|
380 | 0308 |
---|
381 | 0309 <a href="#_sub7" class="code" title="subfunction ProjMode_Callback(hObject, eventdata, handles)">ProjMode_Callback</a>(hObject, eventdata, handles) |
---|
382 | 0310 <span class="comment">%store the current option</span> |
---|
383 | 0311 str=get(handles.ObjectStyle,<span class="string">'String'</span>); |
---|
384 | 0312 val=get(handles.ObjectStyle,<span class="string">'Value'</span>); |
---|
385 | 0313 set(handles.ObjectStyle,<span class="string">'UserData'</span>,str{val}) |
---|
386 | 0314 |
---|
387 | 0315 <span class="comment">%----------------------------------------------</span> |
---|
388 | 0316 <a name="_sub4" href="#_subfunctions" class="code">function xObject_Callback(hObject, eventdata, handles)</a> |
---|
389 | 0317 |
---|
390 | 0318 |
---|
391 | 0319 <a name="_sub5" href="#_subfunctions" class="code">function yObject_Callback(hObject, eventdata, handles)</a> |
---|
392 | 0320 |
---|
393 | 0321 |
---|
394 | 0322 <span class="comment">% --- Executes on selection change in zObject.</span> |
---|
395 | 0323 <a name="_sub6" href="#_subfunctions" class="code">function zObject_Callback(hObject, eventdata, handles)</a> |
---|
396 | 0324 |
---|
397 | 0325 |
---|
398 | 0326 |
---|
399 | 0327 <span class="comment">% --- Executes on selection change in ProjMode.</span> |
---|
400 | 0328 <a name="_sub7" href="#_subfunctions" class="code">function ProjMode_Callback(hObject, eventdata, handles)</a> |
---|
401 | 0329 menu=get(handles.ProjMode,<span class="string">'String'</span>); |
---|
402 | 0330 value=get(handles.ProjMode,<span class="string">'Value'</span>); |
---|
403 | 0331 ProjMode=menu{value}; |
---|
404 | 0332 menu=get(handles.ObjectStyle,<span class="string">'String'</span>); |
---|
405 | 0333 value=get(handles.ObjectStyle,<span class="string">'Value'</span>); |
---|
406 | 0334 ObjectStyle=menu{value}; |
---|
407 | 0335 test3D=isequal(get(handles.ZObject,<span class="string">'Visible'</span>),<span class="string">'on'</span>);<span class="comment">%3D case</span> |
---|
408 | 0336 <span class="keyword">if</span> isequal(ObjectStyle,<span class="string">'plane'</span>)|isequal(ObjectStyle,<span class="string">'volume'</span>) |
---|
409 | 0337 set(handles.Phi,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
410 | 0338 <span class="keyword">if</span> test3D<span class="comment">%3D case</span> |
---|
411 | 0339 set(handles.Theta,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
412 | 0340 set(handles.Psi,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
413 | 0341 <span class="keyword">end</span> |
---|
414 | 0342 set(handles.XMin,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
415 | 0343 set(handles.XMax,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
416 | 0344 set(handles.YMin,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
417 | 0345 set(handles.YMax,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
418 | 0346 <span class="keyword">if</span> test3D |
---|
419 | 0347 set(handles.Theta,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
420 | 0348 set(handles.Psi,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
421 | 0349 set(handles.ZMin,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
422 | 0350 set(handles.ZMax,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
423 | 0351 <span class="keyword">end</span> |
---|
424 | 0352 <span class="keyword">else</span> |
---|
425 | 0353 set(handles.Phi,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
426 | 0354 set(handles.Theta,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
427 | 0355 set(handles.Psi,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
428 | 0356 set(handles.XMin,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
429 | 0357 set(handles.XMax,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
430 | 0358 set(handles.YMin,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
431 | 0359 <span class="keyword">if</span> isequal(ProjMode,<span class="string">'interp'</span>) |
---|
432 | 0360 set(handles.YMax,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
433 | 0361 <span class="keyword">else</span> |
---|
434 | 0362 set(handles.YMax,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
435 | 0363 <span class="keyword">end</span> |
---|
436 | 0364 <span class="keyword">if</span> isequal(ObjectStyle,<span class="string">'rectangle'</span>)|isequal(ObjectStyle,<span class="string">'ellipse'</span>) |
---|
437 | 0365 set(handles.XMax,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
438 | 0366 <span class="keyword">else</span> |
---|
439 | 0367 set(handles.XMax,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
440 | 0368 <span class="keyword">end</span> |
---|
441 | 0369 set(handles.ZMin,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
442 | 0370 set(handles.ZMax,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
443 | 0371 <span class="keyword">end</span> |
---|
444 | 0372 TITLE_list=get(handles.TITLE,<span class="string">'String'</span>); |
---|
445 | 0373 val=get(handles.TITLE,<span class="string">'Value'</span>); |
---|
446 | 0374 TITLE=TITLE_list{val}; |
---|
447 | 0375 <span class="keyword">switch</span> TITLE |
---|
448 | 0376 <span class="keyword">case</span> {<span class="string">'POINTS'</span>,<span class="string">'PATCH'</span>,<span class="string">'MASK'</span>} |
---|
449 | 0377 set(handles.DX,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
450 | 0378 set(handles.DY,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
451 | 0379 set(handles.DZ,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
452 | 0380 <span class="keyword">case</span> {<span class="string">'LINE'</span>} |
---|
453 | 0381 <span class="keyword">if</span> isequal(ProjMode,<span class="string">'interp'</span>)|| isequal(ProjMode,<span class="string">'filter'</span>) |
---|
454 | 0382 set(handles.DX,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
455 | 0383 <span class="keyword">else</span> |
---|
456 | 0384 set(handles.DX,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
457 | 0385 <span class="keyword">end</span> |
---|
458 | 0386 <span class="keyword">case</span> {<span class="string">'PLANE'</span>} |
---|
459 | 0387 <span class="keyword">if</span> isequal(ProjMode,<span class="string">'interp'</span>)|| isequal(ProjMode,<span class="string">'filter'</span>) |
---|
460 | 0388 set(handles.DX,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
461 | 0389 set(handles.DY,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
462 | 0390 <span class="keyword">else</span> |
---|
463 | 0391 set(handles.DX,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
464 | 0392 set(handles.DY,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
465 | 0393 <span class="keyword">end</span> |
---|
466 | 0394 <span class="keyword">case</span> {<span class="string">'VOLUME'</span>} |
---|
467 | 0395 <span class="keyword">if</span> isequal(ProjMode,<span class="string">'interp'</span>) |
---|
468 | 0396 set(handles.DX,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
469 | 0397 set(handles.DY,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
470 | 0398 set(handles.DZ,<span class="string">'Visible'</span>,<span class="string">'on'</span>) |
---|
471 | 0399 <span class="keyword">else</span> |
---|
472 | 0400 set(handles.DX,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
473 | 0401 set(handles.DY,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
474 | 0402 set(handles.DZ,<span class="string">'Visible'</span>,<span class="string">'off'</span>) |
---|
475 | 0403 <span class="keyword">end</span> |
---|
476 | 0404 <span class="keyword">end</span> |
---|
477 | 0405 |
---|
478 | 0406 <span class="comment">%---------------------------------------------</span> |
---|
479 | 0407 <span class="comment">% --- Executes on selection change in TITLE.</span> |
---|
480 | 0408 <a name="_sub8" href="#_subfunctions" class="code">function TITLE_Callback(hObject, eventdata, handles)</a> |
---|
481 | 0409 <span class="comment">%---------------------------------------------</span> |
---|
482 | 0410 hsetobject=get(handles.TITLE,<span class="string">'parent'</span>); |
---|
483 | 0411 SetData=get(hsetobject,<span class="string">'UserData'</span>);<span class="comment">%get the hidden interface data</span> |
---|
484 | 0412 <span class="comment">% function named CALLBACK in UNTITLED.M with the given input arguments.</span> |
---|
485 | 0413 menu=get(handles.TITLE,<span class="string">'String'</span>); |
---|
486 | 0414 value=get(handles.TITLE,<span class="string">'Value'</span>); |
---|
487 | 0415 titl=menu{value}; |
---|
488 | 0416 <span class="keyword">if</span> isequal(titl,<span class="string">'POINTS'</span>); |
---|
489 | 0417 menu_style={<span class="string">'points'</span>}; |
---|
490 | 0418 menu_proj={<span class="string">'projection'</span>;<span class="string">'interp'</span>;<span class="string">'filter'</span>;<span class="string">'none'</span>}; |
---|
491 | 0419 <span class="keyword">elseif</span> isequal(titl,<span class="string">'LINE'</span>) |
---|
492 | 0420 menu_style={<span class="string">'line'</span>;<span class="string">'polyline'</span>;<span class="string">'rectangle'</span>;<span class="string">'polygon'</span>;<span class="string">'ellipse'</span>};<span class="comment">%'line' =default</span> |
---|
493 | 0421 menu_proj={<span class="string">'projection'</span>;<span class="string">'interp'</span>;<span class="string">'filter'</span>;<span class="string">'none'</span>}; |
---|
494 | 0422 <span class="keyword">elseif</span> isequal(titl,<span class="string">'PATCH'</span>) |
---|
495 | 0423 menu_style={<span class="string">'rectangle'</span>;<span class="string">'polygon'</span>;<span class="string">'ellipse'</span>};<span class="comment">%'line' =default</span> |
---|
496 | 0424 menu_proj={<span class="string">'inside'</span>;<span class="string">'outside'</span>}; |
---|
497 | 0425 <span class="keyword">elseif</span> isequal(titl,<span class="string">'MASK'</span>) |
---|
498 | 0426 menu_style={<span class="string">'polygon'</span>};<span class="comment">%'line' =default</span> |
---|
499 | 0427 menu_proj={<span class="string">'mask_inside'</span>;<span class="string">'mask_outside'</span>}; |
---|
500 | 0428 <span class="keyword">elseif</span> isequal(titl,<span class="string">'PLANE'</span>) |
---|
501 | 0429 menu_style={<span class="string">'plane'</span>}; |
---|
502 | 0430 menu_proj={<span class="string">'projection'</span>;<span class="string">'interp'</span>;<span class="string">'filter'</span>;<span class="string">'none'</span>}; |
---|
503 | 0431 <span class="keyword">elseif</span> isequal(titl,<span class="string">'VOLUME'</span>) |
---|
504 | 0432 menu_style={<span class="string">'volume'</span>}; |
---|
505 | 0433 menu_proj={<span class="string">'none'</span>}; |
---|
506 | 0434 |
---|
507 | 0435 <span class="keyword">end</span> |
---|
508 | 0436 old_menu=get(handles.ObjectStyle,<span class="string">'String'</span>); |
---|
509 | 0437 value=get(handles.ObjectStyle,<span class="string">'Value'</span>); |
---|
510 | 0438 old_style=old_menu{value}; |
---|
511 | 0439 teststyle=0; |
---|
512 | 0440 <span class="keyword">for</span> iline=1:length(menu_style) |
---|
513 | 0441 <span class="keyword">if</span> isequal(menu_style{iline},old_style) |
---|
514 | 0442 styleval=iline; |
---|
515 | 0443 teststyle=1; |
---|
516 | 0444 <span class="keyword">break</span> |
---|
517 | 0445 <span class="keyword">end</span> |
---|
518 | 0446 <span class="keyword">end</span> |
---|
519 | 0447 <span class="keyword">if</span> ~teststyle |
---|
520 | 0448 new_style=[];<span class="comment">%default</span> |
---|
521 | 0449 <span class="keyword">switch</span> old_style |
---|
522 | 0450 <span class="keyword">case</span> <span class="string">'polyline'</span> |
---|
523 | 0451 new_style=<span class="string">'polygon'</span>; |
---|
524 | 0452 <span class="keyword">case</span> <span class="string">'polygon'</span> |
---|
525 | 0453 new_style=<span class="string">'polyline'</span>; |
---|
526 | 0454 <span class="keyword">end</span> |
---|
527 | 0455 <span class="keyword">if</span> ~isempty(new_style) |
---|
528 | 0456 <span class="keyword">for</span> iline=1:length(menu_style) |
---|
529 | 0457 <span class="keyword">if</span> isequal(menu_style{iline},new_style) |
---|
530 | 0458 styleval=iline; |
---|
531 | 0459 teststyle=1; |
---|
532 | 0460 <span class="keyword">break</span> |
---|
533 | 0461 <span class="keyword">end</span> |
---|
534 | 0462 <span class="keyword">end</span> |
---|
535 | 0463 <span class="keyword">end</span> |
---|
536 | 0464 <span class="keyword">end</span> |
---|
537 | 0465 <span class="keyword">if</span> ~teststyle |
---|
538 | 0466 styleval=1; |
---|
539 | 0467 <span class="keyword">end</span> |
---|
540 | 0468 set(handles.ObjectStyle,<span class="string">'String'</span>,menu_style) |
---|
541 | 0469 set(handles.ObjectStyle,<span class="string">'Value'</span>,styleval) |
---|
542 | 0470 set(handles.ProjMode,<span class="string">'String'</span>,menu_proj) |
---|
543 | 0471 set(handles.ProjMode,<span class="string">'Value'</span>,1) |
---|
544 | 0472 <a href="#_sub3" class="code" title="subfunction ObjectStyle_Callback(hObject, eventdata, handles)">ObjectStyle_Callback</a>(hObject, eventdata, handles) |
---|
545 | 0473 |
---|
546 | 0474 <span class="comment">%---------------------------------------------</span> |
---|
547 | 0475 <a name="_sub9" href="#_subfunctions" class="code">function Phi_Callback(hObject, eventdata, handles)</a> |
---|
548 | 0476 <a href="#_sub11" class="code" title="subfunction update_slider(hObject, eventdata,handles)">update_slider</a>(hObject, eventdata,handles) |
---|
549 | 0477 <span class="comment">%---------------------------------------------</span> |
---|
550 | 0478 |
---|
551 | 0479 <a name="_sub10" href="#_subfunctions" class="code">function Theta_Callback(hObject, eventdata, handles)</a> |
---|
552 | 0480 <a href="#_sub11" class="code" title="subfunction update_slider(hObject, eventdata,handles)">update_slider</a>(hObject, eventdata,handles) |
---|
553 | 0481 |
---|
554 | 0482 <a name="_sub11" href="#_subfunctions" class="code">function update_slider(hObject, eventdata,handles)</a> |
---|
555 | 0483 <span class="comment">%rotation angles</span> |
---|
556 | 0484 Phi=(pi/180)*str2num(get(handles.Phi,<span class="string">'String'</span>));<span class="comment">%first Euler angle in radian</span> |
---|
557 | 0485 Theta=(pi/180)*str2num(get(handles.Theta,<span class="string">'String'</span>));<span class="comment">%second Euler angle in radian</span> |
---|
558 | 0486 |
---|
559 | 0487 <span class="comment">%components of the unitiy vector normal to the projection plane</span> |
---|
560 | 0488 NormVec_X=-sin(Phi)*sin(Theta); |
---|
561 | 0489 NormVec_Y=cos(Phi)*sin(Theta); |
---|
562 | 0490 NormVec_Z=cos(Theta); |
---|
563 | 0491 huvmat=findobj(<span class="string">'Tag'</span>,<span class="string">'uvmat'</span>);<span class="comment">%find the current uvmat interface handle</span> |
---|
564 | 0492 UvData=get(huvmat,<span class="string">'UserData'</span>);<span class="comment">%Data associated to the current uvmat interface</span> |
---|
565 | 0493 <span class="keyword">if</span> isfield(UvData,<span class="string">'X'</span>) & isfield(UvData,<span class="string">'Y'</span>) & isfield(UvData,<span class="string">'Z'</span>) |
---|
566 | 0494 Z=NormVec_X *(UvData.X)+NormVec_Y *(UvData.Y)+NormVec_Z *(UvData.Z); |
---|
567 | 0495 set(handles.z_slider,<span class="string">'Min'</span>,min(Z)) |
---|
568 | 0496 set(handles.z_slider,<span class="string">'Max'</span>,max(Z)) |
---|
569 | 0497 <a href="#_sub21" class="code" title="subfunction ZMax_Callback(hObject, eventdata, handles)">ZMax_Callback</a>(hObject, eventdata, handles) |
---|
570 | 0498 <span class="keyword">end</span> |
---|
571 | 0499 |
---|
572 | 0500 <a name="_sub12" href="#_subfunctions" class="code">function DX_Callback(hObject, eventdata, handles)</a> |
---|
573 | 0501 |
---|
574 | 0502 |
---|
575 | 0503 <a name="_sub13" href="#_subfunctions" class="code">function DY_Callback(hObject, eventdata, handles)</a> |
---|
576 | 0504 |
---|
577 | 0505 |
---|
578 | 0506 <a name="_sub14" href="#_subfunctions" class="code">function DZ_Callback(hObject, eventdata, handles)</a> |
---|
579 | 0507 |
---|
580 | 0508 |
---|
581 | 0509 |
---|
582 | 0510 <span class="comment">%-----------------------------------------------------</span> |
---|
583 | 0511 <span class="comment">% --- Executes on button press in OPEN.</span> |
---|
584 | 0512 <a name="_sub15" href="#_subfunctions" class="code">function OPEN_Callback(hObject, eventdata, handles)</a> |
---|
585 | 0513 <span class="comment">%get the object file</span> |
---|
586 | 0514 oldfile=<span class="string">' '</span>; |
---|
587 | 0515 huvmat=findobj(<span class="string">'Tag'</span>,<span class="string">'uvmat'</span>); |
---|
588 | 0516 <span class="comment">% if isempty(huvmat)</span> |
---|
589 | 0517 <span class="comment">% huvmat=findobj(allchild(0),'Name','series');</span> |
---|
590 | 0518 <span class="comment">% end</span> |
---|
591 | 0519 hchild=get(huvmat,<span class="string">'Children'</span>); |
---|
592 | 0520 hrootpath=findobj(hchild,<span class="string">'Tag'</span>,<span class="string">'RootPath'</span>); |
---|
593 | 0521 <span class="keyword">if</span> ~isempty(hrootpath) |
---|
594 | 0522 oldfile=get(hrootpath,<span class="string">'String'</span>); |
---|
595 | 0523 <span class="keyword">if</span> iscell(oldfile) |
---|
596 | 0524 oldfile=oldfile{1}; |
---|
597 | 0525 <span class="keyword">end</span> |
---|
598 | 0526 <span class="keyword">end</span> |
---|
599 | 0527 <span class="comment">%[FileName,PathName] = uigetfile('*.civ','Select a .civ file',oldfile)</span> |
---|
600 | 0528 [FileName, PathName, filterindex] = uigetfile( <span class="keyword">...</span> |
---|
601 | 0529 {<span class="string">'*.xml;*.mat'</span>, <span class="string">' (*.xml,*.mat)'</span>; |
---|
602 | 0530 <span class="string">'*.xml'</span>, <span class="string">'.xml files '</span>; <span class="keyword">...</span> |
---|
603 | 0531 <span class="string">'*.mat'</span>, <span class="string">'.mat matlab files '</span>}, <span class="keyword">...</span> |
---|
604 | 0532 <span class="string">'Pick a file'</span>,oldfile); |
---|
605 | 0533 fileinput=[PathName FileName];<span class="comment">%complete file name</span> |
---|
606 | 0534 testblank=findstr(fileinput,<span class="string">' '</span>);<span class="comment">%look for blanks</span> |
---|
607 | 0535 <span class="keyword">if</span> ~isempty(testblank) |
---|
608 | 0536 errordlg(<span class="string">'forbidden input file name: contain blanks'</span>) |
---|
609 | 0537 <span class="keyword">return</span> |
---|
610 | 0538 <span class="keyword">end</span> |
---|
611 | 0539 sizf=size(fileinput); |
---|
612 | 0540 <span class="keyword">if</span> (~ischar(fileinput)|~isequal(sizf(1),1)),<span class="keyword">return</span>;<span class="keyword">end</span> |
---|
613 | 0541 |
---|
614 | 0542 <span class="comment">%read the file</span> |
---|
615 | 0543 t=xmltree(fileinput); |
---|
616 | 0544 s=convert(t); |
---|
617 | 0545 <span class="keyword">if</span> ~isfield(s,<span class="string">'Style'</span>) |
---|
618 | 0546 s.Style=<span class="string">'points'</span>; |
---|
619 | 0547 <span class="keyword">end</span> |
---|
620 | 0548 <span class="keyword">if</span> ~isfield(s,<span class="string">'ProjMode'</span>) |
---|
621 | 0549 s.ProjMode=<span class="string">'none'</span>; |
---|
622 | 0550 <span class="keyword">end</span> |
---|
623 | 0551 <span class="comment">%Display title</span> |
---|
624 | 0552 title=<a href="set_title.html" class="code" title="function TITLE=set_title(Style,ProjMode)">set_title</a>(s.Style,s.ProjMode);<span class="comment">%update the title</span> |
---|
625 | 0553 <span class="keyword">if</span> ~isempty(huvmat) |
---|
626 | 0554 hhuvmat=guidata(huvmat); |
---|
627 | 0555 <span class="comment">% set(hhuvmat.POINTS,'Value',0)</span> |
---|
628 | 0556 <span class="comment">% set(hhuvmat.POINTS,'BackgroundColor',[0 1 0])%put unactivated buttons to green</span> |
---|
629 | 0557 <span class="comment">% set(hhuvmat.LINE,'Value',0)</span> |
---|
630 | 0558 <span class="comment">% set(hhuvmat.LINE,'BackgroundColor',[0 1 0])%put unactivated buttons to green</span> |
---|
631 | 0559 <span class="comment">% set(hhuvmat.PATCH,'Value',0)</span> |
---|
632 | 0560 <span class="comment">% set(hhuvmat.PATCH,'BackgroundColor',[0 1 0])%put unactivated buttons to green</span> |
---|
633 | 0561 <span class="comment">% set(hhuvmat.PLANE,'Value',0)</span> |
---|
634 | 0562 <span class="comment">% set(hhuvmat.PLANE,'BackgroundColor',[0 1 0])%put unactivated buttons to green</span> |
---|
635 | 0563 <span class="comment">% set(hhuvmat.VOLUME,'Value',0)</span> |
---|
636 | 0564 <span class="comment">% set(hhuvmat.VOLUME,'BackgroundColor',[0 1 0])%put unactivated buttons to green</span> |
---|
637 | 0565 <span class="comment">% if ~isequal(title,'MASK')</span> |
---|
638 | 0566 <span class="comment">% eval(['set(hhuvmat.' title ',''Value'',1)'])</span> |
---|
639 | 0567 <span class="comment">% eval(['set(hhuvmat.' title ',''BackgroundColor'',[1 1 0])'])</span> |
---|
640 | 0568 <span class="comment">% end</span> |
---|
641 | 0569 <span class="keyword">end</span> |
---|
642 | 0570 menu=get(handles.TITLE,<span class="string">'String'</span>); |
---|
643 | 0571 <span class="keyword">for</span> iline=1:length(menu) |
---|
644 | 0572 <span class="keyword">if</span> isequal(menu{iline},title) |
---|
645 | 0573 set(handles.TITLE,<span class="string">'Value'</span>,iline) |
---|
646 | 0574 <span class="keyword">break</span> |
---|
647 | 0575 <span class="keyword">end</span> |
---|
648 | 0576 <span class="keyword">end</span> |
---|
649 | 0577 <a href="#_sub8" class="code" title="subfunction TITLE_Callback(hObject, eventdata, handles)">TITLE_Callback</a>(hObject, eventdata, handles) |
---|
650 | 0578 teststyle=0; |
---|
651 | 0579 <span class="comment">% if isfield(s,'Style')</span> |
---|
652 | 0580 menu=get(handles.ObjectStyle,<span class="string">'String'</span>); |
---|
653 | 0581 <span class="keyword">for</span> iline=1:length(menu) |
---|
654 | 0582 <span class="keyword">if</span> isequal(menu{iline},s.Style) |
---|
655 | 0583 set(handles.ObjectStyle,<span class="string">'Value'</span>,iline) |
---|
656 | 0584 teststyle=1; |
---|
657 | 0585 <span class="keyword">break</span> |
---|
658 | 0586 <span class="keyword">end</span> |
---|
659 | 0587 <span class="keyword">end</span> |
---|
660 | 0588 testmode=0; |
---|
661 | 0589 menu=get(handles.ProjMode,<span class="string">'String'</span>); |
---|
662 | 0590 <span class="keyword">for</span> iline=1:length(menu) |
---|
663 | 0591 <span class="keyword">if</span> isequal(menu{iline},s.ProjMode) |
---|
664 | 0592 set(handles.ProjMode,<span class="string">'Value'</span>,iline) |
---|
665 | 0593 testmode=1; |
---|
666 | 0594 <span class="keyword">break</span> |
---|
667 | 0595 <span class="keyword">end</span> |
---|
668 | 0596 <span class="keyword">end</span> |
---|
669 | 0597 |
---|
670 | 0598 <a href="#_sub7" class="code" title="subfunction ProjMode_Callback(hObject, eventdata, handles)">ProjMode_Callback</a>(hObject, eventdata, handles);<span class="comment">%visualize the appropriate edit boxes</span> |
---|
671 | 0599 <span class="keyword">if</span> isfield(s,<span class="string">'CoordType'</span>) |
---|
672 | 0600 <span class="keyword">if</span> isequal(s.CoordType,<span class="string">'phys'</span>) |
---|
673 | 0601 set(handles.MenuCoord,<span class="string">'Value'</span>,1) |
---|
674 | 0602 <span class="keyword">elseif</span> isequal(s.CoordType,<span class="string">'px'</span>) |
---|
675 | 0603 set(handles.MenuCoord,<span class="string">'Value'</span>,2) |
---|
676 | 0604 <span class="keyword">else</span> |
---|
677 | 0605 warndlg(<span class="string">'unknown CoordType (px or phys) in set_object.m'</span>) |
---|
678 | 0606 <span class="keyword">end</span> |
---|
679 | 0607 <span class="keyword">end</span> |
---|
680 | 0608 <span class="keyword">if</span> isfield(s,<span class="string">'XMax'</span>) |
---|
681 | 0609 set(handles.XMax,<span class="string">'String'</span>,s.XMax) |
---|
682 | 0610 <span class="keyword">end</span> |
---|
683 | 0611 <span class="keyword">if</span> isfield(s,<span class="string">'XMin'</span>) |
---|
684 | 0612 set(handles.XMin,<span class="string">'String'</span>,s.XMin) |
---|
685 | 0613 <span class="keyword">end</span> |
---|
686 | 0614 <span class="keyword">if</span> isfield(s,<span class="string">'YMax'</span>) |
---|
687 | 0615 set(handles.YMax,<span class="string">'String'</span>,s.YMax) |
---|
688 | 0616 <span class="keyword">end</span> |
---|
689 | 0617 <span class="keyword">if</span> isfield(s,<span class="string">'YMin'</span>) |
---|
690 | 0618 set(handles.YMin,<span class="string">'String'</span>,s.YMin) |
---|
691 | 0619 <span class="keyword">end</span> |
---|
692 | 0620 Range=0; |
---|
693 | 0621 <span class="keyword">if</span> isfield(s,<span class="string">'Range'</span>) |
---|
694 | 0622 <span class="keyword">if</span> ischar(s.Range) |
---|
695 | 0623 Range=str2num(s.Range); |
---|
696 | 0624 <span class="keyword">else</span> |
---|
697 | 0625 Range(1,:)=str2num(s.Range{1}); |
---|
698 | 0626 Range(2,:)=str2num(s.Range{2}); |
---|
699 | 0627 <span class="keyword">end</span> |
---|
700 | 0628 <span class="keyword">end</span> |
---|
701 | 0629 <span class="keyword">if</span> size(Range,2)>=3 |
---|
702 | 0630 <span class="keyword">if</span> size(Range,1)>=2 |
---|
703 | 0631 set(handles.ZMin,<span class="string">'String'</span>,num2str(Range(2,3),3)) |
---|
704 | 0632 <span class="keyword">end</span> |
---|
705 | 0633 <span class="keyword">if</span> size(Range,1)>=2 |
---|
706 | 0634 set(handles.ZMax,<span class="string">'String'</span>,num2str(Range(1,3),3)) |
---|
707 | 0635 <span class="keyword">end</span> |
---|
708 | 0636 <span class="keyword">end</span> |
---|
709 | 0637 <span class="keyword">if</span> size(Range,2)>=2 |
---|
710 | 0638 <span class="keyword">if</span> size(Range,1)>=2 |
---|
711 | 0639 set(handles.YMin,<span class="string">'String'</span>,num2str(Range(2,2),3)) |
---|
712 | 0640 <span class="keyword">end</span> |
---|
713 | 0641 <span class="keyword">if</span> size(Range,1)>=2 |
---|
714 | 0642 set(handles.YMax,<span class="string">'String'</span>,num2str(Range(1,2),3)) |
---|
715 | 0643 <span class="keyword">end</span> |
---|
716 | 0644 <span class="keyword">end</span> |
---|
717 | 0645 <span class="keyword">if</span> size(Range,2)>=1 |
---|
718 | 0646 <span class="keyword">if</span> size(Range,1)>=2 |
---|
719 | 0647 set(handles.XMin,<span class="string">'String'</span>,num2str(Range(2,1),3)) |
---|
720 | 0648 <span class="keyword">end</span> |
---|
721 | 0649 <span class="keyword">if</span> size(Range,1)>=2 |
---|
722 | 0650 set(handles.XMax,<span class="string">'String'</span>,num2str(Range(1,1),3)) |
---|
723 | 0651 <span class="keyword">end</span> |
---|
724 | 0652 <span class="keyword">end</span> |
---|
725 | 0653 <span class="keyword">if</span> isfield(s,<span class="string">'RangeX'</span>) & ischar(s.RangeX) |
---|
726 | 0654 RangeX=str2num(s.RangeX); |
---|
727 | 0655 set(handles.XMax,<span class="string">'String'</span>,num2str(max(RangeX),3)) |
---|
728 | 0656 set(handles.XMin,<span class="string">'String'</span>,num2str(min(RangeX),3)) |
---|
729 | 0657 <span class="keyword">end</span> |
---|
730 | 0658 |
---|
731 | 0659 <span class="keyword">if</span> isfield(s,<span class="string">'RangeY'</span>) |
---|
732 | 0660 <span class="keyword">if</span> ischar(s.RangeY) |
---|
733 | 0661 RangeY=str2num(s.RangeY); |
---|
734 | 0662 set(handles.YMax,<span class="string">'String'</span>,num2str(max(RangeY),3)) |
---|
735 | 0663 set(handles.YMin,<span class="string">'String'</span>,num2str(min(RangeY),3)) |
---|
736 | 0664 <span class="keyword">end</span> |
---|
737 | 0665 <span class="keyword">end</span> |
---|
738 | 0666 <span class="keyword">if</span> isfield(s,<span class="string">'RangeZ'</span>) |
---|
739 | 0667 <span class="keyword">if</span> ischar(s.RangeZ) |
---|
740 | 0668 RangeZ=str2num(s.RangeZ); |
---|
741 | 0669 set(handles.ZMax,<span class="string">'String'</span>,num2str(max(RangeZ),3)) |
---|
742 | 0670 set(handles.ZMin,<span class="string">'String'</span>,num2str(min(RangeZ),3)) |
---|
743 | 0671 <span class="keyword">end</span> |
---|
744 | 0672 <span class="keyword">end</span> |
---|
745 | 0673 <span class="keyword">if</span> isfield(s,<span class="string">'Phi'</span>) |
---|
746 | 0674 set(handles.Phi,<span class="string">'String'</span>,s.Phi) |
---|
747 | 0675 <span class="keyword">end</span> |
---|
748 | 0676 <span class="keyword">if</span> isfield(s,<span class="string">'Theta'</span>) |
---|
749 | 0677 set(handles.Theta,<span class="string">'String'</span>,s.Theta) |
---|
750 | 0678 <span class="keyword">end</span> |
---|
751 | 0679 <span class="keyword">if</span> isfield(s,<span class="string">'Psi'</span>) |
---|
752 | 0680 set(handles.Psi,<span class="string">'String'</span>,s.Psi) |
---|
753 | 0681 <span class="keyword">end</span> |
---|
754 | 0682 |
---|
755 | 0683 <span class="keyword">if</span> isfield(s,<span class="string">'DX'</span>) |
---|
756 | 0684 set(handles.DX,<span class="string">'String'</span>,s.DX) |
---|
757 | 0685 <span class="keyword">end</span> |
---|
758 | 0686 <span class="keyword">if</span> isfield(s,<span class="string">'DY'</span>) |
---|
759 | 0687 set(handles.DY,<span class="string">'String'</span>,s.DY) |
---|
760 | 0688 <span class="keyword">end</span> |
---|
761 | 0689 <span class="keyword">if</span> ~isfield(s,<span class="string">'Coord'</span>) |
---|
762 | 0690 XObject=<span class="string">'0'</span>;<span class="comment">%default</span> |
---|
763 | 0691 YObject=<span class="string">'0'</span>; |
---|
764 | 0692 <span class="keyword">elseif</span> ischar(s.Coord) |
---|
765 | 0693 line=str2num(s.Coord); |
---|
766 | 0694 XObject=num2str(line(1),4); |
---|
767 | 0695 YObject=num2str(line(2),4); |
---|
768 | 0696 <span class="keyword">else</span> |
---|
769 | 0697 <span class="keyword">for</span> i=1:length(s.Coord) |
---|
770 | 0698 line=str2num(s.Coord{i}); |
---|
771 | 0699 XObject{i}=num2str(line(1),4); |
---|
772 | 0700 YObject{i}=num2str(line(2),4); |
---|
773 | 0701 <span class="keyword">end</span> |
---|
774 | 0702 <span class="keyword">end</span> |
---|
775 | 0703 set(handles.XObject,<span class="string">'String'</span>,XObject) |
---|
776 | 0704 set(handles.YObject,<span class="string">'String'</span>,YObject) |
---|
777 | 0705 <span class="comment">%METTRA A JOUR ASPECT DE L'INTERFACE (COMME set_object_Opening</span> |
---|
778 | 0706 |
---|
779 | 0707 <span class="comment">%----------------------------------------------------</span> |
---|
780 | 0708 <span class="comment">% executed when closing: set the parent interface button to value 0</span> |
---|
781 | 0709 <a name="_sub16" href="#_subfunctions" class="code">function closefcn(gcbo,eventdata,parent_button)</a> |
---|
782 | 0710 |
---|
783 | 0711 huvmat=findobj(allchild(0),<span class="string">'Name'</span>,<span class="string">'uvmat'</span>);<span class="comment">%find the current uvmat interface handle</span> |
---|
784 | 0712 <span class="keyword">if</span> ~isempty(huvmat) |
---|
785 | 0713 hhuvmat=guidata(huvmat); |
---|
786 | 0714 set(hhuvmat.create,<span class="string">'Value'</span>,0) |
---|
787 | 0715 set(hhuvmat.create,<span class="string">'BackgroundColor'</span>,[0 1 0])<span class="comment">%put unactivated buttons to green</span> |
---|
788 | 0716 <span class="comment">% set(hhuvmat.LINE,'Value',0)</span> |
---|
789 | 0717 <span class="comment">% set(hhuvmat.LINE,'BackgroundColor',[0 1 0])%put unactivated buttons to green</span> |
---|
790 | 0718 <span class="comment">% set(hhuvmat.PATCH,'Value',0)</span> |
---|
791 | 0719 <span class="comment">% set(hhuvmat.PATCH,'BackgroundColor',[0 1 0])%put unactivated buttons to green</span> |
---|
792 | 0720 <span class="comment">% set(hhuvmat.PLANE,'Value',0)</span> |
---|
793 | 0721 <span class="comment">% set(hhuvmat.PLANE,'BackgroundColor',[0 1 0])%put unactivated buttons to green</span> |
---|
794 | 0722 <span class="comment">% set(hhuvmat.VOLUME,'Value',0)</span> |
---|
795 | 0723 <span class="comment">% set(hhuvmat.VOLUME,'BackgroundColor',[0 1 0])%put unactivated buttons to green</span> |
---|
796 | 0724 set(hhuvmat.edit,<span class="string">'Value'</span>,0) |
---|
797 | 0725 set(hhuvmat.edit,<span class="string">'BackgroundColor'</span>,[0.7 0.7 0.7])<span class="comment">%put unactivated buttons to gree</span> |
---|
798 | 0726 <span class="keyword">end</span> |
---|
799 | 0727 hseries=findobj(allchild(0),<span class="string">'Name'</span>,<span class="string">'series'</span>);<span class="comment">%find the current series interface handle</span> |
---|
800 | 0728 <span class="keyword">if</span> ~isempty(hseries) |
---|
801 | 0729 hhseries=guidata(hseries); |
---|
802 | 0730 set(hhseries.GetObject,<span class="string">'Value'</span>,0) |
---|
803 | 0731 set(hhseries.GetObject,<span class="string">'BackgroundColor'</span>,[0 1 0])<span class="comment">%put unactivated buttons to green</span> |
---|
804 | 0732 <span class="keyword">end</span> |
---|
805 | 0733 |
---|
806 | 0734 <span class="comment">%-----------------------------------------------------------------------</span> |
---|
807 | 0735 <span class="comment">% --- Executes on button press in PLOT: PLOT the defined object and its projected field</span> |
---|
808 | 0736 <a name="_sub17" href="#_subfunctions" class="code">function PLOT_Callback(hObject, eventdata, handles)</a> |
---|
809 | 0737 |
---|
810 | 0738 hsetobject=get(handles.PLOT,<span class="string">'parent'</span>); |
---|
811 | 0739 SetData=get(hsetobject,<span class="string">'UserData'</span>);<span class="comment">%get the hidden interface data</span> |
---|
812 | 0740 huvmat=findobj(<span class="string">'Name'</span>,<span class="string">'uvmat'</span>);<span class="comment">%find the current uvmat interface handle</span> |
---|
813 | 0741 hlist_object=findobj(huvmat,<span class="string">'Tag'</span>,<span class="string">'list_object'</span>);<span class="comment">%handles of the object list in the GUI uvmat</span> |
---|
814 | 0742 IndexObj=get(hlist_object,<span class="string">'Value'</span>);<span class="comment">%position in the objet list</span> |
---|
815 | 0743 UvData=get(huvmat,<span class="string">'UserData'</span>);<span class="comment">%Data associated to the GUI uvmat</span> |
---|
816 | 0744 ObjectData=<a href="read_set_object.html" class="code" title="function data=read_set_object(handles)">read_set_object</a>(handles);<span class="comment">%read the input parameters defining the object in the GUI set_object</span> |
---|
817 | 0745 ObjectData.HandlesDisplay=[]; <span class="comment">% new object plot by default</span> |
---|
818 | 0746 <span class="keyword">if</span> length(UvData.Object) >= IndexObj && isfield(UvData.Object{IndexObj},<span class="string">'HandlesDisplay'</span>) |
---|
819 | 0747 hdisplay=UvData.Object{IndexObj}.HandlesDisplay; |
---|
820 | 0748 <span class="keyword">if</span> isequal(UvData.Object{IndexObj}.Style, ObjectData.Style) && isequal(UvData.Object{IndexObj}.ProjMode, ObjectData.ProjMode) |
---|
821 | 0749 ObjectData.HandlesDisplay=UvData.Object{IndexObj}.HandlesDisplay; |
---|
822 | 0750 <span class="keyword">else</span> <span class="comment">% for a new object styl, delete the existing object plots</span> |
---|
823 | 0751 <span class="keyword">for</span> ih=1:length(hdisplay) |
---|
824 | 0752 PlotData=get(hdisplay(ih),<span class="string">'UserData'</span>); |
---|
825 | 0753 <span class="keyword">if</span> isfield(PlotData,<span class="string">'SubObject'</span>) & ishandle(PlotData.SubObject) |
---|
826 | 0754 delete(PlotData.SubObject); |
---|
827 | 0755 <span class="keyword">end</span> |
---|
828 | 0756 <span class="keyword">if</span> isfield(PlotData,<span class="string">'DeformPoint'</span>) & ishandle(PlotData.DeformPoint) |
---|
829 | 0757 delete(PlotData.DeformPoint); |
---|
830 | 0758 <span class="keyword">end</span> |
---|
831 | 0759 <span class="keyword">if</span> ~isequal(hdisplay(ih),0) |
---|
832 | 0760 delete(hdisplay(ih)); |
---|
833 | 0761 <span class="keyword">end</span> |
---|
834 | 0762 <span class="keyword">end</span> |
---|
835 | 0763 <span class="keyword">if</span> isfield(ObjectData,<span class="string">'plotaxes'</span>) && ishandle(ObjectData.plotaxes) |
---|
836 | 0764 delete(ObjectData.plotaxes)<span class="comment">%delete the axes for plotting the current projection result</span> |
---|
837 | 0765 <span class="keyword">end</span> |
---|
838 | 0766 <span class="keyword">end</span> |
---|
839 | 0767 <span class="keyword">end</span> |
---|
840 | 0768 |
---|
841 | 0769 <span class="comment">% update the object plot and projection field</span> |
---|
842 | 0770 UvData.Object{IndexObj}=<a href="update_obj.html" class="code" title="function Object_out=update_obj(UvData,IndexObj,ObjectData,PlotHandles)">update_obj</a>(UvData,IndexObj,ObjectData,SetData.PlotHandles); |
---|
843 | 0771 |
---|
844 | 0772 set(huvmat,<span class="string">'UserData'</span>,UvData)<span class="comment">%update the data in the uvmat interface</span> |
---|
845 | 0773 list_str=get(hlist_object,<span class="string">'String'</span>); |
---|
846 | 0774 TITLE=<a href="set_title.html" class="code" title="function TITLE=set_title(Style,ProjMode)">set_title</a>(ObjectData.Style,ObjectData.ProjMode); |
---|
847 | 0775 list_str{IndexObj}=[num2str(IndexObj) <span class="string">'-'</span> TITLE]; |
---|
848 | 0776 <span class="keyword">if</span> isequal(length(list_str),IndexObj) |
---|
849 | 0777 list_str{IndexObj+1}=<span class="string">'more...'</span>; |
---|
850 | 0778 <span class="keyword">end</span> |
---|
851 | 0779 set(hlist_object,<span class="string">'String'</span>,list_str) |
---|
852 | 0780 set(hlist_object,<span class="string">'Value'</span>,IndexObj) |
---|
853 | 0781 |
---|
854 | 0782 <span class="comment">%update create buttons on the GUI uvmat: set to object edit mode after object plotting</span> |
---|
855 | 0783 hhuvmat=guidata(huvmat);<span class="comment">%handles of elements in the uvmat GUI</span> |
---|
856 | 0784 <span class="comment">%desactivate all create buttons in mode edit</span> |
---|
857 | 0785 <span class="comment">% if isequal(get(hhuvmat.edit,'Value'),0)</span> |
---|
858 | 0786 set(hhuvmat.create,<span class="string">'Value'</span>,0) |
---|
859 | 0787 set(hhuvmat.create,<span class="string">'BackgroundColor'</span>,[0 1 0])<span class="comment">%put unactivated buttons to green</span> |
---|
860 | 0788 <span class="comment">% set(hhuvmat.LINE,'Value',0)</span> |
---|
861 | 0789 <span class="comment">% set(hhuvmat.LINE,'BackgroundColor',[0 1 0])%put unactivated buttons to green</span> |
---|
862 | 0790 <span class="comment">% set(hhuvmat.PATCH,'Value',0)</span> |
---|
863 | 0791 <span class="comment">% set(hhuvmat.PATCH,'BackgroundColor',[0 1 0])%put unactivated buttons to green</span> |
---|
864 | 0792 <span class="comment">% set(hhuvmat.PLANE,'Value',0)</span> |
---|
865 | 0793 <span class="comment">% set(hhuvmat.PLANE,'BackgroundColor',[0 1 0])%put unactivated buttons to green</span> |
---|
866 | 0794 <span class="comment">% set(hhuvmat.VOLUME,'Value',0)</span> |
---|
867 | 0795 <span class="comment">% set(hhuvmat.VOLUME,'BackgroundColor',[0 1 0])%put unactivated buttons to green</span> |
---|
868 | 0796 <span class="comment">% end</span> |
---|
869 | 0797 set(hhuvmat.edit,<span class="string">'Value'</span>,1) |
---|
870 | 0798 set(hhuvmat.edit,<span class="string">'BackgroundColor'</span>,[1 1 0]);<span class="comment">% paint the edit text in yellow</span> |
---|
871 | 0799 set(hhuvmat.edit,<span class="string">'Value'</span>,1);<span class="comment">%</span> |
---|
872 | 0800 UvData.MouseAction=<span class="string">'edit_object'</span>; <span class="comment">% set the edit button to 'on'</span> |
---|
873 | 0801 set(huvmat,<span class="string">'UserData'</span>,UvData) |
---|
874 | 0802 |
---|
875 | 0803 <span class="comment">% --- Executes on button press in MenuCoord.</span> |
---|
876 | 0804 <a name="_sub18" href="#_subfunctions" class="code">function MenuCoord_Callback(hObject, eventdata, handles)</a> |
---|
877 | 0805 |
---|
878 | 0806 <span class="comment">%----------------------------------------------------</span> |
---|
879 | 0807 <a name="_sub19" href="#_subfunctions" class="code">function YMin_Callback(hObject, eventdata, handles)</a> |
---|
880 | 0808 |
---|
881 | 0809 |
---|
882 | 0810 <a name="_sub20" href="#_subfunctions" class="code">function ZMin_Callback(hObject, eventdata, handles)</a> |
---|
883 | 0811 |
---|
884 | 0812 |
---|
885 | 0813 <a name="_sub21" href="#_subfunctions" class="code">function ZMax_Callback(hObject, eventdata, handles)</a> |
---|
886 | 0814 DZ=str2num(get(handles.ZMax,<span class="string">'String'</span>)); |
---|
887 | 0815 ZMin=get(handles.z_slider,<span class="string">'Min'</span>); |
---|
888 | 0816 ZMax=get(handles.z_slider,<span class="string">'Max'</span>); |
---|
889 | 0817 <span class="keyword">if</span> ~isequal(ZMax-ZMin,0) |
---|
890 | 0818 rel_step(1)=DZ/(ZMax-ZMin); |
---|
891 | 0819 rel_step(2)=0.2; |
---|
892 | 0820 set(handles.z_slider,<span class="string">'SliderStep'</span>,rel_step) |
---|
893 | 0821 <span class="keyword">end</span> |
---|
894 | 0822 |
---|
895 | 0823 <a name="_sub22" href="#_subfunctions" class="code">function YMax_Callback(hObject, eventdata, handles)</a> |
---|
896 | 0824 |
---|
897 | 0825 |
---|
898 | 0826 <a name="_sub23" href="#_subfunctions" class="code">function XMin_Callback(hObject, eventdata, handles)</a> |
---|
899 | 0827 |
---|
900 | 0828 |
---|
901 | 0829 <a name="_sub24" href="#_subfunctions" class="code">function XMax_Callback(hObject, eventdata, handles)</a> |
---|
902 | 0830 |
---|
903 | 0831 |
---|
904 | 0832 <span class="comment">% ------------------------------------------------------</span> |
---|
905 | 0833 <a name="_sub25" href="#_subfunctions" class="code">function SAVE_Callback(hObject, eventdata, handles)</a> |
---|
906 | 0834 <span class="comment">% ------------------------------------------------------</span> |
---|
907 | 0835 Object=<a href="read_set_object.html" class="code" title="function data=read_set_object(handles)">read_set_object</a>(handles); |
---|
908 | 0836 huvmat=findobj(<span class="string">'Tag'</span>,<span class="string">'uvmat'</span>); |
---|
909 | 0837 <span class="comment">% UvData=get(huvmat,'UserData');</span> |
---|
910 | 0838 <span class="keyword">if</span> isempty(huvmat) |
---|
911 | 0839 huvmat=findobj(allchild(0),<span class="string">'Name'</span>,<span class="string">'series'</span>); |
---|
912 | 0840 <span class="keyword">end</span> |
---|
913 | 0841 hchild=get(huvmat,<span class="string">'Children'</span>); |
---|
914 | 0842 hrootpath=findobj(hchild,<span class="string">'Tag'</span>,<span class="string">'RootPath'</span>); |
---|
915 | 0843 <span class="keyword">if</span> isempty(hrootpath) |
---|
916 | 0844 RootPath=<span class="string">''</span>; |
---|
917 | 0845 <span class="keyword">else</span> |
---|
918 | 0846 RootPath=get(hrootpath,<span class="string">'String'</span>); |
---|
919 | 0847 <span class="keyword">if</span> iscell(RootPath) |
---|
920 | 0848 RootPath=RootPath{1}; |
---|
921 | 0849 <span class="keyword">end</span> |
---|
922 | 0850 <span class="keyword">end</span> |
---|
923 | 0851 title={<span class="string">'object name'</span>}; |
---|
924 | 0852 dir_save=uigetdir(RootPath); |
---|
925 | 0853 def={fullfile(dir_save,[<span class="string">'Object'</span> Object.CoordType <span class="string">'.xml'</span>])}; |
---|
926 | 0854 options.Resize=<span class="string">'on'</span>; |
---|
927 | 0855 displ_txt=<span class="string">'save object as an .xml file'</span>;<span class="comment">%default display</span> |
---|
928 | 0856 menu=get(handles.ProjMode,<span class="string">'String'</span>); |
---|
929 | 0857 value=get(handles.ProjMode,<span class="string">'Value'</span>); |
---|
930 | 0858 ProjMode=menu{value}; |
---|
931 | 0859 <span class="keyword">if</span> strcmp(ProjMode,<span class="string">'mask_inside'</span>)||strcmp(ProjMode,<span class="string">'mask_outside'</span>) |
---|
932 | 0860 displ_txt=<span class="string">'save mask contour as an .xml file: to create a mask image, use save_mask on the GUI uvmat (lower right)'</span>; |
---|
933 | 0861 <span class="keyword">end</span> |
---|
934 | 0862 answer=<a href="msgbox_uvmat.html" class="code" title="function varargout = msgbox_uvmat(varargin)">msgbox_uvmat</a>(<span class="string">'INPUT_TXT'</span>,<span class="string">'save object as an .xml file'</span>,def); |
---|
935 | 0863 <span class="comment">%answer=inputdlg('','save object in a new .xml file',1,def,'on');</span> |
---|
936 | 0864 <span class="keyword">if</span> ~isempty(answer) |
---|
937 | 0865 t=<a href="struct2xml.html" class="code" title="function t=struct2xml(Object,t,root_uid)">struct2xml</a>(Object); |
---|
938 | 0866 save(t,answer{1}) |
---|
939 | 0867 <span class="keyword">end</span> |
---|
940 | 0868 <a href="msgbox_uvmat.html" class="code" title="function varargout = msgbox_uvmat(varargin)">msgbox_uvmat</a>(<span class="string">'CONFIRMATION'</span>,[answer{1} <span class="string">' saved'</span>]) |
---|
941 | 0869 <span class="comment">%---------------------------------------------------------</span> |
---|
942 | 0870 <span class="comment">% --- Executes on slider movement.</span> |
---|
943 | 0871 <a name="_sub26" href="#_subfunctions" class="code">function z_slider_Callback(hObject, eventdata, handles)</a> |
---|
944 | 0872 <span class="comment">%---------------------------------------------------------</span> |
---|
945 | 0873 <span class="comment">%A ADAPTER</span> |
---|
946 | 0874 Z_value=get(handles.z_slider,<span class="string">'Value'</span>); |
---|
947 | 0875 |
---|
948 | 0876 <span class="comment">%rotation angles</span> |
---|
949 | 0877 Phi=(pi/180)*str2num(get(handles.Phi,<span class="string">'String'</span>));<span class="comment">%first Euler angle in radian</span> |
---|
950 | 0878 Theta=(pi/180)*str2num(get(handles.Theta,<span class="string">'String'</span>));<span class="comment">%second Euler angle in radian</span> |
---|
951 | 0879 |
---|
952 | 0880 <span class="comment">%components of the unity vector normal to the projection plane</span> |
---|
953 | 0881 NormVec_X=-sin(Phi)*sin(Theta); |
---|
954 | 0882 NormVec_Y=cos(Phi)*sin(Theta); |
---|
955 | 0883 NormVec_Z=cos(Theta); |
---|
956 | 0884 |
---|
957 | 0885 <span class="comment">%set new plane position and update graph</span> |
---|
958 | 0886 set(handles.XObject,<span class="string">'String'</span>,num2str(NormVec_X*Z_value,4)) |
---|
959 | 0887 set(handles.YObject,<span class="string">'String'</span>,num2str(NormVec_Y*Z_value,4)) |
---|
960 | 0888 set(handles.ZObject,<span class="string">'String'</span>,num2str(NormVec_Z*Z_value,4)) |
---|
961 | 0889 <a href="#_sub17" class="code" title="subfunction PLOT_Callback(hObject, eventdata, handles)">PLOT_Callback</a>(hObject, eventdata, handles) |
---|
962 | 0890 |
---|
963 | 0891 |
---|
964 | 0892 |
---|
965 | 0893 <a name="_sub27" href="#_subfunctions" class="code">function XObject_Callback(hObject, eventdata, handles)</a> |
---|
966 | 0894 |
---|
967 | 0895 |
---|
968 | 0896 <a name="_sub28" href="#_subfunctions" class="code">function YObject_Callback(hObject, eventdata, handles)</a> |
---|
969 | 0897 |
---|
970 | 0898 |
---|
971 | 0899 |
---|
972 | 0900 |
---|
973 | 0901 <a name="_sub29" href="#_subfunctions" class="code">function ZObject_Callback(hObject, eventdata, handles)</a> |
---|
974 | 0902 |
---|
975 | 0903 |
---|
976 | 0904 <span class="comment">% --- Executes on button press in HELP.</span> |
---|
977 | 0905 <a name="_sub30" href="#_subfunctions" class="code">function HELP_Callback(hObject, eventdata, handles)</a> |
---|
978 | 0906 path_to_uvmat=which (<span class="string">'uvmat'</span>);<span class="comment">% check the path of uvmat</span> |
---|
979 | 0907 pathelp=fileparts(path_to_uvmat); |
---|
980 | 0908 helpfile=fullfile(pathelp,<span class="string">'UVMAT_DOC'</span>,<span class="string">'uvmat_doc.html'</span>); |
---|
981 | 0909 <span class="keyword">if</span> isempty(dir(helpfile)), errordlg(<span class="string">'Please put the help file uvmat_doc.html in the directory UVMAT/UVMAT_DOC'</span>) |
---|
982 | 0910 <span class="keyword">else</span> |
---|
983 | 0911 web([helpfile <span class="string">'#set_object'</span>]) |
---|
984 | 0912 <span class="keyword">end</span> |
---|
985 | 0913 |
---|
986 | 0914 |
---|
987 | 0915 |
---|
988 | 0916</pre></div> |
---|
989 | <hr><address>Generated on Fri 13-Nov-2009 11:17:03 by <strong><a href="http://www.artefact.tk/software/matlab/m2html/">m2html</a></strong> © 2003</address> |
---|
990 | </body> |
---|
991 | </html> |
---|