From 3a82c1e1f853942d351e3622e6bd64768c9a9553 Mon Sep 17 00:00:00 2001
From: whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Sun, 18 Jul 2010 11:11:57 +0000
Subject: some changes to mouse eEgg

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@2582 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 src/screens/UScreenCredits.pas | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

(limited to 'src/screens/UScreenCredits.pas')

diff --git a/src/screens/UScreenCredits.pas b/src/screens/UScreenCredits.pas
index e396e3be..90c0fa19 100644
--- a/src/screens/UScreenCredits.pas
+++ b/src/screens/UScreenCredits.pas
@@ -98,6 +98,9 @@ type
       MouseMoved: boolean;
       MouseX, MouseY: double;
 
+      { saves last x and y angle for easter egg }
+      LogoAngleX, LogoAngleY: single;
+
       procedure LoadNameTextures;
 
       { draw different stages }
@@ -474,10 +477,22 @@ begin
     according to mouse position }
   if (MouseMoved) then
   begin
+    // calculate destination angle
     AngleX := 30 * MouseY;
     AngleY := 30 * MouseX;
+
+    { move angle towards destination }
+    if not SameValue(LogoAngleX, AngleX, 0.001) then
+      AngleX := LogoAngleX + 0.05 * (AngleX - LogoAngleX);
+
+    if not SameValue(LogoAngleY, AngleY, 0.001) then
+      AngleY := LogoAngleY + 0.05 * (AngleY - LogoAngleY);
   end;
 
+  // save last angle
+  LogoAngleX := AngleX;
+  LogoAngleY := AngleY;
+
   DrawLayeredLogo(Separation, Scale, AngleX, AngleY, AngleZ);
 
   { do some sparkling effects }
-- 
cgit v1.2.3