Speed up hat
authorunc0rr
Thu, 11 Sep 2008 20:18:14 +0000
changeset 1254 3ffaf75572dd
parent 1253 79f47495b346
child 1255 7ffc2c9e7224
Speed up hat
hedgewars/uGears.pas
--- a/hedgewars/uGears.pas	Thu Sep 11 20:13:23 2008 +0000
+++ b/hedgewars/uGears.pas	Thu Sep 11 20:18:14 2008 +0000
@@ -870,11 +870,11 @@
 
 	if HatVisible then
 		if HatVisibility < 1.0 then
-			HatVisibility:= HatVisibility + 0.1
+			HatVisibility:= HatVisibility + 0.2
 		else
 	else
 		if HatVisibility > 0.0 then
-			HatVisibility:= HatVisibility - 0.1;
+			HatVisibility:= HatVisibility - 0.2;
 	
 	if HatVisibility > 0 then
 		DrawTextureF(HatTex,