--- a/hedgewars/uGearsList.pas Tue May 22 17:54:07 2018 -0400
+++ b/hedgewars/uGearsList.pas Wed May 23 20:45:42 2018 -0400
@@ -224,7 +224,7 @@
gtHedgehog: Gear^.Boom := 30;
gtMine: Gear^.Boom := 50;
gtCase: Gear^.Boom := 25;
- gtAirMine: Gear^.Boom := 25;
+ gtAirMine: Gear^.Boom := 30;
gtExplosives: Gear^.Boom := 75;
gtGrenade: Gear^.Boom := 50;
gtShell: Gear^.Boom := 50;
@@ -446,7 +446,6 @@
gear^.Angle:= 175; // Radius at which air bombs will start "seeking". $FFFFFFFF = unlimited. check is skipped.
gear^.Power:= cMaxWindSpeed.QWordValue div 2; // hwFloat converted. 1/2 g default. defines the "seek" speed when a gear is in range.
gear^.Pos:= cMaxWindSpeed.QWordValue * 3 div 2; // air friction. slows it down when not hitting stuff
- gear^.Karma:= 30; // damage
if gear^.Timer = 0 then
begin
if cMinesTime < 0 then