--- a/hedgewars/uGears.pas Thu Aug 23 19:47:38 2012 +0200
+++ b/hedgewars/uGears.pas Mon Aug 27 17:40:16 2012 +0200
@@ -59,7 +59,7 @@
uses uStore, uSound, uTeams, uRandom, uCollisions, uIO, uLandGraphics,
uLocale, uAI, uAmmos, uStats, uVisualGears, uScript, GLunit, uMobile, uVariables,
uCommands, uUtils, uTextures, uRenderUtils, uGearsRender, uCaptions, uDebug, uLandTexture,
- uGearsHedgehog, uGearsUtils, uGearsList, uGearsHandlers;
+ uGearsHedgehog, uGearsUtils, uGearsList, uGearsHandlers, uGearsHandlersRope;
var skipFlag: boolean;
@@ -641,7 +641,8 @@
if (GameFlags and gfArtillery) <> 0 then
cArtillery:= true;
for i:= GetRandom(10)+30 downto 0 do
- begin rx:= GetRandom(rightX-leftX)+leftX;
+ begin
+ rx:= GetRandom(rightX-leftX)+leftX;
ry:= GetRandom(LAND_HEIGHT-topY)+topY;
rdx:= _90-(GetRandomf*_360);
rdy:= _90-(GetRandomf*_360);