home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1994 #1 / monster.zip / monster / OS2 / JOVW122B.ZIP / jvwinstl.cmd < prev   
OS/2 REXX Batch file  |  1994-03-17  |  1KB  |  35 lines
  1. /* JoeView Installation REXX script */
  2. Call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  3. Call SysLoadFuncs
  4. currentdirectory = DIRECTORY()
  5. IF SUBSTR( currentdirectory, LENGTH(currentdirectory), 1 ) <> "\"
  6.   THEN currentdirectory = currentdirectory || "\"
  7. Call SysCls
  8. Call SysCurState 'ON'
  9. CALL SysFileTree currentdirectory'JoeView.exe', file, F
  10. If file.0 = 0 Then
  11.    Do
  12.        Say
  13.        Say
  14.        Say
  15.        Say "This utility must be run in the same directory as JoeView.exe"
  16.        Exit
  17.    End
  18. Say
  19. Say
  20. Say
  21. title = "JoeView 1.22b"
  22. classname = 'WPProgram'
  23. location = '<WP_DESKTOP>'
  24. filter= '*.GIF,*.JPG,*.JPEG,*.BMP,*.TGA,*.PBM,*.PGM,*.PPM,*.TIF,*.TIFF,*.RLE,*.MET,*.PCX,*.X11,*.RAS,*.SLS;'
  25. setup = 'EXENAME='currentdirectory'JoeView.exe;STARTUPDIR=;PROGTYPE=PM;ASSOCFILTER='filter
  26. option = 'update'
  27.  
  28. Say "Creating JoeView 1.22b Program Object..."
  29. rc = SysCreateObject(classname, title, location, setup, option)
  30. Say ""
  31. Say 'All better now'
  32. Say 'You should take the *.BMP association off of the icon editor, if'
  33. Say 'you have not done so already.'
  34. Exit
  35.