# HG changeset patch
# User Michael Pavone <pavone@retrodev.com>
# Date 1460433408 25200
# Node ID 938c72a2f7a94c560f7c2c462a7373bba392c0da
# Parent  5e4fb650de58c0d062fb51e6e98eec9c89fd7373
Initial work on pause menu

diff -r 5e4fb650de58 -r 938c72a2f7a9 menu.s68
--- a/menu.s68	Sat Mar 19 17:53:50 2016 -0700
+++ b/menu.s68	Mon Apr 11 20:56:48 2016 -0700
@@ -348,7 +348,9 @@
 	;regular file
 	lea menu_port+8, a3
 	move.l a2, (a3)
-	rts
+	
+	addq #6, a7
+	bra show_pause_menu
 .select_menu_button:
 	movea.l menu_functions.w, a2
 	move.l (0, a2, d0.w), a2
@@ -781,6 +783,17 @@
 	bsr draw_menu
 	bra gamepad_setup
 	
+show_pause_menu:
+	bsr clear_screen
+	;init vertical scroll RAM
+	vdpaccess $0, VDP_VSRAM_WRITE
+	move.w #-4, (a0)
+	move.w #0, (a0)
+	moveq #8, d6
+	move.l #pause_menu_func, menu_functions.w
+	lea pause_menu(pc), a5
+	bsr draw_menu
+	bra gamepad_setup
 	
 menu_start:
 	;init vertical scroll RAM
@@ -916,6 +929,18 @@
 	move.w #1, menu_port+12
 	bra exit
 	
+resume:
+	;TODO: Implement me
+	bra resume
+	
+save_state:
+	;TODO: Implement me
+	bra save_state
+	
+load_state:
+	;TODO: Implement me
+	bra save_state
+	
 about_text:
 	dc.b "BlastEm v0.4.0", 0
 	dc.b "Copyright 2011-2016 Michael Pavone", 0
@@ -1071,5 +1096,13 @@
 	dc.b "Load State", 0
 	dc.b "Exit", 0
 	dc.b 0
+	
+	align 1
+pause_menu_func
+	dc.l resume
+	dc.l menu_start
+	dc.l save_state
+	dc.l load_state
+	dc.l exit
 
 rom_end: