hedgewars/uConsts.pas
changeset 9249 7b8c82785145
parent 9080 9b42757d7e71
child 9311 5baf10a52f43
equal deleted inserted replaced
9247:68bbe56badcc 9249:7b8c82785145
   281     posCaseUtility = $00000004;
   281     posCaseUtility = $00000004;
   282     posCaseDummy   = $00000008;
   282     posCaseDummy   = $00000008;
   283     posCaseExplode = $00000010;
   283     posCaseExplode = $00000010;
   284     posCasePoison  = $00000020;
   284     posCasePoison  = $00000020;
   285 
   285 
       
   286     // hog tag mask
       
   287     //htNone        = $00;
       
   288     htTeamName    = $01;
       
   289     htName        = $02;
       
   290     htHealth      = $04;
       
   291     htTransparent = $08;
       
   292 
   286     NoPointX = Low(LongInt);
   293     NoPointX = Low(LongInt);
   287     cTargetPointRef : TPoint = (X: NoPointX; Y: 0);
   294     cTargetPointRef : TPoint = (X: NoPointX; Y: 0);
   288 
   295 
   289     kSystemSoundID_Vibrate = $00000FFF;
   296     kSystemSoundID_Vibrate = $00000FFF;
   290 
   297