John Guidi
						The Computing Center
						The Jackson Laboratory
						Bar Harbor, Maine
							    04609
						(207)288-3371 x306


	This contribution to Fall DECUS consists of 3 subroutines which
enable the user to plot graphs on a Tektronix-4662 Digital Plotter. Rumor
has it that the graphic data encoding scheme used for the 4662 is the same
as that used with the 4010 series terminals. The subroutines included are:

	1) MOVE.MAC - this routine will move the graphic cursor to the
	   specified co-ordinates. The call is CALL MOVE (X,Y) where X and
	   Y are 1 word integers.

	2) DRAW.MAC - this routine will draw a vector from the present
	   location of the cursor to the specified co-ordinates. The call
	   is CALL DRAW (X,Y) where X and Y are 1 word integers.

	3) PRINT.MAC - this routine will print an array of characters, 
	   begining at the current location of the graphic cursor. The
	   call is CALL PRINT (ARRAY,DIM). ARRAY is declared as byte,
	   DIM as a 1 word integer.


	The co-ordinate system superimposed on the 4662 plotter is:

(0,2731)						        (4095,2731)
  --------------------------------------------------------------------
  :                                                                  :
  :                                                                  :
				=
  :								     :
  :								     :
  --------------------------------------------------------------------
(0,0)								(4095,0)


	The indirect command file PLOT.CMD will assemble, and produce 
listings for these routines.

	These subroutines were written as a "hack", and are released as
such. (So much for the disclaimer!).

	In het erste, moet man spelen.