Home » Archimedes archive » Acorn User » AU 1998-08.adf » Freeware » Shareware/Office037/!Office/!RunConfig

Shareware/Office037/!Office/!RunConfig

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 1998-08.adf » Freeware
Filename: Shareware/Office037/!Office/!RunConfig
Read OK:
File size: 013D bytes
Load address: 0000
Exec address: 0000
File contents
IF "<Office$Dir>"="<>" THEN Error Acorn Office has not been seen by the filer.
IF "<OfficeConfig$Running>"="<Yes>" THEN Error Acorn Office Configure is already running.
Set OfficeConfig$Dir <Obey$Dir>
Set OfficeConfig$Running <Yes>
WimpSlot -min 128k -max 128k
Run <Office$Dir>.!Configure
Set OfficeConfig$Running <>
00000000  49 46 20 22 3c 4f 66 66  69 63 65 24 44 69 72 3e  |IF "<Office$Dir>|
00000010  22 3d 22 3c 3e 22 20 54  48 45 4e 20 45 72 72 6f  |"="<>" THEN Erro|
00000020  72 20 41 63 6f 72 6e 20  4f 66 66 69 63 65 20 68  |r Acorn Office h|
00000030  61 73 20 6e 6f 74 20 62  65 65 6e 20 73 65 65 6e  |as not been seen|
00000040  20 62 79 20 74 68 65 20  66 69 6c 65 72 2e 0a 49  | by the filer..I|
00000050  46 20 22 3c 4f 66 66 69  63 65 43 6f 6e 66 69 67  |F "<OfficeConfig|
00000060  24 52 75 6e 6e 69 6e 67  3e 22 3d 22 3c 59 65 73  |$Running>"="<Yes|
00000070  3e 22 20 54 48 45 4e 20  45 72 72 6f 72 20 41 63  |>" THEN Error Ac|
00000080  6f 72 6e 20 4f 66 66 69  63 65 20 43 6f 6e 66 69  |orn Office Confi|
00000090  67 75 72 65 20 69 73 20  61 6c 72 65 61 64 79 20  |gure is already |
000000a0  72 75 6e 6e 69 6e 67 2e  0a 53 65 74 20 4f 66 66  |running..Set Off|
000000b0  69 63 65 43 6f 6e 66 69  67 24 44 69 72 20 3c 4f  |iceConfig$Dir <O|
000000c0  62 65 79 24 44 69 72 3e  0a 53 65 74 20 4f 66 66  |bey$Dir>.Set Off|
000000d0  69 63 65 43 6f 6e 66 69  67 24 52 75 6e 6e 69 6e  |iceConfig$Runnin|
000000e0  67 20 3c 59 65 73 3e 0a  57 69 6d 70 53 6c 6f 74  |g <Yes>.WimpSlot|
000000f0  20 2d 6d 69 6e 20 31 32  38 6b 20 2d 6d 61 78 20  | -min 128k -max |
00000100  31 32 38 6b 0a 52 75 6e  20 3c 4f 66 66 69 63 65  |128k.Run <Office|
00000110  24 44 69 72 3e 2e 21 43  6f 6e 66 69 67 75 72 65  |$Dir>.!Configure|
00000120  0a 53 65 74 20 4f 66 66  69 63 65 43 6f 6e 66 69  |.Set OfficeConfi|
00000130  67 24 52 75 6e 6e 69 6e  67 20 3c 3e 0a           |g$Running <>.|
0000013d