home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: Multimed / Multimed.zip / mp3pm055.zip / install.cmd < prev    next >
OS/2 REXX Batch file  |  1998-05-02  |  1KB  |  52 lines
  1. /* Create an icon for Mp3pM on the desktop.  */
  2. /* If you already have an icon for Mp3pM     */
  3. /* please delete this icon before calling    */
  4. /* this program....                          */
  5.  
  6. call RxFuncAdd "SysLoadFuncs","REXXUTIL","SysLoadFuncs"
  7. call SysLoadFuncs
  8.  
  9. say ""
  10. say "             *************************************************"
  11. say "            *  ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀  *"
  12. say "            *                     Mp3pM                       *"
  13. say "            *  ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀  *"
  14. say "            *    PM shell for MP3 authoring                   *"
  15. say "            *                          version: 0.55 alpha    *"
  16. say "             *************************************************"
  17. say ""
  18. say ""
  19. say ""
  20. say ""
  21. say ""
  22. say ""
  23. say ""
  24. say ""
  25. say "The installation script will create an icon for Mp3pM on the desktop"
  26. say ""
  27. say ""
  28. say "Continue?  (Y/N)"
  29.  
  30. PARSE PULL reply
  31. if reply = "N" | reply = "n" then exit
  32.  
  33. title="Mp3pM v0.55 alpha"
  34. classname='WPProgram'
  35. location='<WP_DESKTOP>'
  36. curdir=directory()
  37. result=0
  38.  
  39. result=SysCreateObject(classname,title,location,'PROGTYPE=PM;EXENAME='curdir'\mp3pm.exe;')
  40.  
  41. if result then
  42.   do
  43.    say " Icon for Mp3pM successfully created"
  44.    say ""
  45.    say " If you have previous Mp3pM.ini file somewhere outthere - DELETE IT!!"
  46.    say ""
  47.   end
  48. else do
  49.   say "  !! ERROR - Can not create iobject!"
  50.   say "  Maybe one already exist??"
  51. end
  52.