1238     r: TSDL_Rect;

  1238     r: TSDL_Rect;

  1239     tdx, tdy: Double;

  1239     tdx, tdy: Double;

  1240     s: shortstring;

  1240     s: shortstring;

  1241     offsetX, offsetY, screenBottom: LongInt;

  1241     offsetX, offsetY, screenBottom: LongInt;

  1242     VertexBuffer: array [0..3] of TVertex2f;

  1242     VertexBuffer: array [0..3] of TVertex2f;

  1244 begin

  1244 begin

  1245 if WorldEdge <> weWrap then

  1245 if WorldEdge <> weWrap then

  1246 begin

  1246 begin

  1247 replicateToLeft := false;

  1247 replicateToLeft := false;

  1248 replicateToRight:= false;

  1248 replicateToRight:= false;

  1331                             i)

  1331                             i)

  1332                 end

  1332                 end

  1333         end;

  1333         end;

  1334 *)

  1334 *)

  1335 

  1335 

  1336 if replicateToLeft then

  1339 if replicateToLeft then

  1337     begin

  1340     begin

  1338     // remember original value

  1341     // remember original value

  1339     i:= WorldDx;

  1342     i:= WorldDx;

  1340     WorldDx:= i - playWidth;

  1343     WorldDx:= i - playWidth;

  1354     DrawGears();

  1357     DrawGears();

  1355     DrawVisualGears(6);

  1358     DrawVisualGears(6);

  1356     // reset to original value

  1359     // reset to original value

  1357     WorldDx:= i;

  1360     WorldDx:= i;

  1358     end;

  1361     end;

  1359 

  1364 

  1360 DrawVisualGears(1);

  1365 DrawVisualGears(1);

  1361 DrawGears;

  1366 DrawGears;

  1362 DrawVisualGears(6);

  1367 DrawVisualGears(6);

  1363 

  1368