hedgewars/uWorld.pas
changeset 6610 84b0bc1bf399
parent 6609 5861b2cc991f
child 6622 01889d5bc79b
--- a/hedgewars/uWorld.pas	Sat Jan 28 23:10:39 2012 +0100
+++ b/hedgewars/uWorld.pas	Sun Jan 29 00:48:39 2012 +0100
@@ -193,8 +193,6 @@
 WorldDy:=  -(LAND_HEIGHT - (playHeight div 2)) + (cScreenHeight div 2);
 
 //aligns it to the bottom of the screen, minus the border
-AMShiftTarget:= (cMaxSlotAmmoIndex + 2) * AMSlotSize + AMxOffset;
-AMShift:= AMShiftTarget;
 SkyOffset:= 0;
 HorizontOffset:= 0;
 
@@ -204,10 +202,14 @@
     AMyOffset:= AMSlotSize
 else
     AMyOffset:= AMSlotSize * 2;
+AMShiftTarget:= (cMaxSlotAmmoIndex + 2) * AMSlotSize + AMyOffset;
 {$ELSE}
 AMxOffset:= 10;
 AMyOffset:= 60;
+AMShiftTarget:= (cMaxSlotAmmoIndex + 2) * AMSlotSize + AMxOffset;
 {$ENDIF}
+
+AMShift:= AMShiftTarget;
 end;
 
 procedure InitCameraBorders;