| To install to HD:
| 1. Copy !Pockets to HD
| 2. Copy the disc 1 image as !Pockets.F1023601
| 3. Replace the contents of !Pockets.!Run with:
|  ADFBootFloppy F1023601
IF "<Obey$Dir>"="@" THEN Set Obey$Dir ADFS::0.$.!Pockets
StoreCSD
Dir <Obey$Dir>
IfThere F1023601 THEN ADFMount F1023601
IF ADFFS$OSVersion>=&35000 THEN ADFRemapVideoMemory 9 128 ELSE ScreenSize 128
IF ADFFS$OSVersion>=&35000 THEN RMEnsure TrackerModule 4.09 RMLoad ADFFS:trackers.TrackerMod

Set Pockets$Dir <Obey$Dir>

| Set Vga$Mode to 1 to run in VGA mode.
| For VGA and Multisync monitors only.
| Pockets requires more memory to run in VGA mode.
Set Vga$Mode 0

| Set Demo$Mode to 0 to skip intro
Set Demo$Mode 2

RMEnsure TrackerModule 4.09 RMLoad <Pockets$Dir>.PM
If <Vga$Mode><>0 Then RMEnsure MyMode RMLoad <Pockets$Dir>.MyMode
If <Vga$Mode>=0  Then WimpSlot -min 640k -max 640k
If <Vga$Mode><>0 Then WimpSlot -min 720k -max 720k

ECHO <22><9>
ECHO (C) 1991,1993 THE BITMAP BROTHERS.
ECHO
ECHO PLEASE WAIT WHILE LOADING.

IF ADFFS$CPUID>=&A10 THEN GOARM3JIT 0
<Pockets$Dir>.Loader
IF ADFFS$CPUID>=&A10 THEN GOARM3JIT
IF ADFFS$OSVersion>=&35000 THEN ADFRemapVideoMemory

If <Vga$Mode><>0 Then RMkill MyMode
RMkill TrackerModule
Unset Vga$Mode
Unset Demo$Mode
UnSet Pockets$Dir
RestoreCSD