?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1.     ; test data
  2.     DEVICE ZXSPECTRUM128 : ORG $C000, 7 : db "page 7" : ORG $C000, 6 : db "page 6"
  3.  
  4.     EMPTYTRD "savetrd1.trd"      ;create empty TRD image
  5.     PAGE 7 ;set 7 page to current slot
  6.     SAVETRD "savetrd1.trd","myfile1.C",$C000,$4000
  7.     PAGE 6 ;set 6 page to current slot
  8.     SAVETRD "savetrd1.trd","_myfile2.B",$C000,$201-4,$1234   ; test also "autostart" value
  9.     SAVETRD "savetrd1.trd","myfile3.B",$C001,$200-4,$1234    ; sector length test
  10.     ; save the same file again (testing original behaviour before v1.13.2+)
  11.     PAGE 7 ;set 7 page to current slot
  12.     SAVETRD "savetrd1.trd","myfile1.C",$C000,$100
  13.