home *** CD-ROM | disk | FTP | other *** search
- (*****************************************************************************)
- (* *)
- (* 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}