hedgewars/uStore.pas
changeset 3773 f552c7b439fa
parent 3765 ebfe7c9b3085
child 3774 af0e68ca273e
equal deleted inserted replaced
3772:a03e6b68a3e7 3773:f552c7b439fa
   257         PLongwordArray(texsurf^.pixels)^[32 * 16 + 23]:= cNearBlackColor;
   257         PLongwordArray(texsurf^.pixels)^[32 * 16 + 23]:= cNearBlackColor;
   258 
   258 
   259         FlagTex:= Surface2Tex(texsurf, false);
   259         FlagTex:= Surface2Tex(texsurf, false);
   260         SDL_FreeSurface(texsurf);
   260         SDL_FreeSurface(texsurf);
   261 
   261 
       
   262         AIKillsTex := RenderStringTex(inttostr(stats.AIKills), Clan^.Color, fnt16);
       
   263 
   262         dec(drY, r.h + 2);
   264         dec(drY, r.h + 2);
   263         DrawHealthY:= drY;
   265         DrawHealthY:= drY;
   264         for i:= 0 to 7 do
   266         for i:= 0 to 7 do
   265             with Hedgehogs[i] do
   267             with Hedgehogs[i] do
   266                 if Gear <> nil then
   268                 if Gear <> nil then