hedgewars/uConsts.pas
changeset 2251 bf0b59d3536a
parent 2250 70f344c911ea
child 2258 3dd028604cfd
--- a/hedgewars/uConsts.pas	Fri Jul 10 16:56:37 2009 +0000
+++ b/hedgewars/uConsts.pas	Fri Jul 10 19:10:29 2009 +0000
@@ -177,7 +177,13 @@
       1024 -> $FFFFFC00
        512 -> $FFFFFE00  *}
 
-{$IFDEF IPHONEOS or LOWRES}
+{$IFDEF IPHONEOS}
+    LAND_WIDTH  = 2048;
+    LAND_HEIGHT = 1024;
+    LAND_WIDTH_MASK  = $FFFFF800;
+    LAND_HEIGHT_MASK = $FFFFFC00;
+{$ELSE}
+{$IFDEF LOWRES}
     LAND_WIDTH  = 2048;
     LAND_HEIGHT = 1024;
     LAND_WIDTH_MASK  = $FFFFF800;
@@ -188,6 +194,7 @@
     LAND_WIDTH_MASK  = $FFFFF000;
     LAND_HEIGHT_MASK = $FFFFF800;
 {$ENDIF}
+{$ENDIF}
 
     COLOR_LAND           = $FFFF;  // white
     COLOR_INDESTRUCTIBLE = $88FF;  // red