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