hedgewars/uConsts.pas
changeset 925 c20156328529
parent 924 227f9fcdc2f4
child 926 d231e007452a
equal deleted inserted replaced
924:227f9fcdc2f4 925:c20156328529
    50                    gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope,
    50                    gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope,
    51                    gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite,
    51                    gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite,
    52                    gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame,
    52                    gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame,
    53                    gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame,
    53                    gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame,
    54                    gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder,
    54                    gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder,
    55                    gtTeleport, gtSmallDamage, gtSwitcher, gtTarget, gtMortar);
    55                    gtTeleport, gtSmallDamage, gtSwitcher, gtTarget, gtMortar,
       
    56                    gtWhip);
    56 
    57 
    57      TVisualGearType = (vgtFlake, vgtCloud);
    58      TVisualGearType = (vgtFlake, vgtCloud);
    58 
    59 
    59      TGearsType = set of TGearType;
    60      TGearsType = set of TGearType;
    60 
    61 
    65                    sndMissed, sndStupid, sndFirstBlood, sndBoring, sndByeBye,
    66                    sndMissed, sndStupid, sndFirstBlood, sndBoring, sndByeBye,
    66                    sndSameTeam, sndNutter, sndReinforce, sndTraitor, sndRegret,
    67                    sndSameTeam, sndNutter, sndReinforce, sndTraitor, sndRegret,
    67                    sndEnemyDown, sndCoward, sndHurry, sndWatchIt);
    68                    sndEnemyDown, sndCoward, sndHurry, sndWatchIt);
    68 
    69 
    69      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    70      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    70                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch,
    71                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch, amWhip,
    71                    amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
    72                    amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
    72                    amGirder, amTeleport, amSwitch, amMortar);
    73                    amGirder, amTeleport, amSwitch, amMortar);
    73 
    74 
    74      THWFont    = (fnt16, fntBig, fntSmall);
    75      THWFont    = (fnt16, fntBig, fntSmall);
    75 
    76 
   648                                    MinAngle: 0;
   649                                    MinAngle: 0;
   649                                    maxAngle: 0;
   650                                    maxAngle: 0;
   650                                    isDamaging: true;
   651                                    isDamaging: true;
   651                                    PosCount: 1;
   652                                    PosCount: 1;
   652                                    PosSprite: sprWater),
   653                                    PosSprite: sprWater),
       
   654                                   (NameId: sidWhip;
       
   655                                    NameTex: nil;
       
   656                                    Probability: 0;
       
   657                                    NumberInCase: 1;
       
   658                                    Ammo: (Propz: ammoprop_NoCrosshair;
       
   659                                           Count: AMMO_INFINITE;
       
   660                                           NumPerTurn: 0;
       
   661                                           Timer: 0;
       
   662                                           Pos: 0;
       
   663                                           AmmoType: amWhip);
       
   664                                    Slot: 3;
       
   665                                    TimeAfterTurn: 3000;
       
   666                                    MinAngle: 0;
       
   667                                    maxAngle: 0;
       
   668                                    isDamaging: true;
       
   669                                    PosCount: 1;
       
   670                                    PosSprite: sprWater),
   653                                   (NameId: sidBaseballBat;
   671                                   (NameId: sidBaseballBat;
   654                                    NameTex: nil;
   672                                    NameTex: nil;
   655                                    Probability: 100;
   673                                    Probability: 100;
   656                                    NumberInCase: 1;
   674                                    NumberInCase: 1;
   657                                    Ammo: (Propz: ammoprop_DontHold;
   675                                    Ammo: (Propz: ammoprop_DontHold;