home *** CD-ROM | disk | FTP | other *** search
/ PC Online 1998 September / PCO_0998.ISO / filesbbs / os2 / cuos215.exe / install.cmd < prev    next >
Encoding:
Text File  |  1998-06-27  |  1.5 KB  |  74 lines
  1. /*
  2.  
  3.   Installation script for CU_SeeMe/2 Beta 1.9
  4.  
  5.   Creates folder and various other objects
  6.  
  7. */
  8.  
  9. Call Init
  10.  
  11. say 'Welcome to CU-SeeMe/2 Beta 1.9'
  12. say ''
  13.  
  14. /*
  15.  
  16.   if this is an update to an already existing installation
  17.   then we do not want to overwrite the reflist.ini
  18.  
  19. */
  20.  
  21. if stream('reflist.ini','c','query exists') = "" then
  22.   'copy reflist.nin reflist.ini'
  23.  
  24. say 'please wait while creating WPS objects'
  25.  
  26. dir = directory()
  27.  
  28. id = dir"\readme.now"
  29. exename = dir'\CUSEEME2.EXE'
  30. exename2 = dir'\CUVID2.EXE'
  31. exename3 = dir'\TALK2.EXE'
  32.  
  33.  
  34. call CreateObjects
  35. call SysOpenObject "<CUSEEME2_FLDR19>","DEFAULT","TRUE"
  36.  
  37. return
  38.  
  39. CreateObjects:
  40.  
  41.     If  SysCreateObject("WPFolder","CUSeeMe/2 Beta 1.9 for Os/2 ","<WP_DESKTOP>","OBJECTID=<CUSEEME2_FLDR19>") then
  42.     do
  43.           If SysCreateObject("WPProgram", "CUSeeMe/2", "<CUSEEME2_FLDR19>","EXENAME="exename";STARTUPDIR="dir";PROGTYPE=PM")  Then
  44.           do
  45.             If SysCreateObject("WPProgram", "CUVid/2", "<CUSEEME2_FLDR19>","EXENAME="exename2";STARTUPDIR="dir";PROGTYPE=PM")  Then
  46.             do
  47.                  Say 'Folder and program objects have been created'
  48.                  call  SysCreateObject "WPShadow", "READ.ME", "<CUSEEME2_FLDR19>","SHADOWID="id
  49.              end
  50.           end
  51.           Else
  52.              Say 'Could not create program object'
  53.     End
  54.     Else
  55.        Say 'Could not create folder '
  56.  
  57.  
  58. return
  59.  
  60.  
  61. Init :
  62.  
  63.   call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  64.   call SysLoadFuncs
  65.  
  66.   /* trace ?r' */
  67. return
  68.  
  69.  
  70.  
  71.  
  72.  
  73.  
  74.