| !Run for CDThing
| (c) 1996 Ian Clark

Set RTrackCDThing$Dir <Obey$Dir>
UnSet Obey$Dir
| The above line provides limited protection against the icon virus
| don't remove it.
IF "<RTrack$Dir>" = "" Then Error 0 Risc Tracker's CDThing needs to have actually seen Risc Tracker first!

Set RTTemp$Path <RTrack$Dir>.Resources.,System:Modules.
RMEnsure RoosterMod 0.03 RMLoad RTTemp:RoosterMod
RMEnsure RoosterMod 0.03 Error 0 Risc Tracker's CDThing needs at least version 0.03 of 'RoosterMod', it should be in '!RTracker.Resources'.
RMEnsure RiscTracker 2.41 RMLoad RTTemp:RTMod
RMEnsure RiscTracker 2.41 Error 0 Risc Tracker's CDThing needs at least version 2.40 of the RiscTracker support module, this should be in '!RTracker.Resources'.
Unset RTTemp$Path

WimpSlot -min 24k -max 24k
Run <RTrackCDThing$Dir>.!RunImage