home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ARM Club 3
/
TheARMClub_PDCD3.iso
/
programs
/
textual
/
antiword
/
!AntiWord
/
!Run
< prev
next >
Wrap
Text File
|
1998-07-13
|
943b
|
23 lines
| !Run file for AntiWord
| (C) Adri van Os 1998
|
if "<System$Path>" = "" then Error 0 System resources cannot be found
if "<Font$Path>" = "" then Error 0 There are no fonts available
|
Set AntiWord$Dir <Obey$Dir>
|
SetMacro AntiWord$Path Choices:AntiWord.,<AntiWord$Dir>.,<Wimp$ScrapDir>.AntiWord.
|
SetMacro AntiWord$ChoicesFile AntiWord:Choices
if "<Choices$Write>" <> "" then Set AntiWord$ChoicesSave <Choices$Write>.AntiWord.Choices else Set AntiWord$ChoicesSave <AntiWord$Dir>.Choices
|
SetMacro AntiWord$FontNamesFile AntiWord:FontNames
if "<Choices$Write>" <> "" then Set AntiWord$FontNamesSave <Choices$Write>.AntiWord.FontNames else Set AntiWord$FontNamesSave <AntiWord$Dir>.FontNames
|
RMEnsure SharedCLibrary 0.00 RMLoad System:Modules.Clib
RMEnsure SharedCLibrary 3.75 Error You need Clib 3.75 or later
|
if "<File$Type_AE6>" = "" then Set File$Type_AE6 MSWord
|
WimpSlot -min 160K -max 160K
Run <AntiWord$Dir>.!RunImage %*0