DIRECTORY FootballMaster USING [Command, Commands, Game, Position, Side, Team], Rope USING [ROPE], ViewerClasses USING [Viewer]; FootballInternal: DEFINITIONS = BEGIN OPEN FootballMaster; Play: TYPE = REF PlayRec; PlayRec: TYPE = RECORD[ name: Rope.ROPE, setUp: BOOL _ TRUE, side: Side _ offense, ball: Command _ [stop, [null[]]], commands: Commands _ ALL[[stop, [null[]]]]]; game: Game; planned: Play; myTeam: Team; selected: Position; viewer: ViewerClasses.Viewer; Control: PROC; StartServer: PROC [name: Rope.ROPE]; StopServer: PROC; SetCommand: PROC [player: Position, command: Command, setUp: BOOL _ FALSE]; SavePlay: PROC [side: Side, name: Rope.ROPE, setUp: BOOL _ FALSE]; ReadPlayBook: PROC [name: Rope.ROPE]; WritePlayBook: PROC [name: Rope.ROPE]; END . . . °FootballInternal.mesa Copyright c 1985 by Xerox Corporation. All rights reserved. Maxwell, January 28, 1983 11:03 am Russ Atkinson (RRA) August 13, 1985 12:52:50 pm PDT Κs˜codešœ™Kšœ Οmœ1™