| A Talking Canvas Junior application (v1.00)
| Code (C) Jason Tribbeck
|          7th ARM Systems
|          ARM Designs 1995

Set TCJApp$Dir <Obey$Dir>
Set TCJApp$UnAppComp Yes
RMEnsure UnAppComp 0 Set TCJApp$UnAppComp No
Set System$Path_Message System resources could not be found
RMEnsure SonorSound 1.01 RMLoad <Obey$Dir>.SonorSound
RMEnsure SharedCLibrary 3.75 RMLoad System:Modules.CLib
RMEnsure SharedCLibrary 3.75 Error 0 You need CLib version 3.75 or greater
RMEnsure FPEmulator 2.80 RMLoad System:Modules.FPEmulator
RMEnsure FPEmulator 2.80 Error 0 You need FPEmulator version 2.80 or greater
WimpSlot -min 0216k -max 0216k
WimpSlot -min 64k -max 64k
Set Alias$RunTCJApp WimpTask Run <TCJApp$Dir>.!RunImage
If "<TCJApp$UnAppComp>"="No" Then cache off
RunTCJApp
If "<TCJApp$UnAppComp>"="No" Then cache on
