--- a/hedgewars/ArgParsers.inc	Mon Jun 04 08:11:47 2012 -0400
+++ b/hedgewars/ArgParsers.inc	Mon Jun 04 21:32:30 2012 +0400
@@ -61,6 +61,11 @@
     else 
         cStereoMode:= TStereoMode(max(0, min(ord(high(TStereoMode)), tmp-6)));
     cLocaleFName:= ParamStr(17);
+    if ParamCount > 17 then
+        begin
+        cRecPrefix:= ParamStr(18);
+        GameType:= gmtRecord;
+        end;
 end;
 
 procedure setVideo(screenWidth: LongInt; screenHeight: LongInt; bitsStr: LongInt);