Index: ../trunk-jpl/src/m/plot/plotmodel.m =================================================================== --- ../trunk-jpl/src/m/plot/plotmodel.m (revision 14299) +++ ../trunk-jpl/src/m/plot/plotmodel.m (revision 14300) @@ -33,16 +33,57 @@ if numberofplots, %Create figure + f=figure(figurenumber);clf; if strcmpi(getfieldvalue(options.list{1},'visible','on'),'off'), - F=figure(figurenumber);clf; - set(F,'Visible','Off'); - else - figure(figurenumber);clf; + set(f,'Visible','Off'); end - %Use zbuffer renderer (snoother colors) - set(gcf,'Renderer','zbuffer'); + if exist(options.list{1},'figposition'), % {{{ + figposition=getfieldvalue(options.list{1},'figposition'); + if ischar(figposition), + if strcmpi(figposition,'larour'), + set(gcf,'Position',[1604 4 1594 1177]); + elseif strcmpi(figposition,'larour2'), + set(gcf,'Position',[756 62 827 504]); + elseif strcmpi(figposition,'mathieu'), + set(gcf,'Position',[300 1 1580 1150]); + elseif strcmpi(figposition,'fullscreen'), + set(gcf,'Position',get(0,'ScreenSize')); + elseif strcmpi(figposition,'halfright'), + screen=get(0,'ScreenSize'); + left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25; + set(gcf,'Position',fix([left+widt/2 bott widt/2 heig])); + elseif strcmpi(figposition,'halfleft'), + screen=get(0,'ScreenSize'); + left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25; + set(gcf,'Position',fix([left bott widt/2 heig])); + elseif strcmpi(figposition,'square'), + screen=get(0,'ScreenSize'); + left=screen(1); bott=screen(2); widt=min(screen(3)-25,screen(4)-25); + set(gcf,'Position',fix([left+(screen(3)-widt) bott widt widt])); + elseif strcmpi(figposition,'portrait'), + %reformat with letter paper size (8.5" x 11") + screen=get(0,'ScreenSize'); + left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25; + portrait=fix([left+widt-(heig*8.5/11) bott heig*8.5/11 heig]); + set(gcf,'Position',portrait) + elseif strcmpi(figposition,'landscape'), + %reformat with letter paper size (8.5" x 11") + screen=get(0,'ScreenSize'); + left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25; + landscape=fix([left+widt-(heig*11/8.5) bott heig*11/8.5 heig]); + set(gcf,'Position',landscape) + else + disp('''figposition'' string not supported yet'); + end + else + set(gcf,'Position',figposition); + end + end % }}} + %Use zbuffer renderer (snoother colors) and white background + set(f,'Renderer','zbuffer','color',getfieldvalue(options.list{1},'figurebackgroundcolor','w')); + %Go through all data plottable and close window if an error occurs try, for i=1:numberofplots, Index: ../trunk-jpl/src/m/plot/applyoptions.m =================================================================== --- ../trunk-jpl/src/m/plot/applyoptions.m (revision 14299) +++ ../trunk-jpl/src/m/plot/applyoptions.m (revision 14300) @@ -330,52 +330,6 @@ set(gca,'pos',Axis); end -%position of figure -if exist(options,'figposition'), - - figposition=getfieldvalue(options,'figposition'); - if ischar(figposition), - if strcmpi(figposition,'larour'), - set(gcf,'Position',[1604 4 1594 1177]); - elseif strcmpi(figposition,'larour2'), - set(gcf,'Position',[756 62 827 504]); - elseif strcmpi(figposition,'mathieu'), - set(gcf,'Position',[300 1 1580 1150]); - elseif strcmpi(figposition,'fullscreen'), - set(gcf,'Position',get(0,'ScreenSize')); - elseif strcmpi(figposition,'halfright'), - screen=get(0,'ScreenSize'); - left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25; - set(gcf,'Position',fix([left+widt/2 bott widt/2 heig])); - elseif strcmpi(figposition,'halfleft'), - screen=get(0,'ScreenSize'); - left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25; - set(gcf,'Position',fix([left bott widt/2 heig])); - elseif strcmpi(figposition,'square'), - screen=get(0,'ScreenSize'); - left=screen(1); bott=screen(2); widt=min(screen(3)-25,screen(4)-25); - set(gcf,'Position',fix([left+(screen(3)-widt) bott widt widt])); - elseif strcmpi(figposition,'portrait'), - %reformat with letter paper size (8.5" x 11") - screen=get(0,'ScreenSize'); - left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25; - portrait=fix([left+widt-(heig*8.5/11) bott heig*8.5/11 heig]); - set(gcf,'Position',portrait) - elseif strcmpi(figposition,'landscape'), - %reformat with letter paper size (8.5" x 11") - screen=get(0,'ScreenSize'); - left=screen(1); bott=screen(2); widt=screen(3); heig=screen(4)-25; - landscape=fix([left+widt-(heig*11/8.5) bott heig*11/8.5 heig]); - set(gcf,'Position',landscape) - else - disp('''figposition'' string not supported yet'); - end - else - set(gcf,'Position',figposition); - end - -end - %axes position if exist(options,'axesPosition') set(gca,'Position',getfieldvalue(options,'axesPosition')); @@ -445,9 +399,6 @@ %backgroundcolor set(gca,'color',getfieldvalue(options,'backgroundcolor','none')); -%figurebackgrounbcolor -set(gcf,'color',getfieldvalue(options,'figurebackgroundcolor','w')); - %lighting if strcmpi(getfieldvalue(options,'light','off'),'on'), set(gca,'FaceLighting','gouraud','FaceColor','interp','AmbientStrength',0.5);