equal
deleted
inserted
replaced
576 |
576 |
577 |
577 |
578 procedure RenderHealth(var Hedgehog: THedgehog); |
578 procedure RenderHealth(var Hedgehog: THedgehog); |
579 var s: shortstring; |
579 var s: shortstring; |
580 begin |
580 begin |
581 str(Hedgehog.Gear^.Health, s); |
581 s:= IntToStr(Hedgehog.Gear^.Health); |
582 FreeAndNilTexture(Hedgehog.HealthTagTex); |
582 FreeAndNilTexture(Hedgehog.HealthTagTex); |
583 Hedgehog.HealthTagTex:= RenderStringTex(ansistring(s), Hedgehog.Team^.Clan^.Color, fnt16) |
583 Hedgehog.HealthTagTex:= RenderStringTex(ansistring(s), Hedgehog.Team^.Clan^.Color, fnt16) |
584 end; |
584 end; |
585 |
585 |
586 function LoadImage(const filename: shortstring; imageFlags: LongInt): PSDL_Surface; |
586 function LoadImage(const filename: shortstring; imageFlags: LongInt): PSDL_Surface; |