hedgewars/uAmmos.pas
changeset 13859 ccfbc5f59c52
parent 13504 c41b16ac2e05
child 15225 ceb289e8a582
equal deleted inserted replaced
13858:46e1c1069ac2 13859:ccfbc5f59c52
   114         // merge this into DisableSomeWeapons ?
   114         // merge this into DisableSomeWeapons ?
   115         if ((a = amLowGravity) and ((GameFlags and gfLowGravity) <> 0))
   115         if ((a = amLowGravity) and ((GameFlags and gfLowGravity) <> 0))
   116         or ((a = amInvulnerable) and ((GameFlags and gfInvulnerable) <> 0))
   116         or ((a = amInvulnerable) and ((GameFlags and gfInvulnerable) <> 0))
   117         or ((a = amLaserSight) and ((GameFlags and gfLaserSight) <> 0))
   117         or ((a = amLaserSight) and ((GameFlags and gfLaserSight) <> 0))
   118         or ((a = amVampiric) and ((GameFlags and gfVampiric) <> 0))
   118         or ((a = amVampiric) and ((GameFlags and gfVampiric) <> 0))
   119         or ((a = amExtraTime) and (cHedgehogTurnTime >= 1000000)) then
   119         or ((a = amExtraTime) and (cHedgehogTurnTime >= 1000000))
       
   120         // Always remove creeper because it's unfinished.
       
   121         // TODO: Re-enable creeper when creeper is done
       
   122         or (a = amCreeper) then
   120             begin
   123             begin
   121             cnt:= 0;
   124             cnt:= 0;
   122             Ammoz[a].Probability:= 0
   125             Ammoz[a].Probability:= 0
   123             end;
   126             end;
   124         ammos[a]:= cnt;
   127         ammos[a]:= cnt;