mirror of
https://github.com/cc65/cc65.git
synced 2024-12-27 15:29:46 +00:00
29 lines
456 B
ArmAsm
29 lines
456 B
ArmAsm
; Stefan Haubenthal, 2012-05-06
|
|
; based on code by Twilighte
|
|
; void __fastcall__ atmos_save(const char* name, const void* start, const void* end);
|
|
|
|
.export _atmos_save
|
|
.import popax, store_filename
|
|
|
|
|
|
.proc _atmos_save
|
|
|
|
sei
|
|
sta $02ab ; file end lo
|
|
stx $02ac ; file end hi
|
|
jsr popax
|
|
sta $02a9 ; file start lo
|
|
stx $02aa ; file start hi
|
|
jsr popax
|
|
jsr store_filename
|
|
lda #00
|
|
sta $02ad
|
|
jsr csave_bit
|
|
cli
|
|
rts
|
|
csave_bit:
|
|
php
|
|
jmp $e92c
|
|
|
|
.endproc
|