Home » Personal collection » Acorn hard disk » apps » !TableMate » !Run

!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 » Personal collection » Acorn hard disk » apps » !TableMate
Filename: !Run
Read OK:
File size: 02E4 bytes
Load address: 0000
Exec address: 0000
File contents
set TableMate$Dir <Obey$Dir>
set TableMate$Font Homerton.Medium
set TableMate$Size 12
if "<System$Path>" = "" then Error 0 System Resources not Found
rmensure FontManager 2.42 Error 0 Outline FontManager not installed
If "<Font$Path>"="" Then Error 0 Outline Fonts cannot be found
Iconsprites <Obey$Dir>.!Sprites
rmensure sharedclibrary 3.75 rmload System:Modules.CLib
rmensure sharedclibrary 3.75 Error you need CLib 3.75 or later
rmensure ColourTrans 0.51 rmload System:Modules.Colours
rmensure ColourTrans 0.51 Error you need ColourTrans 0.51 or later
rmensure MessageTrans 0.06 rmload System:Modules.MsgTrans
rmensure MessageTrans 0.06 Error You need MessageTrans 0.06 or later
wimpslot -min 224k -max 224k
<TableMate$Dir>.!RunImage %0
00000000  73 65 74 20 54 61 62 6c  65 4d 61 74 65 24 44 69  |set TableMate$Di|
00000010  72 20 3c 4f 62 65 79 24  44 69 72 3e 0a 73 65 74  |r <Obey$Dir>.set|
00000020  20 54 61 62 6c 65 4d 61  74 65 24 46 6f 6e 74 20  | TableMate$Font |
00000030  48 6f 6d 65 72 74 6f 6e  2e 4d 65 64 69 75 6d 0a  |Homerton.Medium.|
00000040  73 65 74 20 54 61 62 6c  65 4d 61 74 65 24 53 69  |set TableMate$Si|
00000050  7a 65 20 31 32 0a 69 66  20 22 3c 53 79 73 74 65  |ze 12.if "<Syste|
00000060  6d 24 50 61 74 68 3e 22  20 3d 20 22 22 20 74 68  |m$Path>" = "" th|
00000070  65 6e 20 45 72 72 6f 72  20 30 20 53 79 73 74 65  |en Error 0 Syste|
00000080  6d 20 52 65 73 6f 75 72  63 65 73 20 6e 6f 74 20  |m Resources not |
00000090  46 6f 75 6e 64 0a 72 6d  65 6e 73 75 72 65 20 46  |Found.rmensure F|
000000a0  6f 6e 74 4d 61 6e 61 67  65 72 20 32 2e 34 32 20  |ontManager 2.42 |
000000b0  45 72 72 6f 72 20 30 20  4f 75 74 6c 69 6e 65 20  |Error 0 Outline |
000000c0  46 6f 6e 74 4d 61 6e 61  67 65 72 20 6e 6f 74 20  |FontManager not |
000000d0  69 6e 73 74 61 6c 6c 65  64 0a 49 66 20 22 3c 46  |installed.If "<F|
000000e0  6f 6e 74 24 50 61 74 68  3e 22 3d 22 22 20 54 68  |ont$Path>"="" Th|
000000f0  65 6e 20 45 72 72 6f 72  20 30 20 4f 75 74 6c 69  |en Error 0 Outli|
00000100  6e 65 20 46 6f 6e 74 73  20 63 61 6e 6e 6f 74 20  |ne Fonts cannot |
00000110  62 65 20 66 6f 75 6e 64  0a 49 63 6f 6e 73 70 72  |be found.Iconspr|
00000120  69 74 65 73 20 3c 4f 62  65 79 24 44 69 72 3e 2e  |ites <Obey$Dir>.|
00000130  21 53 70 72 69 74 65 73  0a 72 6d 65 6e 73 75 72  |!Sprites.rmensur|
00000140  65 20 73 68 61 72 65 64  63 6c 69 62 72 61 72 79  |e sharedclibrary|
00000150  20 33 2e 37 35 20 72 6d  6c 6f 61 64 20 53 79 73  | 3.75 rmload Sys|
00000160  74 65 6d 3a 4d 6f 64 75  6c 65 73 2e 43 4c 69 62  |tem:Modules.CLib|
00000170  0a 72 6d 65 6e 73 75 72  65 20 73 68 61 72 65 64  |.rmensure shared|
00000180  63 6c 69 62 72 61 72 79  20 33 2e 37 35 20 45 72  |clibrary 3.75 Er|
00000190  72 6f 72 20 79 6f 75 20  6e 65 65 64 20 43 4c 69  |ror you need CLi|
000001a0  62 20 33 2e 37 35 20 6f  72 20 6c 61 74 65 72 0a  |b 3.75 or later.|
000001b0  72 6d 65 6e 73 75 72 65  20 43 6f 6c 6f 75 72 54  |rmensure ColourT|
000001c0  72 61 6e 73 20 30 2e 35  31 20 72 6d 6c 6f 61 64  |rans 0.51 rmload|
000001d0  20 53 79 73 74 65 6d 3a  4d 6f 64 75 6c 65 73 2e  | System:Modules.|
000001e0  43 6f 6c 6f 75 72 73 0a  72 6d 65 6e 73 75 72 65  |Colours.rmensure|
000001f0  20 43 6f 6c 6f 75 72 54  72 61 6e 73 20 30 2e 35  | ColourTrans 0.5|
00000200  31 20 45 72 72 6f 72 20  79 6f 75 20 6e 65 65 64  |1 Error you need|
00000210  20 43 6f 6c 6f 75 72 54  72 61 6e 73 20 30 2e 35  | ColourTrans 0.5|
00000220  31 20 6f 72 20 6c 61 74  65 72 0a 72 6d 65 6e 73  |1 or later.rmens|
00000230  75 72 65 20 4d 65 73 73  61 67 65 54 72 61 6e 73  |ure MessageTrans|
00000240  20 30 2e 30 36 20 72 6d  6c 6f 61 64 20 53 79 73  | 0.06 rmload Sys|
00000250  74 65 6d 3a 4d 6f 64 75  6c 65 73 2e 4d 73 67 54  |tem:Modules.MsgT|
00000260  72 61 6e 73 0a 72 6d 65  6e 73 75 72 65 20 4d 65  |rans.rmensure Me|
00000270  73 73 61 67 65 54 72 61  6e 73 20 30 2e 30 36 20  |ssageTrans 0.06 |
00000280  45 72 72 6f 72 20 59 6f  75 20 6e 65 65 64 20 4d  |Error You need M|
00000290  65 73 73 61 67 65 54 72  61 6e 73 20 30 2e 30 36  |essageTrans 0.06|
000002a0  20 6f 72 20 6c 61 74 65  72 0a 77 69 6d 70 73 6c  | or later.wimpsl|
000002b0  6f 74 20 2d 6d 69 6e 20  32 32 34 6b 20 2d 6d 61  |ot -min 224k -ma|
000002c0  78 20 32 32 34 6b 0a 3c  54 61 62 6c 65 4d 61 74  |x 224k.<TableMat|
000002d0  65 24 44 69 72 3e 2e 21  52 75 6e 49 6d 61 67 65  |e$Dir>.!RunImage|
000002e0  20 25 30 0a                                       | %0.|
000002e4