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 }

