autogenerated scrolling code for head align tool
This commit is contained in:
1 parent
175465f6c7
commit
db9d6e7b60
13 files changed
+241
-311
No files matched your search
@@ -54,3 +54,5 @@
|
||||
#if CONFIG_TAPE_HEAD_ALIGN
|
||||
.label tape_head_align = KERNAL().tape_head_align
|
||||
#endif
|
||||
|
||||
.label filename_any = KERNAL().filename_any
|
||||
@@ -27,15 +27,11 @@ cmd_load:
|
||||
// Try to load the first file from disk
|
||||
|
||||
lda #$01 // name length
|
||||
ldx #<cmd_load_default_filename
|
||||
ldy #>cmd_load_default_filename
|
||||
ldx #<filename_any
|
||||
ldy #>filename_any
|
||||
jsr JSETNAM
|
||||
jmp got_filename
|
||||
|
||||
cmd_load_default_filename:
|
||||
|
||||
.text "*"
|
||||
|
||||
cmd_load_fetch_filename:
|
||||
|
||||
jsr basic_fetch_and_consume_character
|
||||
|
||||
Reference in new issue
Block a user