hedgewars/uConsts.pas
changeset 534 92fb2b0d5117
parent 525 ae21b8e86dd9
child 542 ec26095f1bed
--- a/hedgewars/uConsts.pas	Wed May 30 20:48:57 2007 +0000
+++ b/hedgewars/uConsts.pas	Sun Jun 03 17:21:57 2007 +0000
@@ -39,7 +39,8 @@
                    sprClusterBomb, sprClusterParticle, sprFlame, sprHorizont,
                    sprSky, sprAMBorders, sprAMSlot, sprAMSlotName, sprAMAmmos,
                    sprAMSlotKeys, sprAMSelection, sprFinger, sprAirBomb,
-                   sprAirplane, sprAmAirplane, sprAmGirder, sprHHTelepMask);
+                   sprAirplane, sprAmAirplane, sprAmGirder, sprHHTelepMask,
+                   sprSwitch);
 
      TGearType  = (gtCloud, gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,
                    gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope,
@@ -47,7 +48,7 @@
                    gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame,
                    gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame,
                    gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder,
-                   gtTeleport, gtSmallDamage);
+                   gtTeleport, gtSmallDamage, gtSwitcher);
 
      TGearsType = set of TGearType;
 
@@ -58,7 +59,7 @@
      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch,
                    amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
-                   amGirder, amTeleport);
+                   amGirder, amTeleport, amSwitch);
 
      THWFont    = (fnt16, fntBig, fntSmall);
 
@@ -325,7 +326,9 @@
                      (FileName:  'amGirder'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
                      Width: 160; Height:160; hasAlpha: false),// sprAmGirder
                      (FileName:    'hhMask'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
-                     Width:  32; Height: 32; hasAlpha: false) // sprHHTelepMask
+                     Width:  32; Height: 32; hasAlpha: false),// sprHHTelepMask
+                     (FileName:    'Switch'; Path: ptGraphics; AltPath: ptNone; Surface: nil;
+                     Width:  32; Height: 32; hasAlpha: false) // sprSwitch
                      );
       Soundz: array[TSound] of record
                                        FileName: String[31];
@@ -664,6 +667,22 @@
                                    minAngle: 0;
                                    maxAngle: 0;
                                    PosCount: 1;
+                                   PosSprite: sprWater),
+                                  (NameId: sidSwitch;
+                                   Probability: 100;
+                                   NumberInCase: 1;
+                                   Ammo: (Propz: ammoprop_ForwMsgs or
+                                                 ammoprop_NoCrosshair;
+                                          Count: 3;
+                                          NumPerTurn: 0;
+                                          Timer: 0;
+                                          Pos: 0;
+                                          AmmoType: amSwitch);
+                                   Slot: 8;
+                                   TimeAfterTurn: 0;
+                                   minAngle: 0;
+                                   maxAngle: 0;
+                                   PosCount: 1;
                                    PosSprite: sprWater));
 
 implementation