hedgewars/uConsts.pas
changeset 1507 d18c67b7ad4c
parent 1505 3a96e93572cb
child 1508 ef093f31ced1
--- a/hedgewars/uConsts.pas	Fri Nov 21 21:47:51 2008 +0000
+++ b/hedgewars/uConsts.pas	Sat Nov 22 14:39:14 2008 +0000
@@ -81,7 +81,7 @@
 			amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch, amWhip,
 			amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
 			amGirder, amTeleport, amSwitch, amMortar, amKamikaze, amCake,
-			amSeduction, amWatermelon, amHellishBomb);
+			amSeduction, amWatermelon, amHellishBomb, amNapalm);
 
 	THWFont = (fnt16, fntBig, fntSmall);
 
@@ -1057,7 +1057,28 @@
 			isDamaging: true;
 			SkipTurns: 0;
 			PosCount: 1;
-			PosSprite: sprWater)
+			PosSprite: sprWater),
+			(NameId: sidAirAttack;
+			NameTex: nil;
+			Probability: 100;
+			NumberInCase: 1;
+			Ammo: (Propz: ammoprop_NoCrosshair or
+							ammoprop_NeedTarget or
+							ammoprop_AttackingPut or
+							ammoprop_DontHold;
+					Count: 1;
+					NumPerTurn: 0;
+					Timer: 0;
+					Pos: 0;
+					AmmoType: amNapalm);
+			Slot: 5;
+			TimeAfterTurn: 0;
+			minAngle: 0;
+			maxAngle: 0;
+			isDamaging: true;
+			SkipTurns: 0;
+			PosCount: 2;
+			PosSprite: sprAmAirplane)
 			);
 
 var CountTexz: array[1..9] of PTexture;