diff --git a/src/basic/basic_commands/cmd_go_goto_run.s b/src/basic/basic_commands/cmd_go_goto_run.s index cb1395d4..8639d57b 100644 --- a/src/basic/basic_commands/cmd_go_goto_run.s +++ b/src/basic/basic_commands/cmd_go_goto_run.s @@ -56,7 +56,14 @@ cmd_go_syntax_error: cmd_go_switchmode_clr_banner: jsr do_clr + + ldx CURLIN+1 + inx + bne !+ jmp INITMSG +!: + rts + cmd_go_rts: diff --git a/src/basic/init/basic_cold_start_internal.s b/src/basic/init/basic_cold_start_internal.s index e321d9e7..4e14a127 100644 --- a/src/basic/init/basic_cold_start_internal.s +++ b/src/basic/init/basic_cold_start_internal.s @@ -41,5 +41,8 @@ basic_cold_start_internal: // Print startup messages jsr INITMSG + // Initialize other variables by performing NEW + jsr do_new + // jump into warm start loop jmp basic_warm_start diff --git a/src/basic/init/initmsg_bytes_free.s b/src/basic/init/initmsg_bytes_free.s index ed8db16f..97f9f32b 100644 --- a/src/basic/init/initmsg_bytes_free.s +++ b/src/basic/init/initmsg_bytes_free.s @@ -55,12 +55,6 @@ initmsg_bytes_free: #endif sta MEMSIZ+0 - // XXX move the part above to a more suitable place - - // Initialize other variables by performing NEW - - jsr do_new - // Print number of bytes free sec