Topspeed_JPI/TS/INCLUDE/TERM.DEF

(* Release 3.10 *)
(*-------------------------------------------------------------------------*
*                                                                          *
*  TERM.DEF - COMMS Toolkit terminal emulation                             *
*                                                                          *
*  COPYRIGHT (C) 1988..1992 Clarion Software Corporation.                  *
*  All Rights Reserved                                                     *
*                                                                          *
*--------------------------------------------------------------------------*)

DEFINITION MODULE Term;

  TYPE
    Emulations          = (EmANSI,EmVT100,EmVT52);

  PROCEDURE WrChar(c:CHAR);
  PROCEDURE RdKey():CHAR;
  PROCEDURE KeyPressed():BOOLEAN;
  
  PROCEDURE ClearScreen;
  
  PROCEDURE Emulation():Emulations;
  
  PROCEDURE EmulateVT100;
  PROCEDURE EmulateVT52;
  PROCEDURE EmulateANSI;

END Term.