| KinoAMP Ensure 2005-12-18
Set Kino$Dir <Obey$Dir>
Set Kino$Path <Kino$Dir>.

RMEnsure UtilityModule 3.50 Error You need RISC OS 3.50 or later
RMEnsure TimerMod 4.17 RMLoad <Kino$Dir>.TimerMod
RMEnsure TimerMod 4.17 Error You need TimerMod 4.17 or later

RMEnsure IntelDMA 0.01 IfThere <IntelDMA$Dir>.IntelDMA Then X RMLoad <IntelDMA$Dir>.IntelDMA

RMEnsure VideoOverlay 0.01 X RMLoad System:Modules.VideoOverlay

Run <Obey$Dir>.SelectRes KinoIRes$Path <Obey$Dir>.Resources

Set KinoSkin$Dir <Kino$Dir>.skins

If "<Choices$Write>" <> "" Then CDir <Choices$Write>.KinoAMP
If "<Choices$Write>" <> "" Then Set KinoChoices$Dir <Choices$Write>.KinoAMP Else Set KinoChoices$Dir <Kino$Dir>
Set KinoChoices$Path <KinoChoices$Dir>.

| Default for soundtracks, frames, and playlists.
CDir <KinoChoices$Dir>.saved
If "<KinoSave$Dir>" = "" Then Set KinoSave$Dir <KinoChoices$Dir>.saved

If "<Wimp$ScrapDir>" <> "" Then CDir <Wimp$ScrapDir>.KinoAMP
If "<Wimp$ScrapDir>" <> "" Then Set Kino$ScrapDir <Wimp$ScrapDir>.KinoAMP Else Set Kino$ScrapDir <Kino$Dir>
