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

set $2B/$2C pointers when inserting a line of BASIC text

Browse Source
This commit is contained in:
Paul Gardner-Stephen committed 2019-04-28 01:08:56 +09:30
1 parent 64dbdcdefb
commit 08b1327044
1 file changed
+11
Download Patch File Download Diff File Expand all files Collapse all files
c64/basic/basic_insert_line.s
+11
View File
@@ -26,10 +26,21 @@ basic_insert_line:
;; Add on the four bytes space we need ;; Add on the four bytes space we need
clc clc
adc #5 adc #5
pha
tax tax
;; Make the space ;; Make the space
jsr basic_shift_mem_up_and_relink jsr basic_shift_mem_up_and_relink
;; Now increase top of BASIC mem
pla
clc
adc basic_end_of_text_ptr+0
sta basic_end_of_text_ptr+0
lda basic_end_of_text_ptr+1
adc #0
sta basic_end_of_text_ptr+1
;; Get pointer back ;; Get pointer back
pla pla
sta basic_current_line_ptr+1 sta basic_current_line_ptr+1