Tape load and save functions for the Oric Atmos. By Stefan Haubenthal.

git-svn-id: svn://svn.cc65.org/cc65/trunk@5660 b7a2c559-68d2-44c3-8de9-860c34a00d81
2012-05-28 11:11:39 +00:00
parent 47c87eb335
commit 293c279416
7 changed files with 155 additions and 2 deletions
--- a/libsrc/atmos/store_filename.s
+++ b/libsrc/atmos/store_filename.s
@@ -0,0 +1,12 @@
+	.export		store_filename
+	.importzp	ptr1
+
+store_filename:
+	sta	ptr1
+	stx	ptr1+1
+	ldy	#$0f   ;store filename
+:	lda	(ptr1),y
+	sta	$027f,y
+	dey
+	bpl	:-
+	rts