adapter converters, preparations for DOS Wedge from within the monitor

src/basic/,imports.s

@@ -40,12 +40,14 @@
 ;; #ALIAS# map_end             = KERNAL_0.map_end
 ;; #ALIAS# map_NORMAL          = KERNAL_0.map_NORMAL
 ;; #ALIAS# map_BASIC_1         = KERNAL_0.map_BASIC_1
+;; #ALIAS# map_MON_1           = KERNAL_0.map_MON_1
 
 ;; #ALIAS# M65_MODEGET         = KERNAL_0.M65_MODEGET
 ;; #ALIAS# M65_MODESET         = KERNAL_0.M65_MODESET
 ;; #ALIAS# M65_SETWIN_Y        = KERNAL_0.M65_SETWIN_Y
 
 ;; #ALIAS# m65_colorset        = KERNAL_0.m65_colorset
+;; #ALIAS# m65_shadow_BZP      = KERNAL_0.m65_shadow_BZP
 
 ;
 ; Ultimate 64 specific parts

src/basic/board_m65/4000.mega65_vectable_basic_1.s

@@ -27,10 +27,8 @@
 	!addr VB1__prepare_direct_execution = $4000 + 2 * 12
 	!addr VB1__helper_ask_if_sure       = $4000 + 2 * 13
 	!addr VB1__helper_eggshell          = $4000 + 2 * 14
-
-!ifdef CONFIG_DOS_WEDGE {
-	!addr VB1__wedge_dos                = $4000 + 2 * 15      
-}
+	!addr VB1__wedge_dos                = $4000 + 2 * 15
+	!addr VB1__wedge_dos_monitor        = $4000 + 2 * 15
 
 } else {
 
@@ -51,10 +49,7 @@
 	!word prepare_direct_execution
 	!word helper_ask_if_sure
 	!word helper_eggshell
-
-!ifdef CONFIG_DOS_WEDGE {
 	!word wedge_dos
-}
-
+	!word wedge_dos_monitor
 
 }

src/basic/wedge/wedge_dos.s

@@ -8,6 +8,23 @@
 !ifdef CONFIG_DOS_WEDGE {
 
 
+!ifdef SEGMENT_M65_BASIC_0 {
+
+wedge_dos_monitor:                               ; entry point for the MONITOR
+
+	jsr m65_shadow_BZP
+	jsr map_BASIC_1
+	jsr (VB1__wedge_dos_monitor)
+	jsr m65_shadow_BZP
+	jmp map_MON_1
+
+} else ifdef SEGMENT_M65_BASIC_1 {
+
+wedge_dos_monitor:
+
+	rts
+}
+
 ; .X has to contain size of the buffer
 
 wedge_dos: