hedgewars/uAmmos.pas
changeset 5640 07676ee23aff
parent 5520 7a950ef0cee0
child 5676 a655dfab27d7
equal deleted inserted replaced
5638:e35ba2a400d8 5640:07676ee23aff
   109         // merge this into DisableSomeWeapons ?
   109         // merge this into DisableSomeWeapons ?
   110         if ((a = amLowGravity) and ((GameFlags and gfLowGravity) <> 0)) or
   110         if ((a = amLowGravity) and ((GameFlags and gfLowGravity) <> 0)) or
   111            ((a = amInvulnerable) and ((GameFlags and gfInvulnerable) <> 0)) or
   111            ((a = amInvulnerable) and ((GameFlags and gfInvulnerable) <> 0)) or
   112            ((a = amLaserSight) and ((GameFlags and gfLaserSight) <> 0)) or
   112            ((a = amLaserSight) and ((GameFlags and gfLaserSight) <> 0)) or
   113            ((a = amVampiric) and ((GameFlags and gfVampiric) <> 0)) or
   113            ((a = amVampiric) and ((GameFlags and gfVampiric) <> 0)) or
   114            ((a = amExtraTime) and (cHedgehogTurnTime >= 1000000)) then
   114            ((a = amExtraTime) and (cHedgehogTurnTime >= 1000000)) or
       
   115             (a = amStructure) then
   115             begin
   116             begin
   116             cnt:= 0;
   117             cnt:= 0;
   117             Ammoz[a].Probability:= 0
   118             Ammoz[a].Probability:= 0
   118             end;
   119             end;
   119         ammos[a]:= cnt;
   120         ammos[a]:= cnt;