MODULE Cursor2; (*******************************************) (* *) (* created 27 - Aug - 82 by P.Hochstrasser *) (* *) (* this module is part of the utility.lib *) (* *) (*******************************************) EXTERNAL PROCEDURE GotoXY(x,y: INTEGER); PROCEDURE PrintAt(x,y:INTEGER; someText: string); BEGIN GotoXY(x,y); WRITE(someText); END; MODEND.