hedgewars/uConsts.pas
changeset 534 92fb2b0d5117
parent 525 ae21b8e86dd9
child 542 ec26095f1bed
equal deleted inserted replaced
533:eebb7684ac22 534:92fb2b0d5117
    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, sprHHTelepMask);
    42                    sprAirplane, sprAmAirplane, sprAmGirder, sprHHTelepMask,
       
    43                    sprSwitch);
    43 
    44 
    44      TGearType  = (gtCloud, gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,
    45      TGearType  = (gtCloud, gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,
    45                    gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope,
    46                    gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope,
    46                    gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite,
    47                    gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite,
    47                    gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame,
    48                    gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame,
    48                    gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame,
    49                    gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame,
    49                    gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder,
    50                    gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder,
    50                    gtTeleport, gtSmallDamage);
    51                    gtTeleport, gtSmallDamage, gtSwitcher);
    51 
    52 
    52      TGearsType = set of TGearType;
    53      TGearsType = set of TGearType;
    53 
    54 
    54      TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease,
    55      TSound     = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease,
    55                    sndSplash, sndShotgunReload, sndShotgunFire, sndGraveImpact,
    56                    sndSplash, sndShotgunReload, sndShotgunFire, sndGraveImpact,
    56                    sndMineTick, sndPickhammer);
    57                    sndMineTick, sndPickhammer);
    57 
    58 
    58      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    59      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    59                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch,
    60                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch,
    60                    amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
    61                    amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
    61                    amGirder, amTeleport);
    62                    amGirder, amTeleport, amSwitch);
    62 
    63 
    63      THWFont    = (fnt16, fntBig, fntSmall);
    64      THWFont    = (fnt16, fntBig, fntSmall);
    64 
    65 
    65      TCapGroup  = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
    66      TCapGroup  = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
    66 
    67 
   323                      (FileName:'amAirplane'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
   324                      (FileName:'amAirplane'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
   324                      Width:  64; Height: 32; hasAlpha:  true),// sprAirplane
   325                      Width:  64; Height: 32; hasAlpha:  true),// sprAirplane
   325                      (FileName:  'amGirder'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
   326                      (FileName:  'amGirder'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
   326                      Width: 160; Height:160; hasAlpha: false),// sprAmGirder
   327                      Width: 160; Height:160; hasAlpha: false),// sprAmGirder
   327                      (FileName:    'hhMask'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
   328                      (FileName:    'hhMask'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
   328                      Width:  32; Height: 32; hasAlpha: false) // sprHHTelepMask
   329                      Width:  32; Height: 32; hasAlpha: false),// sprHHTelepMask
       
   330                      (FileName:    'Switch'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
       
   331                      Width:  32; Height: 32; hasAlpha: false) // sprSwitch
   329                      );
   332                      );
   330       Soundz: array[TSound] of record
   333       Soundz: array[TSound] of record
   331                                        FileName: String[31];
   334                                        FileName: String[31];
   332                                        Path    : TPathType;
   335                                        Path    : TPathType;
   333                                        id      : PMixChunk;
   336                                        id      : PMixChunk;
   662                                    Slot: 7;
   665                                    Slot: 7;
   663                                    TimeAfterTurn: 0;
   666                                    TimeAfterTurn: 0;
   664                                    minAngle: 0;
   667                                    minAngle: 0;
   665                                    maxAngle: 0;
   668                                    maxAngle: 0;
   666                                    PosCount: 1;
   669                                    PosCount: 1;
       
   670                                    PosSprite: sprWater),
       
   671                                   (NameId: sidSwitch;
       
   672                                    Probability: 100;
       
   673                                    NumberInCase: 1;
       
   674                                    Ammo: (Propz: ammoprop_ForwMsgs or
       
   675                                                  ammoprop_NoCrosshair;
       
   676                                           Count: 3;
       
   677                                           NumPerTurn: 0;
       
   678                                           Timer: 0;
       
   679                                           Pos: 0;
       
   680                                           AmmoType: amSwitch);
       
   681                                    Slot: 8;
       
   682                                    TimeAfterTurn: 0;
       
   683                                    minAngle: 0;
       
   684                                    maxAngle: 0;
       
   685                                    PosCount: 1;
   667                                    PosSprite: sprWater));
   686                                    PosSprite: sprWater));
   668 
   687 
   669 implementation
   688 implementation
   670 
   689 
   671 end.
   690 end.