chris/open-roms
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix Issue #13

Browse Source
This commit is contained in:
Paul Gardner-Stephen committed 2019-04-28 20:48:46 +09:30
1 parent f43fedea21
commit 4a4e6ddbb9
1 file changed
+11 -1
Download Patch File Download Diff File Expand all files Collapse all files
c64/basic/basic_shift_mem_down.s
+11 -1
View File
@@ -98,11 +98,21 @@ basic_shift_mem_down_and_relink:
;; Get length of deletion back ;; Get length of deletion back
pla pla
sta tokenise_work3 sta tokenise_work3
;; Check if we still have any lines left
ldy #0
ldx #<basic_current_line_ptr
jsr peek_pointer_null_check
bcs relink_down_next_line
;; Nope, so just return
clc
rts
relink_down_next_line: relink_down_next_line:
;; inc $d020 ;; inc $d020
;; jmp relink_down_next_line ;; jmp relink_down_next_line
;; Subtract tokenise_work3 from the pointer ;; Subtract tokenise_work3 from the pointer
ldy #0 ldy #0
ldx #<basic_current_line_ptr+0 ldx #<basic_current_line_ptr+0