Changeset 14463

Timestamp:

03/21/13 10:58:38 (12 years ago)

Author:

Mathieu Morlighem

Message:

CHG: single patch if numticks=1, + centered text

File:

• issm/trunk-jpl/src/m/plot/scaleruler.m (modified) (2 diffs)

issm/trunk-jpl/src/m/plot/scaleruler.m

@@ -6 +6 @@
 
 %get options
-structure=getfieldvalue(options,'scaleruler');
-fontsize=getfieldvalue(options,'scaleruler_fontsize',16);
+structure  = getfieldvalue(options,'scaleruler');
+fontcolor  = getfieldvalue(options,'fontcolor','k');
+fontweight = getfieldvalue(options,'fontweight','n');
+fontsize   = getfieldvalue(options,'scaleruler_fontsize',16);
 
 %Go through structure and fill missing arguments
@@ -14 +16 @@
 end
 
-%retrieve north arrow parameters
-x0=structure(1);
-y0=structure(2);
-lengthscale=structure(3);
-widthscale=structure(4);
-numberofticks=structure(5);
-fontcolor=getfieldvalue(options,'fontcolor','k');
-fontweight=getfieldvalue(options,'fontweight','n');
+%retrieve scale parameters
+x0            = structure(1);
+y0            = structure(2);
+lengthscale   = structure(3);
+widthscale    = structure(4);
+numberofticks = structure(5);
 
-%initialize some coordinates
-unitlength=lengthscale/(numberofticks -1);
-flag=-1;
+%If only one tick, just draw a rectangle
+if numberofticks==1,
+        text(x0+lengthscale/2,y0+2*widthscale,2,[num2str(lengthscale/1000) 'km'],...
+                'FontSize',fontsize,'FontWeight',fontweight,'Color',fontcolor,'HorizontalAlignment','center','VerticalAlignment','baseline');
+        patch([x0 x0+lengthscale x0+lengthscale x0],[y0 y0 y0+widthscale y0+widthscale],2*ones(1,4),fontcolor,'Edgecolor',fontcolor);
+else
+        %initialize some coordinates
+        unitlength=lengthscale/(numberofticks -1);
+        flag=-1;
 
-Bd=[x0 y0];
-Bu=[x0 y0+widthscale];
-Tick=0;
-
-%Text
-xt=Bu(1);
-yt=Bu(2)+widthscale;
-text(xt,yt,num2str(Tick),'FontSize',fontsize,'FontWeight',fontweight,'Color',fontcolor,'HorizontalAlignment','left','VerticalAlignment','baseline');
-
-%loope over the patches
-for i=1:numberofticks-1,
-        Au=Bu;
-        Ad=Bd;
-        Bu=[Au(1)+unitlength Ad(2)+widthscale];
-        Bd=[Ad(1)+unitlength Ad(2)];
-        Tick=Tick+unitlength;
-
-        %pathes
-        if flag==-1
-                p=patch([Ad(1) Bd(1) Bu(1) Au(1)],[Ad(2) Bd(2) Bu(2) Au(2)],'Black','FaceAlpha',0.5);
-        else
-                p=patch([Ad(1) Bd(1) Bu(1) Au(1)],[Ad(2) Bd(2) Bu(2) Au(2)],'White','FaceAlpha',0.3);
-        end
-
-        %flip flag
-        flag=-flag;
+        Bd=[x0 y0];
+        Bu=[x0 y0+widthscale];
+        Tick=0;
 
         %Text
         xt=Bu(1);
         yt=Bu(2)+widthscale;
-        if i~=numberofticks-1,
-                text(xt,yt,num2str(round_ice(Tick/1000,3)),'FontSize',fontsize,'FontWeight',fontweight,'Color',fontcolor,'HorizontalAlignment','left','VerticalAlignment','baseline');
+        text(xt,yt,2,num2str(Tick),'FontSize',fontsize,'FontWeight',fontweight,'Color',fontcolor,'HorizontalAlignment','center','VerticalAlignment','baseline');
+
+        %loope over the patches
+        for i=1:numberofticks-1,
+                Au=Bu;
+                Ad=Bd;
+                Bu=[Au(1)+unitlength Ad(2)+widthscale];
+                Bd=[Ad(1)+unitlength Ad(2)];
+                Tick=Tick+unitlength;
+
+                %pathes
+                if flag==-1
+                        p=patch([Ad(1) Bd(1) Bu(1) Au(1)],[Ad(2) Bd(2) Bu(2) Au(2)],2*ones(1,4),'Black');
+                else
+                        p=patch([Ad(1) Bd(1) Bu(1) Au(1)],[Ad(2) Bd(2) Bu(2) Au(2)],2*ones(1,4),'White');
+                end
+
+                %flip flag
+                flag=-flag;
+
+                %Text
+                xt=Bu(1);
+                yt=Bu(2)+widthscale;
+                if i~=numberofticks-1,
+                        text(xt,yt,2,num2str(round_ice(Tick/1000,3)),'FontSize',fontsize,'FontWeight',fontweight,'Color',fontcolor,'HorizontalAlignment','center','VerticalAlignment','baseline');
+                end
         end
+        text(xt,yt,2,[num2str(round_ice(Tick/1000,3)) ' km'],'FontSize',fontsize,'FontWeight',fontweight,'Color',fontcolor,'HorizontalAlignment','center','VerticalAlignment','baseline');
 end
-text(xt,yt,[num2str(round_ice(Tick/1000,3)) ' km'],'FontSize',fontsize,'FontWeight',fontweight,'Color',fontcolor,'HorizontalAlignment','left','VerticalAlignment','baseline');