diff --git a/src/basic/board_m65/mega65_proxies.s b/src/basic/board_m65/mega65_proxies.s index fd0ecb06..f6927909 100644 --- a/src/basic/board_m65/mega65_proxies.s +++ b/src/basic/board_m65/mega65_proxies.s @@ -145,4 +145,15 @@ proxy_B1_do_error_print_only: jsr do_error_print_only bra proxy_B1_end_2 +proxy_B1_do_mon_kernal_error: ; for the MONITOR only + + jsr map_NORMAL + tax + bne @1 + ldx #$1E ; BREAK error + 1 +@1: + dex + jsr do_error_print_only + bra proxy_B1_end_2 + } diff --git a/src/mon_m65/imports.s b/src/mon_m65/imports.s index d9c7cb68..91b4a8b4 100644 --- a/src/mon_m65/imports.s +++ b/src/mon_m65/imports.s @@ -25,6 +25,7 @@ ;; #ALIAS# m65_shadow_BZP = KERNAL_0.m65_shadow_BZP ;; #ALIAS# wedge_dos_monitor = BASIC_0.wedge_dos_monitor +;; #ALIAS# do_mon_kernal_error = BASIC_0.proxy_B1_do_mon_kernal_error ; 'Print immediate', original implementation by Mike Barry, adapted to 65CE02, modified to preserve .Y diff --git a/src/mon_m65/mon_command_load_save.s b/src/mon_m65/mon_command_load_save.s index 1ab93c9f..8d7c60f4 100644 --- a/src/mon_m65/mon_command_load_save.s +++ b/src/mon_m65/mon_command_load_save.s @@ -136,7 +136,9 @@ Mon_Save: Mon_Load_Save_Common: jsr m65_shadow_BZP + bcc @end + jsr do_mon_kernal_error - ; XXX to be finished - check for errors +@end: jmp Main