Home » Archimedes archive » Archimedes World » AW-1993-02.adf » AWFeb93 » !AWFeb93/Goodies/Guardian/!Guardian3/!Run

!AWFeb93/Goodies/Guardian/!Guardian3/!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 » Archimedes World » AW-1993-02.adf » AWFeb93
Filename: !AWFeb93/Goodies/Guardian/!Guardian3/!Run
Read OK:
File size: 021E bytes
Load address: 0000
Exec address: 0000
File contents
| RISC OS Loader for !Guardian
| Written by Paul Vigay (C) 1991/2
|
If "<System$Path>" = "" then Error 0 !System has not been seen yet.
Set Guardian$Path <obey$dir>
RMEnsure FPEmulator 2.70 RMLoad System:modules.FPEmulator
RMEnsure FPEmulator 2.70 Error You need FPEmulator 2.70 or later in your !System.modules directory.
RMEnsure ABCLibrary 2.00 RMLoad System:modules.ABCLib
RMEnsure ABCLibrary 2.00 Error You need ABCLibrary 2.00 or later in your !System.modules directory.
WimpSlot -min 160k -max 160k
Run "<Guardian$Path>.!RunImage" %*0
00000000  7c 20 52 49 53 43 20 4f  53 20 4c 6f 61 64 65 72  || RISC OS Loader|
00000010  20 66 6f 72 20 21 47 75  61 72 64 69 61 6e 0a 7c  | for !Guardian.||
00000020  20 57 72 69 74 74 65 6e  20 62 79 20 50 61 75 6c  | Written by Paul|
00000030  20 56 69 67 61 79 20 28  43 29 20 31 39 39 31 2f  | Vigay (C) 1991/|
00000040  32 0a 7c 0a 49 66 20 22  3c 53 79 73 74 65 6d 24  |2.|.If "<System$|
00000050  50 61 74 68 3e 22 20 3d  20 22 22 20 74 68 65 6e  |Path>" = "" then|
00000060  20 45 72 72 6f 72 20 30  20 21 53 79 73 74 65 6d  | Error 0 !System|
00000070  20 68 61 73 20 6e 6f 74  20 62 65 65 6e 20 73 65  | has not been se|
00000080  65 6e 20 79 65 74 2e 0a  53 65 74 20 47 75 61 72  |en yet..Set Guar|
00000090  64 69 61 6e 24 50 61 74  68 20 3c 6f 62 65 79 24  |dian$Path <obey$|
000000a0  64 69 72 3e 0a 52 4d 45  6e 73 75 72 65 20 46 50  |dir>.RMEnsure FP|
000000b0  45 6d 75 6c 61 74 6f 72  20 32 2e 37 30 20 52 4d  |Emulator 2.70 RM|
000000c0  4c 6f 61 64 20 53 79 73  74 65 6d 3a 6d 6f 64 75  |Load System:modu|
000000d0  6c 65 73 2e 46 50 45 6d  75 6c 61 74 6f 72 0a 52  |les.FPEmulator.R|
000000e0  4d 45 6e 73 75 72 65 20  46 50 45 6d 75 6c 61 74  |MEnsure FPEmulat|
000000f0  6f 72 20 32 2e 37 30 20  45 72 72 6f 72 20 59 6f  |or 2.70 Error Yo|
00000100  75 20 6e 65 65 64 20 46  50 45 6d 75 6c 61 74 6f  |u need FPEmulato|
00000110  72 20 32 2e 37 30 20 6f  72 20 6c 61 74 65 72 20  |r 2.70 or later |
00000120  69 6e 20 79 6f 75 72 20  21 53 79 73 74 65 6d 2e  |in your !System.|
00000130  6d 6f 64 75 6c 65 73 20  64 69 72 65 63 74 6f 72  |modules director|
00000140  79 2e 0a 52 4d 45 6e 73  75 72 65 20 41 42 43 4c  |y..RMEnsure ABCL|
00000150  69 62 72 61 72 79 20 32  2e 30 30 20 52 4d 4c 6f  |ibrary 2.00 RMLo|
00000160  61 64 20 53 79 73 74 65  6d 3a 6d 6f 64 75 6c 65  |ad System:module|
00000170  73 2e 41 42 43 4c 69 62  0a 52 4d 45 6e 73 75 72  |s.ABCLib.RMEnsur|
00000180  65 20 41 42 43 4c 69 62  72 61 72 79 20 32 2e 30  |e ABCLibrary 2.0|
00000190  30 20 45 72 72 6f 72 20  59 6f 75 20 6e 65 65 64  |0 Error You need|
000001a0  20 41 42 43 4c 69 62 72  61 72 79 20 32 2e 30 30  | ABCLibrary 2.00|
000001b0  20 6f 72 20 6c 61 74 65  72 20 69 6e 20 79 6f 75  | or later in you|
000001c0  72 20 21 53 79 73 74 65  6d 2e 6d 6f 64 75 6c 65  |r !System.module|
000001d0  73 20 64 69 72 65 63 74  6f 72 79 2e 0a 57 69 6d  |s directory..Wim|
000001e0  70 53 6c 6f 74 20 2d 6d  69 6e 20 31 36 30 6b 20  |pSlot -min 160k |
000001f0  2d 6d 61 78 20 31 36 30  6b 0a 52 75 6e 20 22 3c  |-max 160k.Run "<|
00000200  47 75 61 72 64 69 61 6e  24 50 61 74 68 3e 2e 21  |Guardian$Path>.!|
00000210  52 75 6e 49 6d 61 67 65  22 20 25 2a 30 0a        |RunImage" %*0.|
0000021e