Add support for INITAD to the Atari binary format.

[cc65] / testcode / lib / atari / multi-xex.s

diff --git a/testcode/lib/atari/multi-xex.s b/testcode/lib/atari/multi-xex.s
index 7957ddf64109c94f76d3803c3028e167a0347b7e..cdf43469d544d0d4370897def1b5f9f384521c02 100644 (file)
--- a/testcode/lib/atari/multi-xex.s
+++ b/testcode/lib/atari/multi-xex.s
@@ -14,8 +14,25 @@
         .macpack        atari
 
 ; Default RUNAD is "start", export that:
-        .export         start
+        .export         start, show_load
 
+; Loader
+        .segment        "LOADER"
+show_load:
+        ldx     #0              ; channel 0
+        lda     #<msg_load
+        sta     ICBAL,x         ; address
+        lda     #>msg_load
+        sta     ICBAH,x
+        lda     #$FF
+        sta     ICBLL,x         ; length
+        sta     ICBLH,x
+        lda     #PUTREC
+        sta     ICCOM,x
+        jmp     CIOV
+
+msg_load:
+        .byte   "Loading....", ATEOL
 
 ; We load color values directly into registers
         .segment        "COLOR"