[Scummvm-cvs-logs] SF.net SVN: scummvm:[49722] scummvm/trunk/engines/drascula

[sev at users.sourceforge.net]

Revision: 49722
          http://scummvm.svn.sourceforge.net/scummvm/?rev=49722&view=rev
Author:   sev
Date:     2010-06-15 10:24:38 +0000 (Tue, 15 Jun 2010)

Log Message:
-----------
Drascula: improve responsivity during pauses and palette updates.

Modified Paths:
--------------
    scummvm/trunk/engines/drascula/drascula.cpp
    scummvm/trunk/engines/drascula/palette.cpp

Modified: scummvm/trunk/engines/drascula/drascula.cpp
===================================================================
--- scummvm/trunk/engines/drascula/drascula.cpp	2010-06-15 10:24:19 UTC (rev 49721)
+++ scummvm/trunk/engines/drascula/drascula.cpp	2010-06-15 10:24:38 UTC (rev 49722)
@@ -779,11 +779,17 @@
 }
 
 void DrasculaEngine::delay(int ms) {
-	_system->delayMillis(ms * 2); // originally was 1
+	uint32 end = _system->getMillis() + ms * 2; // originally was 1
+
+	do {
+		_system->delayMillis(10);
+		updateEvents();
+		_system->updateScreen();
+	} while (_system->getMillis() < end);
 }
 
 void DrasculaEngine::pause(int duration) {
-	_system->delayMillis(duration * 30); // was originally 2
+	delay(duration * 15);
 }
 
 int DrasculaEngine::getTime() {

Modified: scummvm/trunk/engines/drascula/palette.cpp
===================================================================
--- scummvm/trunk/engines/drascula/palette.cpp	2010-06-15 10:24:19 UTC (rev 49721)
+++ scummvm/trunk/engines/drascula/palette.cpp	2010-06-15 10:24:38 UTC (rev 49722)
@@ -106,6 +106,8 @@
 		pause(fadeSpeed);
 
 		setPalette((byte *)&palFade);
+
+		updateEvents();
 	}
 }
 
@@ -124,6 +126,8 @@
 		pause(fadeSpeed);
 
 		setPalette((byte *)&palFade);
+
+		updateEvents();
 	}
 }
 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.