DEFINITION io; IMPORT d := Dos, e := Exec; VAR out, in : d.FileHandlePtr; Me : d.ProcessPtr; closeDelay : LONGINT; PROCEDURE Write(ch: CHAR); PROCEDURE WriteLn; PROCEDURE WriteString(string: ARRAY OF CHAR); PROCEDURE Tab(n: INTEGER); PROCEDURE Clear(); PROCEDURE Format(str: ARRAY OF CHAR; data: e.APTR); PROCEDURE WriteInt(x: LONGINT; n: INTEGER); PROCEDURE WriteHex(x: LONGINT; n: INTEGER); PROCEDURE Read(VAR ch: CHAR); PROCEDURE ReadString(VAR str: ARRAY OF CHAR); PROCEDURE ReadInt(VAR x: LONGINT): BOOLEAN; PROCEDURE ReadInteger(VAR x: INTEGER): BOOLEAN; PROCEDURE ReadShortInt(VAR x: SHORTINT): BOOLEAN; PROCEDURE ReadHex(VAR x: LONGINT): BOOLEAN; PROCEDURE ReadIntOk(VAR x: LONGINT); PROCEDURE ReadIntegerOk(VAR x: INTEGER); PROCEDURE ReadShortIntOk(VAR x: SHORTINT); PROCEDURE ReadHexOk(VAR x: LONGINT); END io.