@DefineDisk
@Label = "DISK 5 OF 7"   
@If ( 'F' [= @Group )
 @BeginLib FASTCDE.red
  @If ('N' [= @Group)
   @File *.CDE @Out @OutDrive12:\@Subdir120\*.*
  @Else
   @File *.CDE @Out \@SubDir\@Subdir12\*.*
  @Endif
  @If ( 'N' [= @Group )
   @File *.PRT @Out @OutDrive7:\@Subdir70\*.*
  @Else 
   @File *.PRT @Out \@Subdir\@Subdir7\*.*
  @EndIf
  @File *.TXT @Out @OutDrive:\@Subdir\*.*
  @File *.FSL @Out @OutDrive:\@Subdir\*.*
  @File *.CDI @Out @OutDrive:\@Subdir\*.*
 @EndLib
 @BeginLib FASTDOC.RED
  @File *.* @Out \@Subdir\@Subdir220\*.*
 @EndLib
@EndIf
@If ( 'L' [= @Group )
 @BeginLib CADLISP.red
  @If ('N' [= @Group)
   @File *.CDE @Out @OutDrive12:\@Subdir120\*.*
  @Else
   @File *.CDE @Out \@SubDir\@Subdir12\*.*
  @Endif
  @File *.LSP @Out @OutDrive23:\@Subdir230\*.*
  @File *.HLP @Out @OutDrive23:\@Subdir230\*.*
  @File *.EXE @Out @OutDrive23:\@Subdir230\*.*
  @File LSPCMDS.TXT @Out \@Subdir\@Subdir195\*.*
  @File LSPERR.TXT @Out \@Subdir\@Subdir195\*.*
  @File LSPMPTS.TXT @Out \@Subdir\@Subdir195\*.*
 @EndLib
@EndIf
@EndDisk   
@If ('A' [= @Group || 'O' [= @Group)
 @Chain ("DISK 6 OF 7")
@Endif
@Finish
@ChDrive@OutDrive
@ChDir "@Subdir"
@If (@RAMAvail > 10000)
@If (20000 [= @Option)
 @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir cdestar detail"))
 @Endif
@Endif
@If (20002 [= @Option)
 @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir cdestar cktutor"))
 @Endif
@Endif
@If (20001 [= @Option)
 @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir cdestar iges"))
 @Endif
@Endif
@If (20004 [= @Option)
 @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir cdestar fastlite"))
 @Endif
@Endif
@If (20005 [= @Option)
 @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir cdestar cklisp"))
 @Endif
 @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir lsppath @OutDrive23:\\@Subdir230"))
 @Endif
@Endif
@If (20006 [= @Option)
 @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir cdestar picture"))
 @Endif
@Endif
@If (20007 [= @Option)
 @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir cdestar saver"))
 @Endif
@Endif
@If (20008 [= @Option)
 @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir cdestar chainoff"))
 @Endif
@Endif
@If (20009 [= @Option)
 @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir cdestar modgeo"))
 @Endif
@Endif
@Endif
@If (!('L' [= @Group))
 @MkDir ("OutDrive:\\@SubDir\\@SubDir230")
@Endif
@Cls
@If ( 'C' [= @Group )
 @If ('N' [= @Group)
  @If (@RAMAvail > 10000)
   @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir cdlpath @OutDrive2:\\@Subdir20"))
   @Endif
   @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir macpath @OutDrive3:\\@Subdir30"))
   @Endif
   @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir ptnpath @OutDrive5:\\@Subdir50"))
   @Endif
   @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir prtpath @OutDrive7:\\@Subdir70"))
   @Endif
   @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir cdepath @OutDrive12:\\@Subdir120"))
   @Endif
  @Endif  
 @Endif
 @MkDir ("OutDrive:\\@SubDir\\@SubDir9")
 @MkDir ("OutDrive:\\@SubDir\\@SubDir6")
 @MkDir ("OutDrive:\\@SubDir\\@SubDir8")
 @MkDir ("OutDrive:\\@SubDir\\@SubDir10")
 @MkDir ("OutDrive:\\@SubDir\\@SubDir14")
 @MkDir ("OutDrive:\\@SubDir\\@SubDir15")
 @MkDir ("OutDrive:\\@SubDir\\@SubDir16")
 @If ('N' [= @Group)
  @MkDir ("OutDrive5:\\@SubDir50")
  @MkDir ("OutDrive3:\\@SubDir30")
 @Else
  @MkDir ("OutDrive:\\@SubDir\\@SubDir5")
  @MkDir ("OutDrive:\\@SubDir\\@SubDir3")
 @EndIf       
 @If (@RAMAvail > 10000)
  @If (@Spawn ("@StartupDrive:\\set_cfg @Outdrive:\\@Subdir support @Outdrive:\\@Subdir"))
  @Endif
 @Endif
@Endif
@If ('I' [= @Group)
 @MkDir ("@OutDrive17:\\@Subdir17")
 @If ('N' [= @Group)
  @Write ("@OutDrive:\\@Subdir\\ckiges.dat", "wt", "@OutDrive7:\\@Subdir70\n")
 @Else
  @Write ("@OutDrive:\\@Subdir\\ckiges.dat", "wt", "@Subdir\\@Subdir7\n")
 @Endif
 @Write ("@OutDrive:\\@Subdir\\ckiges.dat", "at", "@OutDrive17:\\@Subdir17\n")
 @Write ("@OutDrive:\\@Subdir\\ckiges.dat", "at", "@OutDrive19:\\@Subdir210\n")
 @Write ("@OutDrive:\\@Subdir\\ckiges.dat", "at", "CKIGDFLT.TPL\n")
 @Write ("@OutDrive:\\@Subdir\\ckiges.dat", "at", "off\noff\noff\n1\n1\n3\n")
@Endif
@If (@RAMAvail > 200000)
 @If (@Spawn ("@StartupDrive:\\gifview @StartupDrive:\\proset.gif"))
 @Endif
@Endif
@If ('C' [= @Group)
@If (@System ("type readme.now"))
@EndIf
To start the CADKEY program change to directory @OutDrive:@Subdir, 
type CADKEY, then press ENTER.
@Pause
@EndIf
@EndFinish


