Home » Personal collection » Acorn hard disk » files » music » Notate/ReBuild
Notate/ReBuild
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Personal collection » Acorn hard disk » files » music |
Filename: | Notate/ReBuild |
Read OK: | ✔ |
File size: | 00CE bytes |
Load address: | 0000 |
Exec address: | 0000 |
File contents
10REPEAT 20INPUT"Name";n$ 30OSCLI "DIR $.ToDo."+n$ 40INPUT"Files";f 50DIM SPACE &2000 60FORr=1TOf 70OSCLI "LOAD SECTOR"+STR$r+" "+STR$~(SPACE+&200*(r-1)) 80NEXT 90OSCLI "SAVE $.Notate."+n$+" "+STR$~SPACE+" "+STR$~(SPACE+&200*f) 100CLEAR 110UNTIL FALSE
� �"Name";n$ � "DIR $.ToDo."+n$ (�"Files";f 2� SPACE &2000 < �r=1�f F/� "LOAD SECTOR"+�r+" "+�~(SPACE+&200*(r-1)) P� Z:� "SAVE $.Notate."+n$+" "+�~SPACE+" "+�~(SPACE+&200*f) d� n� � �
00000000 0d 00 0a 05 f5 0d 00 14 0e e8 22 4e 61 6d 65 22 |.........."Name"| 00000010 3b 6e 24 0d 00 1e 16 ff 20 22 44 49 52 20 24 2e |;n$..... "DIR $.| 00000020 54 6f 44 6f 2e 22 2b 6e 24 0d 00 28 0e e8 22 46 |ToDo."+n$..(.."F| 00000030 69 6c 65 73 22 3b 66 0d 00 32 11 de 20 53 50 41 |iles";f..2.. SPA| 00000040 43 45 20 26 32 30 30 30 0d 00 3c 0a e3 72 3d 31 |CE &2000..<..r=1| 00000050 b8 66 0d 00 46 2f ff 20 22 4c 4f 41 44 20 53 45 |.f..F/. "LOAD SE| 00000060 43 54 4f 52 22 2b c3 72 2b 22 20 22 2b c3 7e 28 |CTOR"+.r+" "+.~(| 00000070 53 50 41 43 45 2b 26 32 30 30 2a 28 72 2d 31 29 |SPACE+&200*(r-1)| 00000080 29 0d 00 50 05 ed 0d 00 5a 3a ff 20 22 53 41 56 |)..P....Z:. "SAV| 00000090 45 20 24 2e 4e 6f 74 61 74 65 2e 22 2b 6e 24 2b |E $.Notate."+n$+| 000000a0 22 20 22 2b c3 7e 53 50 41 43 45 2b 22 20 22 2b |" "+.~SPACE+" "+| 000000b0 c3 7e 28 53 50 41 43 45 2b 26 32 30 30 2a 66 29 |.~(SPACE+&200*f)| 000000c0 0d 00 64 05 d8 0d 00 6e 07 fd 20 a3 0d ff |..d....n.. ...| 000000ce