hedgewars/uConsts.pas
changeset 511 2b5b9e00419d
parent 509 fd58135a4407
child 520 e83dfb7ffead
equal deleted inserted replaced
510:4e994e1b7abb 511:2b5b9e00419d
   124 
   124 
   125       cHHZ = 1000;
   125       cHHZ = 1000;
   126       cCurrHHZ = Succ(cHHZ);
   126       cCurrHHZ = Succ(cHHZ);
   127 
   127 
   128       cShotgunRadius = 22;
   128       cShotgunRadius = 22;
       
   129       cBlowTorchC    = 6;
   129 
   130 
   130       cKeyMaxIndex = 1023;
   131       cKeyMaxIndex = 1023;
   131 
   132 
   132       cMaxCaptions = 4;
   133       cMaxCaptions = 4;
   133 
   134 
   146       gstHHJumping      = $00000100;
   147       gstHHJumping      = $00000100;
   147       gsttmpFlag        = $00000200;
   148       gsttmpFlag        = $00000200;
   148       gstHHThinking     = $00000800;
   149       gstHHThinking     = $00000800;
   149       gstNoDamage       = $00001000;
   150       gstNoDamage       = $00001000;
   150       gstHHHJump        = $00002000;
   151       gstHHHJump        = $00002000;
       
   152       gstAnimation      = $00004000;
   151 
   153 
   152       gm_Left   = $00000001;
   154       gm_Left   = $00000001;
   153       gm_Right  = $00000002;
   155       gm_Right  = $00000002;
   154       gm_Up     = $00000004;
   156       gm_Up     = $00000004;
   155       gm_Down   = $00000008;
   157       gm_Down   = $00000008;