home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 35 Internet / 35-Internet.zip / jsm331r.zip / install.cmd < prev    next >
OS/2 REXX Batch file  |  2001-01-18  |  2KB  |  68 lines

  1. /*
  2.  * Installation Program for Jasmine
  3.  *
  4.  * [HISTORY]
  5.  * Revision 1 (04.Aug.2000)
  6.  * > Renewal
  7.  * Revision 2 (18.Jan.2001)
  8.  * > Fix problem.
  9.  *
  10.  *
  11.  */
  12. rc = RxFuncAdd( "SysLoadFuncs", "RexxUtil", "SysLoadFuncs")
  13.  
  14. DIR = directory()
  15.  
  16. APL_FOLDER_NAME = "Jasmine"
  17. APL_FOLDER_ID   = "<JASMINE_FOLDER>"
  18.  
  19. APL_EXE_NAME = "Jasmine"
  20. APL_EXE_FILE = DIR"\JASMINE.EXE"
  21. APL_EXE_ID   = "<JASMINE>"
  22.  
  23. README_E_FILE = DIR"\readme_e.htm"
  24. README_E_NAME = "Readme English"
  25.  
  26. README_J_FILE = DIR"\readme_j.htm"
  27. README_J_NAME = "Readme Japanese"
  28.  
  29.  
  30. say ""
  31. say " Install Jasmine..."
  32. say ""
  33.  
  34. /* Create Folders */
  35. /* 1. Pretty Pop Software Main Folder */
  36. if SysCreateObject( 'WPFolder', 'Pretty Pop Software', '<WP_DESKTOP>', "OBJECTID=<PRETTY_POP_SOFTWARE>", "u" ) then do
  37.     say ' Create Folder : Pretty Pop Software'
  38. end
  39.  
  40. /* 2. Application Folder */
  41. if SysCreateObject( 'WPFolder', APL_FOLDER_NAME, '<PRETTY_POP_SOFTWARE>', "OBJECTID="APL_FOLDER_ID, "u" ) then do
  42.     say " Create Folder : "APL_FOLDER_NAME
  43. end
  44.  
  45. /* Create Objects */
  46. parameter = "EXENAME="APL_EXE_FILE";STARTUPDIR="directory()";OBJECTID="APL_EXE_ID
  47. if SysCreateObject('WPProgram', APL_EXE_NAME, APL_FOLDER_ID, parameter, 'u') then do
  48.     say " Create Object : "APL_EXE_NAME
  49. end
  50.  
  51. if SysCreateShadow(APL_EXE_ID, "<WP_DESKTOP>") then do
  52.     say " Create Object : "APL_EXE_NAME
  53. end
  54.  
  55. if SysCreateObject( 'WPUrl', README_J_NAME, APL_FOLDER_ID, 'URL=file:///'README_J_FILE, "u" ) then do
  56.     say " Create Object : "README_J_NAME
  57. end
  58.  
  59. if SysCreateObject( 'WPUrl', README_E_NAME, APL_FOLDER_ID, 'URL=file:///'README_E_FILE, "u" ) then do
  60.     say " Create Object : "README_E_NAME
  61. end
  62.  
  63. say ""
  64. say " Jasmine instalation was successfully completed."
  65. say ""
  66. say " Jasmineé╠âCâôâXâgü[âïé═û│Äûé╔ÅIù╣é╡é▄é╡é╜üB"
  67. say ""
  68.