cleanups; split 'header' and 'init' part into two source files

2014-02-21 22:43:44 +01:00
parent 8b876b2ce5
commit 81fe7a3805
3 changed files with 69 additions and 55 deletions
--- a/libsrc/atari/casinit.s
+++ b/libsrc/atari/casinit.s
@@ -0,0 +1,31 @@
+;
+; Cassette boot file init routine
+;
+; Christian Groessler, chris@groessler.org, 2014
+;
+
+;DEBUG   = 1
+
+.ifndef __ATARIXL__
+
+        .include "atari.inc"
+
+        .import start
+        .export _cas_init
+
+.segment        "INIT"
+
+_cas_init:
+.ifdef  DEBUG
+        lda     #34
+        ldy     #81
+        sta     (SAVMSC),y
+.endif
+
+        lda     #<start
+        sta     DOSVEC
+        lda     #>start
+        sta     DOSVEC+1
+        rts
+
+.endif  ; .ifdef __ATARIXL__