hedgewars/uWorld.pas
changeset 6603 ef9ed71e3cf7
parent 6601 5965e2927b3d
child 6606 fb6163ff4ebf
equal deleted inserted replaced
6602:9bd4985120b3 6603:ef9ed71e3cf7
   189 uCursor.init();
   189 uCursor.init();
   190 prevPoint.X:= 0;
   190 prevPoint.X:= 0;
   191 prevPoint.Y:= cScreenHeight div 2;
   191 prevPoint.Y:= cScreenHeight div 2;
   192 WorldDx:=  - (LAND_WIDTH div 2) + cScreenWidth div 2;
   192 WorldDx:=  - (LAND_WIDTH div 2) + cScreenWidth div 2;
   193 WorldDy:=  - (LAND_HEIGHT - (playHeight div 2)) + (cScreenHeight div 2);
   193 WorldDy:=  - (LAND_HEIGHT - (playHeight div 2)) + (cScreenHeight div 2);
       
   194 // AMSlotSize is the active dimension of the ammo icon
       
   195 // AMWidth is the horizontal size of the whole ammomenu
       
   196 // cMaxSlotIndex is the amount of weapons per row
   194 AMSlotSize:= 33;
   197 AMSlotSize:= 33;
   195 {$IFDEF MOBILE}
   198 {$IFDEF MOBILE}
   196 if isPhone() then
   199 if isPhone() then
   197     begin
   200     begin
   198     AMxOffset:= -30 + cScreenHeight div 2;
   201     AMxOffset:= -30 + cScreenHeight div 2;