| !Run File for !PassWd
| 2004 Paul Vigay
|
Set PassWd$Dir <Obey$Dir>
IconSprites <PassWd$Dir>.!Sprites
|
if "<PassWd$Running>" <> "" then error PassWd is already running.
|
RMEnsure ABCLibrary 4.14 RMLoad System:modules.ABCLib
RMEnsure ABCLibrary 4.14 Error PassWd requires ABCLib version 4.14 or later.
| Load the Blowfish module, if present in Boot:System.310.Modules
Set PassWd$Blowfish Yes
RMEnsure Blowfish 1.01 RMLoad System:modules.blowfish
RMEnsure Blowfish 1.01 Set PassWd$Blowfish No
|
WimpSlot -min 200k -max 200k
Run <PassWd$Dir>.!RunImage *%0
Unset <PassWd$Running>
