parse line number argument in RUN statement
This commit is contained in:
1 parent
65af677caa
commit
6df769320a
1 file changed
+10
-6
+10
-6
@@ -1,15 +1,19 @@
|
||||
cmd_run:
|
||||
;; XXX - Parse starting line number
|
||||
|
||||
jsr basic_end_of_statement_check
|
||||
bcc +
|
||||
|
||||
*
|
||||
;; Reset line pointer to first line of program.
|
||||
lda basic_start_of_text_ptr+0
|
||||
sta basic_current_line_ptr+0
|
||||
lda basic_start_of_text_ptr+1
|
||||
sta basic_current_line_ptr+1
|
||||
|
||||
jsr basic_end_of_statement_check
|
||||
bcs +
|
||||
|
||||
jsr basic_parse_line_number
|
||||
jsr basic_find_line
|
||||
bcc +
|
||||
;; Undefined Statement Error
|
||||
ldx #16
|
||||
jmp do_basic_error
|
||||
*
|
||||
;; Run it!
|
||||
jmp basic_execute_from_current_line
|
||||
Reference in new issue
Block a user