home *** CD-ROM | disk | FTP | other *** search
- /*
- * AutoPAN 1.0 (C) 1998 Yuri Dario <mc6530@mclink.it>
- *
- * Installation script
- */
-
- call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
- call SysLoadFuncs
-
- '@echo off'
-
- RootDir = SysIni( 'USER', 'BlueCAD', 'ROOTDIR')
-
- if RootDir = 'ERROR:' then do
- call beep 500, 100
- say 'Error: BlueCAD is not installed.'
- exit
- end
-
- /* remove last char */
- RootDir = substr( RootDir, 1, length( rootdir)-1)
-
- say 'BlueCAD is installed in 'RootDir'*'
-
- say 'Starting installation...'
-
- 'copy autopan.dll ' RootDir'\dll'
- 'copy autopan.c2t 'RootDir'\prgm'
- 'copy thick.* 'RootDir'\macro'
- 'mergebin 'RootDir'\prgm\bluecad autopan 'RootDir'\prgm\bluecad'
-
- say '.'
- say 'AutoPAN installed. Remeber to add the THICK macro.'
-