aboutsummaryrefslogtreecommitdiff
path: root/autorun.s
diff options
context:
space:
mode:
Diffstat (limited to 'autorun.s')
-rw-r--r--autorun.s15
1 files changed, 15 insertions, 0 deletions
diff --git a/autorun.s b/autorun.s
index 8f75ac3..af3b1d9 100644
--- a/autorun.s
+++ b/autorun.s
@@ -135,6 +135,18 @@ keytabloop:
; load and run the file (Y is index into filename table)
load_file:
+ ; first print a "Loading D1:whatever" message.
+ sty keycode
+ lda #<loadingmsg
+ ldx #>loadingmsg
+ jsr printmsg
+ ldy keycode
+ lda fntab_l,y
+ ldx fntab_h,y
+ jsr printmsg
+ ldy keycode
+
+ ; now we can set up the IOCB and call CIO to load the file.
ldx #$10 ; IOCB #1
lda #$28 ; MyDOS, Sparta 3.2, and SDX all support this XIO
sta ICCOM,x
@@ -178,9 +190,11 @@ exit:
; a good reason...
dla_filename: .byte "D1:DLA.XEX"
dla_fn_len = * - dla_filename
+ .byte 0 ; null terminate for printmsg
csv_filename: .byte "D1:DLA2CSV.XEX"
csv_fn_len = * - csv_filename
+ .byte 0
; these tables only have 2 entries, but could have many more if
; we ever need them (up to 255).
@@ -194,5 +208,6 @@ keytab: .byte KEY_1, KEY_2, KEY_NONE
diskerrmsg: .byte "I/O Error ",0
presskeymsg: .byte $9b,"Press any key...",0
+loadingmsg: .byte "Loading ",0
xex_run main