hedgewars/uConsts.pas
changeset 82 2f4f3236cccc
parent 80 3c3dc6a148ca
child 83 207c85fbef51
equal deleted inserted replaced
81:d74e0e914b50 82:2f4f3236cccc
    49                    sprClusterBomb, sprClusterParticle, sprFlame, sprHorizont,
    49                    sprClusterBomb, sprClusterParticle, sprFlame, sprHorizont,
    50                    sprSky);
    50                    sprSky);
    51      TGearType  = (gtCloud, gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,
    51      TGearType  = (gtCloud, gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,
    52                    gtGrave, gtUFO, gtShotgunShot, gtActionTimer, gtPickHammer, gtRope,
    52                    gtGrave, gtUFO, gtShotgunShot, gtActionTimer, gtPickHammer, gtRope,
    53                    gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite,
    53                    gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite,
    54                    gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame);
    54                    gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame,
       
    55                    gtFirePunch);
    55      TGearsType = set of TGearType;
    56      TGearsType = set of TGearType;
    56      TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease, sndSplash,
    57      TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease, sndSplash,
    57                    sndShotgunReload, sndShotgunFire, sndGraveImpact, sndMineTick);
    58                    sndShotgunReload, sndShotgunFire, sndGraveImpact, sndMineTick);
    58      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer, amSkip, amRope,
    59      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    59                    amMine, amDEagle, amDynamite, amBaseballBat);
    60                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch,
       
    61                    amBaseballBat);
    60      THWFont    = (fnt16, fntBig);
    62      THWFont    = (fnt16, fntBig);
    61      THHFont    = record
    63      THHFont    = record
    62                   Handle: PTTF_Font;
    64                   Handle: PTTF_Font;
    63                   Height: integer;
    65                   Height: integer;
    64                   Name: string[15];
    66                   Name: string[15];
   364                                            NumPerTurn: 0;
   366                                            NumPerTurn: 0;
   365                                            Timer: 0;
   367                                            Timer: 0;
   366                                            AmmoType: amDynamite);
   368                                            AmmoType: amDynamite);
   367                                     Slot: 4;
   369                                     Slot: 4;
   368                                     TimeAfterTurn: 5000),
   370                                     TimeAfterTurn: 5000),
       
   371                                    (NameId: sidFirePunch;
       
   372                                     Ammo: (Propz: ammoprop_NoCrosshair or ammoprop_ForwMsgs or ammoprop_AttackInJump or ammoprop_AttackInFall;
       
   373                                            Count: AMMO_INFINITE;
       
   374                                            NumPerTurn: 0;
       
   375                                            Timer: 0;
       
   376                                            AmmoType: amFirePunch);
       
   377                                     Slot: 3;
       
   378                                     TimeAfterTurn: 3000),
   369                                    (NameId: sidBaseballBat;
   379                                    (NameId: sidBaseballBat;
   370                                     Ammo: (Propz: 0;
   380                                     Ammo: (Propz: 0;
   371                                            Count: 1;
   381                                            Count: 1;
   372                                            NumPerTurn: 0;
   382                                            NumPerTurn: 0;
   373                                            Timer: 0;
   383                                            Timer: 0;