hedgewars/uConsts.pas
changeset 924 227f9fcdc2f4
parent 883 07a568ba44e0
child 925 c20156328529
--- a/hedgewars/uConsts.pas	Sat May 10 13:44:30 2008 +0000
+++ b/hedgewars/uConsts.pas	Sat May 10 14:46:02 2008 +0000
@@ -52,7 +52,7 @@
                    gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame,
                    gtFirePunch, gtATStartGame, gtATSmoothWindCh, gtATFinishGame,
                    gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder,
-                   gtTeleport, gtSmallDamage, gtSwitcher, gtTarget);
+                   gtTeleport, gtSmallDamage, gtSwitcher, gtTarget, gtMortar);
 
      TVisualGearType = (vgtFlake, vgtCloud);
 
@@ -69,7 +69,7 @@
      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch,
                    amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
-                   amGirder, amTeleport, amSwitch);
+                   amGirder, amTeleport, amSwitch, amMortar);
 
      THWFont    = (fnt16, fntBig, fntSmall);
 
@@ -803,6 +803,23 @@
                                    maxAngle: 0;
                                    isDamaging: false;
                                    PosCount: 1;
+                                   PosSprite: sprWater),
+                                  (NameId: sidMortar;
+                                   NameTex: nil;
+                                   Probability: 100;
+                                   NumberInCase: 5;
+                                   Ammo: (Propz: 0;
+                                          Count: 5;
+                                          NumPerTurn: 0;
+                                          Timer: 0;
+                                          Pos: 0;
+                                          AmmoType: amMortar);
+                                   Slot: 1;
+                                   TimeAfterTurn: 3000;
+                                   minAngle: 0;
+                                   maxAngle: 0;
+                                   isDamaging: true;
+                                   PosCount: 1;
                                    PosSprite: sprWater));
 
 var CountTexz: array[1..9] of PTexture;