Home » Personal collection » Acorn hard disk » apps » sibelius » SibFull/!Sibelius6/!Boot

SibFull/!Sibelius6/!Boot

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 » apps » sibelius
Filename: SibFull/!Sibelius6/!Boot
Read OK:
File size: 019F bytes
Load address: 0000
Exec address: 0000
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
IconSprites <Obey$Dir>.!Sprites
Set Alias$@RunType_DE0 Run <Obey$Dir>.!Run %%*0
Set Alias$@RunType_FD4 Run <Obey$Dir>.!Run %%*0
Set File$Type_DE0 Sibelius
Set File$Type_FD4 MIDI

Set Sibelius$RISCOS 3
RMEnsure UtilityModule 3.1 Set Sibelius$RISCOS 2
IF Sibelius$RISCOS >= 3 THEN DOSMAP MID MIDI
IF Sibelius$RISCOS >= 3 THEN DOSMAP TXT Text

  | Don't have a newline after the last line!!
Set Sibelius$Dir <Obey$Dir>
00000000  49 63 6f 6e 53 70 72 69  74 65 73 20 3c 4f 62 65  |IconSprites <Obe|
00000010  79 24 44 69 72 3e 2e 21  53 70 72 69 74 65 73 0a  |y$Dir>.!Sprites.|
00000020  53 65 74 20 41 6c 69 61  73 24 40 52 75 6e 54 79  |Set Alias$@RunTy|
00000030  70 65 5f 44 45 30 20 52  75 6e 20 3c 4f 62 65 79  |pe_DE0 Run <Obey|
00000040  24 44 69 72 3e 2e 21 52  75 6e 20 25 25 2a 30 0a  |$Dir>.!Run %%*0.|
00000050  53 65 74 20 41 6c 69 61  73 24 40 52 75 6e 54 79  |Set Alias$@RunTy|
00000060  70 65 5f 46 44 34 20 52  75 6e 20 3c 4f 62 65 79  |pe_FD4 Run <Obey|
00000070  24 44 69 72 3e 2e 21 52  75 6e 20 25 25 2a 30 0a  |$Dir>.!Run %%*0.|
00000080  53 65 74 20 46 69 6c 65  24 54 79 70 65 5f 44 45  |Set File$Type_DE|
00000090  30 20 53 69 62 65 6c 69  75 73 0a 53 65 74 20 46  |0 Sibelius.Set F|
000000a0  69 6c 65 24 54 79 70 65  5f 46 44 34 20 4d 49 44  |ile$Type_FD4 MID|
000000b0  49 0a 0a 53 65 74 20 53  69 62 65 6c 69 75 73 24  |I..Set Sibelius$|
000000c0  52 49 53 43 4f 53 20 33  0a 52 4d 45 6e 73 75 72  |RISCOS 3.RMEnsur|
000000d0  65 20 55 74 69 6c 69 74  79 4d 6f 64 75 6c 65 20  |e UtilityModule |
000000e0  33 2e 31 20 53 65 74 20  53 69 62 65 6c 69 75 73  |3.1 Set Sibelius|
000000f0  24 52 49 53 43 4f 53 20  32 0a 49 46 20 53 69 62  |$RISCOS 2.IF Sib|
00000100  65 6c 69 75 73 24 52 49  53 43 4f 53 20 3e 3d 20  |elius$RISCOS >= |
00000110  33 20 54 48 45 4e 20 44  4f 53 4d 41 50 20 4d 49  |3 THEN DOSMAP MI|
00000120  44 20 4d 49 44 49 0a 49  46 20 53 69 62 65 6c 69  |D MIDI.IF Sibeli|
00000130  75 73 24 52 49 53 43 4f  53 20 3e 3d 20 33 20 54  |us$RISCOS >= 3 T|
00000140  48 45 4e 20 44 4f 53 4d  41 50 20 54 58 54 20 54  |HEN DOSMAP TXT T|
00000150  65 78 74 0a 0a 20 20 7c  20 44 6f 6e 27 74 20 68  |ext..  | Don't h|
00000160  61 76 65 20 61 20 6e 65  77 6c 69 6e 65 20 61 66  |ave a newline af|
00000170  74 65 72 20 74 68 65 20  6c 61 73 74 20 6c 69 6e  |ter the last lin|
00000180  65 21 21 0a 53 65 74 20  53 69 62 65 6c 69 75 73  |e!!.Set Sibelius|
00000190  24 44 69 72 20 3c 4f 62  65 79 24 44 69 72 3e     |$Dir <Obey$Dir>|
0000019f