--- a/hedgewars/uGears.pas Thu Oct 15 17:18:36 2009 +0000
+++ b/hedgewars/uGears.pas Thu Oct 15 17:42:21 2009 +0000
@@ -167,7 +167,8 @@
@doStepBomb,
@doStepRCPlane,
@doStepSniperRifleShot,
- @doStepJetpack
+ @doStepJetpack,
+ @doStepMolotov
);
procedure InsertGearToList(Gear: PGear);
@@ -258,7 +259,7 @@
Result^.Angle:= cMaxAngle div 2;
Result^.Z:= cHHZ;
end;
-gtAmmo_Grenade: begin // bazooka
+gtAmmo_Grenade, gtMolotov: begin // bazooka
Result^.Radius:= 4;
end;
gtHealthTag: begin
@@ -1061,6 +1062,7 @@
case amt of
amBazooka,
amMortar: DrawRotated(sprHandBazooka, hx, hy, hwSign(Gear^.dX), aangle);
+ amMolotov: DrawRotated(sprHandMolotov, hx, hy, hwSign(Gear^.dX), aangle);
amBallgun: DrawRotated(sprHandBallgun, hx, hy, hwSign(Gear^.dX), aangle);
amDrill: DrawRotated(sprHandDrill, hx, hy, hwSign(Gear^.dX), aangle);
amRope: DrawRotated(sprHandRope, hx, hy, hwSign(Gear^.dX), aangle);
@@ -1416,6 +1418,7 @@
begin
case Gear^.Kind of
gtAmmo_Bomb: DrawRotated(sprBomb, hwRound(Gear^.X) + WorldDx, hwRound(Gear^.Y) + WorldDy, 0, Gear^.DirAngle);
+ gtMolotov: DrawRotated(sprMolotov, hwRound(Gear^.X) + WorldDx, hwRound(Gear^.Y) + WorldDy, 0, Gear^.DirAngle);
gtRCPlane: begin
if (Gear^.Tag = -1) then