begin implementing LIST command
This commit is contained in:
Paul Gardner-Stephen committed
1 parent
6a0b2d8e7f
commit
c7db426bd3
3 files changed
+53
-1
No files matched your search
@@ -0,0 +1,15 @@
|
||||
;; Advance basic_current_line_ptr by following the
|
||||
;; link to the next line
|
||||
|
||||
basic_find_next_line:
|
||||
|
||||
ldy #0
|
||||
ldx #<basic_current_line_ptr
|
||||
jsr peek_under_roms
|
||||
pha
|
||||
iny
|
||||
jsr peek_under_roms
|
||||
sta basic_current_line_ptr+1
|
||||
pla
|
||||
sta basic_current_line_ptr+0
|
||||
rts
|
||||
Reference in new issue
Block a user