affect tweaks molotov spread some more
authornemo
Fri, 16 Oct 2009 20:54:12 +0000
changeset 2512 ab0e6aacb6da
parent 2511 446aac3c05a4
child 2513 182c585b49d1
affect tweaks molotov spread some more
hedgewars/GSHandlers.inc
--- a/hedgewars/GSHandlers.inc	Fri Oct 16 20:45:07 2009 +0000
+++ b/hedgewars/GSHandlers.inc	Fri Oct 16 20:54:12 2009 +0000
@@ -229,7 +229,7 @@
 		PlaySound(sndMolotov, false, nil);
 		//doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 5, EXPLAutoSound);
 		for i:= 0 to 20 do begin
-				dX:= AngleCos(i * 2) * ((_0_08*(i div 6))) * (GetRandom + _1);
+				dX:= AngleCos(i * 2) * ((_0_1*(i div 5))) * (GetRandom + _1);
 				dY:= AngleSin(i * 8) * _0_5 * (GetRandom + _1);
 				Fire:= AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtFlame, 0, dX, dY, 0);
 				Fire^.State:= Fire^.State or gsttmpFlag;