18 lines
859 B
Plaintext
18 lines
859 B
Plaintext
|
VAR
|
|||
|
dispensers : DispenserPointerType; { rock dispensers linked list }
|
|||
|
numDispensers : INTEGER; { # of dispensers on current level }
|
|||
|
lastScore : INTEGER; { score from last completed game }
|
|||
|
playSpeed : INTEGER;
|
|||
|
m : MapDataType;
|
|||
|
lad : ActorType;
|
|||
|
ladXY : XYtype; { starting position of lad }
|
|||
|
nextNewLad : INTEGER; { score for next new lad awarded }
|
|||
|
dataFileContents : DataFileType;
|
|||
|
highScores : ARRAY[1..NumHighScores] OF HighScoreType;
|
|||
|
sound : BOOLEAN; { TRUE for sound }
|
|||
|
insults : BOOLEAN; { TRUE for insults }
|
|||
|
levelCycle : INTEGER;
|
|||
|
displayLevel : INTEGER; { displayed map level }
|
|||
|
upKey, downKey, leftKey, rightKey : CHAR; { lad direction control keys }
|
|||
|
|