hedgewars/uConsts.pas
changeset 6622 01889d5bc79b
parent 6609 5861b2cc991f
child 6650 56a0b7bf6c15
--- a/hedgewars/uConsts.pas	Sat Feb 04 16:17:31 2012 +0100
+++ b/hedgewars/uConsts.pas	Sat Feb 04 16:22:46 2012 +0100
@@ -289,8 +289,13 @@
     htHealth      = $04;
     htTransparent = $08;
 
+{$IFDEF MOBILE}
+    AMSlotSize = 48;
+    AMTITLE = 30;
+{$ELSE}
     AMSlotSize = 33;
-
+{$ENDIF}
+    AMSlotPadding = (AMSlotSize - 32) shr 1;
 implementation
 
 end.