From d1a08b5145ea822c106e34043bf9b0a0be16c90d Mon Sep 17 00:00:00 2001
From: Eugene Sandulenko
Date: Sun, 12 Feb 2017 08:50:26 +0100
Subject: DIRECTOR: Lingo: Fix D3 script execution

---
 engines/director/lingo/lingo.cpp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'engines/director/lingo/lingo.cpp')

diff --git a/engines/director/lingo/lingo.cpp b/engines/director/lingo/lingo.cpp
index 79dfc1f2db..d90fac34c7 100644
--- a/engines/director/lingo/lingo.cpp
+++ b/engines/director/lingo/lingo.cpp
@@ -300,10 +300,10 @@ void Lingo::processEvent(LEvent event, ScriptType st, int entityId) {
 		error("processEvent: Unknown event %d for entity %d", event, entityId);
 
 	if (_handlers.contains(ENTITY_INDEX(event, entityId))) {
-		call(_eventHandlerTypes[event], 0); //D4+ Events
+		call(_eventHandlerTypes[event], 0); // D4+ Events
 		pop();
 	} else if (_scripts[st].contains(entityId)) {
-		executeScript(st, entityId + 1); //D3 list of scripts.
+		executeScript(st, entityId - 1); // D3 list of scripts.
 	} else {
 		debugC(8, kDebugLingoExec, "STUB: processEvent(%s) for %d", _eventHandlerTypes[event], entityId);
 	}
-- 
cgit v1.2.3