tone flash waaaaay down when zoomed out
authornemo
Sat, 10 Sep 2011 11:40:37 -0400
changeset 5840 00a3e2452e79
parent 5839 7ea0745912f7
child 5841 ef0a76e154cb
tone flash waaaaay down when zoomed out
hedgewars/VGSHandlers.inc
--- a/hedgewars/VGSHandlers.inc	Sat Sep 10 16:21:38 2011 +0200
+++ b/hedgewars/VGSHandlers.inc	Sat Sep 10 11:40:37 2011 -0400
@@ -614,7 +614,7 @@
     vg: PVisualGear;
 begin
 ScreenFade:= sfFromWhite;
-ScreenFadeValue:= 250;
+ScreenFadeValue:= round(60 * zoom * zoom);
 ScreenFadeSpeed:= 5;
 gX:= round(Gear^.X);
 gY:= round(Gear^.Y);