home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / beat202r.zip / install.cmd < prev    next >
OS/2 REXX Batch file  |  1999-08-19  |  1KB  |  52 lines
  1. /*
  2.  * install.cmd - Beat/2 - Swatch Beat, Internet Time Indicator instalation program
  3.  *               Beat/2ö─ùpâCâôâXâgü[âëü[
  4.  *
  5.  * release 1 - 15/Jul/1999
  6.  * release 2 - 19/Aug/1999
  7.  *
  8.  */
  9.  
  10. call rxfuncadd 'sysloadfuncs', 'rexxutil', 'sysloadfuncs'
  11. call sysloadfuncs
  12.  
  13. name = SysSearchPath('path','beat.exe')
  14. if name = '' then do
  15.    say 'error. I cannot find beat.exe file.'
  16.    call End
  17. end
  18.  
  19. parameter = 'exename='name';startupdir='directory()';objectid=<BEAT2>'
  20.  
  21. if SysCreateObject('WPProgram','Beat/2','<WP_START>',parameter,'u') <> 0 then do
  22.    say ''
  23.    say ' Beat/2 (Swatch Beat, Internet Time Indicator) instalation was successfully completed.'
  24.    say ' Please restart OS/2 or start Beat/2 in the startup folder.'
  25.    say ''
  26.    say ' Beat/2 (Swatch Beat, Internet Time Indicator) é╠âCâôâXâgü[âïé═û│Äûé╔ÅIù╣é╡é▄é╡é╜üB'
  27.    say ' OS/2é≡âèâXâ^ü[âgé╖éΘé⌐Änô«âtâHâïâ_é╠Beat/2é≡ï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, Beat/2 needs VROBJ.DLL.'
  48. say ''
  49.  
  50. End:
  51. exit
  52.