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

disable debug output in basic line inserting, deleting and replacing

Browse Source
This commit is contained in:
Paul Gardner-Stephen committed 2019-04-28 20:41:38 +09:30
1 parent ff10535447
commit ced0eeb319
4 files changed
+67 -67
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

c64/basic/basic_shift_mem_up.s
+26 -26
View File
@@ -27,21 +27,21 @@ basic_shift_mem_up_and_relink:
sbc basic_current_line_ptr+1
sta memmove_size+1
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 $f1,<memmove_size,>memmove_size
.byte $f0,<memmove_size,>memmove_size
.byte " BYTES FROM $"
.byte $f1,<memmove_src,>memmove_src
.byte $f0,<memmove_src,>memmove_src
.byte " TO $"
.byte $f1,<memmove_dst,>memmove_dst
.byte $f0,<memmove_dst,>memmove_dst
.byte $0d,0
;; 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 $f1,<memmove_size,>memmove_size
;; .byte $f0,<memmove_size,>memmove_size
;; .byte " BYTES FROM $"
;; .byte $f1,<memmove_src,>memmove_src
;; .byte $f0,<memmove_src,>memmove_src
;; .byte " TO $"
;; .byte $f1,<memmove_dst,>memmove_dst
;; .byte $f0,<memmove_dst,>memmove_dst
;; .byte $0d,0
;; To make life simple for the copy routine that lives in RAM,
;; we have to adjust the end pointers down one page and set Y to the low
@@ -70,17 +70,17 @@ basic_shift_mem_up_and_relink:
stx tokenise_work3
jsr printf
.byte "REVISED BOUNDS $"
.byte $f1,<memmove_size,>memmove_size
.byte $f0,<memmove_size,>memmove_size
.byte " BYTES FROM $"
.byte $f1,<memmove_src,>memmove_src
.byte $f0,<memmove_src,>memmove_src
.byte " TO $"
.byte $f1,<memmove_dst,>memmove_dst
.byte $f0,<memmove_dst,>memmove_dst
.byte $0d,0
;; jsr printf
;; .byte "REVISED BOUNDS $"
;; .byte $f1,<memmove_size,>memmove_size
;; .byte $f0,<memmove_size,>memmove_size
;; .byte " BYTES FROM $"
;; .byte $f1,<memmove_src,>memmove_src
;; .byte $f0,<memmove_src,>memmove_src
;; .byte " TO $"
;; .byte $f1,<memmove_dst,>memmove_dst
;; .byte $f0,<memmove_dst,>memmove_dst
;; .byte $0d,0
;; Do the copy
jsr shift_mem_up