diff -r c9ca770fd7fc -r 2d7f1fb73335 hedgewars/uGearsList.pas --- a/hedgewars/uGearsList.pas Fri May 18 13:35:22 2012 -0400 +++ b/hedgewars/uGearsList.pas Sun May 20 01:00:00 2012 -0400 @@ -33,7 +33,7 @@ uTextures, uScript, uRenderUtils, uAI, uCollisions, uGearsRender, uGearsUtils; -var GCounter: LongWord = 0; // this doesn't get re-initialized, but should be harmless +var GCounter: LongWord = 0; // this does not get re-initialized, but should be harmless procedure InsertGearToList(Gear: PGear); var tmp, ptmp: PGear; @@ -457,6 +457,7 @@ gear^.Tag:= TotalRounds + 3; gear^.Pos:= 1; end; + gtIceGun: gear^.Health:= 1000; end; InsertGearToList(gear);