DEFINITION MODULE TermWindow; FROM Application IMPORT messagetype; PROCEDURE InitTerminal (fixed: BOOLEAN); PROCEDURE OpenTerminal (x, y, w, h: INTEGER); PROCEDURE CloseTerminal; PROCEDURE DeleteTerminal; PROCEDURE ResetTerminal; PROCEDURE NewTitle (title: ARRAY OF CHAR); PROCEDURE GetPos (VAR line, col: INTEGER); PROCEDURE SetPos (line, col: INTEGER); PROCEDURE Tab (col: INTEGER); PROCEDURE Read (VAR ch: CHAR); PROCEDURE Write (ch: CHAR); PROCEDURE WriteString (s: ARRAY OF CHAR); PROCEDURE WriteLn; PROCEDURE ReactOnMessage (msg: messagetype); PROCEDURE Redraw; PROCEDURE WaitForRedraw; END TermWindow.