[8] | 1 | %'plot_object': draws a projection object (points, line, plane...)
|
---|
| 2 | %-------------------------------------------------------------------
|
---|
| 3 | % function [ObjectData_out,hh]=plot_object(ObjectData,hplot,col)
|
---|
| 4 | %
|
---|
| 5 | %OUTPUT
|
---|
| 6 | % hh: handles of the graphic object (core part)
|
---|
| 7 | %
|
---|
| 8 | %INPUT:
|
---|
| 9 | %
|
---|
| 10 | % ObjectDataIn: structure representing the object properties:
|
---|
| 11 | % .Style : style of projection object
|
---|
| 12 | % .Coord: set of coordinates defining the object position;
|
---|
| 13 | % .ProjMode=type of projection ;
|
---|
| 14 | % .ProjAngle=angle of projection;
|
---|
| 15 | % .DX,.DY,.DZ=increments;
|
---|
| 16 | % .YMax,YMin: min and max Y
|
---|
| 17 | % ProjObject: projection object corresponding to the current plot (e. g. plane)
|
---|
| 18 | % hplot: handle of the object plot to modify or if it is an axis, the axis
|
---|
| 19 | % where the object must be plotted, or if it is a figure the plotting figure
|
---|
| 20 | % col: color of the plot, e;g; 'm', 'b' ..;
|
---|
| 21 |
|
---|
| 22 | %AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
---|
| 23 | % Copyright Joel Sommeria, 2008, LEGI / CNRS-UJF-INPG, sommeria@coriolis-legi.org.
|
---|
| 24 | %AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
---|
| 25 | % This file is part of the toolbox UVMAT.
|
---|
| 26 | %
|
---|
| 27 | % UVMAT is free software; you can redistribute it and/or modify
|
---|
| 28 | % it under the terms of the GNU General Public License as published by
|
---|
| 29 | % the Free Software Foundation; either version 2 of the License, or
|
---|
| 30 | % (at your option) any later version.
|
---|
| 31 | %
|
---|
| 32 | % UVMAT is distributed in the hope that it will be useful,
|
---|
| 33 | % but WITHOUT ANY WARRANTY; without even the implied warranty of
|
---|
| 34 | % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
---|
| 35 | % GNU General Public License (file UVMAT/COPYING.txt) for more details.
|
---|
| 36 | %AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
---|
| 37 |
|
---|
| 38 | function [hh]=plot_object(ObjectDataIn,ProjObject,hplot,col)
|
---|
[156] | 39 | %% default output
|
---|
[8] | 40 | hh=[];%default output
|
---|
| 41 | if isequal(ProjObject,ObjectDataIn)% object representation does not appear in its own projection plot
|
---|
| 42 | return
|
---|
| 43 | end
|
---|
| 44 | if ~isfield(ProjObject,'Style')
|
---|
| 45 | ObjectData=ObjectDataIn;
|
---|
| 46 | elseif isequal(ProjObject.Style,'plane')
|
---|
| 47 | ObjectData=ObjectDataIn;% TODO: modify take into account rotation of axis
|
---|
| 48 | else
|
---|
[183] | 49 | return % object representation only available in a plane
|
---|
[8] | 50 | end
|
---|
[156] | 51 | if ~isfield(ObjectData,'Style')||isempty(ObjectData.Style)||~ischar(ObjectData.Style)
|
---|
[38] | 52 | msgbox_uvmat('ERROR','undefined ObjectData.Style in plot_object.m')
|
---|
[8] | 53 | return
|
---|
| 54 | end
|
---|
[156] | 55 | if ~isfield(ObjectData,'Style')||isempty(ObjectData.Style)||~ischar(ObjectData.Style)
|
---|
[38] | 56 | msgbox_uvmat('ERROR','undefined ObjectData.Style in plot_object.m')
|
---|
[8] | 57 | return
|
---|
| 58 | end
|
---|
| 59 | XMin=0;%default
|
---|
| 60 | XMax=0;
|
---|
| 61 | YMin=0;
|
---|
| 62 | YMax=0;
|
---|
| 63 | ZMin=0;
|
---|
| 64 | ZMax=0;
|
---|
| 65 |
|
---|
[156] | 66 | %% determine the plotting axes (with handle 'haxes')
|
---|
[8] | 67 | test_newobj=1;
|
---|
| 68 | if ishandle(hplot)
|
---|
[156] | 69 | if isequal(get(hplot,'Tag'),'proj_object')% hplot is the handle of an object representation
|
---|
[8] | 70 | test_newobj=0;
|
---|
| 71 | haxes=get(hplot,'parent');
|
---|
[156] | 72 | elseif isequal(get(hplot,'Type'),'axes')% hplot is the handle of an axis
|
---|
| 73 | currentfig=get(hplot,'parent');
|
---|
| 74 | set(0,'CurrentFigure',currentfig)
|
---|
[8] | 75 | haxes=hplot;
|
---|
[156] | 76 | set(currentfig,'CurrentAxes',haxes);
|
---|
| 77 | elseif isequal(get(hplot,'Type'),'figure')% hplot is the handle of a figure
|
---|
| 78 | set(0,'CurrentFigure',hplot);%set the input figure as the current one
|
---|
[8] | 79 | haxes=findobj(hplot,'Type','axes');%look for axes in the figure
|
---|
| 80 | haxes=haxes(1);
|
---|
[156] | 81 | set(hplot,'CurrentAxes',haxes);%set the first found axis as the current one
|
---|
[8] | 82 | else
|
---|
| 83 | figure; %create new figure
|
---|
| 84 | hplot=axes;%create new axes
|
---|
| 85 | haxes=hplot;
|
---|
| 86 | end
|
---|
| 87 | else
|
---|
| 88 | figure; %create new figure
|
---|
| 89 | hplot=axes;%create new axes
|
---|
| 90 | haxes=hplot;
|
---|
| 91 | end
|
---|
| 92 |
|
---|
[156] | 93 | %% default input parameters
|
---|
[177] | 94 | if ~isfield(ObjectData,'ProjMode')||isempty(ObjectData.ProjMode)
|
---|
[8] | 95 | ObjectData.ProjMode='projection';%default
|
---|
| 96 | end
|
---|
[177] | 97 | if ~isfield(ObjectData,'Coord')||isempty(ObjectData.Coord)
|
---|
[8] | 98 | ObjectData.Coord=[0 0 0];%default
|
---|
| 99 | end
|
---|
[177] | 100 | if ~isfield(ObjectData,'Phi')||isempty(ObjectData.Phi)
|
---|
[8] | 101 | ObjectData.Phi=0;%default
|
---|
| 102 | end
|
---|
| 103 | if ~isfield(ObjectData,'Range')
|
---|
| 104 | ObjectData.Range(1,1)=0; %edfault
|
---|
| 105 | end
|
---|
| 106 | if size(ObjectData.Range,2)>=2
|
---|
| 107 | YMax=ObjectData.Range(1,2);%default
|
---|
| 108 | end
|
---|
| 109 | if size(ObjectData.Range,2)>=2 & size(ObjectData.Range,1)>=2
|
---|
| 110 | YMin=ObjectData.Range(2,2);
|
---|
| 111 | else
|
---|
| 112 | YMin=0;
|
---|
| 113 | end
|
---|
| 114 | XMax=ObjectData.Range(1,1);
|
---|
| 115 | if size(ObjectData.Range,1)>=2
|
---|
| 116 | XMin=ObjectData.Range(2,1);
|
---|
| 117 | end
|
---|
| 118 | if isfield(ObjectData,'RangeX')
|
---|
| 119 | XMax=max(ObjectData.RangeX);
|
---|
| 120 | XMin=min(ObjectData.RangeX);
|
---|
| 121 | end
|
---|
| 122 | if isfield(ObjectData,'RangeY')
|
---|
| 123 | YMax=max(ObjectData.RangeY);
|
---|
| 124 | YMin=min(ObjectData.RangeY);
|
---|
| 125 | end
|
---|
| 126 | if isfield(ObjectData,'RangeZ')
|
---|
| 127 | ZMax=max(ObjectData.RangeZ);
|
---|
| 128 | ZMin=min(ObjectData.RangeZ);
|
---|
| 129 | end
|
---|
| 130 | if isequal(ObjectData.Style,'points')&isequal(ObjectData.ProjMode,'projection')
|
---|
| 131 | YMax=max(XMax,YMax);
|
---|
| 132 | YMax=max(YMax,ZMax);
|
---|
[177] | 133 | elseif isequal(ObjectData.Style,'rectangle')||isequal(ObjectData.Style,'ellipse')||isequal(ObjectData.Style,'volume')
|
---|
[8] | 134 | if isequal(YMax,0)
|
---|
| 135 | ylim=get(haxes,'YLim');
|
---|
| 136 | YMax=(ylim(2)-ylim(1))/100;
|
---|
| 137 | end
|
---|
| 138 | if isequal(XMax,0)
|
---|
| 139 | XMax=YMax;%default
|
---|
| 140 | end
|
---|
| 141 | elseif isequal(ObjectData.Style,'plane')
|
---|
| 142 | if isequal(XMax,0)
|
---|
| 143 | xlim=get(haxes,'XLim');
|
---|
| 144 | XMax=xlim(2);
|
---|
| 145 | end
|
---|
| 146 | if isequal(YMax,0)
|
---|
| 147 | ylim=get(haxes,'YLim');
|
---|
| 148 | YMax=ylim(2);
|
---|
| 149 | end
|
---|
| 150 | end
|
---|
| 151 | sizcoord=size(ObjectData.Coord);
|
---|
| 152 |
|
---|
[156] | 153 | %% determine the coordinates xline, yline,xsup,xinf, yinf,ysup determining the new object plot
|
---|
[8] | 154 | test_line= isequal(ObjectData.Style,'points')|isequal(ObjectData.Style,'line')|isequal(ObjectData.Style,'polyline')|...
|
---|
| 155 | isequal(ObjectData.Style,'polygon')| isequal(ObjectData.Style,'plane')| isequal(ObjectData.Style,'volume');
|
---|
| 156 | test_patch=isequal(ObjectData.ProjMode,'inside')||isequal(ObjectData.ProjMode,'outside')||isequal(ObjectData.Style,'volume')...
|
---|
| 157 | ||isequal(ObjectData.ProjMode,'mask_inside')||isequal(ObjectData.ProjMode,'mask_outside');
|
---|
| 158 | if test_line
|
---|
| 159 | xline=ObjectData.Coord(:,1);
|
---|
| 160 | yline=ObjectData.Coord(:,2);
|
---|
[177] | 161 | nbpoints=numel(xline);
|
---|
[8] | 162 | if isequal(ObjectData.Style,'polygon')
|
---|
| 163 | xline=[xline; ObjectData.Coord(1,1)];%closing the line
|
---|
| 164 | yline=[yline; ObjectData.Coord(1,2)];
|
---|
[177] | 165 | elseif isequal(ObjectData.Style,'plane')|| isequal(ObjectData.Style,'volume')
|
---|
[8] | 166 | phi=ObjectData.Phi*pi/180;%angle in radians
|
---|
| 167 | Xend_x=xline(1)+XMax*cos(phi);
|
---|
| 168 | Xend_y=yline(1)+XMax*sin(phi);
|
---|
| 169 | Xbeg_x=xline(1)+XMin*cos(phi);
|
---|
| 170 | Xbeg_y=yline(1)+XMin*sin(phi);
|
---|
| 171 | Yend_x=xline(1)-YMax*sin(phi);
|
---|
| 172 | Yend_y=yline(1)+YMax*cos(phi);
|
---|
| 173 | Ybeg_x=xline(1)-YMin*sin(phi);
|
---|
| 174 | Ybeg_y=yline(1)+YMin*cos(phi);
|
---|
| 175 | xline=[Xbeg_x Xend_x NaN Ybeg_x Yend_x];
|
---|
| 176 | yline=[Xbeg_y Xend_y NaN Ybeg_y Yend_y];
|
---|
| 177 | end
|
---|
| 178 | SubLineStyle='none';%default
|
---|
| 179 | if isfield(ObjectData,'ProjMode')
|
---|
| 180 | if isequal(ObjectData.ProjMode,'projection')
|
---|
| 181 | SubLineStyle='--'; %range of projection marked by dash
|
---|
| 182 | if isfield (ObjectData,'DX')
|
---|
[177] | 183 | ObjectData=rmfield(ObjectData,'DX');
|
---|
[8] | 184 | end
|
---|
| 185 | if isfield (ObjectData,'DY')
|
---|
[177] | 186 | ObjectData=rmfield(ObjectData,'DY');
|
---|
[8] | 187 | end
|
---|
| 188 | elseif isequal(ObjectData.ProjMode,'filter')
|
---|
| 189 | SubLineStyle=':';%range of projection not visible
|
---|
| 190 | end
|
---|
| 191 | end
|
---|
[177] | 192 | if isequal(ObjectData.Style,'line')||isequal(ObjectData.Style,'polyline')||isequal(ObjectData.Style,'polygon')
|
---|
[8] | 193 | if length(xline)<2
|
---|
| 194 | theta=0;
|
---|
| 195 | else
|
---|
[187] | 196 | theta=angle(diff(xline)+1i*diff(yline));
|
---|
[8] | 197 | theta(length(xline))=theta(length(xline)-1);
|
---|
| 198 | end
|
---|
| 199 | xsup(1)=xline(1)+YMax*sin(theta(1));
|
---|
| 200 | xinf(1)=xline(1)-YMax*sin(theta(1));
|
---|
| 201 | ysup(1)=yline(1)-YMax*cos(theta(1));
|
---|
| 202 | yinf(1)=yline(1)+YMax*cos(theta(1));
|
---|
| 203 | for ip=2:length(xline)
|
---|
| 204 | xsup(ip)=xline(ip)+YMax*sin((theta(ip)+theta(ip-1))/2)/cos((theta(ip-1)-theta(ip))/2);
|
---|
| 205 | xinf(ip)=xline(ip)-YMax*sin((theta(ip)+theta(ip-1))/2)/cos((theta(ip-1)-theta(ip))/2);
|
---|
| 206 | ysup(ip)=yline(ip)-YMax*cos((theta(ip)+theta(ip-1))/2)/cos((theta(ip-1)-theta(ip))/2);
|
---|
| 207 | yinf(ip)=yline(ip)+YMax*cos((theta(ip)+theta(ip-1))/2)/cos((theta(ip-1)-theta(ip))/2);
|
---|
| 208 | end
|
---|
| 209 | end
|
---|
| 210 | end
|
---|
| 211 |
|
---|
[156] | 212 | %% shading image
|
---|
[8] | 213 | if test_patch
|
---|
| 214 | npMx=512;
|
---|
| 215 | npMy=512;
|
---|
| 216 | flag=zeros(npMy,npMx);
|
---|
| 217 | if isequal(ObjectData.Style,'ellipse')
|
---|
| 218 | XimaMin=ObjectData.Coord(1,1)-XMax;
|
---|
| 219 | XimaMax=ObjectData.Coord(1,1)+XMax;
|
---|
| 220 | YimaMin=ObjectData.Coord(1,2)-YMax;
|
---|
| 221 | YimaMax=ObjectData.Coord(1,2)+YMax;
|
---|
| 222 | xlim=[1.2*XimaMin-0.2*XimaMax 1.2*XimaMax-0.2*XimaMin];%create an image around the ellipse
|
---|
| 223 | ylim=[1.2*YimaMin-0.2*YimaMax 1.2*YimaMax-0.2*YimaMin];
|
---|
| 224 | scale_x=2*1.4*XMax/npMx;
|
---|
| 225 | scale_y=2*1.4*YMax/npMy;
|
---|
[177] | 226 | xi=(0.5:npMx-0.5)*scale_x+xlim(1);
|
---|
| 227 | yi=(0.5:npMy-0.5)*scale_y+ylim(1);
|
---|
[8] | 228 | [Xi,Yi]=meshgrid(xi,yi);
|
---|
| 229 | X2Max=XMax*XMax;
|
---|
| 230 | Y2Max=YMax*YMax;
|
---|
| 231 | distX=(Xi-ObjectData.Coord(1,1));
|
---|
| 232 | distY=(Yi-ObjectData.Coord(1,2));
|
---|
| 233 | flag=(distX.*distX/X2Max+distY.*distY/Y2Max)<1;
|
---|
[177] | 234 | elseif isequal(ObjectData.Style,'rectangle')||isequal(ObjectData.Style,'volume')
|
---|
[8] | 235 | XimaMin=ObjectData.Coord(1,1)-XMax;
|
---|
| 236 | XimaMax=ObjectData.Coord(1,1)+XMax;
|
---|
| 237 | YimaMin=ObjectData.Coord(1,2)-YMax;
|
---|
| 238 | YimaMax=ObjectData.Coord(1,2)+YMax;
|
---|
| 239 | xlim=[1.2*XimaMin-0.2*XimaMax 1.2*XimaMax-0.2*XimaMin];%create an image around the ellipse
|
---|
| 240 | ylim=[1.2*YimaMin-0.2*YimaMax 1.2*YimaMax-0.2*YimaMin];
|
---|
| 241 | scale_x=2*1.4*XMax/npMx;
|
---|
| 242 | scale_y=2*1.4*YMax/npMy;
|
---|
[177] | 243 | xi=(0.5:npMx-0.5)*scale_x+xlim(1);
|
---|
| 244 | yi=(0.5:npMy-0.5)*scale_y+ylim(1);
|
---|
[8] | 245 | [Xi,Yi]=meshgrid(xi,yi);
|
---|
| 246 | distX=abs(Xi-ObjectData.Coord(1,1));
|
---|
| 247 | distY=abs(Yi-ObjectData.Coord(1,2));
|
---|
| 248 | flag=distX<XMax & distY< YMax;
|
---|
| 249 | elseif isequal(ObjectData.Style,'polygon')
|
---|
| 250 | XimaMin=min(ObjectData.Coord(:,1));
|
---|
| 251 | XimaMax=max(ObjectData.Coord(:,1));
|
---|
| 252 | YimaMin=min(ObjectData.Coord(:,2));
|
---|
| 253 | YimaMax=max(ObjectData.Coord(:,2));
|
---|
| 254 | xlim=[1.2*XimaMin-0.2*XimaMax 1.2*XimaMax-0.2*XimaMin];
|
---|
| 255 | ylim=[1.2*YimaMin-0.2*YimaMax 1.2*YimaMax-0.2*YimaMin];
|
---|
| 256 | [Xlim,Ylim]=meshgrid(linspace(xlim(1),xlim(2),npMx),linspace(ylim(1),ylim(2),npMy));
|
---|
| 257 | %flag=roipoly(xlim,ylim,flag,ObjectData.Coord(:,1),ObjectData.Coord(:,2));%=1 inside the polygon, 0 outsid
|
---|
| 258 | flag=inpolygon(Xlim,Ylim,ObjectData.Coord(:,1),ObjectData.Coord(:,2));%=1 inside the polygon, 0 outsid
|
---|
| 259 | end
|
---|
| 260 | if isequal(ObjectData.ProjMode,'outside')||isequal(ObjectData.ProjMode,'mask_outside')
|
---|
| 261 | flag=~flag;
|
---|
| 262 | end
|
---|
| 263 | imflag=zeros(npMx,npMy,3);
|
---|
| 264 | imflag(:,:,3)=flag; % blue color
|
---|
| 265 | if isequal(col,'m')
|
---|
| 266 | imflag(:,:,1)=flag; % magenta color
|
---|
| 267 | end
|
---|
| 268 | dx=(xlim(2)-xlim(1))/npMx;
|
---|
| 269 | dy=(ylim(2)-ylim(1))/npMy;
|
---|
| 270 | end
|
---|
| 271 |
|
---|
| 272 | PlotData=[];%default
|
---|
[177] | 273 |
|
---|
[156] | 274 | %% MODIFY AN EXISTING OBJECT PLOT
|
---|
[8] | 275 | if test_newobj==0;
|
---|
| 276 | hh=hplot;
|
---|
| 277 | PlotData=get(hplot,'UserData');
|
---|
| 278 | if test_line
|
---|
| 279 | set(hplot,'XData',xline)
|
---|
| 280 | set(hplot,'YData',yline)
|
---|
| 281 | %modify subobjects
|
---|
| 282 | if isfield(PlotData,'SubObject')
|
---|
| 283 | if length(PlotData.SubObject)==2 && ~isequal(ObjectData.Style,'points')&& ~isequal(ObjectData.Style,'plane');
|
---|
| 284 | set(PlotData.SubObject(1),'XData',xinf);
|
---|
| 285 | set(PlotData.SubObject(1),'YData',yinf);
|
---|
| 286 | set(PlotData.SubObject(2),'XData',xsup);
|
---|
| 287 | set(PlotData.SubObject(2),'YData',ysup);
|
---|
| 288 | elseif isequal(ObjectData.Style,'points')&& ~isequal(YMax,0)
|
---|
| 289 | for ipt=1:min(length(PlotData.SubObject),size(ObjectData.Coord,1))
|
---|
| 290 | set(PlotData.SubObject(ipt),'Position',[ObjectData.Coord(ipt,1)-YMax ObjectData.Coord(ipt,2)-YMax 2*YMax 2*YMax])
|
---|
| 291 | end
|
---|
| 292 | %complement missing points
|
---|
| 293 | if size(ObjectData.Coord,1)>length(PlotData.SubObject)
|
---|
| 294 | for ipt=length(PlotData.SubObject)+1:size(ObjectData.Coord,1)
|
---|
| 295 | PlotData.SubObject(ipt)=rectangle('Curvature',[1 1],...
|
---|
| 296 | 'Position',[ObjectData.Coord(ipt,1)-YMax ObjectData.Coord(ipt,2)-YMax 2*YMax 2*YMax],'EdgeColor',col,...
|
---|
| 297 | 'LineStyle',SubLineStyle,'Tag','proj_object');
|
---|
| 298 | end
|
---|
| 299 | end
|
---|
| 300 | end
|
---|
| 301 | end
|
---|
| 302 | if isfield(PlotData,'DeformPoint')
|
---|
| 303 | for ipt=1:length(PlotData.DeformPoint)
|
---|
| 304 | if ishandle(PlotData.DeformPoint(ipt))
|
---|
[177] | 305 | if nbpoints>=ipt
|
---|
[8] | 306 | set(PlotData.DeformPoint(ipt),'XData',xline(ipt),'YData',yline(ipt));
|
---|
| 307 | end
|
---|
| 308 | end
|
---|
| 309 | end
|
---|
[177] | 310 | if nbpoints>length(PlotData.DeformPoint)
|
---|
| 311 | for ipt=length(PlotData.DeformPoint)+1:nbpoints
|
---|
[8] | 312 | PlotData.DeformPoint(ipt)=line(xline(ipt),yline(ipt),'Color',col,'LineStyle','.','Tag','DeformPoint',...
|
---|
| 313 | 'SelectionHighlight','off','UserData',hplot);
|
---|
| 314 | end
|
---|
| 315 | set(hplot,'UserData',PlotData)
|
---|
| 316 | end
|
---|
| 317 | end
|
---|
[177] | 318 | elseif isequal(ObjectData.Style,'rectangle')||isequal(ObjectData.Style,'ellipse')
|
---|
[8] | 319 | set(hplot,'Position',[ObjectData.Coord(1,1)-XMax ObjectData.Coord(1,2)-YMax 2*XMax 2*YMax])
|
---|
| 320 | end
|
---|
| 321 | if test_patch
|
---|
| 322 | for iobj=1:length(PlotData.SubObject)
|
---|
| 323 | objtype=get(PlotData.SubObject(iobj),'Type');
|
---|
| 324 | if isequal(objtype,'image')
|
---|
| 325 | set(PlotData.SubObject(iobj),'CData',imflag,'AlphaData',(flag)*0.2)
|
---|
| 326 | set(PlotData.SubObject(iobj),'XData',[xlim(1)+dx/2 xlim(2)-dx/2])
|
---|
| 327 | set(PlotData.SubObject(iobj),'YData',[ylim(1)+dy/2 ylim(2)-dy/2])
|
---|
| 328 | end
|
---|
| 329 | end
|
---|
| 330 | end
|
---|
| 331 | end
|
---|
| 332 |
|
---|
[156] | 333 | %% create the object
|
---|
[8] | 334 | if test_newobj
|
---|
| 335 | axes(haxes)
|
---|
| 336 | hother=findobj('Tag','proj_object');%find all the proj objects
|
---|
| 337 | for iobj=1:length(hother)
|
---|
[177] | 338 | if strcmp(get(hother(iobj),'Type'),'rectangle')|| strcmp(get(hother(iobj),'Type'),'patch')
|
---|
[8] | 339 | set(hother(iobj),'EdgeColor','b')
|
---|
| 340 | if isequal(get(hother(iobj),'FaceColor'),'m')
|
---|
| 341 | set(hother(iobj),'FaceColor','b')
|
---|
| 342 | end
|
---|
| 343 | elseif isequal(get(hother(iobj),'Type'),'image')
|
---|
| 344 | Acolor=get(hother(iobj),'CData');
|
---|
| 345 | Acolor(:,:,1)=zeros(size(Acolor,1),size(Acolor,2));
|
---|
| 346 | set(hother(iobj),'CData',Acolor);
|
---|
| 347 | else
|
---|
| 348 | set(hother(iobj),'Color','b')
|
---|
| 349 | end
|
---|
| 350 | set(hother(iobj),'Selected','off')
|
---|
| 351 | end
|
---|
| 352 | hother=findobj('Tag','DeformPoint');
|
---|
| 353 | set(hother,'Color','b');
|
---|
| 354 | set(hother,'Selected','off')
|
---|
| 355 | if isequal(ObjectData.Style,'points')
|
---|
| 356 | hh=line(ObjectData.Coord(:,1),ObjectData.Coord(:,2),'Color',col,'LineStyle','.','Marker','+');
|
---|
| 357 | for ipt=1:length(xline)
|
---|
| 358 | PlotData.DeformPoint(ipt)=line(ObjectData.Coord(ipt,1),ObjectData.Coord(ipt,2),'Color',...
|
---|
| 359 | col,'LineStyle','.','SelectionHighlight','off','UserData',hh,'Tag','DeformPoint');
|
---|
| 360 | %create circle around each point
|
---|
| 361 | if ~isequal(YMax,0)
|
---|
| 362 | PlotData.SubObject(ipt)=rectangle('Curvature',[1 1],...
|
---|
| 363 | 'Position',[ObjectData.Coord(ipt,1)-YMax ObjectData.Coord(ipt,2)-YMax 2*YMax 2*YMax],'EdgeColor',col,...
|
---|
| 364 | 'LineStyle',SubLineStyle,'Tag','proj_object');
|
---|
| 365 | end
|
---|
| 366 | end
|
---|
[177] | 367 | elseif strcmp(ObjectData.Style,'line')||strcmp(ObjectData.Style,'polyline')||...
|
---|
| 368 | strcmp(ObjectData.Style,'polygon') ||strcmp(ObjectData.Style,'plane')||strcmp(ObjectData.Style,'volume')% (isequal(ObjectData.Style,'polygon') & ~test_patch) |isequal(ObjectData.Style,'plane')
|
---|
[8] | 369 | hh=line(xline,yline,'Color',col);
|
---|
[177] | 370 | if ~strcmp(ObjectData.Style,'plane') && ~strcmp(ObjectData.Style,'volume')
|
---|
| 371 | PlotData.SubObject(1)=line(xinf,yinf,'Color',col,'LineStyle',SubLineStyle,'Tag','proj_object');%draw sub-lines
|
---|
| 372 | PlotData.SubObject(2)=line(xsup,ysup,'Color',col,'LineStyle',SubLineStyle,'Tag','proj_object');
|
---|
[8] | 373 | for ipt=1:sizcoord(1)
|
---|
| 374 | PlotData.DeformPoint(ipt)=line(ObjectData.Coord(ipt,1),ObjectData.Coord(ipt,2),'Color',...
|
---|
| 375 | col,'LineStyle','none','Marker','.','Tag','DeformPoint','SelectionHighlight','off','UserData',hh);
|
---|
| 376 | end
|
---|
| 377 | end
|
---|
| 378 |
|
---|
[177] | 379 | elseif strcmp(ObjectData.Style,'rectangle')
|
---|
[8] | 380 | hh=rectangle('Position',[ObjectData.Coord(1,1)-XMax ObjectData.Coord(1,2)-YMax 2*XMax 2*YMax],'EdgeColor',col);
|
---|
[177] | 381 | elseif strcmp(ObjectData.Style,'ellipse')
|
---|
[8] | 382 | hh=rectangle('Curvature',[1 1],'Position',[ObjectData.Coord(1,1)-XMax ObjectData.Coord(1,2)-YMax 2*XMax 2*YMax],'EdgeColor',col);
|
---|
| 383 | else
|
---|
[38] | 384 | msgbox_uvmat('ERROR','unknown ObjectData.Style in plot_object.m')
|
---|
[8] | 385 | return
|
---|
| 386 | end
|
---|
| 387 | set(hh,'Tag','proj_object')
|
---|
[187] | 388 | if test_patch
|
---|
| 389 | hold on
|
---|
[8] | 390 | hhh=image([xlim(1)+dx/2 xlim(2)-dx/2],[ylim(1)+dy/2 ylim(2)-dy/2],imflag,'Tag','proj_object','HitTest','off');
|
---|
[187] | 391 | set(hhh,'AlphaData',(flag)*0.2)% set partial transparency to the filling color
|
---|
| 392 | PlotData.SubObject=hhh;
|
---|
| 393 | end
|
---|
[8] | 394 | if isfield(PlotData,'SubObject')
|
---|
| 395 | set(PlotData.SubObject,'UserData',hh)%record the parent handles in the SubObjects
|
---|
| 396 | end
|
---|
| 397 | if isfield(PlotData,'DeformPoint')
|
---|
| 398 | for ipt=1:sizcoord(1)
|
---|
| 399 | set(PlotData.DeformPoint(ipt),'UserData',hh);%record the parent handles in the SubObjects
|
---|
| 400 | end
|
---|
| 401 | set(PlotData.DeformPoint,'UserData',hh)%record the parent handles in the SubObjects
|
---|
| 402 | end
|
---|
| 403 | end
|
---|
| 404 | set(hh,'UserData',PlotData)
|
---|