changeset 8145 | 6408c0ba4ba1 |
parent 7978 | 2ce76d1f594b |
child 8161 | 0b8beacff8a5 |
--- a/hedgewars/uGearsRender.pas Thu Nov 29 23:13:06 2012 -0500 +++ b/hedgewars/uGearsRender.pas Thu Nov 29 23:23:19 2012 -0500 @@ -39,6 +39,14 @@ implementation uses uRender, uUtils, uVariables, uAmmos, Math, uVisualGears; +const + // hog tag mask + htNone = $00; + htTeamName = $01; + htName = $02; + htHealth = $04; + htTransparent = $08; + procedure DrawRopeLinesRQ(Gear: PGear); begin with RopePoints do