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

   1 ; Stefan Haubenthal, 2012-05-06
   2 ; based on code by Twilighte
   3 ; void __fastcall__ atmos_load(const char* name);
   4
   5         .export         _atmos_load
   6         .import         store_filename
   7
   8
   9 .proc   _atmos_load
  10
  11         sei
  12         jsr     store_filename
  13         ldx     #$00
  14         stx     $02ad
  15         stx     $02ae
  16         stx     $025a
  17         stx     $025b
  18         jsr     cload_bit
  19         cli
  20         rts
  21 cload_bit:
  22         pha
  23         jmp     $e874
  24
  25 .endproc