implement STOP and END commands

This commit is contained in:
Paul Gardner-Stephen committed 2019-05-13 03:47:34 +09:30
1 parent 699cc73b70
commit a34581e3ea
4 files changed
+26 -25

No files matched your search

+23
View File
@@ -0,0 +1,23 @@
cmd_stop:
basic_do_break:
jsr printf
.byte "BREAK",0
;; Check for direct mode
;; Are we in direct mode
lda basic_current_line_number+1
cmp #$ff
beq +
;; Not direct mode
jsr printf
.byte " IN ",0
lda basic_current_line_number+1
ldx basic_current_line_number+0
jsr print_integer
*
lda #$0d
jsr $ffd2
cmd_end:
jmp basic_main_loop