home *** CD-ROM | disk | FTP | other *** search
- echo off
- clrwin
- -- 04/08/91 SJO PD 5.00 Release
-
- -- Rev 5.00 PD load and installation process data file
-
- -------- Begin macro definitions -------------------------------------------
- macro DISPLAY_TITLE
- setwin
- setatt 15 1
- clrwin
- title " Personal Designer Revision 5.00 Installation Procedure "
- endmac
- ----------------------------------------
- macro TOP_WINDOW
- setwin 3 5 78 12
- setatt 0 0
- clrwin
- setwin 2 4 77 11
- setatt 15 2
- clrwin
- setatt 1 2
- endmac
- ----------------------------------------
- macro BOTTOM_WINDOW
- setwin 3 14 78 21
- setatt 0 0
- clrwin
- setwin 2 13 77 20
- setatt 15 2
- clrwin
- setatt 1 2
- endmac
- ----------------------------------------
- macro ERROR_WINDOW
- setwin 3 3 75 19
- setatt 0 0
- clrwin
- setwin 2 2 74 18
- setatt 1 7
- clrwin
- setatt 7 0
- endmac
- -------- End macro definitions -------------------------------------------
- SET BOOT={COMSPEC: 1,1}
- -------- Begin execution -------------------------------------------------
- DISPLAY_TITLE
-
- -- Part 1 - New Installation --
- :new
- setatt 15 1
- echo
- echo
-
- center "Welcome to Personal Designer DOS-Extended Edition Revision 5.00. These "
- center "screens will walk you through the installation of Personal Designer on "
- center "your hard disk, and will help you configure the software for your "
- center "specific hardware. To install Personal Designer you need a minimum "
- center "of 7 megabyte of space on your hard disk. Three new directories will be "
- center "created on your hard disk, \PD5, \PD5\SHADE and \PD5\INSTALL. \PD5\INSTALL"
- center "contains the configuration utility programs, and \PD5 contains the main "
- center "program and all of its support files, including the device drivers. If "
- center "ther is a conflict with an existing directory name, you have to rename the"
- center "old directory. As you begin this installation, be sure that you are in "
- center "the root directory of the hard disk on which you wish to load Personal "
- center "Designer. The \PD5\SHADE directory contains the shade utility programs. "
-
- setatt 12 1
- center "Note: to properly install Personal Designer, you must turn off all "
- center "memory resident programs such as networks, memory managers and disk "
- center "cache programs. "
- echo
-
- if infile \DMANTMP "A:\" goto overwrite_attempt
- if infile \DMANTMP "B:\" goto overwrite_attempt
-
- setatt 10 1
- center " Do you wish to continue [Y/N]? "
- setatt 15 1
- getsel "YyNn"
- clrwin
- if select N goto cleanup
- if select n goto cleanup
- goto test_environment
-
- --------------------------------------
- :overwrite_attempt
- ERROR_WINDOW
- echo
- echo
- echo
- center " WARNING: You are attempting to overwrite your Personal Designer"
- center " Master Diskette. Your current drive and path are: "
- echo
- type DMANTMP
- echo
- center " Please review your Installation Procedure and try again. "
- echo
- goto cleanup
- --------------------------------------
- :test_environment
-
- if infile {BOOT}:\config.sys "vmem.sys" goto vmem
- if infile {BOOT}:\config.sys "VMEM.SYS" goto vmem
-
- :test1
- if not exist \PD5\*.* goto begin
- ERROR_WINDOW
- echo
- echo
- echo
-
- center "WARNING: Directory \PD5 currently exists. If you continue, you may "
- center "overwrite existing files, or load Personal Designer into another "
- center "program's work area. If you have previously installed this version "
- center "(5.00) of Personal Designer, and you are re-installing it, you can "
- center "ignore this message. "
-
- echo
- center " Do you wish to continue [Y/N]? "
- getsel "YyNn"
- DISPLAY_TITLE
- if select N goto cleanup
- if select n goto cleanup
-
- ------- Build Directory Structure ----------------------------------------
- :begin
-
- DISPLAY_TITLE
-
- cd \
- md \PD5
- md \PD5\INSTALL
- md \PD5\SHADE
-
- ------- Copy Diskette 1 --------------------------------------------------
- :disk_1
- :disk1_copy
- echo
- echo
- echo
- center "Copying files from diskette 1"
- echo
- center "Creating \PD5\INSTALL directory..."
- copy {LOAD}:\PD5\INSTALL\PD5I.EXE \PD5\INSTALL >\error.fil
- if infile \error.fil "Insufficient disk space" goto disk_full
-
- cd \pd5\install
- pd5i -n >>\error.fil
- if infile \error.fil "Disk Full" goto disk_full
-
- del >nul pd5i.exe
-
- --configb references drive B for device drivers.
- copy config{LOAD}.ssr config.ssr >nul
- cd \pd5
-
- center "Creating \PD5 directory (Part 1)..."
-
- -- Copy last minute info file to hard drive. Type at end of installation.
- if exist {LOAD}:\PD5INFO.TXT copy {LOAD}:\PD5INFO.TXT \ >>\error.fil
- if infile \error.fil "Insufficient disk space" goto disk_full
-
- copy {LOAD}:\PD5\PD5E.EXE \PD5 >>\error.fil
- if infile \error.fil "Insufficient disk space" goto disk_full
-
- pd5e -n >>\error.fil
- if infile \error.fil "Disk Full" goto disk_full
-
- del >nul pd5e.exe
-
- clrwin
- setatt 12 1
- echo
- echo
- echo
- echo
- echo
- center "Diskette 1 copying complete!"
- setatt 15 1
-
- ------- Copy Diskette 2 --------------------------------------------------
- :disk_2
- echo
- echo
- center "Please insert Personal Designer Rev 5.00 Master Diskette 2,"
- center " and then .."
- ECHO
- --------------------------------------
- :disk2_chk
- pause
- if exist {LOAD}:disk500.2 goto disk2_copy
- setatt 12 1
- center "Incorrect diskette! Please insert diskette 2 and try again."
- echo
- goto disk2_chk
- --------------------------------------
- :disk2_copy
- clrwin
- setatt 15 1
- echo
- echo
- echo
- center "Copying files from diskette 2"
- echo
- center "Creating \PD5 directory (Part 2)..."
- echo
- echo
- echo
- echo
-
- copy {LOAD}:\PD5\PD5S.EXE \PD5 >>\error.fil
- if infile \error.fil "Insufficient disk space" goto disk_full
-
- pd5s -n >>\error.fil
- if infile \error.fil "Disk Full" goto disk_full
-
- del >nul pd5s.exe
-
- center "Creating \PD5\SHADE directory..."
-
- copy {LOAD}:\PD5\SHADE\SHAD5.EXE \PD5\SHADE >>\error.fil
- if infile \error.fil "Insufficient disk space" goto disk_full
-
- cd \pd5\shade
- shad5 -n >>\error.fil
- if infile \error.fil "Disk Full" goto disk_full
-
- del >nul shad5.exe
- cd \pd5
-
- :disk_2_done
-
- clrwin
- setatt 12 1
- echo
- echo
- echo
- echo
- center "Diskette 2 copying complete!"
- setatt 15 1
-
- ------- Copy Diskette d --------------------------------------------------
- :disk_d
-
- echo
- echo
- echo
- center "Please insert Personal Designer Rev 5.00 Device Drivers Diskette "
- center "in drive {LOAD}, and then .. "
- echo
-
- --------------------------------------
- :diskd_chk
- pause
- if exist {LOAD}:disk500.d goto diskd_copy
- setatt 12 1
- center "Incorrect diskette! Please insert Device Drivers diskette and try again."
- echo
- goto diskd_chk
-
- --------------------------------------
- :diskd_copy
- clrwin
- DISPLAY_TITLE
- echo
- echo
- echo
- center "This diskette contains optional support files you may use for customizing"
- center "the software. These files require approximately 1 MB of disk space. You "
- center "may install them now or at a later time. See your documentation for more "
- center "information. "
- echo
- setatt 10 1
- center " Do you wish to install the optional support files [Y/N]? "
- setatt 15 1
- getsel "YyNn"
- clrwin
- if select N goto misc_done
- if select n goto misc_done
-
- center "Creating \PD5 directory (Part 3)..."
-
- copy {LOAD}:\PD5\PD5M.EXE \PD5 >>\error.fil
- if infile \error.fil "Insufficient disk space" goto disk_full
-
- cd \pd5
-
- pd5m -n >>\error.fil
- if infile \error.fil "Disk Full" goto disk_full
-
- del >nul pd5m.exe
-
- cd \
-
- :misc_done
- clrwin
- echo
- echo
- echo
- setatt 15 1
- center " Installing Personal Designer Device Drivers "
- echo
- center "This diskette contains all the hardware device drivers necessary to make "
- center "Personal Designer work with your particular combination of graphics board,"
- center "digitizing tablet, mouse, and plotter. You can install the device drivers "
- center "you need now or at a later time using the System Configuration Manager. "
- center "The System Configuration manager (also called the configurator) is a "
- center "separate program (called CONFIG.EXE). Enter CONFIG [ENTER] to use the "
- center "configurator at a later time. "
- echo
- center "Note: you cannot use Personal Designer for the first time without using "
- center "the System Configuration Manager to install your device drivers. "
- setatt 10 1
- echo
- center " Do you wish to continue with the installation [Y/N]? "
- setatt 15 1
- getsel "YyNn"
- clrwin
- if select N goto chk_autoex
- if select n goto chk_autoex
- --------------------------------------
- :run_config
- cd \PD5\install
-
- CONFIG /install
- --------------------------------------
-
- -- If GRAPHICS.DAT exists, then SHADE requires a different driver.
- if not exist \PD5\graphics.dat goto copy_same
-
- -- use FS switch for From Shade specific installation.
- cd \
-
- \diskman \pd5\graphics.dat FS
-
- del >nul \pd5\graphics.dat
- goto dd_done
-
- :copy_same
- -- If GRAPHICS.dat doesn't exist, then SHADE uses same driver as PD.
- center "Copying graphics device driver into the \SHADE directory..."
- copy \PD5\graphics.dev \PD5\shade >\error.fil
- if infile \error.fil "Insufficient disk space" goto disk_full
- copy \PD5\graphics.dif \PD5\shade >\error.fil
- if infile \error.fil "Insufficient disk space" goto disk_full
-
- --------------------------------------
- :dd_done
- DISPLAY_TITLE
- cd \
- echo
- echo
- echo
- echo
- center " Device Drivers diskette copying complete! "
- echo
- center " Please remove diskette and store in a safe place. "
- center " To proceed with installation... "
- echo
- pause
- ------- Driver Installation complete -------------------------------------
-
- ------- Edit AUTOEXEC.BAT ------------------------------------------------
- :chk_autoex
- clrwin
-
- :Check if COMSPEC invalid
- if {bootltr} == bad goto skip_edauto
- if {BOOT} == A goto skip_edauto
- if {BOOT} == a goto skip_edauto
-
- echo
- center "Editing AUTOEXEC.BAT..."
- if exist {BOOT}:\AUTOEXEC.BAT copy {BOOT}:\autoexec.bat {BOOT}:\autoexec.bak >nul
- subr EDAUTOEX path 1 ev 1
- pd5
- cvpath
- subr EDAUTOEX path 1 ev 1
- pd5\shade
- cvshade
- if not exist {BOOT}:\AUTOEXEC.OLD goto no_old_autoex
- center "Finished editing! Please make note of the following changes"
- TOP_WINDOW
- title " Old AUTOEXEC.BAT "
- setatt 15 2
- type {BOOT}:\AUTOEXEC.OLD
- BOTTOM_WINDOW
- title " New AUTOEXEC.BAT "
- setatt 15 2
- type {BOOT}:\AUTOEXEC.BAT
- setatt 15 1
- pause
- goto finish
-
- :no_old_autoex
- center "No old AUTOEXEC.BAT found, new one created!"
- TOP_WINDOW
- title " New AUTOEXEC.BAT "
- setatt 15 2
- type {BOOT}:\AUTOEXEC.BAT
- pause
- goto finish
-
- :skip_edauto
- setatt 12 1
- echo
- echo
- echo
- center " Unable to edit your AUTOEXEC.BAT file."
- setatt 15 1
- center "Please include the following in your AUTOEXEC.BAT file: "
- center "PATH C:\PD5;C:\DOS;C:\;"
- center "SET CVPATH=C:\PD5 "
- center "Sustitute your boot drive letter for the C: in the above lines."
- pause
-
- :finish
- setatt 15 1
- ------- Completion Message ------------------------------------------------
-
- :options
- DISPLAY_TITLE
- echo
- echo
-
- center "If you have purchased other Personal Designer optional products, such"
- center "as the User Programming Language, you can install them at this time, "
- center "or you can install them at a later date by inserting the appropriate "
- center "diskette into your floppy drive and type:"
-
- center "'A:\INSTALL' to install from your A: drive or"
- center "'B:\INSTALL' to install from your B: drive. "
- echo
- setatt 10 1
- center " Do you wish to install other products [Y/N]? "
- setatt 15 1
- getsel "YyNn"
- if select N goto done
- if select n goto done
- clrwin
- echo
- echo
- center " Please insert option diskette and ..."
-
- pause
- --Design/Shade 5.00
- if exist {LOAD}:disk500.s goto option_copy
- --UPL 5.00
- if exist {LOAD}:disk500.u goto option_copy
- --IGES 5.00
- if exist {LOAD}:disk500.i goto option_copy
- --misc
- if exist {LOAD}:disk400.a goto option_copy
- if exist {LOAD}:disk401.a goto option_copy
- if exist {LOAD}:disk410.a goto option_copy
- if exist {LOAD}:disk500.a goto option_copy
-
- setatt 12 1
- center "Incorrect diskette! Please insert proper diskette and try again."
- setatt 15 1
- echo
- goto options
-
- :option_copy
- copy {LOAD}:\PD5\install\install.dat \install2.dat >>\error.fil
- if infile \error.fil "Insufficient disk space" goto disk_full
- -- use FL switch to allow proper cleanup
- cd \
- \diskman \install2.dat FL
- goto options
-
- --------------------------------------------------------------------------
- :done
-
- :codes
- -- see if internal or dealer box, add codes to \CVOPTION.FIl
-
- ------------------------------------------------------------------------
- :internal
- -- Prime internal, Option number is: 5223 - PD 5.00 Release
- echo "987654 33140 26199 39561 29034 20554 8" >&TMP1
- SUBR ADOPTION &TMP1 &TMP2
- if not infile &TMP2 Error goto success
- goto dealer
-
- ------------------------------------------------------------------------
- :dealer
- -- Dealer, Option number is: 5223 - PD 5.00 Release
- echo "987987 33140 38535 39297 29342 33649 139" >&TMP1
- SUBR ADOPTION &TMP1 &TMP2
- if not infile &TMP2 Error goto success
- goto no_can_do
-
- ------------------------------------------------------------------------
- :no_can_do
- -- For Customers only.
- --echo
- --echo
- --center "Codes not added (Not supposed to!)"
- --echo
- --pause
- goto complete
-
- :success
- -- For Dealers and Prime Internal only.
- echo
- echo
- center "Codes added!"
- echo
- pause
- goto re_config
-
- :complete
- --------------------------------------
-
- DISPLAY_TITLE
- echo
- echo
- echo
- echo
-
- center "When this program terminates you must change to the \PD5\INSTALL"
- center "directory and type SECURE to install the security codes for this"
- center "product. Please refer to your security device documentation for "
- center "security code information and procedures. "
- setatt 12 1
- center "You must then reboot your system by typing [Ctrl][Alt][Del]."
- setatt 15 1
- center "This will complete the installation of the Personal Designer Version"
- center "5.00 operating environment. "
-
- echo
- pause
-
- :re_config
- clrwin
- echo
- echo
- echo
- center "If in the future you wish to re-install any of your hardware devices, "
- center "or change the Personal Designer default program parameters, from any "
- center "directory type: "
- echo
- center "CONFIG [Enter]"
- echo
- center "This takes you into the Personal Designer System Configuration manager"
- center "which is described in your documentation. "
- echo
- pause
-
- center "Installation Complete !!!!!"
-
- if infile {BOOT}:\config.sys "vdisk" goto vdisk
- if infile {BOOT}:\config.sys "VDISK" goto vdisk
- if infile {BOOT}:\config.sys "ramdriv" goto vdisk
- if infile {BOOT}:\config.sys "RAMDRIV" goto vdisk
- goto config
-
- :vdisk
- ERROR_WINDOW
- center "WARNING: Not all VDISKs or RAMDRIVEs are compatible with the Personal "
- center "Designer DOS-Extended Edition. They must conform to the Virtual Control"
- center "Program Interface (VCPI) standard to properly coexist in extended or "
- center "expanded memory. Please see the Personal Designer Rev 5.00 release "
- center "notes for more information. "
- echo
- pause
- DISPLAY_TITLE
-
- :config
- if infile {BOOT}:\config.sys "shell" goto f30
- if infile {BOOT}:\config.sys "SHELL" goto f30
- center "Changing config.sys to FILES=30"
- echo "shell ={BOOT}:\command.com /p /e:500" >C.TMP
- copy >nul {BOOT}:\config.sys {BOOT}:\config.she
- copy >nul c.tmp+{BOOT}:\config.she {BOOT}:\config.sys
- del >nul c.tmp
-
- :f30
- if infile {BOOT}:\config.sys "files=30" goto config_ok
- if infile {BOOT}:\config.sys "FILES=30" goto config_ok
- if infile {BOOT}:\config.sys "files=40" goto config_ok
- if infile {BOOT}:\config.sys "FILES=40" goto config_ok
-
- center "Changing config.sys to FILES=30"
- echo "FILES=30" >f30
- copy >nul {BOOT}:\config.sys {BOOT}:\config.f20
- copy >nul {BOOT}:\config.sys+f30 {BOOT}:\config.f30
- copy >nul {BOOT}:\config.f30 {BOOT}:\config.sys
- del >nul {BOOT}:\config.f30
- del >nul f30
-
- :config_ok
-
- :cvbox
- if not exist {BOOT}:\CVBOX.SYS goto box
- if not infile {BOOT}:\config.sys "cvbox.sys" goto try_upper
- goto opt_fil
- :try_upper
- if not infile {BOOT}:\config.sys "CVBOX.SYS" goto config
- :opt_fil
- if not exist \CVOPTION.FIL goto cvopt
- goto info
-
- :box
- echo
- echo
- echo
- echo
- setatt 12 1
- center "The file CVBOX.SYS was not found in the root directory of drive {BOOT}: "
- goto secure
-
- :cvopt
- echo
- echo
- echo
- echo
- setatt 12 1
- center "The file CVOPTION.FIL was not found in the root directory of this drive."
- goto secure
-
- :config
- echo
- echo
- echo
- echo
- setatt 12 1
- center "The line DEVICE={BOOT}:\CVBOX.SYS was not found in the {BOOT}:\CONFIG.SYS file."
-
- :secure
- setatt 15 1
- echo
- center "Protection installation not complete. Please refer to security device"
- center "documentation for security code information and procedures. "
- echo
- pause
- clrwin
-
- :info
- if not exist \PD5INFO.TXT goto cleanup
- type \PD5INFO.TXT
- goto cleanup
-
- :disk_full
- ERROR_WINDOW
- echo
- echo
- echo
- center "*** FATAL ERROR ***"
- echo
- center "*** HARD DISK FULL ***"
- echo
- center "Please backup and delete all unnecessary files from the hard "
- center "disk and try again. The Personal Designer requires at least 7"
- center "Megabytes of disk space and 1 Megabyte for Surfaces. "
- echo
- pause
- goto cleanup
-
- :vmem
- ERROR_WINDOW
- center "WARNING: VMEM is not compatible with the Personal Designer "
- center "DOS-Extended Edition. VMEM does not follow the Virtual Control"
- center "Program Interface (VCPI) standard. Please remove this line "
- center "from your {BOOT}:\CONFIG.SYS line and reboot. "
- echo
- pause
- goto cleanup
-
- :cleanup
- del >nul \diskman.exe
- del >nul \install.dat
- del >nul \install2.dat
- del >nul \error.fil
- del >nul \cvoption.new
- del >nul \&tmp1
- del >nul \&tmp2
- del DMANTMP >nul
- set BOOT=
-
- :end
- exit