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

small cleanup in BASIC

Browse Source
This commit is contained in:
FeralChild64 committed 2020-06-22 18:45:24 +02:00
1 parent 37b32759dc
commit 524d532433
8 files changed
+64 -48
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

c64/basic/basic_commands_CC/cmd_bload_bverify.s
+2 -8
View File
@@ -14,17 +14,11 @@ cmd_bverify:
cmd_bload:
lda #$00 // mark operation as LOAD
sta VERCKB
// Set default device and secondary address; channel is not important now
jsr select_device
ldy #$00 // secondary address 0 - it has to be loaded precisely where we want
jsr JSETFLS
jsr helper_load_init_params
// Fetch the file name
jsr fetch_filename
jsr helper_load_fetch_filename
bcc !+
// No filename supplied - this should only be allowed for tape (device number below 8)
c64/basic/basic_commands_CC/cmd_merge.s
+3 -9
View File
@@ -6,17 +6,11 @@
cmd_merge:
lda #$00 // mark operation as LOAD
sta VERCKB
// Set default device and secondary address; channel is not important now
jsr select_device
ldy #$00 // secondary address 0 - it has to be loaded precisely where we want
jsr JSETFLS
jsr helper_load_init_params
// Fetch the file name
jsr fetch_filename
jsr helper_load_fetch_filename
bcc !+
// No filename supplied - this should only be allowed for tape (device number below 8)
@@ -30,7 +24,7 @@ cmd_merge:
!:
// Fetch device number
jsr fetch_device_secondary_uint8
jsr fetch_coma_uint8
bcs !+
sta FA