--Author: John Maxwell
--last modified: November 2, 1981  12:54 PM

DIRECTORY
    Graphics: FROM "Graphics";

Screen: DEFINITIONS=

BEGIN

screen:Graphics.DisplayContext;
InvertListen:PROCEDURE;
InvertPlay:PROCEDURE;
DisplayMessage:PROCEDURE[s:STRING];

CommandProcs:TYPE = RECORD[
      play:PROCEDURE,
    listen:PROCEDURE,
    redbug:PROCEDURE,
 yellowbug:PROCEDURE,
   bluebug:PROCEDURE,
  keyboard:PROCEDURE,
    scroll:PROCEDURE[y:INTEGER],
     thumb:PROCEDURE,
   display:PROCEDURE[redraw:BOOLEAN],
    fileIn:PROCEDURE[s:STRING,append:BOOLEAN],
   fileOut:PROCEDURE[s:STRING],
   hardcopy:PROCEDURE[s:STRING],
initialize:PROCEDURE[Graphics.DisplayContext],
     count:CARDINAL];

END.