hedgewars/uConsts.pas
changeset 520 e83dfb7ffead
parent 511 2b5b9e00419d
child 522 ca089787f59d
equal deleted inserted replaced
519:981df6f6e2a9 520:e83dfb7ffead
    37                    sprSmokeTrace, sprRopeHook, sprExplosion50, sprMineOff,
    37                    sprSmokeTrace, sprRopeHook, sprExplosion50, sprMineOff,
    38                    sprMineOn, sprCase, sprFAid, sprDynamite, sprPower,
    38                    sprMineOn, sprCase, sprFAid, sprDynamite, sprPower,
    39                    sprClusterBomb, sprClusterParticle, sprFlame, sprHorizont,
    39                    sprClusterBomb, sprClusterParticle, sprFlame, sprHorizont,
    40                    sprSky, sprAMBorders, sprAMSlot, sprAMSlotName, sprAMAmmos,
    40                    sprSky, sprAMBorders, sprAMSlot, sprAMSlotName, sprAMAmmos,
    41                    sprAMSlotKeys, sprAMSelection, sprFinger, sprAirBomb,
    41                    sprAMSlotKeys, sprAMSelection, sprFinger, sprAirBomb,
    42                    sprAirplane, sprAmAirplane, sprAmGirder);
    42                    sprAirplane, sprAmAirplane, sprAmGirder, sprHHTelepMask);
    43 
    43 
    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, gtBlowTorch, gtGirder);
    49                    gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder,
       
    50                    gtTeleport);
    50 
    51 
    51      TGearsType = set of TGearType;
    52      TGearsType = set of TGearType;
    52 
    53 
    53      TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease,
    54      TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease,
    54                    sndSplash, sndShotgunReload, sndShotgunFire, sndGraveImpact,
    55                    sndSplash, sndShotgunReload, sndShotgunFire, sndGraveImpact,
    55                    sndMineTick, sndPickhammer);
    56                    sndMineTick, sndPickhammer);
    56 
    57 
    57      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    58      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    58                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch,
    59                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch,
    59                    amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
    60                    amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
    60                    amGirder);
    61                    amGirder, amTeleport);
    61 
    62 
    62      THWFont    = (fnt16, fntBig);
    63      THWFont    = (fnt16, fntBig);
    63 
    64 
    64      TCapGroup  = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
    65      TCapGroup  = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
    65 
    66 
   316                      (FileName:  'Airplane'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
   317                      (FileName:  'Airplane'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
   317                      Width: 125; Height: 42; hasAlpha: false),// sprAirplane
   318                      Width: 125; Height: 42; hasAlpha: false),// sprAirplane
   318                      (FileName:'amAirplane'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
   319                      (FileName:'amAirplane'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
   319                      Width:  64; Height: 32; hasAlpha:  true),// sprAirplane
   320                      Width:  64; Height: 32; hasAlpha:  true),// sprAirplane
   320                      (FileName:  'amGirder'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
   321                      (FileName:  'amGirder'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
   321                      Width: 160; Height:160; hasAlpha: false) // sprAmGirder
   322                      Width: 160; Height:160; hasAlpha: false),// sprAmGirder
       
   323                      (FileName:    'hhMask'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
       
   324                      Width:  32; Height: 32; hasAlpha: false) // sprHHTelepMask
   322                      );
   325                      );
   323       Soundz: array[TSound] of record
   326       Soundz: array[TSound] of record
   324                                        FileName: String[31];
   327                                        FileName: String[31];
   325                                        Path    : TPathType;
   328                                        Path    : TPathType;
   326                                        id      : PMixChunk;
   329                                        id      : PMixChunk;
   637                                    Slot: 6;
   640                                    Slot: 6;
   638                                    TimeAfterTurn: 3000;
   641                                    TimeAfterTurn: 3000;
   639                                    minAngle: 0;
   642                                    minAngle: 0;
   640                                    maxAngle: 0;
   643                                    maxAngle: 0;
   641                                    PosCount: 8;
   644                                    PosCount: 8;
   642                                    PosSprite: sprAmGirder));
   645                                    PosSprite: sprAmGirder),
       
   646                                   (NameId: sidTeleport;
       
   647                                    Probability: 400;
       
   648                                    NumberInCase: 1;
       
   649                                    Ammo: (Propz: ammoprop_NoCrosshair or
       
   650                                                  ammoprop_NeedTarget or
       
   651                                                  ammoprop_AttackingPut;
       
   652                                           Count: 2;
       
   653                                           NumPerTurn: 0;
       
   654                                           Timer: 0;
       
   655                                           Pos: 0;
       
   656                                           AmmoType: amTeleport);
       
   657                                    Slot: 7;
       
   658                                    TimeAfterTurn: 0;
       
   659                                    minAngle: 0;
       
   660                                    maxAngle: 0;
       
   661                                    PosCount: 1;
       
   662                                    PosSprite: sprWater));
   643 
   663 
   644 implementation
   664 implementation
   645 
   665 
   646 end.
   666 end.