From ec0f420299eec4aa07a5ca7ae85451273bd04ee1 Mon Sep 17 00:00:00 2001
From: Kirben
Date: Tue, 4 Mar 2014 11:20:01 +1100
Subject: AGOS: Add mouse wheel support for The Feeble Files.

---
 engines/agos/input.cpp | 26 ++++++++++++++++++++++++--
 1 file changed, 24 insertions(+), 2 deletions(-)

(limited to 'engines')

diff --git a/engines/agos/input.cpp b/engines/agos/input.cpp
index b8e17676ad..0e4f4b5d25 100644
--- a/engines/agos/input.cpp
+++ b/engines/agos/input.cpp
@@ -418,11 +418,33 @@ void AGOSEngine::hitarea_stuff_helper_2() {
 
 #ifdef ENABLE_AGOS2
 void AGOSEngine_Feeble::handleMouseWheelUp() {
-	// TODO
+	if (!(getBitFlag(99)))
+		return;
+
+	if (_mouse.x >= 128 && _mouse.x <= 515 && _mouse.y >= 102 && _mouse.y <= 206) {
+		oracleTextDown();
+	} else if (_mouse.x >= 172 && _mouse.x <= 469 && _mouse.y >= 287 && _mouse.y <= 382) {
+		HitArea *ha = findBox(0x7FFB);
+		if (ha != NULL && (ha->flags & kBFBoxInUse)) {
+			if (!isSpriteLoaded(21, 9))
+				inventoryUp(ha->window);
+		}
+	}
 }
 
 void AGOSEngine_Feeble::handleMouseWheelDown() {
-	// TODO
+	if (!(getBitFlag(99)))
+		return;
+
+	if (_mouse.x >= 128 && _mouse.x <= 515 && _mouse.y >= 102 && _mouse.y <= 206) {
+		oracleTextUp();
+	} else if (_mouse.x >= 172 && _mouse.x <= 469 && _mouse.y >= 287 && _mouse.y <= 382) {
+		HitArea *ha = findBox(0x7FFC);
+		if (ha != NULL && (ha->flags & kBFBoxInUse)) {
+			if (!isSpriteLoaded(23, 9))
+					inventoryDown(ha->window);
+		}
+	}
 }
 #endif
 
-- 
cgit v1.2.3