home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 7 Games / 07-Games.zip / avar05.zip / update.cmd < prev   
OS/2 REXX Batch file  |  1996-01-30  |  3KB  |  84 lines
  1. /****************************************************************************
  2.  This is the installation program for the AVARICE BETA5.
  3.  
  4.  COPYRIGHT:     (C) 1996 Copyright Continuous Software Systems, L.L.C.
  5.                  All Rights Reserved
  6.  ***************************************************************************/
  7.  
  8. Trace 'O'
  9. Address CMD
  10. '@ECHO OFF'
  11.  
  12. call RxFuncAdd 'SysSetIcon', 'RexxUtil', 'SysSetIcon'
  13. call RxFuncAdd 'SysDriveMap', 'RexxUtil', 'SysDriveMap'
  14. call RxFuncAdd 'SysCls', 'RexxUtil', 'SysCls'
  15. call RxFuncAdd 'SysMkDir', 'RexxUtil', 'SysMkDir'
  16. call RxFuncAdd 'SysCreateObject', 'RexxUtil', 'SysCreateObject'
  17.  
  18. say "Avarice Beta5 Installation, January 1996"
  19. say "-----------------------------------------------------"
  20. say
  21. say
  22.  
  23. say "Available drives are:"
  24. drivelist = SysDriveMap()
  25. say drivelist
  26.  
  27. say "What drive letter is your CDROM (example, d:)?  "
  28. pull cddrive
  29.  
  30. if WORDPOS(cddrive, drivelist) = 0 then
  31.   do
  32.     say "You must enter a proper drive letter with colon."
  33.     exit
  34.   end
  35.  
  36. unzip avbeta5.zip
  37. del avarice.i
  38. call CreateAvariceI
  39.  
  40. exit
  41.  
  42. CreateAvariceI:
  43.    datafile = "avarice.i"
  44.  
  45.    foo = LINEOUT( datafile, '#' )
  46.    foo = LINEOUT( datafile, "#" )
  47.    foo = LINEOUT( datafile, "CDDrive "cddrive )
  48.    foo = LINEOUT( datafile, "SoundDirectory "cddrive )
  49.    foo = LINEOUT( datafile, "VideoDirectory "cddrive )
  50.    foo = LINEOUT( datafile, "MBmpDirectory "cddrive )
  51.    foo = LINEOUT( datafile, "SoundVolume 80" )
  52.    foo = LINEOUT( datafile, "MusicVolume 50" )
  53.    foo = LINEOUT( datafile, "MoviesOn 1" )
  54.    foo = LINEOUT( datafile, "ImageCachingOn 1" )
  55.    foo = LINEOUT( datafile, "PainterSize 100" )
  56.    foo = LINEOUT( datafile, "LoggerBackground logger1" )
  57.    foo = LINEOUT( datafile, "PillowBackground pillow1" )
  58.    foo = LINEOUT( datafile, "LiaisonBackground liaison3" )
  59.    foo = LINEOUT( datafile, "MTextColor 1" )
  60.    foo = LINEOUT( datafile, "PTTextColor 3" )
  61.    foo = LINEOUT( datafile, "PopupBackground popup1" )
  62.    foo = LINEOUT( datafile, "LoggerScrollBuffer 25" )
  63.    foo = LINEOUT( datafile, "PillowTitleOn 1" )
  64.    foo = LINEOUT( datafile, "LoggerPillowTimeout 4" )
  65.    foo = LINEOUT( datafile, "LoggerDoubleSpace 1" )
  66.    foo = LINEOUT( datafile, "CaptionsOn 0" )
  67.    foo = LINEOUT( datafile, "MenuOn 0" )
  68.    foo = LINEOUT( datafile, "AnimsOn 1" )
  69.    foo = LINEOUT( datafile, "Preview 0" )
  70.    foo = LINEOUT( datafile, "DoOnePass 0" )
  71.    foo = LINEOUT( datafile, "DitherType 2" )
  72.    foo = LINEOUT( datafile, "DoColor 1" )
  73.    foo = LINEOUT( datafile, "CacheSize 5" )
  74.    foo = LINEOUT( datafile, "ImageQuality 2" )
  75.    foo = LINEOUT( datafile, "UsingJPG 1" )
  76.    foo = LINEOUT( datafile, "JPGSize 1" )
  77.    foo = LINEOUT( datafile, "FlushOnChange 0" )
  78.    foo = LINEOUT( datafile, "Quantize 1" )
  79.    foo = LINEOUT( datafile, "#" )
  80.    foo = LINEOUT( datafile, "#" )
  81.  
  82.    foo = LINEOUT( datafile )
  83. return
  84.