This subroutine assumes the pen is down and leaves the pen down when finished. E a c h point character is ins c ribed wit hin a 0.10 inch square. FORTRAN The pen remains in the down position: CA L L POI NT (I) I is an integer expression that defines the character to be drawn as follows: I < 0 blank I = 0 + I = 1 x I = 2 A (+X) I = 3 I > ( - Y ) I = 4 V ( - X ) I = 5
e rounded off to the nearest 0.01. Theta is a signed real variable or constant defining the angle at which the character (or line of characters) is to be drawn, expressed in radians. Theta is measured by rotating a line parallel to the X axis about the starting location. Pos it iv e values produce counterclockwise rotation; negative values, the opposite. NOTE: Du e to the physical resolution limit at ion of the plot t er, i t is impossible to rotate a c harac t er through all angles. T h e possible angles are discrete and are a function of the part ic ular character being rotated and the angle of rotation. Th u s there may be a discrepancy between Theta and the actual plotted angle of rotation, whic h will be most significant f or s mall character sizes. T h e same phenomenon will also cause distortion of the character shape in many cases. When using the annotation routine to plot a s t ring of rotated characters, the rotational inaccuracies in each c harac t er will accumulate and may produce dis t ort ed lines. T h i s accumulative affect may be overcome by drawing the line one character at a t ime and using ECHAR or FCHAR to position each c haracter in its proper location. NOTE: A rotation through a f ull c irc le (360 ° radians. A rotation through an nth part of a c irc le, ) 3 6i0 s 2 / 1 -c ) / n , i s 2 ASSEMBLER 7 / Standard precision: n r CALL FCHAR a DC A DC d DC i DC a DC n s Extended precision: . CALL E C H A R DC A DC DC DC DC A, B , C, D, and E are the addresses of real constants or variables corresponding to the X Xn s, calling Y sequence. T h e constants or v ariables , nrepresented by A, B, C, D, and E mus t be t wo Ywords , in standard precision and three words in sextended precision. , NOTE: When the plot t er subroutines are fi rs t a n loaded, X d n is s et to zero. I f the annotation subroutine is T acalled n d without c alling the character subroutine, h Ythe characters are plotted at this size and angle, e n starting at the present position of the pen. Th e s e t a values r are replaced by those of the c harac t er s ub- a e routine when fi rs t c alled and, i f needed, mus t be reins ert ed by using the character subroutine. , s r e e t ANNOTATION s t p o e O This subroutine f orms the characters specified by c . computer output data to the parameters established by the character subroutine. Th e s e paramet ers t 1 determine a rectangle inside of which each character i 0 is drawn. T h e starting location is the lower lef t v i c orner of the rectangle. I n a continuous row of e n characters, t he starting location is the lower lef t l c orner of the fi rs t character. Wh e n the las t y h character is completed, t his subroutine stops the , a pen in the up position over the lower lef t c orner o n of the next character position in sequence. Re p e t - f d itive lines are plotted end to end. T h e character t T set available is 0-9, A - Z, a n d ) i - + , / = ( ) g . h e FORTRAN F t O a R Standard or extended precision: T R WRITE ( I , FORMAT) Lis t A N I is the unsigned integer constant or v ariable that specifies the logical unit number of the I / O unit (plotter) t o be used f or output data. T h i s number can be changed in the <strong>1800</strong> system when establishing the FORTRAN I / 0 unit (IOU) table. FORMAT is a statement number of the FO RMA T statement describing the type of data conversion to be perf ormed between the int ernal and external representation of each quantity in the lis t . Lis t is a lis t of variable names, s eparat ed by commas, whic h represent the output data. <strong>Plotter</strong> <strong>Subroutines</strong> 7