diff -r b1b7eb9c8cc9 -r bcf9d8e64e92 hedgewars/uLandObjects.pas --- a/hedgewars/uLandObjects.pas Sat May 12 22:50:33 2012 +0400 +++ b/hedgewars/uLandObjects.pas Sat May 12 23:55:09 2012 +0400 @@ -803,17 +803,17 @@ end; procedure AddObjects(); -var i, int: Longword; +var i, g: Longword; begin InitRects; if hasGirders then begin - int:= max(playWidth div 8, 256); - i:=leftX+int; + g:= max(playWidth div 8, 256); + i:= leftX + g; repeat AddGirder(i); - i:=i+int; - until (i>rightX-int); + i:=i + g; + until (i > rightX - g); end; if (GameFlags and gfDisableLandObjects) = 0 then AddThemeObjects(ThemeObjects);