29 lines
493 B
ArmAsm
29 lines
493 B
ArmAsm
#if ROM_LAYOUT_STD || (ROM_LAYOUT_M65 && SEGMENT_BASIC_0)
|
|
|
|
|
|
cmd_run:
|
|
// RUN clears all variables
|
|
jsr basic_do_clr
|
|
cmd_goto:
|
|
// Disable Kernal messages
|
|
lda #$00
|
|
jsr JSETMSG
|
|
|
|
// Reset line pointer to first line of program.
|
|
jsr init_oldtxt
|
|
|
|
jsr basic_end_of_statement_check
|
|
bcs !+
|
|
|
|
jsr basic_parse_line_number
|
|
jsr basic_find_line
|
|
bcc !+
|
|
// Line does not exist, so report error
|
|
jmp do_UNDEFD_STATEMENT_error
|
|
!:
|
|
// Run it!
|
|
jmp basic_execute_from_current_line
|
|
|
|
|
|
#endif // ROM layout
|