hedgewars/uConsts.pas
changeset 5366 bfdd925e89a5
parent 5348 0bc81de36e08
parent 5343 ff7ecf483759
child 5441 39962b855540
equal deleted inserted replaced
5357:ec36f3d53f3c 5366:bfdd925e89a5
   259 
   259 
   260     posCaseAmmo    = $00000001;
   260     posCaseAmmo    = $00000001;
   261     posCaseHealth  = $00000002;
   261     posCaseHealth  = $00000002;
   262     posCaseUtility = $00000004;
   262     posCaseUtility = $00000004;
   263     posCaseDummy   = $00000008;
   263     posCaseDummy   = $00000008;
   264     posCaseTrap    = $00000010;
   264     posCaseExplode = $00000010;
       
   265     posCasePoison  = $00000020;
   265 
   266 
   266     NoPointX = Low(LongInt);
   267     NoPointX = Low(LongInt);
   267     cTargetPointRef : TPoint = (X: NoPointX; Y: 0);
   268     cTargetPointRef : TPoint = (X: NoPointX; Y: 0);
   268 
   269 
   269     // hog tag mask
   270     // hog tag mask