home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 13 / 13.iso / p / p115 / 1.ddi / GCD4 / INSTALL / INSTALL.DAT < prev    next >
Encoding:
Text File  |  1989-11-16  |  20.8 KB  |  795 lines
  1. echo off
  2. clrwin 
  3. -- 11/14/89 SJO GCD 4.00 Release
  4. -- 01/30/89 SJO GCD 3.20 Release
  5. -- 06/16/87 SJO GCD 3.10 Release
  6.  
  7. -- Rev 4.00 GCD load and installation process data file
  8.  
  9. -------- Begin macro definitions -------------------------------------------
  10. macro DISPLAY_TITLE
  11.    setwin
  12.    setatt 15 1
  13.    clrwin
  14.    title  "╗ microCADDS Geometric Construction and Detailing ╔"
  15.    center "╚      Revision 4.00 Installation Procedure       ╝"
  16. endmac
  17. ----------------------------------------
  18. macro TOP_WINDOW
  19.   setwin 3 5 78 12  
  20.   setatt 0 0
  21.   clrwin
  22.   setwin 2 4 77 11
  23.   setatt 15 2
  24.   clrwin
  25.   setatt  1 2
  26. endmac
  27. ----------------------------------------
  28. macro BOTTOM_WINDOW
  29.   setwin 3 14 78 21
  30.   setatt 0 0
  31.   clrwin
  32.   setwin 2 13 77 20
  33.   setatt 15 2
  34.   clrwin
  35.   setatt  1 2
  36. endmac
  37. ----------------------------------------
  38. macro ERROR_WINDOW
  39.   setwin 3 3 75 19
  40.   setatt 0 0
  41.   clrwin
  42.   setwin 2 2 74 18  
  43.   setatt 1 7
  44.   clrwin
  45.   setatt 7 0
  46. endmac
  47. -------- End macro definitions -------------------------------------------
  48. SET BOOT={COMSPEC: 1,1}
  49. -------- Begin execution -------------------------------------------------
  50. DISPLAY_TITLE
  51.  
  52. -- Part 1 - New Installation --
  53. :new
  54. setatt 15 1
  55. echo
  56. echo                                                                         
  57. center "Welcome to  Personal Designer  - microCADDS Geometric Construction and"
  58. center "Detailing DOS-Extended  Edition Version  4.00.  This program will walk"
  59. center "you through  the installation  of GCD on your hard disk, and will help"
  60. center "you configure the software for your specific hardware.  To install GCD"
  61. center "you will  need a  minimum of  7 megabytes  of space on your hard disk,"
  62. center "plus an additional megabyte if you have purchased the Surfaces option."
  63. center "Two new  directories will  be created  on your  hard disk,  \GCD4  and"
  64. center "\GCD4\INSTALL.     \GCD4\INSTALL   contains   the   installation   and"
  65. center "configuration utility   programs,  and \GCD4 contains the main program"
  66. center "and all  of its support files, including the device drivers.  If there"
  67. center "is a conflict with an existing directory name, you will need to rename"
  68. center "the old directory.  As you begin this process, be sure that you are in"
  69. center "the root directory of the drive on which you wish to load GCD.        "
  70. setatt 12 1
  71. center "Note: to  properly install  GCD, you must turn off all memory resident"
  72. center "programs such as networks, memory managers and disk cache programs.   "
  73. echo 
  74.  
  75. if infile \DMANTMP "A:\" goto overwrite_attempt
  76. if infile \DMANTMP "B:\" goto overwrite_attempt
  77.  
  78. setatt 10 1
  79. center " Do you wish to continue [Y/N]? "
  80. setatt 15 1
  81. getsel "YyNn"
  82. clrwin
  83. if select N goto cleanup
  84. if select n goto cleanup
  85. goto test_environment
  86.  
  87. --------------------------------------
  88. :overwrite_attempt
  89. ERROR_WINDOW
  90. echo
  91. echo
  92. echo 
  93. center "  WARNING: You are attempting to overwrite your GCD   "
  94. center "  Master Diskette.  Your current drive and path are:  "
  95. echo
  96. type DMANTMP
  97. echo
  98. center " Please review your Installation Procedure and try again. "
  99. echo
  100. goto cleanup
  101. --------------------------------------
  102. :test_environment
  103.  
  104. if infile {BOOT}:\config.sys "vmem.sys" goto vmem
  105. if infile {BOOT}:\config.sys "VMEM.SYS" goto vmem
  106.  
  107. :test1
  108. if not exist \GCD4\*.* goto test2
  109. ERROR_WINDOW
  110. echo
  111. echo
  112. echo 
  113. center "WARNING: Directory \GCD4 currently exists.  If you continue, "
  114. center "         you may overwrite existing files, or load GCD into  "
  115. center "         another program's work area.                        "
  116. center "                                                             "
  117. center "         If you have previously installed this version (4.00)"
  118. center "         of GCD, and you are re-installing it, you can ignore"
  119. center "         this message.                                       "
  120. echo
  121. center " Do you wish to continue [Y/N]? "
  122. getsel "YyNn"
  123. DISPLAY_TITLE
  124. if select N goto cleanup
  125. if select n goto cleanup
  126.  
  127. --Delete all device drivers to avoid incompatability problems.
  128. del >nul \GCD4\*.DEV
  129. del >nul \GCD4\*.DIF
  130. del >nul \GCD4\*.PEN
  131.  
  132. --------------------------------------
  133. :test2
  134. if not exist \GCD4\INSTALL\*.* goto test3
  135. ERROR_WINDOW
  136. echo      
  137. echo      
  138. echo 
  139. center "WARNING: Directory \GCD4\INSTALL currently exists.  If you continue,"
  140. center "         you may overwrite existing files, or load GCD into         "
  141. center "         another program's work area.                               "
  142. center "                                                                    "
  143. center "         If you have previously installed this version (4.00) of    "
  144. center "         GCD, and you are re-installing it, you can ignore this     "
  145. center "         message.                                                   "
  146. echo
  147. center " Do you wish to continue [Y/N]? "
  148. getsel "YyNn"
  149.  
  150. if select N goto cleanup
  151. if select n goto cleanup
  152.  
  153. :test3
  154. if not exist \GCD3\*.* goto begin
  155. ERROR_WINDOW
  156. echo      
  157. echo      
  158. echo 
  159. center "WARNING: Directory \GCD3 currently exists.  Please make sure  "
  160. center "         that GCD3 is not in your path (autoexec.bat) or there"
  161. center "         may be unpredictable results.                        "
  162. center "         See GCD3.BAT and GCD4.BAT for examples on how to use "
  163. center "         both revisions concurrently.                         "
  164. echo
  165. pause
  166.  
  167. ------- Build Directory Structure ----------------------------------------
  168. :begin
  169.  
  170. DISPLAY_TITLE
  171.  
  172. cd \
  173. md \GCD4
  174. md \GCD4\INSTALL
  175.  
  176. ------- Copy Diskette 1 --------------------------------------------------
  177. :disk_1
  178. :disk1_copy
  179. echo
  180. echo
  181. echo
  182. echo
  183. echo
  184. center "Copying files from diskette 1"
  185. echo
  186. center "Creating \GCD4\INSTALL directory..."
  187. copy {LOAD}:\GCD4\INSTALL  \GCD4\INSTALL     >\error.fil
  188. if infile \error.fil "Insufficient disk space" goto disk_full
  189.  
  190. --configb references drive B for device drivers.
  191. copy \gcd4\install\config{LOAD}.ssr \gcd4\install\config.ssr >nul
  192.  
  193. center "Creating \GCD4 directory (Part 1)..."
  194.  
  195. -- Copy last minute info file to hard drive.  Type at end of installation.
  196. if exist {LOAD}:\GCDINFO.TXT copy {LOAD}:\GCDINFO.TXT \ >\error.fil
  197. if infile \error.fil "Insufficient disk space" goto disk_full
  198.  
  199. copy {LOAD}:\GCD4 \GCD4 >\error.fil
  200. if infile \error.fil "Insufficient disk space" goto disk_full
  201.  
  202. clrwin
  203. setatt 12 1
  204. echo
  205. echo
  206. echo
  207. echo
  208. echo
  209. center "Diskette 1 copying complete!"
  210. setatt 15 1
  211.  
  212. ------- Copy Diskette 2 --------------------------------------------------
  213. :disk_2
  214. echo
  215. echo
  216. center "Please insert GCD Rev 4.00 Master Diskette 2 in drive {LOAD}, and then .."
  217. ECHO 
  218. --------------------------------------
  219. :disk2_chk
  220. pause
  221. if exist {LOAD}:disk400.2 goto disk2_copy
  222. setatt 12 1
  223. center "Incorrect diskette!  Please insert diskette 2 and try again."
  224. echo 
  225. goto disk2_chk
  226. --------------------------------------
  227. :disk2_copy
  228. clrwin
  229. setatt 15 1
  230. echo
  231. echo
  232. echo
  233. echo
  234. echo
  235. center "Copying files from diskette 2"
  236. echo
  237. center "Creating \GCD4 directory (Part 2)..."
  238.  
  239. copy {LOAD}:\GCD4 \GCD4 >\error.fil
  240. if infile \error.fil "Insufficient disk space" goto disk_full
  241.  
  242. clrwin
  243. setatt 12 1
  244. echo
  245. echo
  246. echo
  247. echo
  248. center "Diskette 2 copying complete!"
  249. setatt 15 1
  250.  
  251. ------- Copy Diskette 3 --------------------------------------------------
  252. :disk_3
  253. echo
  254. echo
  255. center "Please insert GCD Rev 4.00 Master Diskette 3 in drive {LOAD}, and then .."
  256. echo 
  257. --------------------------------------
  258. :disk3_chk
  259. pause
  260. if exist {LOAD}:disk400.3 goto disk3_copy
  261. setatt 12 1
  262. center "Incorrect diskette!  Please insert diskette 3 and try again."
  263. echo 
  264. goto disk3_chk
  265. --------------------------------------
  266. :disk3_copy
  267.  
  268. clrwin
  269. setatt 15 1
  270. echo
  271. echo
  272. echo
  273. echo
  274. echo
  275. center "Copying files from diskette 3"
  276. echo
  277. center "Creating \GCD4 directory (Part 3)..."
  278.  
  279. copy {LOAD}:\GCD4 \GCD4 >\error.fil
  280. if infile \error.fil "Insufficient disk space" goto disk_full
  281.  
  282. clrwin
  283. setatt 12 1
  284. echo
  285. echo
  286. echo
  287. echo 
  288. center "Diskette 3 copying complete!"
  289. setatt 15 1
  290.  
  291. ------- Copy Diskette 4 --------------------------------------------------
  292. :disk_4
  293. echo
  294. echo
  295. center "Please insert GCD Rev 4.00 Master Diskette 4 in drive {LOAD}, and then .."
  296. echo 
  297. --------------------------------------
  298. :disk4_chk
  299. pause
  300. if exist {LOAD}:disk400.4 goto disk4_copy
  301. setatt 12 1
  302. center "Incorrect diskette!  Please insert diskette 4 and try again."
  303. echo 
  304. goto disk4_chk
  305. --------------------------------------
  306. :disk4_copy
  307.  
  308. clrwin
  309. setatt 15 1
  310. echo
  311. echo
  312. echo
  313. echo
  314. echo
  315. center "Copying files from diskette 4"
  316. echo
  317. center "Creating \GCD4 directory (Part 4)..."
  318.  
  319. copy {LOAD}:\GCD4 \GCD4 >\error.fil
  320. if infile \error.fil "Insufficient disk space" goto disk_full
  321.  
  322. ------- Copy Tutor ------------------------------------------
  323. clrwin
  324. echo
  325. echo
  326. echo
  327. echo
  328. echo
  329. center " GCD Tutorial Diskette "
  330. echo
  331. center "Diskette 4 contains the GCD Tutor.  The GCD Tutor is a series of files"
  332. center "which are  intended to  walk a  new  user through the basic functions,"
  333. center "commands, and  capabilities of GCD.  If you are an experienced user of"
  334. center "the microCADDS GCD software, you may not want to load these files.    "
  335. echo 
  336. setatt 10 1
  337. center " Do you wish to install the Tutor [Y/N]? "
  338. setatt 15 1
  339. getsel "YyNn"
  340. clrwin
  341. if select N goto disk_5
  342. if select n goto disk_5
  343.  
  344. ------------------------------------------------------------------------------
  345. clrwin
  346. setatt 15 1
  347. echo
  348. echo
  349. echo
  350. echo
  351. echo
  352. center " Copying GCD Tutor files... "
  353. echo
  354. center " Creating \GCD4\TUTOR directory... "
  355. md \GCD4\tutor
  356. copy {LOAD}:\GCD4\TUTOR \GCD4\TUTOR >\error.fil
  357. if infile \error.fil "Insufficient disk space" goto disk_full
  358.  
  359. clrwin
  360. echo
  361. echo
  362. echo
  363. echo
  364. setatt 12 1
  365. center "Tutor copying complete!"
  366. setatt 15 1
  367.  
  368. ------- Copy Diskette 5 --------------------------------------------------
  369. :disk_5
  370. echo
  371. echo
  372. center "Please insert GCD Rev 4.00 Master Diskette 5 in drive {LOAD}, and then .."
  373. echo 
  374. --------------------------------------
  375. :disk5_chk
  376. pause
  377. if exist {LOAD}:disk400.5 goto disk5_copy
  378. setatt 12 1
  379. center "Incorrect diskette!  Please insert diskette 5 and try again."
  380. echo 
  381. goto disk5_chk
  382. --------------------------------------
  383. :disk5_copy
  384.  
  385. clrwin
  386. setatt 15 1
  387. echo
  388. echo
  389. echo
  390. echo
  391. echo
  392. center "Copying files from diskette 5"
  393. echo
  394. center "Creating \GCD4 directory (Part 5)..."
  395.  
  396. copy {LOAD}:\GCD4 \GCD4 >\error.fil
  397. if infile \error.fil "Insufficient disk space" goto disk_full
  398.  
  399. --------------------------------------
  400. :copy_menus
  401. clrwin
  402. setatt 15 1
  403. echo
  404. echo
  405. echo
  406. center " Copying GCD On-Screen Menu Creation Files... "
  407. echo
  408. center "This version of GCD does not include pre-created on-screen menu files."
  409. center "What it  does include  are a  series of  files which will allow you to"
  410. center "build your  own customized version of the on-screen icons. These files"
  411. center "are copied  automatically into  the \GCD4  directory. Please  refer to"
  412. center "your GCD Release Notes document for the specific information on how to"
  413. center "build an on-screen menu that is customized to your individual graphics"
  414. center "display board.   This  process is  initiated by  a simple command, and"
  415. center "takes approximately  1 to 1 1/2 hours to generate a menu file, depend-"
  416. center "ing on the type and speed of your hardware.                           "
  417. echo
  418. echo 
  419.  
  420. copy {LOAD}:\GCDMENU \GCD4 >\error.fil
  421. if infile \error.fil "Insufficient disk space" goto disk_full
  422.  
  423. clrwin
  424. setatt 12 1
  425. echo
  426. echo
  427. echo
  428. echo
  429. center "Diskette 5 copying complete!"
  430. setatt 15 1
  431.  
  432. ------- Copy Diskette d --------------------------------------------------
  433. :disk_d
  434.  
  435. clrwin
  436. echo 
  437. echo
  438. echo
  439. center "The next step of this installation involves gluing the three"
  440. center "pieces of GCD.EXE back together from it's diskette format.  "
  441.  
  442. cd \gcd4
  443. if exist gcd.exe del >nul gcd.exe
  444.  
  445. copy /b gcdsplit.1 + gcdsplit.2 + gcdsplit.3 gcd.exe >\error.fil
  446. if infile \error.fil "Insufficient disk space" goto disk_full
  447.  
  448. del >nul gcdsplit.*
  449. cd \
  450.  
  451. clrwin
  452. echo
  453. echo
  454. echo
  455. center "Please insert GCD Rev 4.00 Device Drivers Diskette in drive {LOAD}, and then .."
  456. echo 
  457.  
  458. --------------------------------------
  459. :diskd_chk
  460. pause
  461. if exist {LOAD}:disk400.d goto diskd_copy
  462. setatt 12 1
  463. center "Incorrect diskette!  Please insert Device Drivers diskette and try again."
  464. echo 
  465. goto diskd_chk
  466.  
  467. --------------------------------------
  468. :diskd_copy
  469. clrwin
  470. echo
  471. echo
  472. echo
  473. setatt 15 1
  474. center " Installing GCD Device Drivers "
  475. echo
  476. center "This diskette  contains all  the hardware  device drivers necessary to"
  477. center "make GCD  work with  your particular  combination of  graphics  board,"
  478. center "digitizing tablet,  mouse, and  plotter.    The  System  Configuration"
  479. center "Manager is a separate program (called CONFIG.EXE) which will automati-"
  480. center "cally execute now if you wish to continue, but can also be used at any"
  481. center "other time without having to repeat this installation process.        "
  482. echo
  483. center "Note: you cannot use GCD for the first time without using the"
  484. center "Configuration Manager to install your initial device drivers."
  485. setatt 10 1
  486. echo 
  487. center " Do you wish to continue with the installation [Y/N]? "
  488. setatt 15 1
  489. getsel "YyNn"
  490. clrwin
  491. if select N goto chk_autoex
  492. if select n goto chk_autoex
  493. --------------------------------------
  494. :run_config
  495. cd \GCD4\install
  496.  
  497. CONFIG /install
  498.  
  499. --------------------------------------
  500. DISPLAY_TITLE
  501. cd \
  502. echo
  503. echo
  504. echo
  505. echo
  506. center " Device Drivers diskette copying complete! "
  507. echo
  508. center " Please remove diskette and store in a safe place. "
  509. center " To proceed with installation...                   "
  510. echo 
  511. pause
  512. ------- Driver Installation complete -------------------------------------
  513.  
  514. ------- Edit AUTOEXEC.BAT ------------------------------------------------
  515. :chk_autoex
  516. clrwin
  517.  
  518. :Check if COMSPEC invalid
  519. if {bootltr} == bad goto skip_edauto
  520. if {BOOT} == A goto skip_edauto
  521. if {BOOT} == a goto skip_edauto
  522.  
  523. echo  
  524. center "Editing AUTOEXEC.BAT..."
  525. subr EDAUTOEX path 1 ev 1
  526. gcd4
  527. cvpath
  528. if not exist {BOOT}:\AUTOEXEC.OLD goto no_old_autoex
  529. center "Finished editing!  Please make note of the following changes"
  530. TOP_WINDOW
  531. title " Old AUTOEXEC.BAT "
  532. setatt 15 2
  533. type {BOOT}:\AUTOEXEC.OLD
  534. BOTTOM_WINDOW
  535. title " New AUTOEXEC.BAT "
  536. setatt 15 2
  537. type {BOOT}:\AUTOEXEC.BAT
  538. setatt 15 1
  539. pause
  540. goto finish
  541.  
  542. :no_old_autoex
  543. center "No old AUTOEXEC.BAT found, new one created!"
  544. TOP_WINDOW
  545. title " New AUTOEXEC.BAT "
  546. setatt 15 2
  547. type {BOOT}:\AUTOEXEC.BAT
  548. pause
  549. goto finish
  550.  
  551. :skip_edauto
  552. setatt 12 1
  553. echo 
  554. echo 
  555. echo  
  556. center " Unable to edit your AUTOEXEC.BAT file."
  557. setatt 15 1
  558. center "Please include the following in your AUTOEXEC.BAT file:        "
  559. center "PATH C:\GCD4;C:\DOS;C:\;"
  560. center "SET CVPATH=C:\GCD4      "
  561. center "Sustitute your boot drive letter for the C: in the above lines."
  562. pause
  563.  
  564. :finish
  565. setatt 15 1
  566. ------- Completion Message ------------------------------------------------
  567.  
  568. :options
  569. DISPLAY_TITLE
  570. echo
  571. echo
  572. center "If you  have purchased  other GCD  options, such as Surfaces, the User"
  573. center "Programming Language or the Architectural Module, you can install them"
  574. center "at this  time by continuing with this program, or you can install them"
  575. center "at a later date by inserting the appropriate diskette into your floppy"
  576. center "drive and type"
  577. center "'A:\INSTALL' to install from your A: drive or"
  578. center "'B:\INSTALL' to install from your B: drive.  "
  579. echo 
  580. setatt 10 1
  581. center " Do you wish to install other products [Y/N]? "
  582. setatt 15 1
  583. getsel "YyNn"
  584. if select N goto done
  585. if select n goto done
  586. clrwin
  587. echo
  588. echo
  589. center " Please insert option diskette and ..."
  590.  
  591. pause
  592. --Surfaces 4.00
  593. if exist {LOAD}:disk400.s goto option_copy
  594. --UPL 4.00
  595. if exist {LOAD}:disk400.u goto option_copy
  596. --all others
  597. if exist {LOAD}:disk400.a goto option_copy
  598.  
  599. setatt 12 1
  600. center "Incorrect diskette!  Please insert proper diskette and try again."
  601. setatt 15 1
  602. echo 
  603. goto options
  604.  
  605. :option_copy
  606. copy {LOAD}:\GCD4\install\install.dat \install2.dat >\error.fil
  607. if infile \error.fil "Insufficient disk space" goto disk_full
  608. -- use FL switch to allow proper cleanup
  609. cd \
  610. \GCD4\install\diskman \install2.dat FL
  611. goto options
  612.  
  613. --------------------------------------------------------------------------
  614. :done
  615.  
  616. :codes
  617. -- see if internal or dealer box, add codes to \CVOPTION.FIl
  618.  
  619. ------------------------------------------------------------------------
  620. :internal
  621. -- Prime internal, Option number is: 5210 - GCD 4.0 Release
  622. echo "989898 33172 34202 36998 37764 37253 189" >&TMP1
  623. SUBR ADOPTION &TMP1 &TMP2
  624. if not infile &TMP2 Error goto success
  625. goto dealer
  626.  
  627. ------------------------------------------------------------------------
  628. :dealer
  629. -- Dealer, Option number is: 5210 - GCD 4.0 Release
  630. echo "999999 37268 38298 39573 40336 39063 234" >&TMP1
  631. SUBR ADOPTION &TMP1 &TMP2
  632. if not infile &TMP2 Error goto success
  633. goto no_can_do
  634.  
  635. ------------------------------------------------------------------------
  636. :no_can_do
  637. -- For Customers only.
  638. --echo
  639. --echo
  640. --center "Codes not added (Not supposed to!)"
  641. --echo 
  642. --pause
  643. goto complete
  644.  
  645. :success
  646. -- For Dealers and Prime Internal only.
  647. echo
  648. echo
  649. center "Codes added!"
  650. echo 
  651. pause
  652. goto re_config
  653.  
  654. :complete
  655. --------------------------------------
  656.  
  657. DISPLAY_TITLE
  658. echo
  659. echo
  660. echo
  661. echo
  662. center "When this  program terminates you must change to the \GCD4\INSTALL di-"
  663. center "rectory and  type SECURE  to install the security codes for this prod-"
  664. center "uct.   Please refer to your security device documentation for security"
  665. center "code information  and procedures.                                     "
  666. setatt 12 1
  667. center "You must then reboot your system by typing [Ctrl][Alt][Del].          " 
  668. setatt 15 1
  669. center "This  will complete the installation of the GCD Version 4.00 operating"
  670. center "environment.                                                          "
  671. echo 
  672. pause
  673.  
  674. :re_config
  675. clrwin
  676. echo
  677. echo
  678. echo
  679. center " If in the future you wish to re-install any of your hardware     "
  680. center " devices, or change the default program parameters, from  any     "
  681. center " directory type:                                                  "
  682. echo
  683. center "      CONFIG [Enter]                                              " 
  684. echo
  685. center " This will take you into the GCD System Configuration Manager,    "
  686. center " which is described in detail in your Release Notes document.     "
  687. echo 
  688. pause
  689.  
  690. center "Installation Complete !!!!!"
  691.  
  692. if infile {BOOT}:\config.sys "vdisk" goto vdisk
  693. if infile {BOOT}:\config.sys "VDISK" goto vdisk
  694. if infile {BOOT}:\config.sys "ramdriv" goto vdisk
  695. if infile {BOOT}:\config.sys "RAMDRIV" goto vdisk
  696. goto cvbox
  697.  
  698. :vdisk
  699. ERROR_WINDOW
  700. center "Warning, not all VDISKs or RAMDRIVEs are compatible with the  "
  701. center "GCD DOS-Extended Edition.  They must conform to the Virtual   "
  702. center "Control Program Interface (VCPI) standard to properly coexist "
  703. center "in extended memory.  Please see the GCD Rev 4.00 release notes"
  704. center "for more information.                                         "
  705. echo 
  706. pause
  707. DISPLAY_TITLE
  708.  
  709. :cvbox
  710. if not exist {BOOT}:\CVBOX.SYS goto box
  711. if not infile {BOOT}:\config.sys "{BOOT}:\CVBOX.SYS" goto config
  712. if not exist \CVOPTION.FIL goto cvopt
  713. goto info
  714.  
  715. :box
  716. echo 
  717. echo
  718. echo
  719. echo
  720. setatt 12 1
  721. center "The file CVBOX.SYS was not found in the root directory of drive {BOOT}: "
  722. goto secure
  723.  
  724. :cvopt
  725. echo 
  726. echo
  727. echo
  728. echo
  729. setatt 12 1
  730. center "The file CVOPTION.FIL was not found in the root directory of this drive."
  731. goto secure
  732.  
  733. :config
  734. if infile {BOOT}:\config.sys "{BOOT}:\cvbox.sys" goto info
  735. echo 
  736. echo
  737. echo
  738. echo
  739. setatt 12 1
  740. center "The line DEVICE={BOOT}:\CVBOX.SYS was not found in the {BOOT}:\CONFIG.SYS file."
  741.  
  742. :secure
  743. setatt 15 1
  744. echo
  745. center " Protection installation not complete.  Please refer to security   "
  746. center " device documentation for security code information and procedures."
  747. echo 
  748. pause
  749. clrwin
  750.  
  751. :info
  752. if not exist \GCDINFO.TXT goto cleanup
  753. type \GCDINFO.TXT 
  754. goto cleanup
  755.  
  756. :disk_full
  757. ERROR_WINDOW
  758. echo
  759. echo
  760. echo 
  761. center "*** FATAL ERROR ***"
  762. echo 
  763. center "*** HARD DISK FULL ***"
  764. echo 
  765. center "Please backup and delete all unneccesary files from hard disk  "
  766. center "and try again.  GCD requires at least 7 Megabytes of disk space"
  767. center "and 1 Megabyte for Surfaces.                                   "
  768. echo 
  769. pause
  770. goto cleanup
  771.  
  772. :vmem
  773. ERROR_WINDOW
  774. center "Warning, VMEM is not compatible with the GCD DOS-Extended Edition."
  775. center "VMEM does not follow the Virtual Control Program Interface (VCPI) "
  776. center "standard.  Please remove this line from your {BOOT}:\CONFIG.SYS line   "
  777. center "and reboot.                                                       "
  778. echo 
  779. pause
  780. goto cleanup
  781.  
  782. :cleanup
  783. del >nul \diskman.exe
  784. del >nul \install.dat
  785. del >nul \install2.dat
  786. del >nul \error.fil
  787. del >nul \cvoption.new
  788. del >nul \&tmp1
  789. del >nul \&tmp2
  790. del DMANTMP >nul
  791. set BOOT=
  792.  
  793. :end
  794. exit
  795.