home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 13 / 13.iso / p / p170 / 1.ddi / PATOOLS / DRAFT.DAT < prev    next >
Encoding:
Text File  |  1987-09-09  |  17.0 KB  |  619 lines
  1. echo off
  2. clrwin
  3.  
  4. --  Rev 2.11 Adv Arch Drafting installation process data file
  5.  
  6. -------- Begin macro definitions -------------------------------------------
  7. macro GRAPH_MENU
  8.   echo
  9.   center "Graphics Device Installation"
  10.   echo
  11.   setatt 15 1
  12.   center "The following graphics devices are officially supported by the"
  13.   center "Personal Architect Advanced Archictectural Drafting software. "
  14.   center "Other graphics graphics boards that emulate devices on this   "
  15.   center "this list, or that have been tested by your dealer, may also  "
  16.   center "work but will not be installed by this process.               "
  17.   echo
  18.   center "Call your Dealer if you are unsure of the correct choice,     "
  19.   center "or have questions about a device that is not shown.           "
  20.   echo
  21.   center "Graphics Device Installation Options:"
  22.   echo
  23.   setatt 10 1
  24.   center "1)  AG   - Advanced Graphics Medium Res Adapter "
  25.   center "2)  PG   - IBM Professional Graphics Adapter    "
  26.   center "3)  TM1  - Tecmar Graphics Master Adapter       "
  27.   center "4)  AGH  - CV Advanced Graphics High Res Adapter"
  28.   center "5)  EGA  - IBM Enhanced Graphics Adapter        "
  29.   echo
  30.   getsel "12345"
  31.   setatt 15 1
  32.   clrwin
  33. endmac
  34. ----------------------------------------
  35. macro DISPLAY_TITLE
  36.    setwin
  37.    setatt 15 1
  38.    clrwin
  39.    setatt 10 1
  40.    title " ADVANCED ARCHITECTURAL DRAFTING INSTALLATION PROCEDURE "
  41.    setatt 15 1
  42. endmac
  43. ----------------------------------------
  44. macro MAIN_MENU
  45.   echo
  46.   echo
  47.   echo
  48.   echo
  49.   echo
  50.   center " Hardware Device Installation Options: "
  51.   echo
  52.   setatt 10 1
  53.   center "    1)  Install new graphics device.   "
  54.   center "    2)  Install protection device.     "
  55.   center "    3)  Exit to DOS.                   "
  56.   setatt 15 1
  57.   getsel "123"
  58.   clrwin
  59. endmac
  60. ----------------------------------------
  61. macro BOX_MENU
  62.   echo
  63.   setatt 15 1
  64.   center "The following protection devices are officially supported"
  65.   center "by the Personal Architect Advanced Architectural Drafting"
  66.   center "software.  No other devices will work.                   "
  67.   echo
  68.   center "Call your Dealer if you are unsure of the correct choice."
  69.   echo
  70.   center "Protection Device Installation Options:"
  71.   echo
  72.   setatt 10 1
  73.   center "1)  Arnet keyboard box.     "
  74.   center "2)  Arnet parallel port box."
  75.   center "3)  MSS parallel port box.  "
  76.   echo
  77.   getsel "1234"
  78.   clrwin
  79.   if select 1 set b=11
  80.   if select 2 set b=21
  81.   if select 3 set b=31
  82.   if select 4 set b=41
  83.   copy {D}padev\CVBOX{b}.SYS {D}padev\CVBOX.SYS >nul
  84.   if select 2 CHK_PARA_BOX
  85.   if select 3 CHK_PARA_BOX
  86.   if select 4 CHK_PARA_BOX
  87. endmac
  88. ----------------------------------------
  89. macro CHK_PARA_BOX
  90.   echo
  91.   center "Parallel Protection Box Installation"
  92.   echo
  93.   center "Protection Box location:    "
  94.   echo
  95.   setatt 10 1
  96.   center "   1)  Parallel Port # 1    "
  97.   center "   2)  Parallel Port # 2    "
  98.   center "   3)  Parallel Port # 3    "
  99.   echo
  100.   setatt 15 1
  101.   getsel "123"
  102.   clrwin
  103.   if select 1 echo 1 >\pptmp
  104.   if select 2 echo 2 >\pptmp
  105.   if select 3 echo 3 >\pptmp
  106. endmac
  107. ----------------------------------------
  108.  
  109. -------- End macro definitions -------------------------------------------
  110.  
  111. -------- Begin execution --------
  112. DISPLAY_TITLE
  113.  
  114. -- Set the environment variable D to COMMAND.COM directory prefix
  115. set D={COMSPEC:1,3}
  116.  
  117. -- Get current drive spec
  118. cd >{D}DMANTMP1
  119. copy DMANPAD+{D}DMANTMP1 {D}DMANTMP >nul
  120. if "%1" == FROMLOAD goto new
  121.  
  122. :main
  123. MAIN_MENU
  124. if select 1 goto graphic
  125. if select 2 goto box
  126. if select 3 goto end
  127.  
  128. -- Part 1 - New Installation --
  129. :new
  130. echo
  131. setatt 12 1
  132. center "IMPORTANT!"
  133. setatt 15 1
  134. echo
  135. center " Welcome to the Advanced Architectural Drafting module of Personal   "
  136. center " Architect.  To successfully install and run Draft on your system,   "
  137. center " you will need a minimum of 2.5 megabytes of space on your hard disk "
  138. center " (plus an additional 2.5 megs if you install the symbol libraries).  "
  139. center "                                                                     "
  140. center " This installation program will create three new directories on your "
  141. center " disk, PATOOLS, PADEV, and DRAFT.  If any of these conflict with     "
  142. center " an existing directory name, we suggest that you rename the old      "
  143. center " directory.                                                          "
  144. center "                                                                     "
  145. center " INSTALL will copy new AUTOEXEC.BAT, CONFIG.SYS, and CVOPTION.FIL    "
  146. center " files into your root directory.  If any of these already exist,     "
  147. center " and contain information needed for the operation of your system or  "
  148. center " other software, edit the new version to add your commands.          "
  149. echo
  150. if infile {D}DMANTMP "A:\" goto overwrite_attempt
  151. if infile {D}DMANTMP "B:\" goto overwrite_attempt
  152. setatt 10 1
  153. center "Do you wish to continue? (Y/N)"
  154. setatt 15 1
  155. del {D}DMANTMP*
  156. getsel "YyNn"
  157. clrwin
  158. if select N exit
  159. if select n exit
  160. goto test_environment
  161.  
  162. --------------------------------------
  163.  
  164. :overwrite_attempt
  165. center "WARNING: You are attempting to overwrite your Drafting"
  166. center "Master Diskette.  Your current drive and path are:"
  167. echo
  168. type {D}DMANTMP
  169. echo
  170. center "Please review your Installation Procedure and try again."
  171. echo
  172. del {D}DMANTMP*
  173. goto end
  174.  
  175. :test_environment
  176. :test1
  177. if not exist {D}DRAFT\*.* goto test2
  178. echo      
  179. echo      
  180. center "   WARNING: Directory DRAFT currently exists.  If you continue,     "
  181. center "            you may overwrite existing files, or load Draft into    "
  182. center "            another program's work area.                            "
  183. center "                                                                    "
  184. center "            If you have previously installed this version (2.11) of "
  185. center "            Draft, and you are re-installing it, you can ignore     "
  186. center "            this message.                                           "
  187. echo
  188. setatt 10 1
  189. center "   Do you wish to continue? (Y/N)                                   "
  190. setatt 15 1
  191. del {D}DMANTMP*
  192. getsel "YyNn"
  193. clrwin
  194. if select N exit
  195. if select n exit
  196.  
  197. :test2
  198. if not exist {D}PATOOLS\*.* goto test3
  199. echo      
  200. echo      
  201. center "   WARNING: Directory PATOOLS currently exists.  If you continue,   "
  202. center "            you may overwrite existing files, or load Draft into    "
  203. center "            another program's work area.                            "
  204. center "                                                                    "
  205. center "            If you have previously installed this version (2.11) of "
  206. center "            Draft, and you are re-installing it, or if you have     "
  207. center "            already installed the Personal Architect - Architectural"
  208. center "            Design module, you can ignore this message.             "
  209. echo
  210. setatt 10 1
  211. center "   Do you wish to continue? (Y/N)                                   "
  212. setatt 15 1
  213. del {D}DMANTMP*
  214. getsel "YyNn"
  215. clrwin
  216. if select N exit
  217. if select n exit
  218. :test3
  219. if not exist {D}PADEV\*.* goto begin
  220. echo      
  221. echo      
  222. center "   WARNING: Directory PADEV currently exists.  If you continue,     "
  223. center "            you may overwrite existing files, or load Draft into    "
  224. center "            another program's work area.                            "
  225. center "                                                                    "
  226. center "            If you have previously installed this version (2.11) of "
  227. center "            Draft, and you are re-installing it, or if you have     "
  228. center "            already installed the Personal Architect - Architectural"
  229. center "            Design module, you can ignore this message.             "
  230. echo
  231. setatt 10 1
  232. center "   Do you wish to continue? (Y/N)                                   "
  233. setatt 15 1
  234. del {D}DMANTMP*
  235. getsel "YyNn"
  236. clrwin
  237. if select N exit
  238. if select n exit
  239. -----------------------------------------------------
  240.  
  241. ------- Initial Diskette Copying -------
  242. :begin
  243. md {D}PATOOLS >nul
  244. md {D}PADEV   >nul
  245. md {D}DRAFT   >nul
  246.  
  247. :disk_1
  248. :disk1_copy
  249. echo
  250. echo
  251. echo
  252. echo
  253. center "Copying files from diskette 1"
  254. echo
  255. center "Creating PATOOLS directory..."
  256. copy a:\PATOOLS  {D}PATOOLS      >nul
  257. center "Creating DRAFT directory (Part 1)..."
  258. copy a:\DRAFT    {D}DRAFT        >nul
  259. setatt 12 1
  260. echo
  261. center "Diskette 1 copying complete!"
  262. setatt 15 1
  263.  
  264. :disk_2
  265. echo
  266. center "Please insert Master Drafting Diskette 2 in drive A, and then .."
  267. beep
  268.  
  269. :disk2_chk
  270. pause
  271. if exist a:disk.2 goto disk2_copy
  272. setatt 12 1
  273. center "Incorrect diskette!  Please insert diskette 2 and try again."
  274. beep
  275. beep
  276. goto disk2_chk
  277.  
  278. :disk2_copy
  279. clrwin
  280. setatt 15 1
  281. echo
  282. echo
  283. echo
  284. echo
  285. center "Copying files from diskette 2"
  286. echo
  287. center "Creating DRAFT directory (Part 2)..."
  288. copy a:\DRAFT    {D}DRAFT    >nul
  289. setatt 12 1
  290. echo
  291. center "Diskette 2 copying complete!"
  292. setatt 15 1
  293. echo
  294.  
  295. :disk_3
  296. center "Please insert Master Drafting Diskette 3 in drive A, and then .."
  297. beep
  298.  
  299. :disk3_chk
  300. pause
  301. if exist a:disk.3 goto disk3_copy
  302. setatt 12 1
  303. center "Incorrect diskette!  Please insert diskette 3 and try again."
  304. beep
  305. beep
  306. goto disk3_chk
  307.  
  308. :disk3_copy
  309. clrwin
  310. setatt 15 1
  311. echo
  312. echo
  313. echo
  314. echo
  315. center "Copying files from diskette 3"
  316. echo
  317. center "Creating PADEV directory (Part 1)..."
  318. copy a:\PADEV {D}PADEV >nul
  319. setatt 12 1
  320. echo
  321. center "Diskette 3 copying complete!"
  322. setatt 15 1
  323. goto graphic
  324.  
  325.  
  326. ------ Graphics Drivers and Menus Load and Install ----------
  327. :graphic
  328. beep
  329. clrwin
  330. GRAPH_MENU
  331.  
  332. if select 1 goto disk_4
  333. if select 2 goto disk_4
  334. if select 3 goto disk_4
  335. if select 4 goto disk_5
  336. if select 5 goto disk_5
  337.  
  338. :disk_4
  339. if not "%1" == FROMLOAD goto disk4_old
  340. echo
  341. center "Please insert Master Drafting Diskette 4 in drive A, and then .."
  342. beep
  343. goto disk4_chk
  344.  
  345. :disk4_old
  346. echo
  347. center "Please make sure Drafting Master Diskette 4 is still in drive A,"
  348. center "and then .."
  349. beep
  350.  
  351. :disk4_chk
  352. pause
  353. if exist a:disk.4 goto disk4_copy
  354. setatt 12 1
  355. center "Incorrect diskette!  Please insert diskette 4 and try again."
  356. beep
  357. beep
  358. goto disk4_chk
  359.  
  360. :disk4_copy
  361. clrwin
  362. setatt 15 1
  363. echo
  364. echo
  365. echo
  366. echo
  367. center "Copying On-Screen Menu file from diskette 4"
  368. if select 1 goto inst_ag
  369. if select 2 goto inst_pg
  370. if select 3 goto inst_tm1
  371.  
  372. :inst_ag
  373. copy a:\PADEV\AADMENU.AG {D}DRAFT\AADMENU.MNU >nul
  374. copy a:\PADEV\AADMENU.AG {D}PADEV\AADMENU.AG >nul
  375. goto next_4
  376.  
  377. :inst_pg
  378. copy a:\PADEV\AADMENU.PG {D}DRAFT\AADMENU.MNU >nul
  379. copy a:\PADEV\AADMENU.PG {D}PADEV\AADMENU.PG >nul
  380. goto next_4
  381.  
  382. :inst_tm1
  383. copy a:\PADEV\AADMENU.TM1 {D}DRAFT\AADMENU.MNU >nul
  384. copy a:\PADEV\AADMENU.TM1 {D}PADEV\AADMENU.TM1 >nul
  385. goto next_4
  386.  
  387. :next_4
  388. setatt 12 1
  389. echo
  390. center "Diskette 4 copying complete.   On-screen menus installed!"
  391. goto drivers
  392.  
  393. :disk_5
  394. echo  
  395. center "Please insert Master Drafting Diskette 5 in drive A, and then .."
  396. beep
  397.  
  398. :disk5_chk
  399. pause
  400. if exist a:disk.5 goto disk5_copy
  401. setatt 12 1
  402. center "Incorrect diskette!  Please insert diskette 5 and try again."
  403. beep
  404. beep
  405. goto disk5_chk
  406.  
  407. :disk5_copy
  408. clrwin
  409. setatt 15 1
  410. echo
  411. echo
  412. echo
  413. echo
  414. center "Copying On-Screen Menu file from diskette 5"
  415. if select 4 goto inst_agh
  416. if select 5 goto inst_ega
  417.  
  418. :inst_agh
  419. copy a:\PADEV\AADMENU.AGH {D}DRAFT\AADMENU.MNU >nul
  420. copy a:\PADEV\AADMENU.AGH {D}PADEV\AADMENU.AGH >nul
  421. goto next_5
  422.  
  423. :inst_ega
  424. copy a:\PADEV\AADMENU.EGA {D}DRAFT\AADMENU.MNU >nul
  425. copy a:\PADEV\AADMENU.EGA {D}PADEV\AADMENU.EGA >nul
  426. goto next_5
  427.  
  428. :next_5
  429. setatt 12 1
  430. echo
  431. center "Diskette 5 copying complete.   On-screen menus installed!"
  432. goto drivers
  433.  
  434. :drivers
  435. if select 1 goto exeag
  436. if select 2 goto exepg
  437. if select 3 goto exetm1
  438. if select 4 goto exeagh
  439. if select 5 goto exeega
  440.  
  441. :exeag
  442. center "  Installing VMI 8820/VMI 8821/CV AG Medium Res Device Drivers..."
  443. echo      
  444. copy {D}PADEV\devag.fil {D}DRAFT\device.fil >nul
  445. copy {D}PADEV\devag.fil {D}PADEV\device.fil >nul
  446. goto autoexec
  447.  
  448. :exepg
  449. center "   Installing IBM PG/Matrox Device Drivers...  "
  450. echo      
  451. copy {D}PADEV\devpg.fil {D}DRAFT\device.fil >nul
  452. copy {D}PADEV\devpg.fil {D}PADEV\device.fil >nul
  453. goto autoexec
  454.  
  455. :exetm1
  456. center "   Installing Tecmar Graphics Master Device Drivers... "
  457. echo      
  458. copy {D}PADEV\devtm1.fil {D}DRAFT\device.fil >nul
  459. copy {D}PADEV\devtm1.fil {D}PADEV\device.fil >nul
  460. goto autoexec
  461.  
  462. :exeagh
  463. center "  Installing VMI 8825/CV AG High Res Device Drivers... "
  464. echo      
  465. copy {D}PADEV\devagh.fil {D}DRAFT\device.fil >nul
  466. copy {D}PADEV\devagh.fil {D}PADEV\device.fil >nul
  467. goto autoexec
  468.  
  469. :exeega
  470. center "   Installing IBM EGA Device Drivers...  "
  471. echo      
  472. copy {D}PADEV\devega.fil {D}DRAFT\device.fil >nul
  473. copy {D}PADEV\devega.fil {D}PADEV\device.fil >nul
  474. goto autoexec
  475.  
  476. :autoexec
  477. clrwin
  478. echo 
  479. echo 
  480. echo 
  481. echo 
  482. echo 
  483. center "     Installing AUTOEXEC.BAT... "
  484. if select 1 goto autopg
  485. if select 2 goto autopg
  486. if select 3 goto autotm1
  487. if select 4 goto autopg
  488. if select 5 goto autotm1
  489. :autopg
  490. echo    
  491. copy c:\autoexec.bat c:\autoexec.bak  >nul
  492. copy {D}patools\autoexec.pg c:\autoexec.bat  >nul
  493. goto automsg
  494. :autotm1
  495. echo    
  496. copy c:\autoexec.bat c:\autoexec.bak  >nul
  497. copy {D}patools\autoexec.tm1 c:\autoexec.bat  >nul
  498. :automsg
  499. setatt 15 1
  500. echo    
  501. echo    
  502. echo    
  503. center "WARNING:  Existing AUTOEXEC.BAT file saved as AUTOEXEC.BAK."
  504. echo    
  505. echo
  506. beep
  507. pause
  508. clrwin
  509. if not "%1" == FROMLOAD goto main
  510. ------ End of Graphics Drivers and Menus Load and Install ----------
  511.  
  512. :lib_message
  513. clrwin
  514. echo
  515. setatt 15 1
  516. echo
  517. center "Installing Symbol Libraries"
  518. echo
  519. center "If you wish to install the Computervision supplied Drafting symbol"
  520. center "libraries (diskettes 6, 7, and 8) you can do that on your own at  "
  521. center "any time later.  They will not be installed as part of this       "
  522. center "procedure.                                                        "
  523. echo
  524. center "If you are a new user, or if you have your own set of symbol      "
  525. center "libraries that you use, we recommend that do not install these    "
  526. center "on the hard disk.  They can be accessed from a diskette while     "
  527. center "inside Draft.  Note that if fully installed, these libraries will "
  528. center "occupy an additional 2.5 megabytes of space on your hard disk, so "
  529. center "you may wish to load only selected symbols as required.           "
  530. echo
  531. beep
  532. pause
  533.  
  534. :unit_selection
  535. clrwin
  536. beep
  537. echo
  538. center "Measurement Unit Selection"
  539. echo
  540. center "Select the measurement units that you will be working in.  This will"
  541. center "set the system defaults to be either Metric (Centimeter-based) or   "
  542. center "Imperial (Ft/In-based).                                             "
  543. echo      
  544. center "1 = Imperial (Feet/Inches)"
  545. center "2 = Metric   (Centimeters)"
  546. echo      
  547. getsel "12"
  548. if select 1 goto imperial
  549. :metric
  550. copy {D}padev\cvconfgm.fil {D}draft\cvconfig.fil  >nul
  551. goto config
  552. :imperial
  553. copy {D}padev\cvconfgi.fil {D}draft\cvconfig.fil  >nul
  554.  
  555. :config
  556. clrwin
  557. if not exist c:\config.sys goto copysys
  558. copy c:\config.sys c:\config.bak >nul
  559. echo    
  560. echo    
  561. echo    
  562. :copysys
  563. echo      
  564. echo      
  565. echo      
  566. center "     Installing CONFIG.SYS... "
  567. echo      
  568. copy {D}padev\config.sys c:\ >nul
  569. echo      
  570. center "   WARNING:  Existing CONFIG.SYS file saved as CONFIG.BAK. "
  571. beep
  572. pause
  573.  
  574. ------ Protection device selection -----------
  575. :box
  576. clrwin
  577. beep
  578. BOX_MENU
  579. echo 
  580. center " Protection driver installed. "
  581. echo
  582. center " Note:  At the end of this installation process you must "
  583. center "       REBOOT the system by [Ctrl][Alt][Del] if you have "
  584. center "       installed a new protection device.                "
  585. echo
  586. beep
  587. pause
  588. clrwin
  589. if not "%1" == FROMLOAD goto main
  590.  
  591. ------ End of protection device selection -----------
  592.  
  593. ------ Final screen -----------
  594. :finish_new
  595. DISPLAY_TITLE
  596. center "Installation Complete !!!!!"
  597. echo
  598. center "You must now reboot your system by typing [Ctrl][Alt][Del] to   "
  599. center "complete the installation of the Advanced Architectural Drafting"
  600. center "drivers and operating environment.  Then type:                  "
  601. echo
  602. center "      SECURE [Enter]                                            "
  603. echo
  604. center "to begin the process of inserting the software security         "
  605. center "codes for your protection device.  Once you have added          "
  606. center "the security codes you can start using Drafting.                " 
  607. echo
  608. center "If at any time in the future you wish to revise the             "
  609. center "installation of your graphics or protection devices             "
  610. center "you should change to the PATOOLS directory and type:            "
  611. echo
  612. center "      INSTALL [Enter]                                           "
  613. echo
  614. center "For more information on these procedures refer to your          "
  615. center "Release Notes document.                                         "
  616.  
  617. :end
  618.  
  619.