hedgewars/uGearsHandlersMess.pas
changeset 10359 744f1151c707
parent 10356 7d1044267b83
child 10363 fc3aa563ab01
equal deleted inserted replaced
10358:d22515d9624d 10359:744f1151c707
  3193     if Gear^.Timer = 17 then
  3193     if Gear^.Timer = 17 then
  3194         Gear^.Timer := 0
  3194         Gear^.Timer := 0
  3195     else
  3195     else
  3196         exit;
  3196         exit;
  3197 
  3197 
  3198     if playWidth > cMinPlayWidth then
  3198     if (WorldEdge = weSea) and (playWidth > cMinPlayWidth) then
  3199         begin
  3199         begin
  3200         inc(leftX);
  3200         inc(leftX);
  3201         dec(rightX);
  3201         dec(rightX);
  3202         dec(playWidth, 2);
  3202         dec(playWidth, 2);
  3203         for i:= 0 to LAND_HEIGHT - 1 do
  3203         for i:= 0 to LAND_HEIGHT - 1 do