home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 October / Chip_2000-10_cd1.bin / zkuste / SVET_OS2 / SDD702 / SDDSE702.EXE / fi / makewps.cmd next >
OS/2 REXX Batch file  |  2000-03-02  |  5KB  |  155 lines
  1. /* Create SciTech Display Doctor Desktop objects */
  2. /*******************************************************/
  3. /* Before running, SET LANG= to the correct language.  */
  4. /* It may already be correctly set in your CONFIG.SYS. */
  5. /* For examples:                                       */
  6. /* SET LANG=ar_AA for Arabic                           */
  7. /* SET LANG=pt_BR for Brazil                           */
  8. /* SET LANG=zh_CN for Simplified Chinese               */
  9. /* SET LANG=de_DE for Germany                          */
  10. /* SET LANG=da_DK for Denmark                          */
  11. /* SET LANG=es_ES for Spain                            */
  12. /* SET LANG=el_GR for Greece                           */
  13. /* SET LANG=fi_FI for Finland                          */
  14. /* SET LANG=fr_FR for France                           */
  15. /* SET LANG=iw_IL for Israel                           */
  16. /* SET LANG=it_IT for Italy                            */
  17. /* SET LANG=ja_JP for Japan                            */
  18. /* SET LANG=ko_KR for Korea                            */
  19. /* SET LANG=nl_NL for Netherlands                      */
  20. /* SET LANG=no_NO for Norway                           */
  21. /* SET LANG=sv_SE for Sweden                           */
  22. /* SET LANG=zh_TW for Taiwan                           */
  23. /* SET LANG=en_US for English (default)                */
  24. /*******************************************************/
  25.  
  26. /******************************************
  27. * Define MRI strings here
  28. *******************************************/
  29.  
  30.   MRI_PARAMETERS_GAMON             = 'Parameters for GAMON (-h for usage)'
  31.   MRI_TITLE_CONFIGURATION_PROGRAM  = 'Configuration^Program'
  32.   MRI_TITLE_HARDWARE_REPORT        = 'Hardware^Report'
  33.   MRI_TITLE_MONITOR_UTILITY        = 'Monitor Utility'
  34.   MRI_TITLE_SCITECH_DISPLAY_DOCTOR = 'SciTech Display^Doctor/se 7.0'
  35.   MRI_TITLE_SCITECH_MARKETPLACE    = 'SciTech Marketplace^Consumer Products'
  36.   MRI_TITLE_UNINSTALL              = 'Uninstall'
  37.  
  38. /******************************************
  39. * Define message ids from *mid*.h
  40. *******************************************/
  41.  
  42.   MSG_CANNOT_MAKE            =   82
  43.   MSG_INSTALL_UNSUCCESSFUL   = 1975
  44.  
  45.  
  46.  
  47. /* Register with REXX API extensions. */
  48. Call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  49. Call SysLoadFuncs
  50.  
  51. /* get current directory - Where SDD utilities are installed */
  52. os2bootPath = SysSearchPath('PATH', 'os2boot')
  53. if os2bootpath \= ''
  54. then bootDrive = filespec('drive', os2bootPath)
  55. else exit
  56. sdddir=bootDrive || '\sdd'
  57.  
  58. CreateObjects:
  59.  
  60. /* Create the Scitech folder on Desktop */
  61. Class='WPFolder'
  62. Location='<WP_DESKTOP>'
  63. ObjectID='<SCITECH_DESKTOP>'
  64. Title=MRI_TITLE_SCITECH_DISPLAY_DOCTOR
  65. SETUP='ICONVIEWPOS=16 44 56 23;ALWAYSSORT=YES;OPEN=NO;DISABLETOOLBAR=1;'
  66.  
  67. Call MakeObject
  68.  
  69. /* All other objects created in Scitech folder */
  70. Location='<SCITECH_DESKTOP>'
  71.  
  72. /* Create Shadows */
  73. Class='WPShadow'
  74.  
  75. Title='System'
  76. ObjectID='<SCITECH_SYSTEM>'
  77. SETUP='SHADOWID=<WP_SYSTEM>;'
  78. Call MakeObject
  79.  
  80. Title='readme.txt'
  81. ObjectID='<SCITECH_README>'
  82. SETUP='SHADOWID='sdddir'\readme.txt'
  83. Call MakeObject
  84.  
  85. Title='changes.txt'
  86. ObjectID='<SCITECH_CHANGES>'
  87. SETUP='SHADOWID='sdddir'\changes.txt;'
  88. Call MakeObject
  89.  
  90. /* Make URLs */
  91. Class='WPUrl'
  92.  
  93. Title=MRI_TITLE_SCITECH_MARKETPLACE
  94. ObjectID='<SCITECH_MARKET>'
  95. SETUP='URL=http://www.scitechsoft.com/sdd_os2_order.html'
  96. Call MakeObject
  97.  
  98. /* Make Programs */
  99. Class='WPProgram'
  100.  
  101. Title=MRI_TITLE_MONITOR_UTILITY
  102. ObjectID='<SCITECH_GAMON>'
  103. SETUP='EXENAME=CMD.EXE;'||,
  104.           'STARTUPDIR='sdddir';'||,
  105.           'PARAMETERS=/c (GAMON.EXE [' || MRI_PARAMETERS_GAMON || '] ' ||,
  106.                   '> gamon.out & e.exe gamon.out );'||,
  107.       'PROGTYPE=WINDOWABLEVIO;'
  108. Call MakeObject
  109.  
  110. Title=MRI_TITLE_CONFIGURATION_PROGRAM
  111. ObjectID='<SCITECH_GACTRL>'
  112. SETUP='EXENAME='sdddir'\GACTRL.EXE;'||,
  113.           'STARTUPDIR='sdddir';'||,
  114.       'PROGTYPE=FULLSCREEN;'
  115. Call MakeObject
  116.  
  117. Title=MRI_TITLE_HARDWARE_REPORT
  118. ObjectID='<SCITECH_REPORT>'
  119. SETUP='EXENAME=cmd.exe;'||,
  120.           'STARTUPDIR='sdddir';'||,
  121.       'PARAMETERS=/c (GAREPORT.EXE > gareport.out & start /f e.exe gareport.out);'||,
  122.       'PROGTYPE=FULLSCREEN;'
  123. Call MakeObject
  124.  
  125. Title=MRI_TITLE_UNINSTALL
  126. ObjectID='<SCITECH_UNINSTAL>'
  127. SETUP='EXENAME='sdddir'\UNINSTAL.EXE;'||,
  128.                   'STARTUPDIR='sdddir';'||,
  129.           'PROGTYPE=PM;'||,
  130.           'NOAUTOCLOSE=YES;'
  131. Call MakeObject
  132.  
  133. exit
  134.  
  135. /******************************************************
  136. * Make a Work Place Shell object
  137. *******************************************************/
  138.  
  139. MakeObject:
  140.   if SysCreateObject(Class,Title,Location,'OBJECTID='ObjectID';'||,
  141.                      'TITLE='title';'SETUP,'U')<>1,
  142.   then Say Title || ' ' || MyGetMsg(SysGetMessage(MSG_CANNOT_MAKE))
  143.   return
  144.  
  145. /******************************************************
  146. * Remove SYSXXXX: from messages
  147. *******************************************************/
  148.  
  149. MyGetMsg: Procedure
  150.  
  151.   parse arg message
  152.   if pos('SYS', word(message, 1)) == 1
  153.     then parse arg . message
  154.   return message
  155.