hedgewars/uConsts.pas
changeset 302 7aca131ecd7f
parent 300 be94799f33d2
child 304 8096e69e839e
equal deleted inserted replaced
301:29bf9c1a3ad3 302:7aca131ecd7f
    44      TGearType  = (gtCloud, gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,
    44      TGearType  = (gtCloud, gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,
    45                    gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope,
    45                    gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope,
    46                    gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite,
    46                    gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite,
    47                    gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame,
    47                    gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame,
    48                    gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame,
    48                    gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame,
    49                    gtParachute, gtAirAttack, gtAirBomb);
    49                    gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch);
    50 
    50 
    51      TGearsType = set of TGearType;
    51      TGearsType = set of TGearType;
    52 
    52 
    53      TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease,
    53      TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease,
    54                    sndSplash, sndShotgunReload, sndShotgunFire, sndGraveImpact,
    54                    sndSplash, sndShotgunReload, sndShotgunFire, sndGraveImpact,
    55                    sndMineTick, sndPickhammer);
    55                    sndMineTick, sndPickhammer);
    56 
    56 
    57      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    57      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    58                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch,
    58                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch,
    59                    amBaseballBat, amParachute, amAirAttack, amMineStrike);
    59                    amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch);
    60 
    60 
    61      THWFont    = (fnt16, fntBig);
    61      THWFont    = (fnt16, fntBig);
    62 
    62 
    63      TCapGroup  = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
    63      TCapGroup  = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
    64 
    64 
   437                                           Count: 1;
   437                                           Count: 1;
   438                                           NumPerTurn: 0;
   438                                           NumPerTurn: 0;
   439                                           Timer: 0;
   439                                           Timer: 0;
   440                                           AmmoType: amMineStrike);
   440                                           AmmoType: amMineStrike);
   441                                    Slot: 5;
   441                                    Slot: 5;
   442                                    TimeAfterTurn: 0));
   442                                    TimeAfterTurn: 0),
       
   443                                   (NameId: sidBlowTorch;
       
   444                                    Ammo: (Propz: ammoprop_ForwMsgs;
       
   445                                           Count: 1;
       
   446                                           NumPerTurn: 0;
       
   447                                           Timer: 0;
       
   448                                           AmmoType: amBlowTorch);
       
   449                                    Slot: 6;
       
   450                                    TimeAfterTurn: 3000));
   443 
   451 
   444 implementation
   452 implementation
   445 
   453 
   446 end.
   454 end.