Atari: initial support to create cassette bootable programs -- unfinished

2014-01-02 19:28:22 +01:00
parent e267addb5b
commit 057884ffa9
2 changed files with 93 additions and 0 deletions
--- a/libsrc/atari/cashdr.s
+++ b/libsrc/atari/cashdr.s
@@ -0,0 +1,40 @@
+;
+; Cassette boot file header
+;
+; Christian Groessler, chris@groessler.org, 2013
+;
+
+.ifndef __ATARIXL__
+
+	.include "atari.inc"
+
+	.import	__BSS_RUN__, __STARTADDRESS__, start
+	.export	_cas_init
+
+.segment        "CASHDR"
+
+	.byte	0	; ignored
+	.byte	<((__BSS_RUN__ - __STARTADDRESS__ + 127 + 6) / 128)
+	.word	__STARTADDRESS__
+	.word	_cas_init
+
+.segment	"CASINIT"
+
+	lda	#33
+	ldy	#80
+	sta	(SAVMSC),y
+	clc
+	rts
+
+_cas_init:
+	lda	#34
+	ldy	#81
+	sta	(SAVMSC),y
+
+	lda	#<start
+	sta	DOSVEC
+	lda	#>start
+	sta	DOSVEC+1
+	rts
+
+.endif	; .ifdef __ATARIXL__