| > !3DFnEdit.!Run
|
|
| by Chris Johnson
|
RMEnsure UtilityModule 3.10 Error This application is only suitable for use with RISC OS 3.10 or later versions
|
If "<3DFNEdit$Running>" = "yes" Then Error "3DFNEdit is already running"
|
IconSprites <Obey$Dir>.!Sprites
|
| Find path to file
Set 3DFnEdit$Dir <Obey$Dir>
Set rm$Path system:modules.,<Obey$Dir>.rm.
|
set temp$flag 1
RMEnsure CJWimpUtil 0 set temp$flag 0
RMEnsure CJWimpUtil 0.23 if "<temp$flag>" = "1" Then Error 0 Old CJWimpUtil module installed Else RMLoad rm:cjWimpUtil
RMEnsure CJWimpUtil 0.23 Error You need the CJWimpUtil module installed
|
unset temp$flag
unset rm$Path
|
|
| Check memory allocation
WimpSlot -min 72K -max 72K
|
Run <3DFnEdit$Dir>.!RunImage %*0
