hedgewars/uConsts.pas
changeset 1046 c22d833c3ae2
parent 1045 ea195268734f
child 1047 ca7078116c0c
equal deleted inserted replaced
1045:ea195268734f 1046:c22d833c3ae2
    55                    gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame,
    55                    gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame,
    56                    gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder,
    56                    gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder,
    57                    gtTeleport, gtSmallDamage, gtSwitcher, gtTarget, gtMortar,
    57                    gtTeleport, gtSmallDamage, gtSwitcher, gtTarget, gtMortar,
    58                    gtWhip, gtKamikaze);
    58                    gtWhip, gtKamikaze);
    59 
    59 
    60      TVisualGearType = (vgtFlake, vgtCloud, vgtExplPart);
    60      TVisualGearType = (vgtFlake, vgtCloud, vgtExplPart, vgtFire);
    61 
    61 
    62      TGearsType = set of TGearType;
    62      TGearsType = set of TGearType;
    63 
    63 
    64      TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease,
    64      TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease,
    65                    sndSplash, sndShotgunReload, sndShotgunFire, sndGraveImpact,
    65                    sndSplash, sndShotgunReload, sndShotgunFire, sndGraveImpact,