diff --git a/c64/basic/basic_commands/cmd_load_verify.s b/c64/basic/basic_commands/cmd_load_verify.s index 6e3c0541..a9d719cb 100644 --- a/c64/basic/basic_commands/cmd_load_verify.s +++ b/c64/basic/basic_commands/cmd_load_verify.s @@ -41,7 +41,6 @@ cmd_load_got_params: // input for tape wedge cmd_load_loadmerge: // entry point for 'cmd_merge' lda VERCKB // LOAD or VERIFY - jsr JLOAD bcs_16 do_kernal_error diff --git a/c64/basic/basic_commands/cmd_save.s b/c64/basic/basic_commands/cmd_save.s index 115ecb7c..5ced4b27 100644 --- a/c64/basic/basic_commands/cmd_save.s +++ b/c64/basic/basic_commands/cmd_save.s @@ -39,5 +39,5 @@ cmd_save_do: // entry point for BSAVE bcs_16 do_kernal_error // The end -.break + jmp execute_statements diff --git a/c64/basic/basic_commands_CC/cmd_bsave.s b/c64/basic/basic_commands_CC/cmd_bsave.s index 11bbf0f1..886501a0 100644 --- a/c64/basic/basic_commands_CC/cmd_bsave.s +++ b/c64/basic/basic_commands_CC/cmd_bsave.s @@ -16,8 +16,6 @@ cmd_bsave: // Fetch device number - jsr injest_comma - bcs_16 do_SYNTAX_error jsr helper_load_fetch_devnum bcs_16 do_SYNTAX_error diff --git a/c64/basic/engine/fetch_operator.s b/c64/basic/engine/fetch_operator.s index 3c87cf45..26a260f6 100644 --- a/c64/basic/engine/fetch_operator.s +++ b/c64/basic/engine/fetch_operator.s @@ -41,6 +41,8 @@ fetch_operator_success: fetch_operator_failed: + jsr unconsume_character + sec rts