--- a/hedgewars/hwengine.pas	Fri Jun 08 02:41:14 2012 +0400
+++ b/hedgewars/hwengine.pas	Fri Jun 08 02:52:35 2012 +0400
@@ -31,7 +31,8 @@
 
 uses SDLh, uMisc, uConsole, uGame, uConsts, uLand, uAmmos, uVisualGears, uGears, uStore, uWorld, uInputHandler, uSound,
      uScript, uTeams, uStats, uIO, uLocale, uChat, uAI, uAIMisc, uRandom, uLandTexture, uCollisions,
-     SysUtils, uTypes, uVariables, uCommands, uUtils, uCaptions, uDebug, uCommandHandlers, uLandPainted, uVideoRec
+     SysUtils, uTypes, uVariables, uCommands, uUtils, uCaptions, uDebug, uCommandHandlers, uLandPainted
+     {$IFDEF USE_VIDEO_RECORDING}, uVideoRec {$ENDIF}
      {$IFDEF SDL13}, uTouch{$ENDIF}{$IFDEF ANDROID}, GLUnit{$ENDIF};
 
 {$IFDEF HWLIBRARY}
@@ -101,8 +102,10 @@
 
     SwapBuffers;
 
+{$IFDEF USE_VIDEO_RECORDING}
     if flagPrerecording then
         SaveCameraPosition;
+{$ENDIF}
 
     if flagMakeCapture then
         begin
@@ -264,7 +267,7 @@
     end;
 end;
 
-////////////////
+{$IFDEF USE_VIDEO_RECORDING}
 procedure RecorderMainLoop;
 var CurrTime, PrevTime: LongInt;
 begin
@@ -289,6 +292,7 @@
     end;
     StopVideoRecording();
 end;
+{$ENDIF}
 
 ///////////////
 procedure Game{$IFDEF HWLIBRARY}(gameArgs: PPChar); cdecl; export{$ENDIF};
@@ -572,11 +576,14 @@
     else
         if (ParamCount = 3) and ((ParamStr(3) = '--stats-only') or (ParamStr(3) = 'landpreview')) then
             internalSetGameTypeLandPreviewFromParameters()
+        else if ParamCount = cDefaultParamNum then
+            internalStartGameWithParameters()
+{$IFDEF USE_VIDEO_RECORDING}
+        else if ParamCount = cVideorecParamNum then
+            internalStartVideoRecordingWithParameters()
+{$ENDIF}
         else
-            if (ParamCount = cDefaultParamNum) or (ParamCount = cDefaultParamNum+1) then
-                internalStartGameWithParameters()
-            else
-                playReplayFileWithParameters();
+            playReplayFileWithParameters();
 end;
 
 ////////////////////////////////////////////////////////////////////////////////