Home » Archimedes archive » Archimedes World » AW-1994-06-Disc1.adf » Disk1Jun94 » !AWJune94/Goodies/WordPairs/!WordPairs/!Run
!AWJune94/Goodies/WordPairs/!WordPairs/!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-1994-06-Disc1.adf » Disk1Jun94 |
| Filename: | !AWJune94/Goodies/WordPairs/!WordPairs/!Run |
| Read OK: | ✔ |
| File size: | 02AD bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
| Run file for !WordPairs | Orignal By Simon Heys | Code amendments by Kev & N.Anderthal For Risc OS 2/3 Set WordPair$Dir <Obey$Dir> Set File$Type_CB6 STmodule IconSprites <Obey$Dir>.!Sprites RMEnsure AnimatedHourglass 0.00 RMLoad <Obey$Dir>.HourMod RMEnsure TextFX 0.00 RMLoad <Obey$Dir>.TextFX Hourglass On |* If you have put some tunes in this directory, *| |* remove the | from the next four lines: *| |RMEnsure TrackerModule 2.06 RMLoad <Obey$Dir>.PM |RMEnsure TrackerModule 2.06 ERROR "Word Pairs requires tracker 2.06 or greater" |PlayInit <Obey$Dir>.Tune1 |PlayKill Set Tracker$ Yes RMEnsure TrackerModule 2.06 Set Tracker$ No Run <Obey$Dir>.!Title
00000000 7c 20 52 75 6e 20 66 69 6c 65 20 66 6f 72 20 21 || Run file for !| 00000010 57 6f 72 64 50 61 69 72 73 0a 7c 20 4f 72 69 67 |WordPairs.| Orig| 00000020 6e 61 6c 20 42 79 20 53 69 6d 6f 6e 20 48 65 79 |nal By Simon Hey| 00000030 73 0a 7c 20 43 6f 64 65 20 61 6d 65 6e 64 6d 65 |s.| Code amendme| 00000040 6e 74 73 20 62 79 20 4b 65 76 20 26 20 4e 2e 41 |nts by Kev & N.A| 00000050 6e 64 65 72 74 68 61 6c 20 46 6f 72 20 52 69 73 |nderthal For Ris| 00000060 63 20 4f 53 20 32 2f 33 0a 0a 53 65 74 20 57 6f |c OS 2/3..Set Wo| 00000070 72 64 50 61 69 72 24 44 69 72 20 3c 4f 62 65 79 |rdPair$Dir <Obey| 00000080 24 44 69 72 3e 0a 53 65 74 20 46 69 6c 65 24 54 |$Dir>.Set File$T| 00000090 79 70 65 5f 43 42 36 20 53 54 6d 6f 64 75 6c 65 |ype_CB6 STmodule| 000000a0 0a 0a 49 63 6f 6e 53 70 72 69 74 65 73 20 3c 4f |..IconSprites <O| 000000b0 62 65 79 24 44 69 72 3e 2e 21 53 70 72 69 74 65 |bey$Dir>.!Sprite| 000000c0 73 0a 0a 52 4d 45 6e 73 75 72 65 20 41 6e 69 6d |s..RMEnsure Anim| 000000d0 61 74 65 64 48 6f 75 72 67 6c 61 73 73 20 30 2e |atedHourglass 0.| 000000e0 30 30 20 52 4d 4c 6f 61 64 20 3c 4f 62 65 79 24 |00 RMLoad <Obey$| 000000f0 44 69 72 3e 2e 48 6f 75 72 4d 6f 64 0a 52 4d 45 |Dir>.HourMod.RME| 00000100 6e 73 75 72 65 20 54 65 78 74 46 58 20 20 20 20 |nsure TextFX | 00000110 20 20 20 20 20 20 20 20 30 2e 30 30 20 52 4d 4c | 0.00 RML| 00000120 6f 61 64 20 3c 4f 62 65 79 24 44 69 72 3e 2e 54 |oad <Obey$Dir>.T| 00000130 65 78 74 46 58 0a 48 6f 75 72 67 6c 61 73 73 20 |extFX.Hourglass | 00000140 4f 6e 20 20 20 20 0a 0a 7c 2a 20 49 66 20 79 6f |On ..|* If yo| 00000150 75 20 68 61 76 65 20 70 75 74 20 73 6f 6d 65 20 |u have put some | 00000160 74 75 6e 65 73 20 69 6e 20 74 68 69 73 20 64 69 |tunes in this di| 00000170 72 65 63 74 6f 72 79 2c 20 2a 7c 0a 7c 2a 20 72 |rectory, *|.|* r| 00000180 65 6d 6f 76 65 20 74 68 65 20 7c 20 66 72 6f 6d |emove the | from| 00000190 20 74 68 65 20 6e 65 78 74 20 66 6f 75 72 20 6c | the next four l| 000001a0 69 6e 65 73 3a 20 20 20 20 20 20 20 20 2a 7c 0a |ines: *|.| 000001b0 0a 7c 52 4d 45 6e 73 75 72 65 20 54 72 61 63 6b |.|RMEnsure Track| 000001c0 65 72 4d 6f 64 75 6c 65 20 32 2e 30 36 20 52 4d |erModule 2.06 RM| 000001d0 4c 6f 61 64 20 3c 4f 62 65 79 24 44 69 72 3e 2e |Load <Obey$Dir>.| 000001e0 50 4d 0a 7c 52 4d 45 6e 73 75 72 65 20 54 72 61 |PM.|RMEnsure Tra| 000001f0 63 6b 65 72 4d 6f 64 75 6c 65 20 32 2e 30 36 20 |ckerModule 2.06 | 00000200 45 52 52 4f 52 20 22 57 6f 72 64 20 50 61 69 72 |ERROR "Word Pair| 00000210 73 20 72 65 71 75 69 72 65 73 20 74 72 61 63 6b |s requires track| 00000220 65 72 20 32 2e 30 36 20 6f 72 20 67 72 65 61 74 |er 2.06 or great| 00000230 65 72 22 0a 7c 50 6c 61 79 49 6e 69 74 20 3c 4f |er".|PlayInit <O| 00000240 62 65 79 24 44 69 72 3e 2e 54 75 6e 65 31 0a 7c |bey$Dir>.Tune1.|| 00000250 50 6c 61 79 4b 69 6c 6c 0a 0a 53 65 74 20 54 72 |PlayKill..Set Tr| 00000260 61 63 6b 65 72 24 20 59 65 73 0a 52 4d 45 6e 73 |acker$ Yes.RMEns| 00000270 75 72 65 20 54 72 61 63 6b 65 72 4d 6f 64 75 6c |ure TrackerModul| 00000280 65 20 32 2e 30 36 20 53 65 74 20 54 72 61 63 6b |e 2.06 Set Track| 00000290 65 72 24 20 4e 6f 0a 0a 52 75 6e 20 3c 4f 62 65 |er$ No..Run <Obe| 000002a0 79 24 44 69 72 3e 2e 21 54 69 74 6c 65 |y$Dir>.!Title| 000002ad
.