Liren Large Software Subsidy 13/13.iso/p/p024/1.img/INSTALL.DAT

Text File | 1993-03-01 | 13.5 KB | 457 lines

@Defineproject
        @Language = @EN @Endlang
        @ABANNER        = "        AutoCAD 386        "
        @BATCHFILE      = "ACADR12.BAT"
        @NAME           = "AutoCAD 386"
        @VERSION        = "R-12"
        @SUBDIR         = "\\ACAD"
        @OUTDRIVE       = C
        @GROUP          = "A"
        @FULLINST       = (1)
        @UPDATE         = (0)    /* Bugfix = 1, Regular = 0 */
/* For updates,  set disk label in @if at end of file */
        @CHECKEXES      = "Executables 1" = "Executables 2" = "Support 1" = "No Disk"
        @Requires       @HardDisk
@EndProject

@DefineVars
        @Dir            @Subdir2        = ""    /* directory type */

/* Remember to also update the space requirements in the user messages */
        @Integer        @AllFiles       = 25000000
        @Integer        @ExeSupport     = 11200000
        @Integer        @BonusSample    =  3300000
        @Integer        @SupportSource  =   500000
        @Integer        @IgesFonts      =   114000
        @Integer        @Tutorial       =   260000
        @Integer        @Ads            =  2000000
        @Integer        @Render         =  1200000
        @Integer        @ASE            =  1300000
        @Integer        @AMEEXE         =  3500000
        @Integer        @AMEAPI         =  1600000
        @Integer        @Temp           =        0
        @Integer        @Free           =        0
        @Integer        @International  = 0

@EndVars

@WELCOME
        @CLS

@if (@Language == @EN)
@DATXMSG(83,"\tThis program will install the CHINESE @NAME")
@DATXMSG(84,"\tRelease 12 on your computer.")
@elseif (@language == @IT)
@DATXMSG(85,"\tThis program will install the ITALIAN @NAME")
@DATXMSG(86,"\tRelease 12 on your computer.")
@endif


@pause
    @If (@CPU < 386)
@DATXMSG(1,"\t@Name requires an 80386 or 80486 CPU.  ")
@DATXMSG(2,"\tYour computer is running on a 80@CPU CPU.")


        @Pause
     @Endif

     @If ((@OSMajor * 100 + @OSMinor) < 330)
@DATXMSG(3,"\t@NAME requires DOS version 3.30 or higher.")

        @Pause
     @Endif

        @CLS

@DATXMSG(4,"\tThis program installs @NAME Release 12 on your computer ")
@DATXMSG(5,"\tsystem and checks the distribution disks for errors.  ")
@DATXMSG(6,"\tYou can specify the drive and directory where you want to")
@DATXMSG(7,"\tinstall @NAME.  The program creates the directory for you.  ")
@DATXMSG(8,"\tYou can choose to copy only selected parts of the software.")

@DATXMSG(9,"\tEach screen of this program offers a choice and a default response.")
@DATXMSG(10,"\tPress the RETURN key to accept the default.  Otherwise type or ")
@DATXMSG(11,"\tselect another response and then press the RETURN key.")
@DATXMSG(12,"\tIf you make a mistake while typing, press the BACKSPACE key")
@DATXMSG(13,"\tand retype the entry.")

@DATXMSG(14,"\tYou can press the ESC key at any time to cancel installation     ")
@DATXMSG(15,"\tand return to the operating system.")

@PAUSE
@EndWelcome

@IF (@update == 1)
    @SetGroup(A)    /* Install all files on Updates */
@Else
SELECTFILES:
@Getgroups
        @CheckBox
        @CLS
@DATXMSG(45,"\tHere you select the parts of @NAME you want to install.")













@DATXMSG(46,"\tThe Executable/Support files are the only ones required to run")
      @NAME.
      @LocalWindow(9,1)
        @SET A = "@DATXMSG(87,"Install all files (25,000,000 bytes)")"
        @SET S = "@DATXMSG(88,"@NAME Executable/Support files (11,200,000 bytes)")"
        @SET C = "@DATXMSG(89,"@NAME Bonus/Sample files (3,300,000 bytes)")"
        @SET E = "@DATXMSG(90,"@NAME Support Source files (500,000 bytes)")"
        @SET D = "@DATXMSG(91,"@NAME Iges Font files (114,000 bytes)")"
        @SET T = "@DATXMSG(97,"@NAME Tutorial files (260,000 bytes)")"
        @SET F = "@DATXMSG(92,"@NAME ADS files (2,000,000 bytes)")"
        @SET R = "@DATXMSG(93,"@NAME Render files (1,200,000 bytes)")"
        @SET Q = "@DATXMSG(94,"@NAME SQL Extension files (1,300,000 bytes)")"
        @SET Z = "@DATXMSG(95,"Advanced Modeling Extension files. (5,100,000 bytes)")"
@DATXMSG(57,"\tUse the up and down cursor keys to scroll through the list.  Use")
@DATXMSG(58,"\tthe SPACE_BAR key to toggle the YES/NO state of the current")
@DATXMSG(59,"\tselection.  Press the RETURN key to accept the selection(s).")
@DATXMSG(60,"\tPress the ESC key to abort.")
@EndGroups

@Display
        @Cls
        @If ('A' [= @Group || 'S' [= @Group || 'C' [= @Group || 'E' [= @Group ||
             'D' [= @Group || 'F' [= @Group || 'Z' [= @Group ||
             'R' [= @Group || 'Q' [= @Group || 'T' [= @Group )


@DATXMSG(82,"\tSELECTED FOR INSTALLATION:")

        @If ('A' [= @Group) @DATXMSG(61,"Install all files.") @EndIf
        @If ('S' [= @Group) @DATXMSG(62,"@NAME Executable/Support files.") @EndIf
        @If ('C' [= @Group) @DATXMSG(63,"@NAME Bonus/Sample files.") @EndIf
        @If ('E' [= @Group) @DATXMSG(64,"@NAME Support Source files.") @EndIf
        @If ('D' [= @Group) @DATXMSG(65,"@NAME Iges Font files. ") @EndIf
        @If ('T' [= @Group) @DATXMSG(98,"@NAME Tutorial files. ") @EndIf
        @If ('F' [= @Group) @DATXMSG(66,"@NAME ADS files.") @EndIf
        @IF ('R' [= @Group) @DATXMSG(67,"@NAME Render files.") @Endif
        @IF ('Q' [= @Group) @DATXMSG(68,"@NAME SQL Extension files.") @Endif
        @If ('Z' [= @Group) @DATXMSG(69,"Advanced Modeling Extension files.") @EndIf

        @Pause
        @ELSE
@DATXMSG(71,"No files were selected for installation.")
           @Pause
           @GOTO SELECTFILES
        @Endif
@EndDisplay

@IF ('Z' [= @GROUP)
SELECTAME:
@Getgroups
@CLEARGROUP(Z)
     @CheckBox
        @CLS
@DATXMSG(99,"\tHere you select the parts of AME you want to install.")









        @SET Z = "@DATXMSG(101,"Install all AME files (5,100,000 bytes)")"
        @SET G = "@DATXMSG(102,"AME Executable/Support/Sample files (3,500,000 bytes)")"
        @SET H = "@DATXMSG(96,"AME API Source/Sample files (1,600,000 bytes)")"

@DATXMSG(57,"\tUse the up and down cursor keys to scroll through the list.  Use")
@DATXMSG(58,"\tthe SPACE_BAR key to toggle the YES/NO state of the current")
@DATXMSG(59,"\tselection.  Press the RETURN key to accept the selection(s).")
@DATXMSG(60,"\tPress the ESC key to abort.")

@EndGroups

@Display
        @Cls
        @If ('Z' [= @Group || 'G' [= @Group || 'H' [= @Group)


@DATXMSG(100,"\tAME FILES SELECTED FOR INSTALLATION:")

        @If ('Z' [= @Group) @DATXMSG(103,"Install all AME files.") @EndIf
        @If ('G' [= @Group) @DATXMSG(104,"AME Executable/Support/Sample files.") @EndIf
        @If ('H' [= @Group) @DATXMSG(70,"AME API Source/Samples.") @EndIf

        @Pause
        @IF ('Z' [= @GROUP)
            @SETGROUP(G)
            @SETGROUP(H)
            @CLEARGROUP(Z)
        @Endif
        @ELSE
@DATXMSG(71,"No files were selected for installation.")
           @Pause
           @GOTO SELECTAME
        @Endif
@EndDisplay
@Endif


/* Compute amount of disk space needed to install selected files */

@If ('S' [= @Group)
        @Equal(@FREE = @ExeSupport)
@Endif

@If ('C' [= @Group)
        @Equal(@TEMP = @BonusSample + @FREE)
        @Equal(@FREE = @TEMP)
@Endif

@If ('E' [= @Group)
        @Equal(@TEMP = @SupportSource + @FREE)
        @Equal(@FREE = @TEMP)
@Endif

@If ('D' [= @Group)
        @Equal(@TEMP = @IgesFonts + @FREE)
        @Equal(@FREE = @TEMP)
@Endif

@If ('T' [= @Group)
        @Equal(@TEMP = @Tutorial + @FREE)
        @Equal(@FREE = @TEMP)
@Endif

@If ('F' [= @Group)
        @Equal(@TEMP = @Ads + @FREE)
        @Equal(@FREE = @TEMP)
@Endif

@If ('R' [= @Group)
        @Equal(@TEMP = @Render + @FREE)
        @Equal(@FREE = @TEMP)
@Endif

@If ('Q' [= @Group)
        @Equal(@TEMP = @ASE + @FREE)
        @Equal(@FREE = @TEMP)
@Endif

@If ('G' [= @Group)
        @Equal(@TEMP = @AmeExe + @FREE)
        @Equal(@FREE = @TEMP)
        @Equal(@TEMP = @AmeAPI + @FREE)
@Endif

@If ('H' [= @Group)
        @Equal(@TEMP = @AmeAPI + @FREE)
        @Equal(@FREE = @TEMP)
@Endif

/* ALL Files already includes disk space totals for other groups so don't add
in free space */

@If ('A' [= @Group)
        @Equal(@TEMP = @ALLFiles)
        @Equal(@FREE = @TEMP)
@Endif
@Endif /* Not an update */

SelectDrv:
@GetOutDrive
        @Suppress A      /* don't display A: */
        @Suppress B      /* or B:            */
        @CLS
@DATXMSG(16,"\tOn which disk drive do you want to install the selected files?")















@DATXMSG(17,"\tUse the up and down cursor keys to scroll through the")
@DATXMSG(18,"\tlist of disk drives.  Press the RETURN key when you have ")
@DATXMSG(19,"\tselected a drive.")

@EndOutDrive

@If (@update == 0)   /* Can't check space avaible on updates */

   @If (@DiskFree  @OutDrive < @FREE)
           @GetOption

@DATXMSG(72,"\tThe selected output disk drive only has @DiskFree @OutDrive bytes free.")
@DATXMSG(73,"\tTo install the files you have selected, @FREE bytes are ")
@DATXMSG(74,"\trequired.")

@DATXMSG(75,"\tDo you want to install on this drive anyway or select another drive?")
           @LocalWindow(12,40)
                 @Option  10 = "@DATXMSG(76,"Continue")"
                 @option  11 = "@DATXMSG(77,"Select another drive")"
           @EndOption
   @EndIf

   @If(11 [= @Option)
         @ClearOption(11)
         @GoTO SelectDRV
   @Endif
@Endif

Selectsubdir:
@GetSubdir
        @CLS

@DATXMSG(20,"\tHere you specify the name of the directory where the selected files")
@DATXMSG(21,"\twill be installed.  By default, the name of this directory is:")
       @SUBDIR.
@DATXMSG(22,"\tThe program locates it below the root directory of the disk")
@DATXMSG(23,"\tdrive you selected.  If you have no preference, choose the")
@DATXMSG(24,"\tdefault by pressing the RETURN key.")

@DATXMSG(25,"\tTo change the directory name, backspace over the directory name")
@DATXMSG(26,"\tand type a new name.  Press the RETURN key when you have finished ")
@DATXMSG(27,"\ttyping the name.")






        @PROMPT = "@DATXMSG(28," Which subdirectory ? ")"
@EndSubdir

@IF (@Update == 0)
    @IF (@Exists "@OutDrive:@SubDir")
            @GetOption
    @DATXMSG(39,"\tApparently there is already a directory called:")
          @OutDrive:@SubDir.

    @DATXMSG(40,"\tDo you want to continue installing over the files in this")
    @DATXMSG(41,"\tdirectory?")

            @LocalWindow(12,40)
            @Option 1 = "@DATXMSG(42,"Yes")"
            @Option 2 = "@DATXMSG(43,"No")"


            @EndOption

    @Endif
    @Display
       @If(2 [= @Option)
    @DATXMSG(44,"\tSelect another directory.")
            @ClearOption(2)
            @Pause
            @GoTo Selectsubdir
       @Endif
    @EndDisplay

@Endif  /* Not update */

/* Only ask for support dir name, if the selected groups needs it */
@If ('A' [= @Group || 'S' [= @Group || 'C' [= @Group || 'R' [= @Group ||
     'Q' [= @Group || 'G' [= @Group )
@GetSubdir @Subdir2
        @Default = "@Subdir\\SUPPORT\\"
        @CLS

@DATXMSG(29,"\tHere you specify the name of the directory where @NAME")
@DATXMSG(30,"\tsupport files will be installed.  By default, the name of this ")
@DATXMSG(31,"\tdirectory is:")
       @SUBDIR2

@DATXMSG(32,"\tThe program locates it below the root directory of the disk")
@DATXMSG(33,"\tdrive you selected.  If you have no preference, choose the")
@DATXMSG(34,"\tdefault by pressing the RETURN key.")

@DATXMSG(35,"\tTo change the directory name, backspace over the directory name")
@DATXMSG(36,"\tand type a new name.  Press the RETURN key when you have finished")
@DATXMSG(37,"\ttyping the name.")






        @PROMPT = "@DATXMSG(38," Support files subdirectory ? ")"
@EndSubdir
@Endif  /* Support dir needed ?/

@SetOption(101)

@if (@Update == 0)
   @if ('G' [! @Group && 'H' [! @Group)  /* AME Not specifically selected */
       @If ('A' [= @Group)               /* All options selected */
           @GetOption
       @DATXMSG(79,"\tDid you purchase the Advanced Modeling Extension?")
                  @LocalWindow(12,40)
                  @Option 100 = "@DATXMSG(80,"Yes")"
                  @Option 101 = "@DATXMSG(81,"No")"
           @EndOption
           @If(100 [= @Option)
               @SetGroup(G)    /* Force AME options */
               @SetGroup(H)
           @Endif
       @EndIf
   @Endif
@Endif /* End no-update */

@If ('A' [= @Group || 'S' [= @Group)
    @SETBATCHFILE
       @Verbatim "SET ACAD=@Outdrive:@Subdir2;@Outdrive:@Subdir\\FONTS;@Outdrive:@Subdir\\ADS"
       @Verbatim "SET ACADCFG=@Outdrive:@Subdir"
       @Verbatim "SET ACADDRV=@Outdrive:@Subdir\\DRV"
       @Verbatim "@Outdrive:\\@Subdir\\ACAD %1 %2"
    @ENDBATCHFILE
@ENDIF

@SetConfig
   @Askoverwrite
   @Files = 40
@EndConfig

        /*Disk.#1*/
@DefineDisk
        @LABEL  = "Executables 1"
        @IF (@UPDATE == 0)
           @File   ACAD.PT1        @Out ACAD.EXE      @Group AS
           @File   ACAD1.MID       @Group AS
        @ENDIF
@EndDisk

@IF (@UPDATE == 1)
    @Chain = "disk_label"
@elseIf ('A' [= @Group ||  'S' [= @Group)
    @Chain = "Executables 2"
@Elseif ('C' [= @Group)
    @Chain = "Support 1"
@Elseif ('R' [= @Group)
    @Chain = "Render 1"
@Elseif ('T' [= @Group || 'E' [= @Group ||  'D' [= @Group)
    @Chain = "Bonus/Sample 1"
@Elseif ('F' [= @Group)
    @Chain = "ADS 1"
@Elseif ('Q' [= @Group)
    @Chain = "ASE 1"
@Elseif ('G' [= @Group)
    @Chain = "AME 1"
@Elseif ('H' [= @Group)
    @Chain = "AME 2"
@Endif