git.sur5r.net Git - cc65/blob - libsrc/atmos/atmos_save.s

   1 ; Stefan Haubenthal, 2012-05-06
   2 ; based on code by Twilighte
   3 ; void __fastcall__ atmos_save(const char* name, const void* start, const void* end);
   4
   5         .export         _atmos_save
   6         .import         popax, store_filename
   7
   8
   9 .proc   _atmos_save
  10
  11         sei
  12         sta     $02ab   ; file end lo
  13         stx     $02ac   ; file end hi
  14         jsr     popax
  15         sta     $02a9   ; file start lo
  16         stx     $02aa   ; file start hi
  17         jsr     popax
  18         jsr     store_filename
  19         lda     #00
  20         sta     $02ad
  21         jsr     csave_bit
  22         cli
  23         rts
  24 csave_bit:
  25         php
  26         jmp     $e92c
  27
  28 .endproc