hedgewars/uWorld.pas
branchhedgeroid
changeset 5941 db4751cb4f53
parent 5936 849f01d63538
child 6023 a28be05b20bc
equal deleted inserted replaced
5938:c186c454779d 5941:db4751cb4f53
   911    end;
   911    end;
   912 
   912 
   913 // Captions
   913 // Captions
   914 DrawCaptions;
   914 DrawCaptions;
   915 
   915 
       
   916 {$IFDEF ANDROID}
   916 // Draw buttons Related to the Touch interface
   917 // Draw buttons Related to the Touch interface
   917 DrawTexture(Round(-cScreenWidth*0.5 + cScreenHeight*0.02),Round((cScreenHeight*0.98)-(spritesData[sprFireButton].Height*0.4) ),spritesData[sprFireButton].Texture, 0.4);
   918 DrawTexture(Round(-cScreenWidth*0.5 + cScreenHeight*0.02),Round((cScreenHeight*0.98)-(spritesData[sprFireButton].Height*0.4) ),spritesData[sprFireButton].Texture, 0.4);
   918 
   919 {$ENDIF}
   919 // Teams Healths
   920 // Teams Healths
   920 if TeamsCount * 20 > cScreenHeight div 7 then  // take up less screen on small displays
   921 if TeamsCount * 20 > cScreenHeight div 7 then  // take up less screen on small displays
   921     begin
   922     begin
   922     SetScale(1.5);
   923     SetScale(1.5);
   923     smallScreenOffset:= cScreenHeight div 6;
   924     smallScreenOffset:= cScreenHeight div 6;