MAKE_SCALE Name
MAKE_SCALE Purpose
Plot circular scales on the laser printer.
Category
Calling Sequence
make_scale, file Inputs
Keyword Parameters
Keywords
PRINTER = postscript printer number (1=def or 2).
/LIST to list control files lines as processed.
XOFFSET=xn. Scale center X shift in norm. coord.
YOFFSET=yn. Scale center Y shift in norm. coord.
View page in portrait mode, +x to right, +y up.
FACTOR=fact Scale all radii by given factor (def=1).
Outputs
Common Blocks
Notes
Notes
Control file format:
* in column 1 for comment lines.
A = a1, a2
Defines start and stop angles (deg) for arcs.
Not needed for circles.
a1, a2 = arc start & stop angles (deg) CCW from X axis.
R = r1, r2, r3, ..., rn
Draws arcs or circles of specified radius.
r1, r2, ... = list of radii (cm) to plot.
TICS = a1, a2, da,r1, r2
Draws tic marks.
a1, a2, da = tic angle start, stop, step (degrees).
r1, r2 = tic start, stop radii.
LABELS = L1, L2, dL, r, s, flg
Sets up labels to be used on next TICS command.
L1, L2, dL = label start, stop, step values.
r = label radial position (cm), s = label size.
flg = 0: to be read from outside the circle (def),
1: to be read from inside the circle.
TEXT = r, a, flag, size, text
r = radius of text bottom in cm.
a = start angle of text in degrees CCW from X axis.
flag = 0 to read CW, 1 to read CCW.
size = text size.
text = text string to write.
Modification History
R. Sterner. 15 July, 1988.
Johns Hopkins University Applied Physics Laboratory.
RES 15 Sep, 1989 --- converted to SUN.
R. Sterner, 17 Aug, 1993 --- Added keyword FACTOR=f.
R. Sterner, 2010 Jun 04 --- Converted arrays from () to [].
Copyright (C) 1988, Johns Hopkins University/Applied Physics Laboratory
This software may be used, copied, or redistributed as long as it is not
sold and this copyright notice is reproduced on each copy made. This
routine is provided as is without any express or implied warranties
whatsoever. Other limitations apply as described in the file disclaimer.txt.