?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1.     ; test data SAVETRD <TRDname>,&<Filename>,<start>,<lenght>
  2.     DEVICE ZXSPECTRUM128 : ORG $C000, 7 : db "page 7" : ORG $C000, 6 : db "page 6" : ORG $C000, 3 : db "page 3"
  3.  
  4.     EMPTYTRD "savetrd3.trd"      ;create empty TRD image
  5.  
  6.     PAGE 7 ;set 7 page to current slot
  7.     SAVETRD "savetrd3.trd",&"file0.C",$C000,$4000  ; error - not file for addition data
  8.  
  9.     SAVETRD "savetrd3.trd","file1.C",$C000,$4000   ; save file 1
  10.     PAGE 6 ;set 6 page to current slot
  11.     SAVETRD "savetrd3.trd","file2.C",$C000,$4000   ; save file 2
  12.     PAGE 3 ;set 3 page to current slot
  13.     SAVETRD "savetrd3.trd","file3.C",$C000,$4000   ; save file 3
  14.  
  15.     SAVETRD "savetrd3.trd",&"file1.C",$C000,8     ; add 1 sector to file 1
  16.     PAGE 7 ;set 7 page to current slot
  17.     SAVETRD "savetrd3.trd",&"file2.C",$C000,380   ; add 2 sector to file 2
  18.     PAGE 6 ;set 6 page to current slot
  19.     SAVETRD "savetrd3.trd",&"file3.C",$C000,$4000   ; add 64 sector to file 3
  20.  
  21.     SAVETRD "savetrd3.trd",&"file1.C",$C000,$4000,10     ; error - not autostart used here
  22.  
  23.     ; on trd: file1.C = 65 sec. , file2.C = 66 sec. , file3.C = 128 sec.