89             begin

    89             begin

    90             cnt:= AMMO_INFINITE;

    90             cnt:= AMMO_INFINITE;

    91             Ammoz[a].Probability:= 0

    91             Ammoz[a].Probability:= 0

    92             end;

    92             end;

    93         // avoid things we already have by scheme

    93         // avoid things we already have by scheme

    94         if ((a = amLowGravity) and ((GameFlags and gfLowGravity) <> 0)) or

    95         if ((a = amLowGravity) and ((GameFlags and gfLowGravity) <> 0)) or

    95            ((a = amInvulnerable) and ((GameFlags and gfInvulnerable) <> 0)) or

    96            ((a = amInvulnerable) and ((GameFlags and gfInvulnerable) <> 0)) or

    96            ((a = amLaserSight) and ((GameFlags and gfLaserSight) <> 0)) or

    97            ((a = amLaserSight) and ((GameFlags and gfLaserSight) <> 0)) or

    97            ((a = amVampiric) and ((GameFlags and gfVampiric) <> 0)) then

    98            ((a = amVampiric) and ((GameFlags and gfVampiric) <> 0)) then

    98             begin

    99             begin