home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Datafile PD-CD 3
/
PDCD_3.iso
/
utilities
/
utilsf
/
hugs
/
!Hugs
/
!Run
< prev
next >
Wrap
Text File
|
1995-02-25
|
649b
|
23 lines
| Hugs v1.0
set Hugs$Dir <Obey$Dir>
iconsprites <Hugs$Dir>.!sprites
|
| default prelude
set HUGS <Hugs$Dir>.prelude
| filetypes and Run actions
set hs$ 2AA
set File$Type_<hs$> HScript
set Alias$@RunType_<hs$> |"/ <Hugs$Dir>.!Run %%*0|"
set hp$ 2AB
set File$Type_<hp$> HProj
set Alias$@RunType_<hp$> |"/ <Hugs$Dir>.!Run + %%*0|"
| ensure we have !Edit up
if "<TaskWindow$Server>"<>"Resources:$.Apps.!Edit" then Error 0 "Hugs needs !Edit"
|
| set default options
set Hugs$Opts -h120000 -p> -rit +fwk -sgle.
set Hugs_run <Hugs$Dir>.Hugs <Hugs$Opts>
|
wimpslot -min 16K -max 16K
| NB. No carriage return at end of next line!
/ <Hugs$Dir>.!RunImage %*0