Home » Recent acquisitions » Acorn ADFS disks » adfs_AcornComputing_199310.adf » 93_10s » Wordz/!Wordz/Resource/Boot

Wordz/!Wordz/Resource/Boot

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 » Recent acquisitions » Acorn ADFS disks » adfs_AcornComputing_199310.adf » 93_10s
Filename: Wordz/!Wordz/Resource/Boot
Read OK:
File size: 0248 bytes
Load address: 0000
Exec address: 0000
File contents
| Resource.Boot
|
IconSprites Wordz:!Sprites
|
Set File$Type_C1C Wordz
SetMacro Alias$@RunType_C1C   Run <Wordz$Dir>.!Run %%*0
SetMacro Alias$@PrintType_C1C Run <Wordz$Dir>.!Run -Print %%*0
|
Set File$Type_C1D WordzTem
SetMacro Alias$@RunType_C1D   Run <Wordz$Dir>.!Run -Template %%*0
SetMacro Alias$@PrintType_C1D Run <Wordz$Dir>.!Run -oPrint %%*0
|
Set File$Type_C1E WordzCmd
SetMacro Alias$@RunType_C1E   Run <Wordz$Dir>.!Run -Command %%*0
|
If "<File$Type_C32>"="" then Set File$Type_C32 RTF
If "<File$Type_DFE>"="" then Set File$Type_DFE CSV
|
If "%*0"<>"" then Run Wordz:Run %*0
00000000  7c 20 52 65 73 6f 75 72  63 65 2e 42 6f 6f 74 0a  || Resource.Boot.|
00000010  7c 0a 49 63 6f 6e 53 70  72 69 74 65 73 20 57 6f  ||.IconSprites Wo|
00000020  72 64 7a 3a 21 53 70 72  69 74 65 73 0a 7c 0a 53  |rdz:!Sprites.|.S|
00000030  65 74 20 46 69 6c 65 24  54 79 70 65 5f 43 31 43  |et File$Type_C1C|
00000040  20 57 6f 72 64 7a 0a 53  65 74 4d 61 63 72 6f 20  | Wordz.SetMacro |
00000050  41 6c 69 61 73 24 40 52  75 6e 54 79 70 65 5f 43  |Alias$@RunType_C|
00000060  31 43 20 20 20 52 75 6e  20 3c 57 6f 72 64 7a 24  |1C   Run <Wordz$|
00000070  44 69 72 3e 2e 21 52 75  6e 20 25 25 2a 30 0a 53  |Dir>.!Run %%*0.S|
00000080  65 74 4d 61 63 72 6f 20  41 6c 69 61 73 24 40 50  |etMacro Alias$@P|
00000090  72 69 6e 74 54 79 70 65  5f 43 31 43 20 52 75 6e  |rintType_C1C Run|
000000a0  20 3c 57 6f 72 64 7a 24  44 69 72 3e 2e 21 52 75  | <Wordz$Dir>.!Ru|
000000b0  6e 20 2d 50 72 69 6e 74  20 25 25 2a 30 0a 7c 0a  |n -Print %%*0.|.|
000000c0  53 65 74 20 46 69 6c 65  24 54 79 70 65 5f 43 31  |Set File$Type_C1|
000000d0  44 20 57 6f 72 64 7a 54  65 6d 0a 53 65 74 4d 61  |D WordzTem.SetMa|
000000e0  63 72 6f 20 41 6c 69 61  73 24 40 52 75 6e 54 79  |cro Alias$@RunTy|
000000f0  70 65 5f 43 31 44 20 20  20 52 75 6e 20 3c 57 6f  |pe_C1D   Run <Wo|
00000100  72 64 7a 24 44 69 72 3e  2e 21 52 75 6e 20 2d 54  |rdz$Dir>.!Run -T|
00000110  65 6d 70 6c 61 74 65 20  25 25 2a 30 0a 53 65 74  |emplate %%*0.Set|
00000120  4d 61 63 72 6f 20 41 6c  69 61 73 24 40 50 72 69  |Macro Alias$@Pri|
00000130  6e 74 54 79 70 65 5f 43  31 44 20 52 75 6e 20 3c  |ntType_C1D Run <|
00000140  57 6f 72 64 7a 24 44 69  72 3e 2e 21 52 75 6e 20  |Wordz$Dir>.!Run |
00000150  2d 6f 50 72 69 6e 74 20  25 25 2a 30 0a 7c 0a 53  |-oPrint %%*0.|.S|
00000160  65 74 20 46 69 6c 65 24  54 79 70 65 5f 43 31 45  |et File$Type_C1E|
00000170  20 57 6f 72 64 7a 43 6d  64 0a 53 65 74 4d 61 63  | WordzCmd.SetMac|
00000180  72 6f 20 41 6c 69 61 73  24 40 52 75 6e 54 79 70  |ro Alias$@RunTyp|
00000190  65 5f 43 31 45 20 20 20  52 75 6e 20 3c 57 6f 72  |e_C1E   Run <Wor|
000001a0  64 7a 24 44 69 72 3e 2e  21 52 75 6e 20 2d 43 6f  |dz$Dir>.!Run -Co|
000001b0  6d 6d 61 6e 64 20 25 25  2a 30 0a 7c 0a 49 66 20  |mmand %%*0.|.If |
000001c0  22 3c 46 69 6c 65 24 54  79 70 65 5f 43 33 32 3e  |"<File$Type_C32>|
000001d0  22 3d 22 22 20 74 68 65  6e 20 53 65 74 20 46 69  |"="" then Set Fi|
000001e0  6c 65 24 54 79 70 65 5f  43 33 32 20 52 54 46 0a  |le$Type_C32 RTF.|
000001f0  49 66 20 22 3c 46 69 6c  65 24 54 79 70 65 5f 44  |If "<File$Type_D|
00000200  46 45 3e 22 3d 22 22 20  74 68 65 6e 20 53 65 74  |FE>"="" then Set|
00000210  20 46 69 6c 65 24 54 79  70 65 5f 44 46 45 20 43  | File$Type_DFE C|
00000220  53 56 0a 7c 0a 49 66 20  22 25 2a 30 22 3c 3e 22  |SV.|.If "%*0"<>"|
00000230  22 20 74 68 65 6e 20 52  75 6e 20 57 6f 72 64 7a  |" then Run Wordz|
00000240  3a 52 75 6e 20 25 2a 30                           |:Run %*0|
00000248