changeset 1869 | 490005509a7b |
parent 1801 | bc0c5c21376e |
child 1906 | 644f93d8f148 |
--- a/hedgewars/uLandObjects.pas Sat Mar 07 20:23:49 2009 +0000 +++ b/hedgewars/uLandObjects.pas Sun Mar 08 12:55:40 2009 +0000 @@ -425,7 +425,7 @@ Readln(f, vobFramesCount, vobFrameTicks, vobVelocity, vobFallSpeed); for i:= 0 to Pred(vobCount) do - AddVisualGear( -cScreenWidth + random(cScreenWidth * 2 + LAND_WIDTH), random(LAND_HEIGHT+200) - 100, vgtFlake); + AddVisualGear( -cScreenWidth + random(cScreenWidth * 2 + LAND_WIDTH), random(1024+200) - 100 + LAND_HEIGHT, vgtFlake); Close(f); {$I+}