hedgewars/uWorld.pas
changeset 13635 571f8110957e
parent 13634 73c2a669c1fd
child 13636 fc8c8910a281
equal deleted inserted replaced
13634:73c2a669c1fd 13635:571f8110957e
  1345         DrawWaves( -1, 25 + WorldDx div 3, - offsetY div 10, 59, 0);
  1345         DrawWaves( -1, 25 + WorldDx div 3, - offsetY div 10, 59, 0);
  1346         end
  1346         end
  1347     else
  1347     else
  1348         DrawWaves(-1, 50, cWaveHeight div 2, cWaveHeight div 2, 0);
  1348         DrawWaves(-1, 50, cWaveHeight div 2, cWaveHeight div 2, 0);
  1349 
  1349 
  1350 DrawGearsGui;
  1350 if replicateToLeft then
       
  1351     begin
       
  1352     ShiftWorld(-1);
       
  1353     DrawGearsGui();
       
  1354     UnshiftWorld();
       
  1355     end;
       
  1356 
       
  1357 if replicateToRight then
       
  1358     begin
       
  1359     ShiftWorld(1);
       
  1360     DrawGearsGui();
       
  1361     UnshiftWorld();
       
  1362     end;
       
  1363 
       
  1364 DrawGearsGui();
  1351 
  1365 
  1352 // everything after this ChangeDepth will be drawn outside the screen
  1366 // everything after this ChangeDepth will be drawn outside the screen
  1353 // note: negative parallax gears should last very little for a smooth stereo effect
  1367 // note: negative parallax gears should last very little for a smooth stereo effect
  1354     ChangeDepth(RM, cStereo_Outside);
  1368     ChangeDepth(RM, cStereo_Outside);
  1355 
  1369