hedgewars/uConsts.pas
branchhedgeroid
changeset 5385 a864a0aeed96
parent 5366 bfdd925e89a5
child 5441 39962b855540
equal deleted inserted replaced
5383:cb217271f344 5385:a864a0aeed96
   207     gstWinner         = $00010000;  // this, along with gstLoser, is good for indicating hedgies know they screwed up
   207     gstWinner         = $00010000;  // this, along with gstLoser, is good for indicating hedgies know they screwed up
   208     gstWait           = $00020000;
   208     gstWait           = $00020000;
   209     gstNotKickable    = $00040000;
   209     gstNotKickable    = $00040000;
   210     gstLoser          = $00080000;
   210     gstLoser          = $00080000;
   211     gstHHGone         = $00100000;
   211     gstHHGone         = $00100000;
       
   212     gstInvisible      = $00200000;
   212 
   213 
   213     gmLeft   = $00000001;
   214     gmLeft   = $00000001;
   214     gmRight  = $00000002;
   215     gmRight  = $00000002;
   215     gmUp     = $00000004;
   216     gmUp     = $00000004;
   216     gmDown   = $00000008;
   217     gmDown   = $00000008;
   258 
   259 
   259     posCaseAmmo    = $00000001;
   260     posCaseAmmo    = $00000001;
   260     posCaseHealth  = $00000002;
   261     posCaseHealth  = $00000002;
   261     posCaseUtility = $00000004;
   262     posCaseUtility = $00000004;
   262     posCaseDummy   = $00000008;
   263     posCaseDummy   = $00000008;
   263     posCaseTrap    = $00000010;
   264     posCaseExplode = $00000010;
       
   265     posCasePoison  = $00000020;
   264 
   266 
   265     NoPointX = Low(LongInt);
   267     NoPointX = Low(LongInt);
   266     cTargetPointRef : TPoint = (X: NoPointX; Y: 0);
   268     cTargetPointRef : TPoint = (X: NoPointX; Y: 0);
   267 
   269 
   268     // hog tag mask
   270     // hog tag mask