Home » Archimedes archive » Acorn User » AU 1994-Xmas.adf » Programs » StarInfo/Pearson/!3DRamFree/!Run

StarInfo/Pearson/!3DRamFree/!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 » Acorn User » AU 1994-Xmas.adf » Programs
Filename: StarInfo/Pearson/!3DRamFree/!Run
Read OK:
File size: 03AA bytes
Load address: 0000
Exec address: 0000
File contents
| !3DRamFree
|
|
RMEnsure UtilityModule 3.10 Error This application is only suitable for use with RISC OS 3.10 or later versions
If "<System$Path>" = "" Then Error 0 System Resources not found. The !System application must be seen by RomApps3D. See the help file for more details.
RMEnsure Apps3Dmods 1.50 Set 3DRamFree$Test "NotLoaded"
IF "<3DRamFree$Test>" = "" Then Error 0 3DRamFree has already been run once and the new module Apps3Dmods is loaded. See the help file for more details.
UnSet 3DRamFree$Test
RMEnsure RomApps3D 1.21 Error RomApps3D not found. Load Acorn's RomApps3D module and start again. See the help file for more details.
RMEnsure BorderUtils 0.02 Error BorderUtils not found. Load Acorn's BorderUtils module and start again. See the help file for more details.
IconSprites <Obey$Dir>.!Sprites
|
Set 3DRamFree$Dir <Obey$Dir>
|
TaskWindow Run"<3DRamFree$Dir>.!RunImage" -wimpslot 128k -name 3DRamFree -display -quit
00000000  7c 20 21 33 44 52 61 6d  46 72 65 65 0a 7c 0a 7c  || !3DRamFree.|.||
00000010  0a 52 4d 45 6e 73 75 72  65 20 55 74 69 6c 69 74  |.RMEnsure Utilit|
00000020  79 4d 6f 64 75 6c 65 20  33 2e 31 30 20 45 72 72  |yModule 3.10 Err|
00000030  6f 72 20 54 68 69 73 20  61 70 70 6c 69 63 61 74  |or This applicat|
00000040  69 6f 6e 20 69 73 20 6f  6e 6c 79 20 73 75 69 74  |ion is only suit|
00000050  61 62 6c 65 20 66 6f 72  20 75 73 65 20 77 69 74  |able for use wit|
00000060  68 20 52 49 53 43 20 4f  53 20 33 2e 31 30 20 6f  |h RISC OS 3.10 o|
00000070  72 20 6c 61 74 65 72 20  76 65 72 73 69 6f 6e 73  |r later versions|
00000080  0a 49 66 20 22 3c 53 79  73 74 65 6d 24 50 61 74  |.If "<System$Pat|
00000090  68 3e 22 20 3d 20 22 22  20 54 68 65 6e 20 45 72  |h>" = "" Then Er|
000000a0  72 6f 72 20 30 20 53 79  73 74 65 6d 20 52 65 73  |ror 0 System Res|
000000b0  6f 75 72 63 65 73 20 6e  6f 74 20 66 6f 75 6e 64  |ources not found|
000000c0  2e 20 54 68 65 20 21 53  79 73 74 65 6d 20 61 70  |. The !System ap|
000000d0  70 6c 69 63 61 74 69 6f  6e 20 6d 75 73 74 20 62  |plication must b|
000000e0  65 20 73 65 65 6e 20 62  79 20 52 6f 6d 41 70 70  |e seen by RomApp|
000000f0  73 33 44 2e 20 53 65 65  20 74 68 65 20 68 65 6c  |s3D. See the hel|
00000100  70 20 66 69 6c 65 20 66  6f 72 20 6d 6f 72 65 20  |p file for more |
00000110  64 65 74 61 69 6c 73 2e  0a 52 4d 45 6e 73 75 72  |details..RMEnsur|
00000120  65 20 41 70 70 73 33 44  6d 6f 64 73 20 31 2e 35  |e Apps3Dmods 1.5|
00000130  30 20 53 65 74 20 33 44  52 61 6d 46 72 65 65 24  |0 Set 3DRamFree$|
00000140  54 65 73 74 20 22 4e 6f  74 4c 6f 61 64 65 64 22  |Test "NotLoaded"|
00000150  0a 49 46 20 22 3c 33 44  52 61 6d 46 72 65 65 24  |.IF "<3DRamFree$|
00000160  54 65 73 74 3e 22 20 3d  20 22 22 20 54 68 65 6e  |Test>" = "" Then|
00000170  20 45 72 72 6f 72 20 30  20 33 44 52 61 6d 46 72  | Error 0 3DRamFr|
00000180  65 65 20 68 61 73 20 61  6c 72 65 61 64 79 20 62  |ee has already b|
00000190  65 65 6e 20 72 75 6e 20  6f 6e 63 65 20 61 6e 64  |een run once and|
000001a0  20 74 68 65 20 6e 65 77  20 6d 6f 64 75 6c 65 20  | the new module |
000001b0  41 70 70 73 33 44 6d 6f  64 73 20 69 73 20 6c 6f  |Apps3Dmods is lo|
000001c0  61 64 65 64 2e 20 53 65  65 20 74 68 65 20 68 65  |aded. See the he|
000001d0  6c 70 20 66 69 6c 65 20  66 6f 72 20 6d 6f 72 65  |lp file for more|
000001e0  20 64 65 74 61 69 6c 73  2e 0a 55 6e 53 65 74 20  | details..UnSet |
000001f0  33 44 52 61 6d 46 72 65  65 24 54 65 73 74 0a 52  |3DRamFree$Test.R|
00000200  4d 45 6e 73 75 72 65 20  52 6f 6d 41 70 70 73 33  |MEnsure RomApps3|
00000210  44 20 31 2e 32 31 20 45  72 72 6f 72 20 52 6f 6d  |D 1.21 Error Rom|
00000220  41 70 70 73 33 44 20 6e  6f 74 20 66 6f 75 6e 64  |Apps3D not found|
00000230  2e 20 4c 6f 61 64 20 41  63 6f 72 6e 27 73 20 52  |. Load Acorn's R|
00000240  6f 6d 41 70 70 73 33 44  20 6d 6f 64 75 6c 65 20  |omApps3D module |
00000250  61 6e 64 20 73 74 61 72  74 20 61 67 61 69 6e 2e  |and start again.|
00000260  20 53 65 65 20 74 68 65  20 68 65 6c 70 20 66 69  | See the help fi|
00000270  6c 65 20 66 6f 72 20 6d  6f 72 65 20 64 65 74 61  |le for more deta|
00000280  69 6c 73 2e 0a 52 4d 45  6e 73 75 72 65 20 42 6f  |ils..RMEnsure Bo|
00000290  72 64 65 72 55 74 69 6c  73 20 30 2e 30 32 20 45  |rderUtils 0.02 E|
000002a0  72 72 6f 72 20 42 6f 72  64 65 72 55 74 69 6c 73  |rror BorderUtils|
000002b0  20 6e 6f 74 20 66 6f 75  6e 64 2e 20 4c 6f 61 64  | not found. Load|
000002c0  20 41 63 6f 72 6e 27 73  20 42 6f 72 64 65 72 55  | Acorn's BorderU|
000002d0  74 69 6c 73 20 6d 6f 64  75 6c 65 20 61 6e 64 20  |tils module and |
000002e0  73 74 61 72 74 20 61 67  61 69 6e 2e 20 53 65 65  |start again. See|
000002f0  20 74 68 65 20 68 65 6c  70 20 66 69 6c 65 20 66  | the help file f|
00000300  6f 72 20 6d 6f 72 65 20  64 65 74 61 69 6c 73 2e  |or more details.|
00000310  0a 49 63 6f 6e 53 70 72  69 74 65 73 20 3c 4f 62  |.IconSprites <Ob|
00000320  65 79 24 44 69 72 3e 2e  21 53 70 72 69 74 65 73  |ey$Dir>.!Sprites|
00000330  0a 7c 0a 53 65 74 20 33  44 52 61 6d 46 72 65 65  |.|.Set 3DRamFree|
00000340  24 44 69 72 20 3c 4f 62  65 79 24 44 69 72 3e 0a  |$Dir <Obey$Dir>.|
00000350  7c 0a 54 61 73 6b 57 69  6e 64 6f 77 20 52 75 6e  ||.TaskWindow Run|
00000360  22 3c 33 44 52 61 6d 46  72 65 65 24 44 69 72 3e  |"<3DRamFree$Dir>|
00000370  2e 21 52 75 6e 49 6d 61  67 65 22 20 2d 77 69 6d  |.!RunImage" -wim|
00000380  70 73 6c 6f 74 20 31 32  38 6b 20 2d 6e 61 6d 65  |pslot 128k -name|
00000390  20 33 44 52 61 6d 46 72  65 65 20 2d 64 69 73 70  | 3DRamFree -disp|
000003a0  6c 61 79 20 2d 71 75 69  74 0a                    |lay -quit.|
000003aa