From 8dec805d852cff58d3ff52c4d8051ac0a33f93be Mon Sep 17 00:00:00 2001
From: Paul Gilbert
Date: Sat, 17 Dec 2011 15:38:29 +1100
Subject: TSAGE: Bugfix for #3460485 - Animation running too slowly

---
 engines/tsage/events.cpp | 2 +-
 engines/tsage/events.h   | 9 ++++++---
 2 files changed, 7 insertions(+), 4 deletions(-)

(limited to 'engines/tsage')

diff --git a/engines/tsage/events.cpp b/engines/tsage/events.cpp
index ac08997563..152570b187 100644
--- a/engines/tsage/events.cpp
+++ b/engines/tsage/events.cpp
@@ -386,7 +386,7 @@ bool EventsClass::isCursorVisible() const {
  */
 void EventsClass::delay(int numFrames) {
 	while (_frameNumber < (_prevDelayFrame + numFrames)) {
-		uint32 delayAmount = CLIP(_priorFrameTime + GAME_FRAME_TIME - g_system->getMillis(),
+		uint32 delayAmount = CLIP(_priorFrameTime + GAME_SCRIPT_TIME - g_system->getMillis(),
 			(uint32)0, (uint32)GAME_FRAME_TIME);
 		if (delayAmount > 0)
 			g_system->delayMillis(delayAmount);
diff --git a/engines/tsage/events.h b/engines/tsage/events.h
index 303c2201ea..fe4d3ecde6 100644
--- a/engines/tsage/events.h
+++ b/engines/tsage/events.h
@@ -36,9 +36,12 @@ enum EventType {EVENT_NONE = 0, EVENT_BUTTON_DOWN = 1, EVENT_BUTTON_UP = 2, EVEN
 
 enum ButtonShiftFlags {BTNSHIFT_LEFT = 0, BTNSHIFT_RIGHT = 3, BTNSHIFT_MIDDLE = 4};
 
-// Intrinisc game delay between execution frames. This runs at 60Hz
-#define GAME_FRAME_RATE 60
-#define GAME_FRAME_TIME (1000 / 60)
+// Intrinisc game delay between execution frames
+#define GAME_FRAME_RATE 50
+#define GAME_FRAME_TIME (1000 / GAME_FRAME_RATE)
+
+#define GAME_SCRIPT_RATE 80
+#define GAME_SCRIPT_TIME (1000 / GAME_SCRIPT_RATE)
 
 class GfxManager;
 
-- 
cgit v1.2.3