From 9260a65a70b5d67a12b4c70a0e616f75711971dd Mon Sep 17 00:00:00 2001
From: Michael Pavone <pavone@retrodev.com>
Date: Fri, 22 Apr 2016 09:20:01 -0700
Subject: Get mouse working in save state slot selection menu

---
 menu.s68 | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/menu.s68 b/menu.s68
index 5b60a28..df150c7 100644
--- a/menu.s68
+++ b/menu.s68
@@ -482,7 +482,14 @@ handle_mouse:
 	
 	bra .no_mouse_move
 .handle_slots
-	
+	and.w #$FFE0, d1
+	subq #8, d1
+	move.w d1, (sprite_list).w
+	move.w d1, (sprite_list+8).w
+
+	sub.w #264, d1
+	lsr.w #5, d1
+	move.b d1, selected.w
 .no_mouse_move
 	btst #0, d4
 	bne select_entry
@@ -1016,6 +1023,7 @@ show_save_slots:
 	move.w #(256+26), (sprite_list+8).w
 	move.w #(128+8), (sprite_list+6).w
 	move.w #(128+320-24), (sprite_list+6+8).w
+	move.w #(256+32), selection_top.w
 	move.b #0, selected.w
 	move.b #0, num_menu.w
 	lea dir_buffer, a6
@@ -1039,6 +1047,9 @@ show_save_slots:
 	addq #2, d7
 	bra .slotloop
 .done
+	lsl.w #4, d7
+	add.w #248, d7
+	move.w d7, selection_bot.w
 	move.b d6, num_slots.w
 	rts
 	
-- 
cgit v1.2.3