Systems Reference Library IBM 1130/1800 Plotter Subroutines
Systems Reference Library IBM 1130/1800 Plotter Subroutines
Systems Reference Library IBM 1130/1800 Plotter Subroutines
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
,<br />
S<br />
t<br />
a<br />
n<br />
d<br />
a<br />
r<br />
d<br />
p<br />
r<br />
e<br />
c<br />
i<br />
s<br />
i<br />
o<br />
n<br />
:<br />
ASSEMBLER I is an integer expression controlling the pen as<br />
follows:<br />
CALL<br />
DC<br />
DC<br />
DC<br />
DC<br />
DC<br />
PLOT<br />
FORTRAN<br />
FGRID<br />
A<br />
Extended precision:<br />
CALL E G R I D<br />
DC A<br />
DC<br />
DC<br />
DC<br />
DC<br />
A, B , C, D, and E are the addresses of constants<br />
or v ariables corresponding to I, X, Y, U, and N.<br />
respectively, o f the FORTRAN language calls.<br />
The constants or variables represented by A and<br />
E should be one word each in both standard and<br />
extended precision calls. E a c h constant or v ariable<br />
represented by B, C, and D mus t be two words f or<br />
standard precision and three words f or extended<br />
prec is ion.<br />
This subroutine is called to move the pen f rom its<br />
present position to a new position. I t is the user's<br />
res pons ibilit y to check that the coordinates of the<br />
new position are wit hin limit s . T h e pen can also be<br />
rais ed or lowered before or after the t rav ers e mov ement,<br />
as a part of this subroutine.<br />
NOTE: I f the pen is up (or down), and a command<br />
is giv en to go up (or down), 100 milliseconds of<br />
plot t ime are wasted in perf orming the redundancy.<br />
Standard precision:<br />
CA L L F P L O T (I, X<br />
n<br />
Extended precision:<br />
, Y<br />
n<br />
) CA L L E P L O T (I, X<br />
n<br />
, Y<br />
n<br />
)<br />
I = Zero<br />
I = Pos it iv e<br />
I = Negative<br />
I = Odd<br />
I = Even<br />
No change<br />
Control pen before movement<br />
Control pen af t er movement<br />
Raise pen<br />
Lower pen<br />
Xn is a signed real constant or v ariable defining<br />
the X value of the new position, meas ured in the<br />
user's units,<br />
Y<br />
the n Y value of the new position, meas ured in the<br />
user's i units,<br />
s<br />
a<br />
ASSEMBLER<br />
s<br />
i<br />
Standard g precision:<br />
n<br />
CALL F P LOT<br />
e<br />
DC A<br />
d<br />
DC<br />
r<br />
DC<br />
e<br />
a<br />
Extended<br />
l<br />
precision:<br />
c<br />
CALL E P LOT<br />
o<br />
DC A<br />
n<br />
DC<br />
s<br />
DC<br />
t<br />
a<br />
nA,<br />
B , and C are the addresses of constants or<br />
variables<br />
t<br />
corresponding to I, X<br />
n tively, o<br />
a n od f the YFORTRAN<br />
calls.<br />
n<br />
r The constant or variable represented by A should<br />
, be vonly<br />
r eme sword p in e both c -standard<br />
and extended<br />
precision. a E a c h constant or v ariable represented<br />
by rB<br />
and C mus t be two words f or standard prec is ion<br />
and i three words f or extended precision.<br />
a<br />
b<br />
POI l NT<br />
e<br />
The d point subroutine draws special point characters<br />
at ethe<br />
present position of the pen. T h e pen mus t<br />
be fdown<br />
when this subroutine is called. T h e point<br />
characters, i and the points about which they are<br />
drawn, n a r e illus t rat ed below. A l l points are at<br />
the i intersection of the horizontal and v ert ic al<br />
line.<br />
n<br />
g<br />
<strong>Plotter</strong> <strong>Subroutines</strong> 5