--- a/hedgewars/uConsts.pas	Sun Jun 23 13:35:26 2013 -0400
+++ b/hedgewars/uConsts.pas	Sun Jun 23 17:11:29 2013 -0400
@@ -283,6 +283,13 @@
     posCaseExplode = $00000010;
     posCasePoison  = $00000020;
 
+    // hog tag mask
+    //htNone        = $00;
+    htTeamName    = $01;
+    htName        = $02;
+    htHealth      = $04;
+    htTransparent = $08;
+
     NoPointX = Low(LongInt);
     cTargetPointRef : TPoint = (X: NoPointX; Y: 0);