DEFINITION MODULE ScreenDisplay; (* * REPERTOIRE * Release 1.6 * By Charles Bradford and Cole Brecheen * (c) Copyright 1985-1992 PMI * Green Bay, Wisconsin * All rights reserved * (414) 468-6040 * * $Header: D:/logfiles/defs/screendi.dev 1.4 30 Dec 1990 18:04:00 coleb $ * *) FROM ScrnTypes IMPORT DisplayFile, DisplayFrame, FrameKey; PROCEDURE CloseDisplayFile(VAR dfile : DisplayFile); PROCEDURE OpenDisplayFile(VAR dfile : DisplayFile; fname : ARRAY OF CHAR); PROCEDURE ReadDisplayFrame(VAR dfile : DisplayFile; VAR FrameRec : DisplayFrame; FrameNum : FrameKey); PROCEDURE ReadFrame(VAR dfile : DisplayFile; VAR FrameRec : DisplayFrame; FrameNum : FrameKey); PROCEDURE ShowDisplayFrame(VAR FrameRec : DisplayFrame; Col1, Row1, ColX, RowX : CARDINAL); PROCEDURE WriteToFrame( FrameRec: DisplayFrame; col, row: CARDINAL; text: ARRAY OF CHAR ); PROCEDURE Display( FrameNum : FrameKey); PROCEDURE CloseDisplayFrame(VAR FrameRec : DisplayFrame); PROCEDURE PushFrame(VAR FrameRec : DisplayFrame); PROCEDURE PopFrame(VAR FrameRec : DisplayFrame); PROCEDURE PopZapFrame(VAR FrameRec : DisplayFrame); PROCEDURE ClearFrameStack(VAR FrameRec : DisplayFrame); PROCEDURE RedrawArea( TheFrame: DisplayFrame; col1, row1, col2, row2: CARDINAL ); PROCEDURE Init(); END ScreenDisplay.