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

Fix issue #12

Browse Source
This commit is contained in:
Paul Gardner-Stephen committed 2019-04-28 17:01:17 +09:30
1 parent 885fcca833
commit 5031764214
1 file changed
+7 -3
Download Patch File Download Diff File Expand all files Collapse all files
c64/basic/basic_shift_mem_up.s
+7 -3
View File
@@ -24,10 +24,14 @@ basic_shift_mem_up_and_relink:
sbc basic_current_line_ptr+1 sbc basic_current_line_ptr+1
sta memmove_size+1 sta memmove_size+1
lda basic_end_of_text_ptr+0 lda basic_end_of_text_ptr+0
sbc basic_current_line_ptr+1 sbc basic_current_line_ptr+0
sta memmove_size+0 sta memmove_size+0
jsr printf jsr printf
.byte "TOP OF BASIC = $"
.byte $f1,<basic_end_of_text_ptr,>basic_end_of_text_ptr
.byte $f0,<basic_end_of_text_ptr,>basic_end_of_text_ptr
.byte $0d
.byte "SHIFTING UP $" .byte "SHIFTING UP $"
.byte $f1,<memmove_size,>memmove_size .byte $f1,<memmove_size,>memmove_size
.byte $f0,<memmove_size,>memmove_size .byte $f0,<memmove_size,>memmove_size