home *** CD-ROM | disk | FTP | other *** search
/ PC-Online 1999 November / PCOnline_11_1999.iso / filesbbs / OS2 / PCD217R.ZIP / install.cmd < prev    next >
OS/2 REXX Batch file  |  1999-01-16  |  1KB  |  52 lines
  1. /*
  2.  * install.cmd - PopCD! instalation program
  3.  *               PopCD! ö─ùpâCâôâXâgü[âëü[
  4.  *
  5.  * release 1 - 06/Jan/1999
  6.  * release 2 - 16/Jan/1999
  7.  *
  8.  */
  9.  
  10. call rxfuncadd 'sysloadfuncs', 'rexxutil', 'sysloadfuncs'
  11. call sysloadfuncs
  12.  
  13. name = SysSearchPath('path','popcd.exe')
  14. if name = '' then do
  15.    say 'error. I cannot find PopCd.exe file.'
  16.    call End
  17. end
  18.  
  19. parameter = 'exename='name';startupdir='directory()';objectid=<POPCDEXE>'
  20.  
  21. if SysCreateObject('WPProgram','PopCD!','<WP_START>',parameter,'u') <> 0 then do
  22.    say ''
  23.    say ' PopCD! instalation was successfully completed.'
  24.    say ' Please restart OS/2 or start PopCD! in the startup folder.'
  25.    say ''
  26.    say ' PopCD!é╠âCâôâXâgü[âïé═û│Äûé╔ÅIù╣é╡é▄é╡é╜üB'
  27.    say ' OS/2é≡âèâXâ^ü[âgé╖éΘé⌐Änô«âtâHâïâ_é╠PopCD!é≡ïNô«é╡é─é¡é╛é│éóüB'
  28. end
  29. else do
  30.    say 'error. I cannot create object.'
  31.    call End
  32. end
  33.  
  34. say ''
  35. say ''
  36. say ''
  37. say ''
  38. say ''
  39. say ''
  40. say ''
  41. say ''
  42. say ''
  43. say ''
  44. say ''
  45. say ''
  46. say ''
  47. say ' ...By the way, PopCD! needs VROBJ.DLL and EMX Runtime Library.'
  48. say ''
  49.  
  50. End:
  51. exit
  52.