84     walkbonuses: record

    84     walkbonuses: record

    85         Count: Longword;

    85         Count: Longword;

    86         ar: array[0..Pred(MAXBONUS div 8)] of TBonus;  // don't use too many

    86         ar: array[0..Pred(MAXBONUS div 8)] of TBonus;  // don't use too many

    87         end;

    87         end;

    88 

    88 

    89 implementation

    92 implementation

    90 uses uCollisions, uVariables, uUtils, uDebug, uLandTexture;

    93 uses uCollisions, uVariables, uUtils, uDebug, uLandTexture;

    91 

    94 

    95     KnownExplosion: record

    96     KnownExplosion: record

    96         X, Y, Radius: LongInt

    97         X, Y, Radius: LongInt

    97         end = (X: 0; Y: 0; Radius: 0);

    98         end = (X: 0; Y: 0; Radius: 0);

    98 

    99 

    99 procedure FillTargets;

   100 procedure FillTargets;