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