home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 6 File / 06-File.zip / pmdmatch.zip / PMDSetup.cmd < prev    next >
OS/2 REXX Batch file  |  1995-03-14  |  1KB  |  48 lines
  1. /* Set up a PMDMatch OS/2 icon */
  2.  
  3. call rxfuncadd 'SysLoadFuncs', 'REXXUTIL', 'SysLoadFuncs'
  4. call SysLoadFuncs
  5. call SysCls
  6. say ""
  7. say ""
  8. say ""
  9. say ""
  10. say ""
  11. say "Please enter the full path name of the PMDMatch directory,"
  12. say "where the PMDMatch.exe will be found."
  13. say ""
  14. say "Example:  C:\MYAPPS\PMDMatch"
  15. say ""
  16. say "Do NOT include trailing \"
  17. say ""
  18. say "(Type carefully)"
  19. say ""
  20. parse pull DirName
  21.  
  22. DirName=strip(DirName,,'"')
  23.  
  24. MyLine1="EXENAME="DirName"\PMDMatch.exe;"
  25. MyLine2="STARTUPDIR="DirName";"
  26. MyLine3="OBJECTID=<PMDMatch>;"
  27. MyLine4="HELPLIBRARY="'"'DirName"\PMDMatch.hlp"'"'";"
  28. MyLine5="HELPPANEL=29918;"
  29.  
  30. /*
  31. say MyLine1
  32. say MyLine2
  33. say MyLine3
  34. say MyLine4
  35. say MyLine5
  36. */
  37.  
  38. say ""
  39. if SysCreateObject('WPProgram',,
  40.                      'PMDMatch',,
  41.                      '<WP_DESKTOP>',,
  42.                      MyLine1||MyLine2||MyLine3||MyLine4||MyLine5,,
  43.                      'REPLACE:') then
  44.     say "PMDMatch object successfully created"
  45. else
  46.     say "Problem creating PMDMatch object; please contact the author"
  47.  
  48.