Merge pull request #471 from paulscottrobson/wheel

Emulator scroll wheel support
paulscottrobson · Apr 26, 2024 · 7644e5c · 7644e5c
2 parents 5448dbc + a04ccee
commit 7644e5c
Show file tree

Hide file tree

Showing 2 changed files with 12 additions and 2 deletions.
diff --git a/basic/test.bsc b/basic/test.bsc
@@ -1,3 +1,6 @@
 cls
 mouse show
-mouse cursor 38
+repeat
+	b = mouse(x,y,w)
+	print chr$(20);x,y,w;"    "
+until false
diff --git a/emulator/src/framework/gfx.cpp b/emulator/src/framework/gfx.cpp
@@ -18,6 +18,7 @@
 #include <cmath>
 #include "sys_processor.h"
 #include <hardware.h>
+#include <common.h>
 
 #ifdef EMSCRIPTEN
 #include "emscripten.h"
@@ -106,9 +107,15 @@ static void _GFXMainLoop(void *arg) {
 			_GFXUpdateKeyRecord(event.key.keysym.sym,event.type == SDL_KEYDOWN);
 			HWQueueKeyboardEvent(event.key.keysym.scancode,event.type == SDL_KEYDOWN);
 		}
-		if (event.type == SDL_MOUSEMOTION || event.type == SDL_MOUSEBUTTONDOWN || event.type == SDL_MOUSEBUTTONUP) {
+		if (event.type == SDL_MOUSEMOTION || event.type == SDL_MOUSEBUTTONDOWN 		// Mouse button/position  update
+														|| event.type == SDL_MOUSEBUTTONUP) {
 			HWUpdateMouse();
 		}
+		if (event.type == SDL_MOUSEWHEEL) {  									// Handle scroll wheel events.
+			int dy = event.wheel.y;
+			if (event.wheel.type == SDL_MOUSEWHEEL_FLIPPED) dy = -dy;
+			MSEUpdateScrollWheel(dy);
+		}
 		if (event.type == SDL_QUIT) {  												// GUI hardware.
 			isRunning = 0;
 		}