(* Release 3.10 *)
(*-------------------------------------------------------------------------*
*                                                                          *
*  SCRIPTPR.DEF - COMMS Toolkit script processor                           *
*                                                                          *
*  COPYRIGHT (C) 1988..1992 Clarion Software Corporation.                  *
*  All Rights Reserved                                                     *
*                                                                          *
*--------------------------------------------------------------------------*)

DEFINITION MODULE ScriptProcessor;

  TYPE
    ScriptStates        = (Off,Running,Transmitting,Waiting,Pausing,WaitSuccess);
    ScriptFlags         = (Linked,Success,Failure,Found,Connected,WaitFor);
    String80            = ARRAY[0..80] OF CHAR;

  VAR
    TxPtr               : CARDINAL;
    WhenProcessing      : BOOLEAN;
    ScriptState         : ScriptStates;
    Flags               : ARRAY ScriptFlags OF BOOLEAN;
    WaitString,
    WhenString,
    WhenAction,
    TransmitString      : String80;

  PROCEDURE InitScriptProcessor;

  PROCEDURE LoadScript(Filename:ARRAY OF CHAR):BOOLEAN;

  PROCEDURE SingleStep;

  PROCEDURE TerminateScript;

END ScriptProcessor.