?login_element?

Subversion Repositories NedoOS

Rev

Rev 126 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download

  1.     DEVICE ZXSPECTRUMNEXT
  2.     ORG $7E00
  3. start:  ei : jr $           ; app code entry point, BC = NEX file handle
  4.     ; Layer2 screen (top 1/3 defined, bottom of it will be used also as "visible" stack)
  5.     ORG $C000 : DUP 64*32 : DB $90,$91,$92,$93,$94,$95,$96,$97 : EDUP
  6.  
  7.     ; write everything into NEX file
  8.     SAVENEX OPEN "example.nex", start, $FFFE, 9  ; stack will go into Layer2
  9.     SAVENEX CORE 2, 0, 0        ; Next core 2.0.0 required as minimum
  10.     SAVENEX CFG 4, 1            ; green border, file handle in BC
  11.     SAVENEX BAR 1, $E0, 50, 25  ; do load bar, red colour, start/load delays 50/25 frames
  12.     SAVENEX SCREEN L2 0, 0      ; store the data from C000 (page 0, offset 0), no palette
  13.     SAVENEX BANK 5, 100, 101    ; store the 16ki banks 5 (contains the code at 0x7E00), 100, 101
  14.     SAVENEX CLOSE               ; (banks 100 and 101 are added just as example)
  15.