RAMSES	Systems Ecology
Start         Modules:   A-Z   Function   Layer        QuickRefs:   DM   AuxLib   AuxLibE   SciLib   EasyMW   MW   ISIS   RMSLib

DEFINITION MODULE StandardIO;

  (*******************************************************************

    Module  StandardIO     (Version 0.1)

      Copyright (c) 1987-2006 by Olivier Roth, Andreas Fischlin and
      ETH Zurich.

    Purpose   Standard read/write routines to a window.

    Remarks   --


    Programming

      o Design
        Olivier Roth              26/03/1987

      o Implementation
        Olivier Roth              26/03/1987
        Andreas Fischlin          29/03/1993


    ETH Zurich
    Systems Ecology
    CHN E 35.1
    Universitaetstrasse 16
    8092 Zurich
    SWITZERLAND

    URLs:
        <mailto:RAMSES@env.ethz.ch>
        <http://www.sysecol.ethz.ch>
        <http://www.sysecol.ethz.ch/SimSoftware/RAMSES>


    Last revision of definition:  29/03/1993  AF

  *******************************************************************)


  PROCEDURE SysBeep( millisec : INTEGER );


  PROCEDURE MakeStandardIOWindow;


  PROCEDURE WriteReal( x: REAL; field, dec : CARDINAL );

  PROCEDURE WriteInt( i: INTEGER; field: CARDINAL );

  PROCEDURE WriteCard( K, field: CARDINAL );

  PROCEDURE Write( c: CHAR );

  PROCEDURE WriteString( str: ARRAY OF CHAR );

  PROCEDURE WriteLn;


  PROCEDURE Read( VAR c: CHAR );

  PROCEDURE ReadLn( VAR str: ARRAY OF CHAR );

  PROCEDURE ReadReal( VAR x: REAL );

  PROCEDURE ReadInt( VAR i: INTEGER);

  PROCEDURE ReadCard( VAR k: CARDINAL );


END StandardIO.