home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 8 Other / 08-Other.zip / apan1.zip / install.cmd < prev    next >
OS/2 REXX Batch file  |  1998-06-23  |  749b  |  34 lines
  1. /*
  2.  * AutoPAN 1.0 (C) 1998 Yuri Dario <mc6530@mclink.it> 
  3.  *
  4.  * Installation script
  5. */
  6.  
  7. call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  8. call SysLoadFuncs
  9.  
  10. '@echo off'
  11.  
  12. RootDir = SysIni( 'USER', 'BlueCAD', 'ROOTDIR')
  13.  
  14. if RootDir = 'ERROR:' then do
  15.    call beep  500, 100
  16.    say 'Error: BlueCAD is not installed.'
  17.    exit
  18. end
  19.  
  20.    /* remove last char */
  21. RootDir = substr( RootDir, 1, length( rootdir)-1)
  22.  
  23. say 'BlueCAD is installed in 'RootDir'*'
  24.  
  25. say 'Starting installation...'
  26.  
  27. 'copy autopan.dll ' RootDir'\dll'
  28. 'copy autopan.c2t 'RootDir'\prgm'
  29. 'copy thick.* 'RootDir'\macro'
  30. 'mergebin 'RootDir'\prgm\bluecad autopan 'RootDir'\prgm\bluecad'
  31.  
  32. say '.'
  33. say 'AutoPAN installed. Remeber to add the THICK macro.'
  34.