hedgewars/uGears.pas
changeset 2937 da06c25edf1d
parent 2935 b80800979436
child 2938 451f917ac46c
--- a/hedgewars/uGears.pas	Fri Mar 05 02:23:57 2010 +0000
+++ b/hedgewars/uGears.pas	Fri Mar 05 02:28:03 2010 +0000
@@ -1825,6 +1825,7 @@
                         ApplyDamage(Gear, tmpDmg)
                     else
                         Gear^.State:= Gear^.State or gstWinner;
+                    if (Gear^.Kind = gtExplosives) and (Ammo^.Kind = gtBlowtorch) then ApplyDamage(Gear, tmpDmg * 100); // crank up damage for explosives + blowtorch
 
 					DeleteCI(Gear);
                     if (Gear^.Kind = gtHedgehog) and PHedgehog(Gear^.Hedgehog)^.King then