hedgewars/uConsts.pas
changeset 211 558476056205
parent 202 8603c0420461
child 263 36379e6abcdd
equal deleted inserted replaced
210:440575778475 211:558476056205
    36                    sprAMSlotKeys, sprAMSelection, sprFinger);
    36                    sprAMSlotKeys, sprAMSelection, sprFinger);
    37      TGearType  = (gtCloud, gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,
    37      TGearType  = (gtCloud, gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,
    38                    gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope,
    38                    gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope,
    39                    gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite,
    39                    gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite,
    40                    gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame,
    40                    gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame,
    41                    gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame);
    41                    gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame,
       
    42                    gtParachute);
    42      TGearsType = set of TGearType;
    43      TGearsType = set of TGearType;
    43      TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease, sndSplash,
    44      TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease, sndSplash,
    44                    sndShotgunReload, sndShotgunFire, sndGraveImpact, sndMineTick);
    45                    sndShotgunReload, sndShotgunFire, sndGraveImpact, sndMineTick);
    45      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    46      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    46                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch,
    47                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch,
    47                    amBaseballBat);
    48                    amBaseballBat, amParachute);
    48      THWFont    = (fnt16, fntBig);
    49      THWFont    = (fnt16, fntBig);
    49      TCapGroup  = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
    50      TCapGroup  = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
    50      THHFont    = record
    51      THHFont    = record
    51                   Handle: PTTF_Font;
    52                   Handle: PTTF_Font;
    52                   Height: integer;
    53                   Height: integer;
   373                                            Count: 1;
   374                                            Count: 1;
   374                                            NumPerTurn: 0;
   375                                            NumPerTurn: 0;
   375                                            Timer: 0;
   376                                            Timer: 0;
   376                                            AmmoType: amBaseballBat);
   377                                            AmmoType: amBaseballBat);
   377                                     Slot: 3;
   378                                     Slot: 3;
   378                                     TimeAfterTurn: 5000));
   379                                     TimeAfterTurn: 5000),
       
   380                                   (NameId: sidParachute;
       
   381                                    Ammo: (Propz: ammoprop_ForwMsgs or ammoprop_AttackInJump or ammoprop_AttackInFall;
       
   382                                           Count: 2;
       
   383                                           NumPerTurn: 0;
       
   384                                           Timer: 0;
       
   385                                           AmmoType: amParachute);
       
   386                                    Slot: 6;
       
   387                                    TimeAfterTurn: 0));
   379 
   388 
   380 implementation
   389 implementation
   381 
   390 
   382 end.
   391 end.