From 7e4d76b1fb41662cd48e21d775322d2a0ad3325e Mon Sep 17 00:00:00 2001
From: Paul Gilbert <dreammaster@scummvm.org>
Date: Sat, 1 Nov 2014 20:58:13 -0400
Subject: [PATCH] ACCESS: Implemented cmdWait

---
 engines/access/scripts.cpp | 23 +++++++++++++++++++++--
 engines/access/scripts.h   |  2 +-
 2 files changed, 22 insertions(+), 3 deletions(-)

diff --git a/engines/access/scripts.cpp b/engines/access/scripts.cpp
index 85c714f4a870..bed1a775f6f1 100644
--- a/engines/access/scripts.cpp
+++ b/engines/access/scripts.cpp
@@ -127,7 +127,7 @@ void Scripts::executeCommand(int commandIndex) {
 		&Scripts::CMDSETBUFVID, &Scripts::CMDPLAYBUFVID, &Scripts::cmdRemoveLast, 
 		&Scripts::cmdSpecial, &Scripts::cmdSpecial, &Scripts::cmdSpecial,
 		&Scripts::CMDSETCYCLE, &Scripts::CMDCYCLE, &Scripts::cmdCharSpeak, 
-		&Scripts::cmdTexSpeak, &Scripts::cmdTexChoice, &Scripts::CMDWAIT, 
+		&Scripts::cmdTexSpeak, &Scripts::cmdTexChoice, &Scripts::cmdWait, 
 		&Scripts::cmdSetConPos, &Scripts::CMDCHECKVFRAME, &Scripts::cmdJumpChoice, 
 		&Scripts::cmdReturnChoice, &Scripts::cmdClearBlock, &Scripts::cmdLoadSound, 
 		&Scripts::cmdFreeSound, &Scripts::cmdSetVideoSound, &Scripts::cmdPlayVideoSound,
@@ -655,7 +655,26 @@ void Scripts::cmdTexChoice() {
 	_vm->_bubbleBox->clearBubbles();
 }
 
-void Scripts::CMDWAIT() { error("TODO CMDWAIT"); }
+void Scripts::cmdWait() { 
+	int time = _data->readSint16LE();
+	_vm->_timers[3]._timer = time;
+	_vm->_timers[3]._initTm = time;
+	_vm->_timers[3]._flag++;
+	_vm->_events->_keypresses.clear();
+
+	while (!_vm->shouldQuit() && _vm->_events->_keypresses.empty() &&
+			!_vm->_events->_leftButton && !_vm->_events->_rightButton &&
+			_vm->_timers[3]._flag) {
+		_vm->_sound->midiRepeat();
+		charLoop();
+
+		_vm->_events->pollEvents();
+		g_system->delayMillis(10);
+	}
+
+	_vm->_events->debounceLeft();
+	_vm->_events->zeroKeys();
+}
 
 void Scripts::cmdSetConPos() {
 	int x = _data->readSint16LE();
diff --git a/engines/access/scripts.h b/engines/access/scripts.h
index e6faa46dde38..49c3b562b9b8 100644
--- a/engines/access/scripts.h
+++ b/engines/access/scripts.h
@@ -106,7 +106,7 @@ class Scripts: public Manager {
 	void cmdCharSpeak();
 	void cmdTexSpeak();
 	void cmdTexChoice();
-	void CMDWAIT();
+	void cmdWait();
 	void cmdSetConPos();
 	void CMDCHECKVFRAME();
 	void cmdJumpChoice();