hedgewars/uConsts.pas
changeset 1865 ebc6dfca60d4
parent 1863 705c01571196
child 1892 fddc1201df25
equal deleted inserted replaced
1864:71c2310a6f41 1865:ebc6dfca60d4
    48 			sprKamikaze, sprWhip, sprKowtow, sprSad, sprWave,
    48 			sprKamikaze, sprWhip, sprKowtow, sprSad, sprWave,
    49 			sprHurrah, sprLemonade, sprExplPart, sprExplPart2,
    49 			sprHurrah, sprLemonade, sprExplPart, sprExplPart2,
    50 			sprCakeWalk, sprCakeDown, sprAMAmmosBW, sprWatermelon,
    50 			sprCakeWalk, sprCakeDown, sprAMAmmosBW, sprWatermelon,
    51 			sprEvilTrace, sprHellishBomb, sprSeduction, sprDress,
    51 			sprEvilTrace, sprHellishBomb, sprSeduction, sprDress,
    52 			sprCensored, sprDrill, sprHandDrill, sprHandBallgun, sprBalls,
    52 			sprCensored, sprDrill, sprHandDrill, sprHandBallgun, sprBalls,
    53 			sprPlane, sprHandPlane, sprUtility);
    53 			sprPlane, sprHandPlane, sprUtility, sprInvulnerable);
    54 
    54 
    55 	TGearType = (gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag, // 3
    55 	TGearType = (gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag, // 3
    56 			gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope, // 8
    56 			gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope, // 8
    57 			gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite, // 14
    57 			gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite, // 14
    58 			gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame, // 19
    58 			gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame, // 19
   198 	gstHHThinking     = $00000800;
   198 	gstHHThinking     = $00000800;
   199 	gstNoDamage       = $00001000;
   199 	gstNoDamage       = $00001000;
   200 	gstHHHJump        = $00002000;
   200 	gstHHHJump        = $00002000;
   201 	gstAnimation      = $00004000;
   201 	gstAnimation      = $00004000;
   202 	gstHHDeath        = $00008000;
   202 	gstHHDeath        = $00008000;
   203 	gstWinner         = $00010000;
   203 	gstWinner         = $00010000;  // this, along with gstLoser, is good for indicating hedgies know they screwed up
   204 	gstWait           = $00020000;
   204 	gstWait           = $00020000;
   205 	gstNotKickable    = $00040000;
   205 	gstNotKickable    = $00040000;
       
   206 	gstLoser          = $00080000;
   206 
   207 
   207 	gm_Left   = $00000001;
   208 	gm_Left   = $00000001;
   208 	gm_Right  = $00000002;
   209 	gm_Right  = $00000002;
   209 	gm_Up     = $00000004;
   210 	gm_Up     = $00000004;
   210 	gm_Down   = $00000008;
   211 	gm_Down   = $00000008;
   472 			(FileName:    'RCPlane'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
   473 			(FileName:    'RCPlane'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
   473 			Width:  32; Height: 32; saveSurf: false),// sprPlane
   474 			Width:  32; Height: 32; saveSurf: false),// sprPlane
   474 			(FileName:  'amRCPlane'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
   475 			(FileName:  'amRCPlane'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
   475 			Width:  32; Height: 32; saveSurf: false), // sprHandPlane
   476 			Width:  32; Height: 32; saveSurf: false), // sprHandPlane
   476 			(FileName:    'Utility'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
   477 			(FileName:    'Utility'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
   477 			Width:  48; Height: 48; saveSurf: false) // sprUtility
   478 			Width:  48; Height: 48; saveSurf: false), // sprUtility
       
   479 			(FileName:  'Invulnerable'; Path: ptHedgehog;AltPath: ptNone; Texture: nil; Surface: nil;
       
   480 			Width: 48; Height: 48; saveSurf: false) // sprInvulnerable
   478 			);
   481 			);
   479 
   482 
   480 	Wavez: array [TWave] of record
   483 	Wavez: array [TWave] of record
   481 			Sprite: TSprite;
   484 			Sprite: TSprite;
   482 			FramesCount: Longword;
   485 			FramesCount: Longword;