| To HD install:
| 1. Create a !WordUpDwn directory
| 2. Copy Resource as !WordUpDwn.Resource
| 3. Copy WordUpDown as !WordUpDwn.WordUpDown
| 4. Create !WordUpDwn.!Run with the following contents
|  ADFBootFloppy F1039001
IF "<Obey$Dir>"="@" THEN Set Obey$Dir ADFS::0.$
HideCommandWindow
SpriteFree 200
RMAFree 200
ScreenSize 160
IF ADFFS$OSVersion>=&35000 THEN ADFEmulateRISCOS 2.0
Set WordUpDown$Dir <Obey$Dir>
Set WordUpDown$Resources <WordUpDown$Dir>.Resources.WordUpDown
Set WordUpDown$Data <WordUpDown$Dir>.WordUpDown
SetEval mod$StringLib 1
SetEval mod$Percussion 1
RMEnsure StringLib 0.0 SetEval mod$StringLib 0
RMEnsure Percussion 0.0 SetEval mod$Percussion 0
IF mod$StringLib THEN RMKill StringLib
IF mod$Percussion THEN RMKill Percussion
WimpSlot -min 640K -max 640K
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT 0
ECHO <22><12><21>
| Bugfix: Page Zero access in Sound Modules
MEMA 10000 E3A08041 E5CF8094 EB000009 E2888001 E358005A DAFFFFFA E59F8088 E58F807C EB000003 E59F8080 E58F8070 EB000000 EF000011 E1A0900E E3A000FF E28F1038
MEMA 10040 E3A02A11 E3A03000 EF000008 E3A01A11 E1A02004 E28F0014 E89000E0 E0810005 E88000C0 E3A0000B EF00001E E1A0F009 314 E3500000 1B000003 726F573C
MEMA 10080 44705564 246E776F 6F736552 65637275 532E3E73 646E756F 70532E73 68636565 0 0 525245 6B696C43
GO 10000
| Add a delay to the title screen and quit
KEY 0 290*ADFPause 200|M300CALL F%:QUIT|MRUN|F|M
FX 225,1
FX 21,0
FX 138,0,128
BASIC -load <WordUpDown$Resources>.GemTitle
| Bug fix: Calls the wrong address/we'll load the speech Modules
KEY 0 50IF done%=2 THEN QUIT|M410|M450|M530MODE12:*FX113,1|M1895draw_plan?4=&CF|MRUN|F|M
ECHO <21>
FX 225,1
FX 21,0
FX 138,0,128
BASIC -load <WordUpDown$Resources>.WordCode
IF mod$StringLib THEN RMReInit StringLib
IF mod$Percussion THEN RMReInit Percussion
FX 20
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT
IF ADFFS$OSVersion>=&35000 THEN ADFEmulateRISCOS
UnSet WordUpDown$Resources
UnSet WordUpDown$Data
UnSet WordUpDown$Dir
UnSet mod$StringLib
UnSet mod$Percussion