--- a/hedgewars/GSHandlers.inc Fri May 28 16:21:54 2010 +0000
+++ b/hedgewars/GSHandlers.inc Fri May 28 19:48:51 2010 +0000
@@ -2612,8 +2612,8 @@
dec(Gear^.Timer);
HHGear := PHedgehog(Gear^.Hedgehog)^.Gear;
HedgehogChAngle(HHGear);
- gX := hwRound(Gear^.X);
- gY := hwRound(Gear^.Y);
+ gX := hwRound(Gear^.X) + GetLaunchX(amBallgun, hwSign(HHGear^.dX), HHGear^.Angle);
+ gY := hwRound(Gear^.Y) + GetLaunchY(amBallgun, HHGear^.Angle);
if (Gear^.Timer mod 100) = 0 then
begin
rx := rndSign(getRandom * _0_1);
@@ -3639,8 +3639,8 @@
dec(Gear^.Timer);
HHGear := PHedgehog(Gear^.Hedgehog)^.Gear;
HedgehogChAngle(HHGear);
- gX := hwRound(Gear^.X);
- gY := hwRound(Gear^.Y);
+ gX := hwRound(Gear^.X) + GetLaunchX(amBallgun, hwSign(HHGear^.dX), HHGear^.Angle);
+ gY := hwRound(Gear^.Y) + GetLaunchY(amBallgun, HHGear^.Angle);
if (Gear^.Timer mod 100) = 0 then
begin
rx := rndSign(getRandom * _0_1);