|  !run file for Masochism Tango 
| v 0.666  (nov 95)   by Headless Chicken Demos Inc.

RMensure utilitymodule 3.00 error Sorry, Masochism Tango needs RISC OS 3.00 or later. It's worth upgrading just to watch this demo! :->
rmensure memalloc 0.11 rmload <obey$dir>.MemAlloc
Screensize 320k
spritesize 0k
rmafree 0k
fontsize 16k

WimpSlot -min 1136k -max 1136k 
WimpSlot -min 784k -max 1800k

Set RaveDem$Dir <Obey$Dir>
Set MTIntro$Path <RaveDem$Dir>.!Intro.
Set MTRaveDemo$Path <RaveDem$Dir>.!RaveDemo.
Set MTCredits$Path <RaveDem$Dir>.!Credits.
Set MTSpike$Path <RaveDem$Dir>.!MindSlide.
Set MTSkullBlob$Path <RaveDem$Dir>.!SkullBlob.
Set MTEnding$Path <RaveDem$Dir>.!Ending.
Set MTCerebrum$Path <RaveDem$Dir>.!Cerebrum.
Set MTChillOut$Path <RaveDem$Dir>.!chillout.
Set MTHiddenBit$Path <RaveDem$Dir>.!HiddenBit.
Set MTSpinTris$Path <RaveDem$Dir>.!SpinTris.
Set MTSpud$Path <RaveDem$Dir>.!spud.

|temporarily put rmafree up until raveintro gets sorted

RMensure QTMTracker 1.21 <RaveDem$Dir>.QTMModule
Volume 127
Tuning 0

set arm$type 3
RMensure Arm3Support 0.00 set arm$type 2
|   other values for <arm$type>:
| for ARM 250     --> 1
| for RISC PC 600 --> 6
| for ARM 3 33MHz --> 4
|   note that the above values are usually ignored or, if implemented,
|   guestimates are used

If "<RaveFont$Installed>" = "Yes" Then Run <RaveDem$Dir>.!RunImage
FontInstall MTSpike:OutFont.
FontInstall
Set RaveFont$Installed Yes
<RaveDem$Dir>.!RunImage