Mercurial Mercurial > hedgewars / comparison
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uGearsRender.pas
changeset 4394 c1f2ca416ea8
parent 4388 b14e24444bca
child 4578 f3cf226fad16
equal deleted inserted replaced
4392:95e27e12d0e9 4394:c1f2ca416ea8 
   795             if (cTagsMask and htTransparent) <> 0 then
 
   795             if (cTagsMask and htTransparent) <> 0 then
 
   796                 Tint($FF, $FF, $FF, $FF)
 
   796                 Tint($FF, $FF, $FF, $FF)
 
   797             end;
 
   797             end;
 
   798         if (Gear^.State and gstHHDriven) <> 0 then // Current hedgehog
 
   798         if (Gear^.State and gstHHDriven) <> 0 then // Current hedgehog
 
   799             begin
 
   799             begin
 
       
   800             if (CurAmmoGear <> nil) and (CurAmmoGear^.Kind = gtResurrector) then
 
       
   801                 DrawCentered(ox, sy - cHHRadius - 7 - HealthTagTex^.h, HealthTagTex);
 
       
   802 
   800             if bShowFinger and ((Gear^.State and gstHHDriven) <> 0) then
 
   803             if bShowFinger and ((Gear^.State and gstHHDriven) <> 0) then
 
   801                 DrawSprite(sprFinger, ox - 16, oy - 64,
 
   804                 DrawSprite(sprFinger, ox - 16, oy - 64,
 
   802                             GameTicks div 32 mod 16);
 
   805                             GameTicks div 32 mod 16);
 
   803 
   806 
   804             if (Gear^.State and gstDrowning) = 0 then
 
   807             if (Gear^.State and gstDrowning) = 0 then
hedgewars