Fix bee crasher, tweak splash values
authornemo
Tue, 24 Jul 2012 17:50:42 -0400
changeset 7420 77567b03cc28
parent 7418 f611ee4760c0
child 7423 ec8f690f3e0f
Fix bee crasher, tweak splash values
hedgewars/uGearsUtils.pas
hedgewars/uVisualGears.pas
--- a/hedgewars/uGearsUtils.pas	Sat Jul 21 17:51:51 2012 -0400
+++ b/hedgewars/uGearsUtils.pas	Tue Jul 24 17:50:42 2012 -0400
@@ -420,10 +420,9 @@
                 Scale:= hwFloat2Float(Gear^.Density / _3 * Gear^.dY);
                 if Scale > 1 then Scale:= power(Scale,0.3333)
                 else Scale:= Scale + ((1-Scale) / 2);
-                if Scale > 1 then Timer:= round(max(Scale,3))
+                if Scale > 1 then Timer:= round(min(Scale*0.0005/cGravityf,4))
                 else Timer:= 1;
                 // Low Gravity
-                Timer:=round(0.0005/cGravityf);
                 FrameTicks:= FrameTicks*Timer;
                 end;
 
--- a/hedgewars/uVisualGears.pas	Sat Jul 21 17:51:51 2012 -0400
+++ b/hedgewars/uVisualGears.pas	Tue Jul 24 17:50:42 2012 -0400
@@ -295,6 +295,8 @@
                 dy:= 0;
                 FrameTicks:= 740;
                 Frame:= 19;
+                Scale:= 0.75;
+                Timer:= 1;
                 end;
     vgtDroplet:
                 begin