d 	subroutine wrtstr( ix, iy, string )
È c.		Move to IX, IY, and output a number of characters.
,c.
c. 0 <= IX <= 780, 0 <= IY <= 1000
ôc.
Xc.	The characters are contained in a VAX CHARACTER
¼c.
 c. see INFO TEK for information about all plotting routines
„c.
èc.-end.of.info-
Lc.
°		CHARACTER*(*) string
		CALL JJPANY( 0, -1, IX/780.0, IY/780.0 )
x		CALL JJPANY( LEN(string), %VAL(%LOC(string)) )
Ü		RETURN
@		end