Changeset 482 for trunk/SRC/ToBeReviewed

Timestamp:

02/07/13 15:30:32 (11 years ago)

Author:

smasson

Message:

add keywords in vecteur.pro

File:

• trunk/SRC/ToBeReviewed/PLOTS/VECTEUR/vecteur.pro (modified) (3 diffs)

trunk/SRC/ToBeReviewed/PLOTS/VECTEUR/vecteur.pro

@@ -150 +150 @@
 ; The format to be used to specify the norme of the reference vector.
 ;
+; @keyword VECTREFCHARSIZE
+; Character size of the legend of the reference arrow
+;
+; @keyword VECTREFCHARSIZE
+; Character thickness of the legend of the reference arrow
+;
 ; @keyword NOVECTREF
 ; To delete the display of the reference vector.
@@ -178 +184 @@
              , VECTREFPOS = vectrefpos, VECTNORMCOLOR = vectnormcolor $
              , VECTREFFORMAT = vectrefformat, NOVECTREF = novectref $
+             , VECTREFCHARSIZE = vectrefcharsize, VECTREFCHARTHICK = vectrefcharthick $
              , _EXTRA = extra
 ;
@@ -486 +493 @@
 
       arrow, x0, y0, x0+dx, y0, /norm, hsize = -.2, color = 0
-      xyouts, x0, y0, normelegende, /norm, align = 1, charsize = !p.charsize, color = 0
+      IF NOT keyword_set(vectrefcharsize) THEN vectrefcharsize = !p.charsize
+      IF NOT keyword_set(vectrefcharthick) THEN vectrefcharthick = !p.charthick
+      xyouts, x0, y0, normelegende, /norm, align = 1, charsize = vectrefcharsize, charthick = vectrefcharthick, color = 0
 
     endif