Home » Archimedes archive » Zipped Apps » Cassette » !Cassette/!Run
!Cassette/!Run
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 » Archimedes archive » Zipped Apps » Cassette |
| Filename: | !Cassette/!Run |
| Read OK: | ✔ |
| File size: | 038F bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
| !Run File For Cassette Designer WimpSlot -Min 96K -Max 96K |When BasicCrunched |It may run in 64K |WimpSlot -Min 64K -Max 64K If "<Wimp$Scrap>"="" Then ERROR !Cassette requires a scrap area to work. Has !System been seen? Set Cassette$Dir <Obey$Dir> Iconsprites <Cassette$Dir>.!Sprites RMEnsure UtilityModule 3.10 Error Requires RISC OS 3.10 or later RMEnsure FontManager 3.07 Error Requires FontManager 3.07 or later Set Alias$@RunType_B0F Run <Obey$Dir>.!Run -Load %%*0 Set File$Type_B0F CasetDATA | Note: There must be NO SPACES ON THE END OF THESE TWO LINES! Set Cassette$BaseFont Trinity.Medium Set Cassette$BoldFont Homerton.Medium | Select the prefix you require for the tape numbers ie CD | up to a Limit of 2 characters. A trailing space will be added automatically | NB. The auto incrementing file names will only work if the prefix is No Set Tape$Prefix No Run <Cassette$Dir>.!RunImage %*0
00000000 7c 20 21 52 75 6e 20 46 69 6c 65 20 46 6f 72 20 || !Run File For | 00000010 43 61 73 73 65 74 74 65 20 44 65 73 69 67 6e 65 |Cassette Designe| 00000020 72 0a 0a 57 69 6d 70 53 6c 6f 74 20 2d 4d 69 6e |r..WimpSlot -Min| 00000030 20 39 36 4b 20 2d 4d 61 78 20 39 36 4b 0a 7c 57 | 96K -Max 96K.|W| 00000040 68 65 6e 20 42 61 73 69 63 43 72 75 6e 63 68 65 |hen BasicCrunche| 00000050 64 0a 7c 49 74 20 6d 61 79 20 72 75 6e 20 69 6e |d.|It may run in| 00000060 20 36 34 4b 0a 7c 57 69 6d 70 53 6c 6f 74 20 2d | 64K.|WimpSlot -| 00000070 4d 69 6e 20 36 34 4b 20 2d 4d 61 78 20 36 34 4b |Min 64K -Max 64K| 00000080 0a 0a 49 66 20 22 3c 57 69 6d 70 24 53 63 72 61 |..If "<Wimp$Scra| 00000090 70 3e 22 3d 22 22 20 54 68 65 6e 20 45 52 52 4f |p>"="" Then ERRO| 000000a0 52 20 21 43 61 73 73 65 74 74 65 20 72 65 71 75 |R !Cassette requ| 000000b0 69 72 65 73 20 61 20 73 63 72 61 70 20 61 72 65 |ires a scrap are| 000000c0 61 20 74 6f 20 77 6f 72 6b 2e 20 48 61 73 20 21 |a to work. Has !| 000000d0 53 79 73 74 65 6d 20 62 65 65 6e 20 73 65 65 6e |System been seen| 000000e0 3f 0a 0a 53 65 74 20 43 61 73 73 65 74 74 65 24 |?..Set Cassette$| 000000f0 44 69 72 20 3c 4f 62 65 79 24 44 69 72 3e 0a 0a |Dir <Obey$Dir>..| 00000100 49 63 6f 6e 73 70 72 69 74 65 73 20 3c 43 61 73 |Iconsprites <Cas| 00000110 73 65 74 74 65 24 44 69 72 3e 2e 21 53 70 72 69 |sette$Dir>.!Spri| 00000120 74 65 73 0a 0a 52 4d 45 6e 73 75 72 65 20 55 74 |tes..RMEnsure Ut| 00000130 69 6c 69 74 79 4d 6f 64 75 6c 65 20 33 2e 31 30 |ilityModule 3.10| 00000140 20 45 72 72 6f 72 20 52 65 71 75 69 72 65 73 20 | Error Requires | 00000150 52 49 53 43 20 4f 53 20 33 2e 31 30 20 6f 72 20 |RISC OS 3.10 or | 00000160 6c 61 74 65 72 0a 52 4d 45 6e 73 75 72 65 20 46 |later.RMEnsure F| 00000170 6f 6e 74 4d 61 6e 61 67 65 72 20 33 2e 30 37 20 |ontManager 3.07 | 00000180 45 72 72 6f 72 20 52 65 71 75 69 72 65 73 20 46 |Error Requires F| 00000190 6f 6e 74 4d 61 6e 61 67 65 72 20 33 2e 30 37 20 |ontManager 3.07 | 000001a0 6f 72 20 6c 61 74 65 72 0a 0a 53 65 74 20 41 6c |or later..Set Al| 000001b0 69 61 73 24 40 52 75 6e 54 79 70 65 5f 42 30 46 |ias$@RunType_B0F| 000001c0 20 52 75 6e 20 3c 4f 62 65 79 24 44 69 72 3e 2e | Run <Obey$Dir>.| 000001d0 21 52 75 6e 20 2d 4c 6f 61 64 20 25 25 2a 30 0a |!Run -Load %%*0.| 000001e0 53 65 74 20 46 69 6c 65 24 54 79 70 65 5f 42 30 |Set File$Type_B0| 000001f0 46 20 43 61 73 65 74 44 41 54 41 0a 0a 7c 20 4e |F CasetDATA..| N| 00000200 6f 74 65 3a 20 54 68 65 72 65 20 6d 75 73 74 20 |ote: There must | 00000210 62 65 20 4e 4f 20 53 50 41 43 45 53 20 4f 4e 20 |be NO SPACES ON | 00000220 54 48 45 20 45 4e 44 20 4f 46 20 54 48 45 53 45 |THE END OF THESE| 00000230 20 54 57 4f 20 4c 49 4e 45 53 21 0a 53 65 74 20 | TWO LINES!.Set | 00000240 43 61 73 73 65 74 74 65 24 42 61 73 65 46 6f 6e |Cassette$BaseFon| 00000250 74 20 54 72 69 6e 69 74 79 2e 4d 65 64 69 75 6d |t Trinity.Medium| 00000260 0a 53 65 74 20 43 61 73 73 65 74 74 65 24 42 6f |.Set Cassette$Bo| 00000270 6c 64 46 6f 6e 74 20 48 6f 6d 65 72 74 6f 6e 2e |ldFont Homerton.| 00000280 4d 65 64 69 75 6d 0a 0a 7c 20 53 65 6c 65 63 74 |Medium..| Select| 00000290 20 74 68 65 20 70 72 65 66 69 78 20 79 6f 75 20 | the prefix you | 000002a0 72 65 71 75 69 72 65 20 66 6f 72 20 74 68 65 20 |require for the | 000002b0 74 61 70 65 20 6e 75 6d 62 65 72 73 20 69 65 20 |tape numbers ie | 000002c0 43 44 0a 7c 20 75 70 20 74 6f 20 61 20 4c 69 6d |CD.| up to a Lim| 000002d0 69 74 20 6f 66 20 32 20 63 68 61 72 61 63 74 65 |it of 2 characte| 000002e0 72 73 2e 20 41 20 74 72 61 69 6c 69 6e 67 20 73 |rs. A trailing s| 000002f0 70 61 63 65 20 77 69 6c 6c 20 62 65 20 61 64 64 |pace will be add| 00000300 65 64 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 |ed automatically| 00000310 0a 7c 20 4e 42 2e 20 54 68 65 20 61 75 74 6f 20 |.| NB. The auto | 00000320 69 6e 63 72 65 6d 65 6e 74 69 6e 67 20 66 69 6c |incrementing fil| 00000330 65 20 6e 61 6d 65 73 20 77 69 6c 6c 20 6f 6e 6c |e names will onl| 00000340 79 20 77 6f 72 6b 20 69 66 20 74 68 65 20 70 72 |y work if the pr| 00000350 65 66 69 78 20 69 73 20 4e 6f 0a 53 65 74 20 54 |efix is No.Set T| 00000360 61 70 65 24 50 72 65 66 69 78 20 4e 6f 0a 0a 52 |ape$Prefix No..R| 00000370 75 6e 20 3c 43 61 73 73 65 74 74 65 24 44 69 72 |un <Cassette$Dir| 00000380 3e 2e 21 52 75 6e 49 6d 61 67 65 20 25 2a 30 |>.!RunImage %*0| 0000038f
.