mirror of
https://github.com/cc65/cc65.git
synced 2026-04-25 06:17:58 +00:00
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
This commit is contained in:
@@ -0,0 +1,25 @@
|
||||
; Stefan Haubenthal, 2012-05-06
|
||||
; based on code by Twilighte
|
||||
; void __fastcall__ atmos_load(const char* name);
|
||||
|
||||
.export _atmos_load
|
||||
.import store_filename
|
||||
|
||||
|
||||
.proc _atmos_load
|
||||
|
||||
sei
|
||||
jsr store_filename
|
||||
ldx #$00
|
||||
stx $02ad
|
||||
stx $02ae
|
||||
stx $025a
|
||||
stx $025b
|
||||
jsr cload_bit
|
||||
cli
|
||||
rts
|
||||
cload_bit:
|
||||
pha
|
||||
jmp $e874
|
||||
|
||||
.endproc
|
||||
Reference in New Issue
Block a user