hedgewars/uGearsRender.pas
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