Home » Archimedes archive » Acorn User » AU 1995-04.adf » !StarInfo_StarInfo » Pearson/!3DRamFree/!Run

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 1995-04.adf » !StarInfo_StarInfo
Filename: Pearson/!3DRamFree/!Run
Read OK:
File size: 03B9 bytes
Load address: 0000
Exec address: 0000
File contents
| !3DRamFree, 1.60, 22-1-95
|
|
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.60 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 2c 20 31 2e  || !3DRamFree, 1.|
00000010  36 30 2c 20 32 32 2d 31  2d 39 35 0a 7c 0a 7c 0a  |60, 22-1-95.|.|.|
00000020  52 4d 45 6e 73 75 72 65  20 55 74 69 6c 69 74 79  |RMEnsure Utility|
00000030  4d 6f 64 75 6c 65 20 33  2e 31 30 20 45 72 72 6f  |Module 3.10 Erro|
00000040  72 20 54 68 69 73 20 61  70 70 6c 69 63 61 74 69  |r This applicati|
00000050  6f 6e 20 69 73 20 6f 6e  6c 79 20 73 75 69 74 61  |on is only suita|
00000060  62 6c 65 20 66 6f 72 20  75 73 65 20 77 69 74 68  |ble for use with|
00000070  20 52 49 53 43 20 4f 53  20 33 2e 31 30 20 6f 72  | RISC OS 3.10 or|
00000080  20 6c 61 74 65 72 20 76  65 72 73 69 6f 6e 73 0a  | later versions.|
00000090  49 66 20 22 3c 53 79 73  74 65 6d 24 50 61 74 68  |If "<System$Path|
000000a0  3e 22 20 3d 20 22 22 20  54 68 65 6e 20 45 72 72  |>" = "" Then Err|
000000b0  6f 72 20 30 20 53 79 73  74 65 6d 20 52 65 73 6f  |or 0 System Reso|
000000c0  75 72 63 65 73 20 6e 6f  74 20 66 6f 75 6e 64 2e  |urces not found.|
000000d0  20 54 68 65 20 21 53 79  73 74 65 6d 20 61 70 70  | The !System app|
000000e0  6c 69 63 61 74 69 6f 6e  20 6d 75 73 74 20 62 65  |lication must be|
000000f0  20 73 65 65 6e 20 62 79  20 52 6f 6d 41 70 70 73  | seen by RomApps|
00000100  33 44 2e 20 53 65 65 20  74 68 65 20 68 65 6c 70  |3D. See the help|
00000110  20 66 69 6c 65 20 66 6f  72 20 6d 6f 72 65 20 64  | file for more d|
00000120  65 74 61 69 6c 73 2e 0a  52 4d 45 6e 73 75 72 65  |etails..RMEnsure|
00000130  20 41 70 70 73 33 44 6d  6f 64 73 20 31 2e 36 30  | Apps3Dmods 1.60|
00000140  20 53 65 74 20 33 44 52  61 6d 46 72 65 65 24 54  | Set 3DRamFree$T|
00000150  65 73 74 20 22 4e 6f 74  4c 6f 61 64 65 64 22 0a  |est "NotLoaded".|
00000160  49 46 20 22 3c 33 44 52  61 6d 46 72 65 65 24 54  |IF "<3DRamFree$T|
00000170  65 73 74 3e 22 20 3d 20  22 22 20 54 68 65 6e 20  |est>" = "" Then |
00000180  45 72 72 6f 72 20 30 20  33 44 52 61 6d 46 72 65  |Error 0 3DRamFre|
00000190  65 20 68 61 73 20 61 6c  72 65 61 64 79 20 62 65  |e has already be|
000001a0  65 6e 20 72 75 6e 20 6f  6e 63 65 20 61 6e 64 20  |en run once and |
000001b0  74 68 65 20 6e 65 77 20  6d 6f 64 75 6c 65 20 41  |the new module A|
000001c0  70 70 73 33 44 6d 6f 64  73 20 69 73 20 6c 6f 61  |pps3Dmods is loa|
000001d0  64 65 64 2e 20 53 65 65  20 74 68 65 20 68 65 6c  |ded. See the hel|
000001e0  70 20 66 69 6c 65 20 66  6f 72 20 6d 6f 72 65 20  |p file for more |
000001f0  64 65 74 61 69 6c 73 2e  0a 55 6e 53 65 74 20 33  |details..UnSet 3|
00000200  44 52 61 6d 46 72 65 65  24 54 65 73 74 0a 52 4d  |DRamFree$Test.RM|
00000210  45 6e 73 75 72 65 20 52  6f 6d 41 70 70 73 33 44  |Ensure RomApps3D|
00000220  20 31 2e 32 31 20 45 72  72 6f 72 20 52 6f 6d 41  | 1.21 Error RomA|
00000230  70 70 73 33 44 20 6e 6f  74 20 66 6f 75 6e 64 2e  |pps3D not found.|
00000240  20 4c 6f 61 64 20 41 63  6f 72 6e 27 73 20 52 6f  | Load Acorn's Ro|
00000250  6d 41 70 70 73 33 44 20  6d 6f 64 75 6c 65 20 61  |mApps3D module a|
00000260  6e 64 20 73 74 61 72 74  20 61 67 61 69 6e 2e 20  |nd start again. |
00000270  53 65 65 20 74 68 65 20  68 65 6c 70 20 66 69 6c  |See the help fil|
00000280  65 20 66 6f 72 20 6d 6f  72 65 20 64 65 74 61 69  |e for more detai|
00000290  6c 73 2e 0a 52 4d 45 6e  73 75 72 65 20 42 6f 72  |ls..RMEnsure Bor|
000002a0  64 65 72 55 74 69 6c 73  20 30 2e 30 32 20 45 72  |derUtils 0.02 Er|
000002b0  72 6f 72 20 42 6f 72 64  65 72 55 74 69 6c 73 20  |ror BorderUtils |
000002c0  6e 6f 74 20 66 6f 75 6e  64 2e 20 4c 6f 61 64 20  |not found. Load |
000002d0  41 63 6f 72 6e 27 73 20  42 6f 72 64 65 72 55 74  |Acorn's BorderUt|
000002e0  69 6c 73 20 6d 6f 64 75  6c 65 20 61 6e 64 20 73  |ils module and s|
000002f0  74 61 72 74 20 61 67 61  69 6e 2e 20 53 65 65 20  |tart again. See |
00000300  74 68 65 20 68 65 6c 70  20 66 69 6c 65 20 66 6f  |the help file fo|
00000310  72 20 6d 6f 72 65 20 64  65 74 61 69 6c 73 2e 0a  |r more details..|
00000320  49 63 6f 6e 53 70 72 69  74 65 73 20 3c 4f 62 65  |IconSprites <Obe|
00000330  79 24 44 69 72 3e 2e 21  53 70 72 69 74 65 73 0a  |y$Dir>.!Sprites.|
00000340  7c 0a 53 65 74 20 33 44  52 61 6d 46 72 65 65 24  ||.Set 3DRamFree$|
00000350  44 69 72 20 3c 4f 62 65  79 24 44 69 72 3e 0a 7c  |Dir <Obey$Dir>.||
00000360  0a 54 61 73 6b 57 69 6e  64 6f 77 20 52 75 6e 22  |.TaskWindow Run"|
00000370  3c 33 44 52 61 6d 46 72  65 65 24 44 69 72 3e 2e  |<3DRamFree$Dir>.|
00000380  21 52 75 6e 49 6d 61 67  65 22 20 2d 77 69 6d 70  |!RunImage" -wimp|
00000390  73 6c 6f 74 20 31 32 38  6b 20 2d 6e 61 6d 65 20  |slot 128k -name |
000003a0  33 44 52 61 6d 46 72 65  65 20 2d 64 69 73 70 6c  |3DRamFree -displ|
000003b0  61 79 20 2d 71 75 69 74  0a                       |ay -quit.|
000003b9