DEFINITION MODULE ANSIVDU;

(* Author:         Andrew Trevorrow
   Implementation: University of Hamburg Modula-2 under VAX/VMS version 4
   Date Started:   August, 1984

   Description:
   InitANSI initializes the generic VDU parameters and routines described
   in VDUInterface with specific ANSI values.

   Revised:
   March, 1986
 - Export ANSI routines for use in other VDU-specific modules.
*)

PROCEDURE InitANSI;
(* the following routines can be used by other VDUs *)
PROCEDURE MoveAbs            (row, col : CARDINAL);
PROCEDURE ANSIStartText;
PROCEDURE ANSIMoveToTextLine (line : CARDINAL);
PROCEDURE ANSIClearTextLine  (line : CARDINAL);
PROCEDURE ANSIClearScreen;
PROCEDURE ANSIStartGraphics;
PROCEDURE ANSILoadFont       (fontname : ARRAY OF CHAR;
                              fontsize : CARDINAL;
                              mag, hscale, vscale : REAL);
PROCEDURE ANSIShowChar       (screenh, screenv : CARDINAL; ch : CHAR);
PROCEDURE ANSIShowRectangle  (screenh, screenv, width, height : CARDINAL;
                              ch : CHAR);
PROCEDURE ANSIResetVDU;

END ANSIVDU.
