(*****************************************************************************)
(*                                                                           *)
(*                       ROS - Remote Operating System                       *)
(*                               as of 7Mar86                                *)
(*                                                                           *)
(*                           Copyright (c) 1985 by                           *)
(*                                                                           *)
(*                                Steven Fox                                 *)
(*                                                                           *)
(*                      All commercial rights reserved.                      *)
(*                                                                           *)
(*              Turbodos/Archive vers 03nov87 for W. Brimhall                *)
(*                                                                           *)
(*****************************************************************************)

{ 07nov87 wb - Added include statements for new Archive directory and
               File find command files.
  11nov86 wb - Renamed drivers for use with Turbodos, Wyse terminal
               and Courier 2400 modem.  }


program ros;
{$C-}

  { System definitions }
{$I ROSDEF.INC}
  { Turbo Toolbox }
{$I ACCESS.BOX}
{$I GETKEY.BOX}

var
  DatF: DataFile;
  IdxF: IndexFile;

  { Machine dependent code }
{$I tdoswy60.MCH}                           { teminal and channel routines }
{$I courier.MDM}                            { Modem routines }
{$I tdos.CLK}                               { Clock routines }

  { System kernel }
{$I ROSKIO.INC}                             { I/O drivers - resident }
{$I ROSKMS.INC}                             { Miscellaneous - resident }
{$I ROSKOV.INC}                             { Miscellaneous - overlayed }

  { Turbo Toolbox }
{$I ADDKEY.ROS}
{$I DELKEY.ROS}

  { Force a new overlay }
type dummy = char;

{$I ROSMSG.INC}                             { Message sub-system }
{$I ROSFIL.INC}                             { File sub-system }
{$I ROSARC.INC}                             { Archive Directory routines }
{$I ROSFFND1.INC}                           { File Find routines }
{$I ROSSND.INC}                             { File send routines }
{$I ROSRCV.INC}                             { File receive routines }
{$I ROSUTL.INC}                             { Utility sub-system }
{$I ROSSYU.INC}                             { Sysop sub-system, user file routines }
{$I ROSSYM.INC}                             { Sysop sub-system, miscellaneous routines }
{$I ROSSYP.INC}                             { Sysop sub-system, purge routines }
{$I ROSSYX.INC}                             { Sysop sub-system, extended routines }
{$I ROSINI.INC}                             { System initialization/shutdown }

{$I ROSMAIN.INC}