equal
deleted
inserted
replaced
519 if Gear^.Hedgehog <> nil then |
519 if Gear^.Hedgehog <> nil then |
520 Gear^.Tex:= RenderStringTex(s, Gear^.Hedgehog^.Team^.Clan^.Color, fnt16) |
520 Gear^.Tex:= RenderStringTex(s, Gear^.Hedgehog^.Team^.Clan^.Color, fnt16) |
521 else |
521 else |
522 Gear^.Tex:= RenderStringTex(s, cWhiteColor, fnt16); |
522 Gear^.Tex:= RenderStringTex(s, cWhiteColor, fnt16); |
523 |
523 |
524 Gear^.doStep:= @doStepHealthTagWork |
524 Gear^.doStep:= @doStepHealthTagWork; |
525 |
525 |
526 if (round(Gear^.Y) < cWaterLine) and (Frame = 0) then |
526 if (round(Gear^.Y) < cWaterLine) and (Frame = 0) then |
527 Gear^.doStep:= @doStepHealthTagWorkUnderWater; |
527 Gear^.doStep:= @doStepHealthTagWorkUnderWater; |
528 |
528 |
529 Gear^.Y:= Gear^.Y - Gear^.Tex^.h; |
529 Gear^.Y:= Gear^.Y - Gear^.Tex^.h; |