hedgewars/hwengine.pas
branchexperimental3D
changeset 3690 c247dee9e1c0
parent 3670 4c673e57f0d7
child 3693 09892cdb8f95
child 3694 3e9c0634065c
--- a/hedgewars/hwengine.pas	Fri Jul 30 13:36:03 2010 +0200
+++ b/hedgewars/hwengine.pas	Sat Jul 31 10:53:54 2010 +0200
@@ -230,9 +230,11 @@
     recordFileName:= gameArgs[8];
     
     val(gameArgs[9], cReducedQuality);
+    isStereoEnabled:= false; // TODO: Enable anaglyph rendering on iPhone?
 {$ENDIF}
 
     initEverything(true);
+
     WriteLnToConsole('Hedgewars ' + cVersionString + ' engine (network protocol: ' + inttostr(cNetProtoVersion) + ')');
 {$IFDEF DEBUGFILE}
     AddFileLog('Prefix: "' + PathPrefix +'"');
@@ -437,7 +439,7 @@
 procedure GetParams;
 begin
     case ParamCount of
-        18: begin
+        19: begin
             val(ParamStr(2), cScreenWidth);
             val(ParamStr(3), cScreenHeight);
             cBitsStr:= ParamStr(4);
@@ -455,6 +457,7 @@
             cAltDamage:= ParamStr(15) = '1';
             UserNick:= DecodeBase64(ParamStr(16));
             isMusicEnabled:= ParamStr(17) = '1';
+            isStereoEnabled:= ParamStr(19) = '1';
 
             if (ParamStr(18) = '1') then        //HACK - always disable rqLowRes as it's a game breaker
                 cReducedQuality:= $FFFFFFFF xor rqLowRes