?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1. ; this is trivial "does it even do something" check of SAVESNA with ZX128 device
  2. ; there's nothing to verify after the test except sjasmplus did not error out
  3. ; (ot checking the snapshot as binary file, but I don't want to add 128kiB of sh*t just
  4. ; for this one, maybe later, using gunzip to keep the repository size as low as possible)
  5.  
  6.     DEVICE ZXSPECTRUM128
  7.     PAGE    5   ; btw this is VRAM page (and slot 3 is default)
  8.     ORG     0xC000
  9.     ; so this code will be visible on screen
  10.     ; and it will cause page 5 to be stored in snapshot twice, is this even legal? :D
  11. start:
  12.     ld      bc,0x07FE
  13. .borderMess:
  14.     inc     a
  15.     and     b
  16.     out     (c),a
  17.     jp      .borderMess
  18.  
  19.     SAVESNA "savesna_zx128.sna", start
  20.