Set ReDHCP$Dir <Obey$Dir>
IconSprites <ReDHCP$Dir>.!Sprites

RMEnsure UtilityModule 5.00 Error This program requires RISC OS 5

Set EtherK$Present 1
Set EtherUSB$Present 1
Set EtherTH$Present 1
Set EtherCPSW$Present 1

RMEnsure EtherK    0 Set EtherK$Present 0
RMEnsure EtherUSB  0 Set EtherUSB$Present 0
RMEnsure EtherTH   0 Set EtherTH$Present 0
RMEnsure EtherCPSW 0 Set EtherCPSW$Present 0

IF (<EtherK$Present>="0") AND (<EtherUSB$Present>="0") AND (<EtherTH$Present>="0") AND (<EtherCPSW$Present>="0") THEN Error No supported Ethernet modules detected

UnSet EtherK$Present
UnSet EtherUSB$Present
UnSet EtherTH$Present
UnSet EtherCPSW$Present

WimpSlot -min 24K -max 24K

Run <ReDHCP$Dir>.!RunImage