hedgewars/uWorld.pas
branchhedgeroid
changeset 5495 272ed78e59a7
parent 5399 cdef954f8aec
parent 5485 e943a005d0e8
child 5502 0d1a1aeed00a
equal deleted inserted replaced
5479:b9aed3de7c27 5495:272ed78e59a7
   969          DrawFromRect(16, cScreenHeight + DrawHealthY + smallScreenOffset + 2, @r, HealthTex);
   969          DrawFromRect(16, cScreenHeight + DrawHealthY + smallScreenOffset + 2, @r, HealthTex);
   970          end;
   970          end;
   971       end;
   971       end;
   972 if smallScreenOffset <> 0 then
   972 if smallScreenOffset <> 0 then
   973     begin
   973     begin
   974     SetScale(zoom);
   974     SetScale(cDefaultZoomLevel);
   975     if TeamsCount * 20 > cScreenHeight div 5 then Tint($FF,$FF,$FF,$FF);
   975     if TeamsCount * 20 > cScreenHeight div 5 then Tint($FF,$FF,$FF,$FF);
   976     end;
   976     end;
   977 
   977 
   978 // Lag alert
   978 // Lag alert
   979 if isInLag then DrawSprite(sprLag, 32 - (cScreenWidth shr 1), 32, (RealTicks shr 7) mod 12);
   979 if isInLag then DrawSprite(sprLag, 32 - (cScreenWidth shr 1), 32, (RealTicks shr 7) mod 12);