hedgewars/uGears.pas
changeset 3102 3435cdc1e557
parent 3100 5fe9c4ac4c99
child 3104 6cdc45b3b8a6
--- a/hedgewars/uGears.pas	Sat Mar 27 08:59:42 2010 +0000
+++ b/hedgewars/uGears.pas	Sat Mar 27 11:48:02 2010 +0000
@@ -185,7 +185,7 @@
             @doStepCase,
             @doStepBirdy,
             @doStepBigExplosion,
-			@doStepEggWork
+            @doStepEggWork
             );
 
 procedure InsertGearToList(Gear: PGear);
@@ -449,7 +449,7 @@
        gtBirdy: begin
                 gear^.Radius:= 16; // todo: check
                 gear^.Timer:= 500;
-				gear^.Health := 2000;
+				        gear^.Health := 2000;
                 gear^.FlightTime := 2;
                 end;
 gtBigExplosion: begin
@@ -459,7 +459,6 @@
                 gear^.Radius:= 4;
                 gear^.Elasticity:= _0_6;
                 gear^.Friction:= _0_96;
-                gear^.RenderTimer:= true;
                 if gear^.Timer = 0 then gear^.Timer:= 3000
                 end;
      end;
@@ -1690,7 +1689,7 @@
                     DrawRotatedTextureF(SpritesData[sprBigExplosion].Texture, 0.85 * (-power(2, -4 * Int(Gear^.Timer)/250) + 1) + 0.4, 0, 0, hwRound(Gear^.X) + WorldDx, hwRound(Gear^.Y) + WorldDy, 0, 1, 385, 385, Gear^.Angle);
                     glColor4f(1, 1, 1, 1);
                     end;
-			   gtEgg: DrawRotated(sprBomb, hwRound(Gear^.X) + WorldDx, hwRound(Gear^.Y) + WorldDy, 0, Gear^.DirAngle);
+			   gtEgg: DrawRotated(sprEgg, hwRound(Gear^.X) + WorldDx, hwRound(Gear^.Y) + WorldDy, 0, Gear^.DirAngle);
          end;
       if Gear^.RenderTimer and (Gear^.Tex <> nil) then DrawCentered(hwRound(Gear^.X) + 8 + WorldDx, hwRound(Gear^.Y) + 8 + WorldDy, Gear^.Tex);
       Gear:= Gear^.NextGear