hedgewars/GSHandlers.inc
changeset 283 28d105f378f1
parent 282 b1e3387389b6
child 285 cdab49768c83
--- a/hedgewars/GSHandlers.inc	Tue Nov 28 17:14:39 2006 +0000
+++ b/hedgewars/GSHandlers.inc	Tue Nov 28 18:22:03 2006 +0000
@@ -925,7 +925,7 @@
 end;
 
 ////////////////////////////////////////////////////////////////////////////////
-const cAirPlaneSpeed = 0.8;
+const cAirPlaneSpeed = 1.1;
       cBombsDistance = 30;
       cBombsSpeed = 0.1;
 
@@ -939,13 +939,13 @@
    AddGear(round(Gear.X), round(Gear.Y), gtAirBomb, 0, cBombsSpeed, 0.0);
    Gear.dX:= Gear.dX + cBombsDistance
    end;
-if Gear.X > 2560 then DeleteGear(Gear)
+if Gear.X > 3072 then DeleteGear(Gear)
 end;
 
 procedure doStepAirAttack(Gear: PGear);
 begin
 AllInactive:= false;
-Gear.X:= -512;
+Gear.X:= -1024;
 Gear.Y:= -128;
 Gear.dX:= TargetPoint.X -
           cBombsDistance * 5 / 2 -