home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Monster Media 1994 #1
/
monster.zip
/
monster
/
OS2
/
SSAVER2X.ZIP
/
INSTALL.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1993-12-14
|
1KB
|
36 lines
/* install.cmd - REXX script for ScreenSaver installation
(C) 1993 Siegfried Hanisch
*/
call RxFuncAdd "SysLoadFuncs", "RexxUtil", "SysLoadFuncs"
call SysLoadFuncs
say "ScreenSaver 1.1 installation."
rc = SysFileTree("SSaver.EXE", fspec, "FO")
if rc=0 then
do
filename=filespec("Name", fspec.1)
filepath=filespec("Path", fspec.1)
filedrive=filespec("Drive", fspec.1)
if SysCreateObject("WPProgram", "ScreenSaver",,
"<WP_DESKTOP>", "EXENAME="filedrive||filepath||filename,
";STARTUPDIR="||filedrive||filepath, "replace") then
do
say "ScreenSaver program object created."
say "If you want ScreenSaver to be automatically started at boot"
say "time, move the program object to the startup folder."
say "-----"
say "Make sure the emx-DLLs are somewhere in your LIBPATH"
say "-----"
say "Please read the online help topic on 'low priority' if"
say "saver animation is not smooth enough."
end
else
say "ERROR: program object could not be created."
end
else
say "ERROR: ScreenSaver program file SSaver.EXE not found."
exit
end