    @DefineDisk
        @Label = "Disk #2"

        @BeginLib GRAPHICS.RED
            @File *.* @Out @OutDrive:@SubDir\GRAPHICS\
        @EndLib

    @EndDisk


    @MkDir("@OutDrive:@SubDir\\TEMP")
    @MkDir("@OutDrive:@SubDir\\NETWORK")





/***************************************************************************
    WRITE SYSTEM.DAT
****************************************************************************/

@Display
@Cls
@MoveCStr(1,29,116," HARD DISK INSTALL ")
@MoveCStr(5,27,30,"Creating system file. . .")
@MoveCStr(1,1,30," ")
@Write("@OutDrive:\\@Subdir\\SYSTEM.DAT", "wt", "0 network version\n")
@Move(1,1,"")
@Write(, "at", "1 Course Review\n")
@Move(1,1,"")
@Write(,,"0 Force EGA\n")
@Move(1,1,"")
@Write(,,"0 Demo Switch\n")
@Move(1,1,"")
@Write(,,"0 Force Memory Model  1=EXPANDED  2=EXTENDED  3=DISK MEMORY\n")
@Move(1,1,"")
@Write(,,"1 Learning Modules\n")
@Move(1,1,"")
@Write(,,"0 Speech\n")
@Move(1,1,"")
@Write(,,"PGM NAME\n")
@Move(1,1,"")
@Write(,,"   StudyWare for Trigonometry\n")
@Move(1,1,"")
@Write(,,"NUM OF SECTS\n")
@Move(1,1,"")
@Write(,,"@NumSects\n")
@Move(1,1,"")
@Write(,,"SECT NAMES\n")
@Write(,,"NUM OF TOPICS\n")
@Move(1,1,"")
@Write(,,"@NumTopics\n")
@Move(1,1,"")
@Write(,,"NUM OF VGA MENU FONTS (ONLY 1 - 4 ARE CURRENTLY USED)\n")
@Move(1,1,"")
@Write(,,"HLV20.GFT\n")
@Move(1,1,"")
@Write(,,"HLV24.GFT\n")
@Move(1,1,"")
@Write(,,"HLV29.GFT\n")
@Move(1,1,"")
@Write(,,"RMN15.GFT\n")
@Move(1,1,"")
@Write(,,"RMN21.GFT\n")
@Move(1,1,"")
@Write(,,"RMN21.GFT\n")
@Move(1,1,"")
@Write(,,"NUM OF CLIFFS FONTS\n")
@Move(1,1,"")
@Write(,,"RMN15.GFT\n")
@Move(1,1,"")
@Write(,,"RMN15.GFT\n")
@Move(1,1,"")
@Write(,,"HLV20.GFT\n")
@Move(1,1,"")
@Write(,,"HLV24.GFT\n")
@Move(1,1,"")
@Write(,,"RMN15.GFT\n")
@Move(1,1,"")
@Write(,,"RMN15.GFT\n")
@Move(1,1,"")
@Write(,,"NUM OF VGA ADMIN FONTS (4 & 5 WILL BE REPLACED WITH SYMBOLS)\n")
@Move(1,1,"")
@Write(,,"RMN15.GFT\n")
@Move(1,1,"")
@Write(,,"HLV20.GFT\n")
@Move(1,1,"")
@Write(,,"HLV24.GFT\n")
@Move(1,1,"")
@Write(,,"SYMBOLS1.GFT\n")
@Move(1,1,"")
@Write(,,"SYMBOLS1.GFT\n")
@Move(1,1,"")
@Write(,,"SYMBOLS1.GFT\n")
@Move(1,1,"")
@Write(,,"LM FONTS-REMEMBER!-Font1 starts at the bottom (for LM ONLY)\n")
@Move(1,1,"")
@Write(,,"RMN15.GFT\n")
@Move(1,1,"")
@Write(,,"RMN15.GFT\n")
@Move(1,1,"")
@Write(,,"RMN12.GFT\n")
@Move(1,1,"")
@Write(,,"SYMBOLS1.GFT\n")
@Move(1,1,"")
@Write(,,"SYMBOLS1.GFT\n")
@Move(1,1,"")
@Write(,,"SYMBOLS1.GFT\n")
@Move(1,1,"")
@Write(,,"FLOPPY PATH\n")
@Move(1,1,"")
@Write(,,"@OutDrive:@SubDir\\\n")
@Move(1,1,"")
@Write(,,"LOC PROGRAM\n")
@Move(1,1,"")
@Write(,,"@OutDrive:@SubDir\\\n")
@Move(1,1,"")
@Write(,,"LOC SYSTEM AND READ-ONLY FILES\n")
@Move(1,1,"")
@Write(,,"@OutDrive:@SubDir\\\n")
@Move(1,1,"")
@Write(,,"LOC DATA\n")
@Move(1,1,"")
@Write(,,"@OutDrive:@SubDir\\\n")
@Move(1,1,"")
@Write(,,"LOC GRAPHICS\n")
@Move(1,1,"")
@Write(,,"@OutDrive:@SubDir\\graphics\\\n")
@Move(1,1,"")
@Write(,,"LOC (text-based) FPs\n")
@Move(1,1,"")
@Write(,,"@OutDrive:@SubDir\\fps\\\n")
@Move(1,1,"")
@Write(,,"LOC NETWORK\n")
@Move(1,1,"")
@Write(,,"@OutDrive:@SubDir\\NETWORK\\\n")
@Move(1,1,"")
@Write(,,"LOC DISK MEMORY\n")
@Move(1,1,"")
@Write(,,"@OutDrive:@SubDir\\temp\\\n")
@Move(1,1,"")
@Write(,,"LOC LEARNING MODULES\n")
@Move(1,1,"")
@Write(,,"@OutDrive:@SubDir\\teachme\\\n")
@Move(1,1,"")
@Write(,,"1 graphics in library?\n")
@Move(1,1,"")
@Move(1,1,"")
@EndDisplay


/****************************************************************************
    FINISH INSTALL
*****************************************************************************/

FINISH_PROCEDURE:


@GetOption
    @Cls
    @MoveCStr(1,29,30,"INSTALLATION COMPLETE")

    @MoveCStr(3,4,14," Cliffs @Name V. @Version ")
    has been successfully installed onto your computer system.

    When the DOS prompt appears on your screen, please remove the
    installation disk from the floppy drive.

    Store the installation disk in a safe place -- away from heat,
    direct sunlight, and magnetic fields generated by such devices as a
    telephone, electric appliance, or motor in a computer or disk drive.

    You may reinstall the program from the Installation disk if this
    installed working copy becomes damaged.


            @LocalWindow(22,40)
            @Option 1 = "Press [Enter] To Continue"
@EndOption
@ClearOption(1)

@GetOption
    @Cls
    @MoveCStr(1,22,95,"  ***  A T T E N T I O N  *** ")


    To run @MoveCStr(4,11,14," Cliffs @Name V. @Version ")


    @MoveCStr(7,4,31,"Switch to subdirectory:")

    @MoveCStr(9,10,47," @OutDrive:\\@Subdir ")

    @MoveCStr(11,4,31,"Then, Type ")@MoveCStr(11,15,30,"STUDY")@MoveCStr(11,20,31," and press [Enter].")
    @LocalWindow(22,40)
    @Option 1 = "Press [Enter] to Continue"
@EndOption
@ClearOption(1)


END_INSTALL:

    @ChDrive @OutDrive
    @ChDir "@SubDir"

@GetOption
@Cls
@MoveCStr(1,27,116," LAST MINUTE INFORMATION ")
@MoveCStr(3,4,31,"There is a file named @ProgName that was transferred to the Sub-")
@MoveCStr(4,4,31,"directory @OutDrive:\\@SubDir. This file contains:")
@MoveCStr(6,8,31,"1)  any last-minute information which may have become available")
@MoveCStr(7,12,31,"since the manual was printed, and")
@MoveCStr(8,8,31,"2)  the Technical Support telephone number and business hours.")
@MoveCStr(10,4,31,"From the DOS prompt (@OutDrive:\\@SubDir):")
@MoveCStr(12,8,31,"Type -  LOOKAT @ProgName   and press the [Enter] key")
@MoveCStr(14,18,30,"Would you like to view this file right now?")
@MoveCStr(17,4,26,"Use the [] and [] keys to position the FLASHING highlight bar over")
@MoveCStr(18,4,26,"the desired option, then press the [Enter] key to make selection.")
@LocalWindow(22, 39)
@Option 1 = " Yes "
@Option 2 = "  No "
@EndOption
@If (1 [= @Option)
    @ClearOption(1)
@Else
    @ClearOption(2)
    @Exit
@Endif


@Finish
@Execute("@OutDrive:@SubDir\\cutility xx3x@ProgName")
@EndFinish
