Amiga ISO Collection/AmigaUtilCD1.iso/CDRom/X!-AWSPP.DMS/in.adf/Install-AsimCDFS

Text File | 1997-03-31 | 75.7 KB | 2,508 lines

;$VER: AsimCDFS Install 3.9 (28.3.97)
;Copyright ©1993-1997 Asimware Innovations Inc.

(onerror (
    (makeassign "AsimCDFSInst")
    (makeassign "AsimCDFS")
    (makeassign "AsimCDFS_Buffer")
))

(set #typeAMIGA 0)
(set #typeCDTV 1)
(set #typeCD32 2)
(set #typeATAPI 3)
(set #typeFLYER 4)

(set #autoMount 1)
(set #CDDefault_NC "CD0" )
(set #isPioneer 0)
(set #isNakamichi 0)
(set #isNakamichi4Disc 0)
(set #isPDCD 0)
(set #is4X4 0)
(set #PioneerSeparate 0)

(set #wbversion (getversion "libs:version.library"))
(set #wbversion (/ #wbversion 65536) )

(set #SCSIDevice "scsi.device")
(set #SCSIUnit 4)

(set @default-dest "SYS:AsimCDFS")


(set #text_mountheader (cat
            "/************************************************************************/\n"
            "/*  AsimCDFS v3 MountList entry -- ©1993-1997 Asimware Innovations Inc. */\n"
            "/************************************************************************/\n"
))

(set #text_mountfiller (cat
            "    Buffers        = 0\n"
            "    BufMemType     = 5\n"
            "    Mask           = 0xffffffe\n"
            "    Flags          = 0\n"
            "    FileSystem     = l:AsimCDFS\n"
            "    DosType        = 0x662dabac\n"
            "    GlobVec        = -1\n"
            "    Reserved       = 0\n"
            "    LowCyl         = 0\n"
            "    HighCyl        = 999\n"
            "    Surfaces       = 1\n"
            "    BlocksPerTrack = 32\n"
            "    Priority       = 10\n"
            "    StackSize      = 5000\n"
))


(set #theirlevel @user-level )
(user 2)

(set #English 0)
(set #Deutsch 1)
(set #Français 2)
(set #Italiano 3)
(set #Svenska 4)


;*****
; set the language we will be using
;
(if (= @language "english")
    (set #our_language #English)
)
(if (= @language "deutsch")
    (set #our_language #Deutsch)
)


(user #theirlevel)




;*****
; set English language strings
(if (= #our_language #English) (

(set #echotxt "echo \"Mounting AsimCDFS...\"\n" )

(set #text_please_use_novice  (cat
             "Installation notes\n"
           "------------------\n\n"
             "We have noticed problems with the Installer "
             "program when using Expert or Intermediate mode.  The "
             "general Novice install is recommended for most, if not "
             "all situations.\n"
))

(set #text_needwb_2 (cat "\n\nAmigaDOS 2.0 or higher is required for AsimCDFS 3.x. "
             "\n\nAn upgrade will be needed for your Amiga."
             "\n\nYou are currently running version " #wbversion "."
))


(set #tp_insert_disk "Please insert the disk labeled \"AsimCDFS_v3_Install\"." )
(set #th_insert_disk "AsimCDFS FileSystem and other utilities will be copied from this disk into your system.")


(set #text_abort1    "\n\nApproximately ")
(set #text_abort2    "K of disk space is needed on your SYS: volume.\n\nYou only have ")
(set #text_abort3    "K free.\n\nDelete or transfer some files from the SYS: volume and try again.")

(set #tp_isamiga    "\nAsimCDFS v3.8 Install\n-------------------\n\Please describe your setup:")
(set #th_isamiga    (cat "\n\nIf AsimCDFS is being used in conjunction with a CDTV/A570 unit "
                "then note this with the CDTV/A570 selection.\n\n"
                "If AsimCDFS is being used with a CD³² unit, then note this with the CD³² selection.\n\n"
                "Otherwise, you will be installing AsimCDFS on an Amiga equipped "
                "with a SCSI or IDE controller and SCSI or ATAPI CD-ROM drive.")
)

(set #tc_isamiga_1    "Amiga with SCSI CD-ROM")
(set #tc_isamiga_2    "CDTV/A570")
(set #tc_isamiga_3    "CD³²")
(set #tc_isamiga_4    "ATAPI CD-ROM on A4000/A1200")
(set #tc_isamiga_5    "NewTek Flyer with CD-ROM (unit #6) on SCSI-C")

(set #tp_ispioneer    "\n\n\nIs your CD-ROM drive a Pioneer DRM-60x?")
(set #th_ispioneer        (cat "\n\nIf you are using AsimCDFS with a Pioneer DRM-60x, indicate this "
                    "in your choice.  This drive is a high-performance 6-disc minichanger and "
                    "is not common."
                    "\n\nOtherwise select Other CD-ROM.")
)

(set #tc_othercdrom "Other CD-ROM")

(set #tp_isnakamichi        "\n\n\nIs your CD-ROM drive a Nakamichi MBR-7,\n a NEC 4xc or a NEC 2xc 7-disc CD-ROM changer?")
(set #th_isnakamichi (cat "\n\nIf you are using AsimCDFS with a Nakamichi MBR-7, a NEC 4xc or a NEC 2xc 7-disc CD-ROM changer, indicate this "
                    "in your choice.  This drive is a high-performance 7-disc minichanger and "
                    "is not common."
                    "\n\nOtherwise select Other CD-ROM.")
)

(set #tp_isnakamichi4disc        "\n\n\nIs your CD-ROM drive a Nakamichi MJ-4 4-disc CD-ROM changer?")
(set #th_isnakamichi4disc (cat "\n\nIf you are using AsimCDFS with a Nakamichi MJ-4 4-disc CD-ROM changer, indicate this "
                    "in your choice.  This drive is a high-performance 4-disc minichanger."
                    "\n\nOtherwise select Other CD-ROM.")
)

(set #tp_ispd    "\n\n\nIs your drive a Panasonic LF-1000 PD/CD-ROM drive?\n(combination read/write optical drive and CD-ROM drive)")
(set #th_ispd        (cat "\n\nIf you are using AsimCDFS with a Panasonic PD/CD-ROM drive, indicate this "
                    "in your choice.  This drive is a combination read/write optical drive and CD-ROM drive.\n\n"
                    "This drive is also bundled under 3rd party names such as Smart & Friendly and Toray.\n\n"
                    "\n\nOtherwise select Other CD-ROM.")
)

(set #text_lf1000_users    (cat "Panasonic LF-1000 PD/CD-ROM users\n"
                      "---------------------------------\n"
        "Please ensure that your drive is set to the "
        "\"Two LUN Mode\".  This is done via jumper switches "
        "on the back of the drive.  Consult the manufacturer's "
        "documentation for further information.\n\n"
        "Also ensure that your SCSI controller is setup to "
        "recognize LUNs."
         )
)

(set #tp_is4x4        "\n\n\nIs your drive a NEC 4X4 4-disc ATAPI CD-ROM Changer?\n")
(set #th_is4x4        (cat "\n\nIf you are using AsimCDFS with a NEC 4x4 ATAPI 4-disc CD-ROM Changer, indicate this "
                    "in your choice.  This drive is a 1/2 height 5 1/2\" device.\n\n "
                    "\n\nOtherwise select Other CD-ROM.")
)

(set #tp_separatepool    "\n\nDo you wish to have separate devices mounted, or would you like all discs pooled into 1 device?\n\n")
(set #th_separatepool    (cat "\n\nIf you wish to have access to all discs simultaneously, then "
                        "select Separate, otherwise select Pooled  --  in the latter case, "
                        "you can switch between the discs with DiscChanger.")
)
(set #tc_separate    "Separate")
(set #tc_pooled    "Pooled")

(set #text_ourhelp_pioneer        (cat "\n\nThis is the base name under which AmigaDOS will reference the "
                                "CD-ROM as.  As you are installing AsimCDFS for a Pioneer 6-disc changer "
                                ", 6 such devices named <basename>0 through <basename>5 will be mounted (ie.  CD0, CD1, ..., CD5) "
                                "\n\nThe trailing : (colon) or the 0 through 5 MUST NOT be present.")
)

(set #text_ourhelp_nakamichi    (cat "\n\nThis is the base name under which AmigaDOS will reference the "
                                "CD-ROM as.  As you are installing AsimCDFS for a Nakamichi 7-disc changer "
                                ", 7 such devices named <basename>0 through <basename>6 will be mounted (ie.  CD0, CD1, ..., CD6) "
                                "\n\nThe trailing : (colon) or the 0 through 6 MUST NOT be present.")
)

(set #text_ourhelp_4x4        (cat "\n\nThis is the base name under which AmigaDOS will reference the "
                                "CD-ROM as.  As you are installing AsimCDFS for a 4-disc changer "
                                ", 4 such devices named <basename>0 through <basename>3 will be mounted (ie.  CD0, CD1, CD2 & CD3) "
                                "\n\nThe trailing : (colon) or the 0 through 3 MUST NOT be present.")
)

(set #tp_basedevice    "\n\nWhat is the base-name for the AmigaDOS device?\n\n(The trailing colon MUST NOT be present.  See manual for explanation.)")

(set #tp_cddevice    "\n\nWhat is the name for the AmigaDOS device?\n\n(The trailing colon MUST NOT be present)")
(set #th_cddevice    (cat "\n\nThis is the name under which AmigaDOS will reference the "
                    "CD-ROM as.  While usually CD0:, "
                    "it can be any name you choose. "
                    "\n\nThe trailing : (colon) MUST NOT be present.")
)

(set #tp_copyasimatapi    "\n\nCopying asim_atapi.device ATAPI CD-ROM driver\n")
(set #th_copyasimatapi    "\n\nThis will copy the asim_atapi.device ATAPI CD-ROM driver file to your devs: directory\n")

(set #tp_runinquire    "\n\nWould you like to use the SCSI Inquire utility to locate your CD-ROM drive?")
(set #th_runinquire        (cat "\n\nThe SCSI Inquire utility will scan your system for suitable SCSI "
                    "or ATAPI devices and display a listing of all units connected to the device.  "
                    "Your CD-ROM drive must be powered-on and correctly connected "
                    "for it to be acknowledged by this utility.  Consult the SCSI Inquire "
                    "chapter for more information.")
)


(set #tp_devicename        "\n\nWhat is the name of your SCSI or ATAPI device?")
(set #th_devicename            (cat "\n\nThis is the name of the device driver for your particular "
                    "SCSI card.  For example, the Commodore 2091/590/Amiga3000 has "
                    "a name of \"scsi.device\" while our ATAPI driver has a name of \"asim_ide.device\".\n\n"
                    "If you successfully ran the SCSI Inquire utility, this question will default to the correct unit number. "
                    "Otherwise, consult either the AsimCDFS User's Guide or contact the controller card manufacturer.")
)

(set #tp_unitnumber        "\n\nWhat is the unit number of your CD-ROM drive?")
(set #th_unitnumber            (cat "\n\nThis is the unit # of the CD-ROM drive.  This is usually a "
                    "numerical value between 0j and 6 for SCSI units and between 0 and 1 for ATAPI units.\n\n"
                    "If you successfully ran the SCSI Inquire utility, this question will default to the correct unit number.  "
                    "Otherwise, consult the CD-ROM drive documentation for instructions on "
                    "determining the unit #.")
)

(set #tp_automount        "\n\nWould you like the CD-ROM drive automatically mounted upon bootup?")
(set #th_automount        "\n\nIf you would like, the appropriate commands will be added to your user-startup file to automatically mount AsimCDFS.\n")


(set #tp_tunesdir        "Specify the directory in which the AsimCDFS support programs will be placed:")
(set #th_tunesdir    "AsimCDFS contains a number of support programs.  This directory will specifiy where the programs will be placed.  If you need, create a separate directory for the files.")



(set #tp_creatingdir        "Creating the AsimCDFS: directory...")
(set #th_creatingdir "This will create the specified directory for the support programs.")

(set #tp_bufferdir    "Specify the directory which can be used for buffering AsimCDFS files:")
(set #th_bufferdir        (cat "AsimCDFS will require a directory in which it will buffer "
                "various files, including PhotoCD thumbnail icons, snapshot icon files "
                "and audio library files.  As the number of files in this directory "
                "may grow as your CD-ROM collection expands, it is "
                "advisable to put this directory on a large hard drive partition.")
)

(set #tp_createbuffer        "Creating the AsimCDFS_Buffer: directory...")
(set #th_createbuffer        "This will create the specified directory for the buffered files.")

(set #tp_createsub1        "Creating the ")
(set #tp_createsub2        " directory...")
(set #th_createsub            "This will create the specified directory for the buffered files.")

(set #tp_copycorel        "\n\nCopying Corel_Directory index file to the AsimCDFS_Buffer: directory.\n")
(set #th_copycorel            "\n\nThis will copy an index file containing proper disc names for the Corel ProPhoto library (Volumes 1 and 2).")


(set #tp_copyviewtek    "\n\nCopying the public domain program ViewTek by Thomas Krehbiel to your C: directory.")
(set #th_copyviewtek    (cat "\n\nThis will copy over the public domain viewing "
            "program ViewTek to your C: directory where it will be "
            "automatically used when you double-click on PhotoCD and "
            "Corel ProPhoto thumbnail icons.")
)

(set #tp_deletephoto        "\n\Deleting obsolete AsimPhoto.\n")
(set #th_deletephoto        (cat "\n\nThis will delete the old AsimPhoto program, which is "
            "no longer required for AsimCDFS v3.x\n")
)


(set #tp_deleteprefs        "\n\Deleting obsolete preferences files.\n")
(set #th_deleteprefs        (cat "\n\nThis will delete the old preferences files which are "
            "no longer required for AsimCDFS v3.x\n")
)


(set #tp_copyasimcdfs    "\n\nCopying AsimCDFS FileSystem to the l: directory.\n")
(set #th_copyasimcdfs        (cat"\n\nThis will copy over the AsimCDFS FileSystem program to your "
        "l: directory\n\nThis is an essential step in the installation "
        "process.\n")
)


(set #tp_copycdfsdevice    "\n\nCopying asimcdfs.device to the devs: directory.\n")
(set #th_copycdfsdevice    (cat "\n\nThis will copy over the asimcdfs.device program to your "
        "devs: directory\n\nThis is an essential step in the installation "
        "process.\n")
)

(set #text_abort_atapiwb    (cat "\n\nAmigaDOS 3.0 or higher is required for the asim_atapi.device.  "
             "\n\nIf you are currently using an Amiga 1200 or Amiga 4000, check "
             "your libs:version.library file.\n\n"
             "\n\nYour libs:version.library file currently reports version ")
)

(set #tp_insertmount        "Inserting MOUNT commands into the startup-sequence")
(set #th_insertmount1        "\n\nThe command \"MOUNT ")
(set #th_insertmount2        (cat " FROM DEVS:MOUNTLIST.xxx\" is being inserted into your "
                        "\"S:Startup-Sequence\" or \"S:User-Startup\" file to "
                        "automatically start AsimCDFS upon bootup.")
)

(set #tp_copymounticon    "\n\nCopying Mountlist icon")
(set #th_copymounticon "\n\nThis will copy over an icon for the mountlist file.")


(set #tp_insertassign        "Inserting Assign command into the startup-sequence")
(set #th_insertassign            "\n\nThe command assign AsimCDFS: and assign AsimCDFS_Buffer are being entered into your s:user-startup file.")

(set #tp_deletemountlist    "\n\Deleting obsolete MountList file from DEVS:DosDrivers/\n")
(set #th_deletemountlist        (cat "\n\nThis will delete the obsolete MountList file from the DEVS:DosDrivers/ directory.  "
                    "MountList files for AsimCDFS v3.x are now put into the SYS:Storage/DOSDrivers directory.\n")
)

(set #tp_copyprefs        "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n")
(set #th_copyprefs            "\n\nThis will copy over a default preferences file.")


(set #tp_copytunes        "\n\nShould the AsimTunes utility be installed?")
(set #th_copytunes            (cat "\n\nThis will copy over the AsimTunes utility "
                "to your AsimCDFS: directory\n\nIf you do not "
                "wish the AsimTunes program to be transferred to your system, "
                "skip this step.\n")
)
(set #tp_copyingtunes        "\n\nCopying AsimTunes audio CD controller program to the AsimCDFS: directory.\n")
(set #tp_copytunesfont        "\n\nCopying AsimTunes fonts to the FONTS: directory\n")
(set #th_copytunesfont            (cat "\n\nThis will copy over the fonts needed for AsimTunes.\n\n"
                "They will be placed into your fonts: directory.\n\n")
)


(set #tp_copydc        "\n\nShould the DiscChanger utility be installed?")
(set #th_copydc            (cat "\n\nThis will copy over the DiscChanger utility "
                "to your AsimCDFS: directory\n\nIf you do not "
                "wish the DiscChanger program to be transferred to your system, "
                "skip this step.\n")
)
(set #tp_copyingdc        "\n\nCopying the DiscChanger utility to the AsimCDFS: directory.\n")

(set #tp_copypd            "\n\nShould the PD_Format utility be installed?")
(set #th_copypd                (cat "\n\nThis will copy over the PD_Format utility "
                    "to your AsimCDFS: directory\n\nIf you do not "
                    "wish the PD_Format program to be transferred to your system, "
                    "skip this step.\n")
)
(set #tp_copyingdc        "\n\nCopying the PD_Format utility to the AsimCDFS: directory.\n")

(set #tp_copyasimprefs        "\n\nShould the AsimCDFS_Prefs utility be installed?")
(set #th_copyasimprefs            (cat "\n\nThis will copy over the AsimCDFS_Prefs utility "
                "to your AsimCDFS: directory\n\nIf you do not "
                "wish the AsimCDFS_Prefs program to be transferred to your system, "
                "skip this step.\n")
)
(set #tp_copyingasimprefs        "\n\nCopying the AsimCDFS_Prefs utility to the AsimCDFS: directory.\n")


(set #tp_copysimboot        "\n\nShould the SimBoot utility be installed?")
(set #th_copysimboot        (cat "\n\nThis will copy over the SimBoot utility "
                "to your AsimCDFS: directory\n\nIf you do not "
                "wish the SimBoot program to be transferred to your system, "
                "skip this step.\n")
)
(set #th_copyingsimboot        "\n\nCopying the SimBoot utility to the AsimCDFS: directory.\n")

(set #tp_copycd32prefs        "\n\nShould the CD³²_Prefs utility be installed?")
(set #th_copycd32prefs            (cat "\n\nThis will copy over the CD³²_Prefs utility "
                "to your AsimCDFS: directory\n\nIf you do not "
                "wish the CD³²_Prefs program to be transferred to your system, "
                "skip this step.\n")
)

(set #tp_copyingcd32prefs        "\n\nCopying the CD³²_Prefs utility to the AsimCDFS: directory.\n")

(set #tp_copycdtvprefs        "\n\nShould the CDTV_Prefs utility be installed?")
(set #th_copycdtvprefs            (cat "\n\nThis will copy over the CDTV_Prefs utility "
                "to your AsimCDFS: directory\n\nIf you do not "
                "wish the CDTV_Prefs program to be transferred to your system, "
                "skip this step.\n")
)

(set #tp_copyingcdtvprefs        "\n\nCopying the CDTV_Prefs utility to the AsimCDFS: directory.\n")

(set #tp_copycdtvemul        "\n\nShould the CDTV emulation option be installed?")
(set #th_copycdtvemul            (cat "\n\nThis will copy over the required files for the "
                "CDTV emulation:\n   devs:cdtv.device\n   devs:bookmark.device\n   devs:cardmark.device\n   libs:playerprefs.library\n\nIf you do not "
                "wish the CDTV emulation option to be transferred to your system, "
                "skip this step.\n")
)
(set #tp_copycdtvdevice        "\n\nCopying cdtv.device to the devs: directory.\n")
(set #tp_copybookmark        "\n\nCopying bookmark.device to the devs: directory.\n")
(set #tp_copycardmark        "\n\nCopying cardmark.device to the devs: directory.\n")
(set #tp_copyplayerprefs    "\n\nCopying playerprefs.library to the libs: directory.\n")


(set #tp_copycd32emul    "\n\nShould the CD³² emulation option be installed?")
(set #th_copycd32emul        (cat "\n\nThis will copy over the required files for the "
                "CD³² emulation:\n   devs:cd.device\n   libs:nonvolatile.library\n   libs:lowlevel.library\n\nIf you do not "
                "wish the CD³² emulation option to be transferred to your system, "
                "skip this step.\n")
)
(set #tp_copycddevice    "\n\nCopying cd.device to the devs: directory.\n")
(set #tp_copynv        "\n\nCopying nonvolatile.library to the libs: directory.\n")
(set #tp_copylowlevel    "\n\nCopying lowlevel.library to the libs: directory.\n")

(set #tp_makeenvarc        "Making the ENVARC:AsimCDFS directory, in which various default files will be placed.")
(set #th_makeenvarc            "This will create a directory in your ENVARC: directory")

(set #tp_makeenv        "Making the ENV:AsimCDFS directory, in which various default files will be placed.")
(set #th_makeenv            "This will create a directory in your ENV: directory")
(set #tp_copyicons    "\n\nCopying default icons to the ENVARC: and ENV:AsimCDFS directory.\n")
(set #th_copyicons        "\n\nThis will copy over default icon files to the ENVArc: and ENV:AsimCDFS directory.")

(set #tp_catalogs        "Which alternate language catalogs would you like installed?")
(set #th_catalogs        (cat "The various programs have been configured to the following "
                    "alternate languages:\n    Français, Italiano and Deutsch\n\nSelect which"
                    "languages you would like to use with our software.  English "
                    "language support is automatically provided as standard within the software.")
)
(set #tp_copylocale1        "\n\nCopying locale ")
(set #tp_copylocale2        " language catalogs.\n")
(set #th_copylocale    "\n\nThis will copy over the desired langauge file.")

(set #text_message_flyer        (cat "NewTek Flyer users\n"
       "------------------\n"
        "Your CD-ROM drive will not be automatically started upon bootup.\n\n"
        "To manually start your CD-ROM drive, you must double-click on the "
        "CD6 icon located in the Storage/DOSDrivers directory on your "
        "Workbench partition.\n\n"
        "You may wish to leave out the CD6 icon on your Workbench screen "
        "using the \"Leave Out\" menu item in Workbench."  )
)


(set #text_message_extendedicons    (cat "NewIcons and MagicWB users\n"
    "--------------------------------\n"
    "NewIcons and MagicWB icons are now available for "
    "the utilities in AsimCDFS.  Due to space limitations, however, we "
    "are unable to include these on the install disk.\n\n"
    "This set of extended icons may be found on our WWW site at "
    "http://www.asimware.com, on our BBS or on the Aminet archive." )
)


))







;*****
; set German language strings
(if (= #our_language #Deutsch) (
(set #echotxt "echo \"AsimCDFS wird angemeldet...\"\n")

(set #text_please_use_novice (cat "Anmerkung zur Installation\n"
               "--------------------------\n\n"
                         "Wir haben Probleme mit dem Installer bemerkt, "
                         "wenn die Modi 'geübter Benutzer' oder 'Experte' "
                         "benutzt werden. Es wird dringend empfohlen, nur "
                         "im Modus 'Einsteiger' zu installieren.\n"
        ) )

(set #text_needwb_2 (cat "\n\nAsimCDFS 3.x benötigt AmigaDOS 2.0 oder höher. "
                         "\n\nSie müssen Ihr Betriebssystem aktualisieren."
                         "\n\nMomentan benutzen Sie Version " #wbversion "."
))


(set #tp_insert_disk "Bitte legen Sie die Diskette \"AsimCDFS_v3_Install\" ein.")
(set #th_insert_disk (cat "AsimCDFS und andere Hilfsprogramme werden von dieser "
                        "Diskette auf Ihr System kopiert.")
)


(set #text_abort1    "\n\nEs werden ungefähr " )
(set #text_abort2    "KB freier Platz auf Ihrer Bootpartition benötigt.\n\nSie haben nur ")
(set #text_abort3    "KB frei.\n\nLöschen oder verschieben Sie Dateien von Ihrer Bootpartition und versuchen Sie es erneut.")

(set #tp_isamiga    "\nAsimCDFS v3.8 Installation\n---------------------------\n\Bitte geben Sie Ihre Konfiguration an:")
(set #th_isamiga    (cat    "\n\nWenn AsimCDFS zusammen mit einem CDTV/A570 benutzt wird, dann "
                                "geben Sie bitte CDTV/A570 an.\n\n"
                                "Wenn AsimCDFS mit einem CD³² benutzt wird, dann wählen Sie bitte CD³² aus.\n\n"
                                "Andernfalls wird AsimCDFS für einen Amiga mit SCSI- oder ATAPI-Controller "
                                "mit einem passenden CD-ROM-Laufwerk installiert.")
)
(set #tc_isamiga_1    "Amiga mit SCSI CD-ROM-Laufwerk")
(set #tc_isamiga_2    "CDTV/A570")
(set #tc_isamiga_3    "CD³²")
(set #tc_isamiga_4    "ATAPI CD-ROM-Laufwerk am A4000/A1200")
(set #tc_isamiga_5    "NewTek Flyer mit CD-ROM (Unit 6) an SCSI")


(set #tp_ispioneer    "\n\n\nIst Ihr Laufwerk ein Pioneer DRM-60x?")
(set #th_ispioneer    (cat "\n\nFalls Sie AsimCDFS mit einem Pioneer DRM-60x benutzen wollen, "
                                        "treffen Sie bitte die entsprechende Auswahl. Dieses Laufwerk "
                                        "ist ein Hochleistungs-Diskwechsler für 6 CDs und ist nicht "
                                        "sehr verbreitet."
                                        "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")
)

(set #tc_othercdrom    "anderes CD-ROM-Laufwerk")

(set #tp_isnakamichi    "\n\n\nIst Ihr Laufwerk ein Nakamichi MBR-7,\nein NEC 4xc oder ein NEC 2cx Diskwechsler?"    )
(set #th_isnakamichi (cat "\n\nFalls Sie AsimCDFS mit einem Nakamichi MBR-7, einem NEC 4xc oder einem NEC 2xc Diskwechsler benutzen wollen, "
                                        "treffen Sie bitte die entsprechende Wahl. Dieses Laufwerk ist ein"
                                        "Hochleistungs-Diskwechsler für 7 CDs und ist nicht sehr verbreitet."
                                        "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")
)

(set #tp_isnakamichi4disc    "\n\n\nIst Ihr Laufwerk ein Nakamichi MJ-4 Diskwechsler?"    )
(set #th_isnakamichi4disc (cat "\n\nFalls Sie AsimCDFS mit einem Nakamichi MJ-4 Diskwechsler benutzen wollen, "
                                        "treffen Sie bitte die entsprechende Wahl. Dieses Laufwerk ist ein"
                                        "Hochleistungs-Diskwechsler für 4 CDs und ist nicht sehr verbreitet."
                                        "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")
)

(set #tp_ispd        "\n\n\nIst Ihr Laufwerk ein Panasonic LF-1000 PD/CD-ROM-Laufwerk?\n(Kombination aus optischem und CD-ROM-Laufwerk)"    )
(set #th_ispd     (cat "\n\nFalls Sie AsimCDFS mit einem Panasonic PD/CD-ROM-Laufwerk betreiben, "
                                        "treffen Sie bitte die entsprechende Wahl. Dieses Laufwerk ist eine Kombination aus einem "
                                        "optischen Laufwerk (mit Schreib- und Lesezugriff) und einem CD-ROM-Laufwerk.\n"
                                        "Dieses Gerät wird außerdem von Dritten angeboten unter Namen wie Smart & Friendly und Toray.\n\n"
                                        "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")
)

(set #text_lf1000_users    (cat "Anmerkung zum Panasonic LF-1000 PD/CD-ROM-Laufwerk\n"
                      "--------------------------------------------------\n"
                "Bitte stellen Sie sicher, daß Ihr Laufwerk sich im "
                "\"Two LUN Mode\" befindet. Dies wird mittels Steckbrücken "
                "an der Rückseite des Laufwerks eingestellt. Näheres "
                "finden Sie in der Dokumentation, die dem Laufwerk beiliegt.\n\n"
                "Bitte stellen Sie außerdem sicher, daß Ihr SCSI-Controller "
                "die Erkennung von LUNs unterstützt."
                )
)

(set #tp_is4x4    "\n\n\nIst Ihr Laufwerk ein NEC4x4 ATAPI Diskwechsler?\n"    )
(set #th_is4x4    (cat "\n\nFalls Sie AsimCDFS mit einem NEC 4x4 ATAPI Diskwechsler benutzen, treffen Sie bitte "
                                        "die entsprechende Auswahl.\n\n"
                                        "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")
)


(set #tp_separatepool    "\n\nMöchten Sie getrennte Geräte anmelden oder alle CD-ROMs als EIN Gerät behandeln?\n\n")
(set #th_separatepool    (cat "\n\nFalls Sie Zugriff auf alle CD-ROMs gleichzeitig wünschen, wählen "
                                                "Sie bitte 'getrennt', andernfalls 'zusammen' - bei letzterem "
                                                "können Sie mit dem DiscChanger zwischen den CD-ROMs wechseln.")
)
(set #tc_separate    "getrennt")
(set #tc_pooled    "zusammen")

(set #text_ourhelp_pioneer        (cat "\n\nDies ist der Basisname, unter dem AmigaDOS die einzelnen CD-ROMs "
                                                                "anspricht. Da Sie AsimCDFS für einen Pioneer 6-fach-Wechsler installieren, "
                                                                "werden 6 Geräte von <Basisname>0 bis <Basisname>5 angemeldet (CD0, CD1, ..., CD5). "
                                                                "\n\nEs darf kein abschließender Doppelpunkt oder die 0 bis 5 vorhanden sein.")
)

(set #text_ourhelp_nakamichi    (cat "\n\nDies ist der Basisname, unter dem AmigaDOS die einzelnen CD-ROMs "
                                                                "anspricht. Da Sie AsimCDFS für einen Nakamichi 7-fach-Wechsler installieren, "
                                                                "werden 7 Geräte von <Basisname>0 bis <Basisname>6 angemeldet (CD0, CD1, ..., CD6). "
                                                                "\n\nEs darf kein abschließender Doppelpunkt oder die 0 bis 6 vorhanden sein.")
)

(set #text_ourhelp_4x4        (cat "\n\nDies ist der Basisname, unter dem AmigaDOS die einzelnen CD-ROMs "
                                                                "anspricht. Da Sie AsimCDFS für einen NEC 4x4 4-fach-Wechsler installieren, "
                                                                "werden 7 Geräte von <Basisname>0 bis <Basisname>3 angemeldet (CD0, CD1, CD2 und CD3). "
                                                                 "\n\nEs darf kein abschließender Doppelpunkt oder die 0 bis 3 vorhanden sein.")
)

(set #tp_basedevice    "\n\nWelchen Basisnamen soll das AmigaDOS-Gerät erhalten?\n\n(Es darf kein abschließender Doppelpunkt vorhanden sein.)")

(set #tp_cddevice    "\n\nWelchen Namen soll das AmigaDOS-Gerät erhalten?\n\n(Es darf kein abschließender Doppelpunkt vorhanden sein.)")
(set #th_cddevice    (cat "\n\nUnter diesem Namen wird AmigaDOS das CD-ROM-Laufwerk ansprechen. "
                                        "Gebräuchlich ist CD0, Sie können aber auch einen beliebigen anderen Namen wählen. "
                                        "\n\nEs darf kein abschließender Doppelpunkt vorhanden sein.")
)

(set #tp_copyasimatapi    "\n\nDatei 'asim_atapi.device' kopieren\n")
(set #th_copyasimatapi    "\n\nDer ATAPI CD-ROM-Treiber asim_atapi.device wird in das Verzeichnis DEVS: kopiert.\n")

(set #tp_runinquire    "\n\nMöchten Sie das Hilfsprogramm SCSI Inquire benutzen, um Ihr CD-ROM-Laufwerk zu finden?")
(set #th_runinquire    (cat "\n\nDas Hilfsprogramm SCSI Inquire sucht Ihr System nach passenden "
                                        "SCSI- oder ATAPI-Controllern ab und zeigt eine Liste aller angeschlossenen Geräte. "
                                        "Ihr CD-ROM-Laufwerk muß korrekt angeschlossen und eingeschaltet sein, sonst "
                                        "kann es vom Programm nicht erkannt werden.")
)


(set #tp_devicename    "\n\nWie heißt Ihr SCSI- oder ATAPI-Treiber?"    )
(set #th_devicename    (cat "\n\nBitte geben Sie den Namen des Treibers Ihres SCSI-Controllers "
                                        "ein. Die Geräte A2091/A590 und der Amiga 3000 z.B. benutzen "
                                        "\"scsi.device\", unser ATAPI-Treiber heißt \"asim_atapi.device\".\n\n"
                                        "Wenn Sie das Hilfsprogramm SCSI Inquire richtig benutzt haben, dann steht im Eingabefeld bereits "
                                        "der korrekte Name. Andernfalls ziehen Sie bitte die beigefügte Dokumentation zu Rate.")
)

(set #tp_unitnumber    "\n\nUnter welcher Gerätenummer wird Ihr Laufwerk angesprochen?"    )
(set #th_unitnumber    (cat "\n\nBitte geben Sie die Gerätenummer Ihres CD-ROM-Laufwerks an. "
                                        "Dies ist in der Regel eine Nummer zwischen 0 und 6 bei SCSI und zwischen 0 und 1 "
                                        "bei ATAPI-Geräten.\n\n"
                                        "Wenn Sie das Hilfsprogramm SCSI Inquire richtig benutzt haben, dann steht im Eingabefeld bereits "
                                        "die korrekte Gerätenummer. Andernfalls ziehen Sie bitte die beigefügte Dokumentation zu Rate.")
)

(set #tp_automount    "\n\nSoll das CD-ROM-Laufwerk beim Hochfahren automatisch angemeldet werden?"    )
(set #th_automount    "\n\nWenn Sie es wünschen, werden die benötigten Befehle in der Datei User-Startup eingebunden, um AsimCDFS automatisch anzumelden.\n"    )


(set #tp_tunesdir    "Bitte geben Sie an, in welches Verzeichnis die Hilfsprogramme von AsimCDFS kopiert werden sollen:"    )
(set #th_tunesdir    "AsimCDFS beinhaltet zahlreiche Hilfsprogramme. Hier legen Sie fest, in welches Verzeichnis sie kopiert werden. Falls nötig, erstellen Sie bitte ein eigenes Verzeichnis.")



(set #tp_creatingdir    "Das Verzeichnis AsimCDFS: wird angelegt..."    )
(set #th_creatingdir "Es wird das angegebene Verzeichnis für die Hilfsprogramme angelegt.")

(set #tp_bufferdir    "Bitte geben Sie das Verzeichnis für die AsimCDFS-Puffer an:")
(set #th_bufferdir    (cat "AsimCDFS benötigt ein Verzeichnis, in dem verschiedene Dateien "
                                "gepuffert werden können. Dazu gehören Thumbnail-Piktogramme für "
                                "PhotoCDs, fixierte Piktogramme und Audio-Kataloge. Da die Anzahl der "
                                "Dateien in diesem Verzeichnis mit Ihrer CD-ROM-Sammlung wächst, wird "
                                "empfohlen, es möglichst auf einer Partition mit viel Platz einzurichten.")
)

(set #tp_createbuffer    "Das Pufferverzeichnis für AsimCDFS wird eingerichtet..."    )
(set #th_createbuffer    "Das angegebene Verzeichnis für die Pufferung von Daten wird angelegt."    )

(set #tp_createsub1    "Das Verzeichnis "    )
(set #tp_createsub2    " wird angelegt..."    )
(set #th_createsub        "Das angegebene Verzeichnis für die Pufferung von Daten wird angelegt."    )

(set #tp_copycorel    (cat "\n\nDie Indexdatei Corel_Directory wird in das "
                             "AsimCDFS-Pufferverzeichnis (AsimCDFS_Buffer:) kopiert.\n")    )
(set #th_copycorel    (cat "\n\nEine Indexdatei mit passenden Disknamen für die Corel ProPhoto "
                             "Library (Vol. 1 und 2) wird kopiert.")        )


(set #tp_copyviewtek    (cat "\n\nDas frei vertreibbare Programm ViewTek "
                        "von Thomas Krehbiel wird ins Verzeichnis C: kopiert.")
)
(set #th_copyviewtek    (cat "\n\nDas frei vertreibbare Bildanzeigeprogramm ViewTek "
                        "wird in Ihr Verzeichnis C: kopiert. Dort wird es automatisch "
                        "aufgerufen, wenn Sie auf Thumbnail-Piktogramme von PhotoCDs "
                        "oder Corel ProPhoto-CDs klicken.")
)

(set #tp_deletephoto    "\n\Das überflüssige Programm AsimPhoto wird gelöscht.\n"    )
(set #th_deletephoto        (cat "\n\nDas alte AsimPhoto-Programm wird von AsimCDFS 3.x "
                        "nicht mehr benötigt und kann gelöscht werden.\n")
)


(set #tp_deleteprefs        "\n\Überflüssige Voreinstellungen für AsimCDFS werden gelöscht.\n")
(set #th_deleteprefs        (cat "\n\nDie alte Voreinstellungsdatei für AsimCDFS wird von "
                        "AsimCDFS 3.x nicht mehr benötigt und kann gelöscht werden.\n")
)


(set #tp_copyasimcdfs    "\n\nDas AsimCDFS Filesystem wird ins Verzeichnis L: kopiert.\n")
(set #th_copyasimcdfs        (cat "\n\nDas AsimCDFS Filesystem wird in Ihr Verzeichnis L: kopiert.\n\n"
                "Dies ist ein wesentlicher Schritt bei der Installation und sollte "
                "keinesfalls ausgelassen werden.\n")
)


(set #tp_copycdfsdevice    "\n\nDie Datei asimcdfs.device wird ins Verzeichnis DEVS: kopiert.\n")
(set #th_copycdfsdevice    (cat "\n\nDie Datei asimcdfs.device wird in Ihr Verzeichnis DEVS: kopiert.\n\n"
                "Dies ist ein wesentlicher Schritt bei der Installation und sollte "
                "keinesfalls ausgelassen werden.\n")
)

(set #text_abort_atapiwb    (cat "\n\nFür das asim_atapi.device wird AmigaDOS 3.0 oder höher benötigt. "
                         "\n\nFalls Sie einen Amiga 1200 oder Amiga 4000 benutzen, überprüfen "
                         "Sie bitte die Datei LIBS:version.library.\n\n"
                         "\n\nMomentan liegt LIBS:version.library in der Version " #wbversion " vor.")
)

(set #tp_insertmount        "Der MOUNT-Befehl wird in die Startup-Sequence eingefügt...")
(set #th_insertmount1    "\n\nDer Befehl \"MOUNT "    )
(set #th_insertmount2        (cat " FROM DEVS:MOUNTLIST.xxx\" wird in die "
                                                "\"S:Startup-Sequence\" oder \"S:User-Startup\" eingefügt, "
                                                "um AsimCDFS beim Hochfahren automatisch zu starten.")
)

(set #tp_copymounticon    "\n\nDas Piktogramm für die Mountlist wird kopiert")
(set #th_copymounticon "\n\nDas Piktogramm für die Mountlist-Datei wird kopiert.")


(set #tp_insertassign        "Zuweisungen werden in die User-Startup eingefügt")
(set #th_insertassign        "\n\nDie Befehle ASSIGN AsimCDFS: und ASSIGN AsimCDFS_Buffer werden in die Datei S:User-Startup eingefügt."    )

(set #tp_deletemountlist    "\n\Die überflüssige Mountlist in DEVS:DOSDrivers/ wird gelöscht\n")
(set #th_deletemountlist    (cat "\n\nDie überflüssige Mountlist in DEVS:DOSDrivers/ wird gelöscht. Die Mountlists "
                                        "für AsimCDFS 3.x werden nun in SYS:Storage/DOSDrivers/ abgelegt.\n")
)

(set #tp_copyprefs    "\n\nStandardeinstellungen werden ins Verzeichnis ENVARC:AsimCDFS kopiert.\n"    )
(set #th_copyprefs     "\n\nEine Standard-Voreinstellungsdatei wird kopiert."        )


(set #tp_copytunes        "\n\nSoll das Hilfsprogramm AsimTunes installiert werden?")
(set #th_copytunes        (cat "\n\nHiermit wird das Hilfsprogramm AsimTunes "
                                "in das Verzeichnis AsimCDFS: kopiert.\n\n"
                                "Falls Sie AsimTunes nicht installieren möchten, "
                                "überspringen Sie diesen Schritt.\n")
)
(set #tp_copyingtunes    (cat "\n\nDas CD-Audio-Programm AsimTunes wird in das Verzeichnis "
                                  "AsimCDFS: kopiert.\n")    )
(set #tp_copytunesfont    "\n\nDie Zeichensätze für AsimTunes werden nach FONTS: kopiert\n"    )
(set #th_copytunesfont            (cat "\n\nHiermit werden die von AsimTunes benötigten Zeichensätzte kopiert.\n\n"
                                "Sie werden in das Verzeichnis FONTS: übertragen.\n\n")
)


(set #tp_copydc    "\n\nSoll das Hilfsprogramm DiscChanger installiert werden?"    )
(set #th_copydc    (cat "\n\nHiermit wird das Hilfsprogramm DiskChanger "
                                "in das Verzeichnis AsimCDFS: kopiert.\n\n"
                                "Falls Sie DiscChanger nicht installieren möchten, "
                                "überspringen Sie diesen Schritt.\n")
)
(set #tp_copyingdc    "\n\nDas Hilfsprogramm DiscChanger wird ins Verzeichnis AsimCDFS: kopiert.\n" )

(set #tp_copypd        "\n\nSoll das Hilfsprogramm PD_Format installiert werden?"    )
(set #th_copypd        (cat "\n\nHiermit wird das Hilfsprogramm PD-Format "
                                        "in das Verzeichnis AsimCDFS: kopiert.\n\n"
                                        "Falls Sie PD_Format nicht installieren möchten, "
                                        "überspringen Sie diesen Schritt.\n")
)
(set #tp_copyingdc    "\n\nDas Hilfsprogramm PD-Format wird ins Verzeichnis AsimCDFS: kopiert.\n"    )

(set #tp_copyasimprefs    "\n\nSoll das Voreinstellerprogramm AsimCDFS_Prefs installiert werden?"    )
(set #th_copyasimprefs    (cat "\n\nHiermit wird das Voreinstellerprogramm AsimCDFS_Prefs "
                                "ins Verzeichnis AsimCDFS: kopiert.\n\n"
                                "Falls Sie AsimCDFS_Prefs nicht installieren möchten, "
                                "überspringen Sie diesen Schritt.\n")
)
(set #tp_copyingasimprefs    "\n\nDas Voreinstellerprogramm AsimCDFS_Prefs wird ins Verzeichnis AsimCDFS: kopiert.\n"    )


(set #tp_copysimboot    "\n\nSoll das Hilfsprogramm SimBoot installiert werden?"    )
(set #th_copysimboot    (cat "\n\nHiermit wird das Hilfsprogramm SimBoot "
                                "ins Verzeichnis AsimCDFS: kopiert.\n\n"
                                "Falls Sie SimBoot nicht installieren möchten, "
                                "überspringen Sie diesen Schritt.\n")
)
(set #th_copyingsimboot    "\n\nDas Hilfsprogramm SimBoot wird ins Verzeichnis AsimCDFS: kopiert.\n"    )

(set #tp_copycd32prefs    "\n\nSoll das Voreinstellungsprogramm CD³²_Prefs installiert werden?"    )
(set #th_copycd32prefs    (cat "\n\nHiermit wird das Voreinstellungsprogramm "
                                "CD³²_Prefs ins Verzeichnis AsimCDFS: kopiert.\n\n"
                                "Falls Sie CD³²_Prefs nicht installieren möchten, "
                                "überspringen Sie diesen Schritt\n")
)

(set #tp_copyingcd32prefs    "\n\nDas Voreinstellungsprogramm CD³²_Prefs wird ins Verzeichnis AsimCDFS: kopiert.\n"    )

(set #tp_copycdtvprefs    "\n\nSoll das Voreinstellerprogramm CDTV_Prefs installiert werden?"    )
(set #th_copycdtvprefs    (cat "\n\nHiermit wird das Voreinstellerprogramm "
                                "CDTV_Prefs ins Verzeichnis AsimCDFS: kopiert.\n\n"
                                "Falls Sie CDTV_Prefs nicht installieren möchten, "
                                "überspringen Sie diesen Schritt.\n")
)

(set #tp_copyingcdtvprefs    "\n\nDas Voreinstellerprogramm CDTV_Prefs wird ins Verzeichnis AsimCDFS: kopiert.\n"    )

(set #tp_copycdtvemul    "\n\nSoll die CDTV-Emulation installiert werden?"    )
(set #th_copycdtvemul    (cat "\n\nHiermit werden die benötigten Dateien für "
                                "die CDTV-Emulation kopiert:\n   DEVS:cdtv.device\n   DEVS:bookmark.device\n   DEVS:cardmark.device\n   LIBS:playerprefs.library\n\n"
                                "Falls Sie die CDTV-Emulation nicht installieren möchten, "
                                "überspringen Sie diesen Schritt.\n")
)
(set #tp_copycdtvdevice    "\n\nDatei cdtv.device wird ins Verzeichnis DEVS: kopiert.\n"    )
(set #tp_copybookmark    "\n\nDatei bookmark.device wird ins Verzeichnis DEVS: kopiert.\n"    )
(set #tp_copycardmark    "\n\nDatei cardmark.device wird ins Verzeichnis DEVS: kopiert.\n"    )
(set #tp_copyplayerprefs    "\n\nDatei playerprefs.library wird ins Verzeichnis LIBS: kopiert.\n")


(set #tp_copycd32emul    "\n\nSoll die CD³²-Emulation installiert werden?")
(set #th_copycd32emul    (cat "\n\nHiermit werden die benötigten Dateien für die "
                                "CD³²-Emulation kopiert:\n   DEVS:cd.device\n   LIBS:nonvolatile.library\n   LIBS:lowlevel.library\n\n"
                                "Falls Sie die CD³²-Emulation nicht installieren möchten, "
                                "überspringen Sie diesen Schritt.\n")
)
(set #tp_copycddevice  "\n\nDatei cd.device wird ins Verzeichnis DEVS: kopiert.\n"    )
(set #tp_copynv    "\n\nDatei nonvolatile.library wird ins Verzeichnis LIBS: kopiert.\n"    )
(set #tp_copylowlevel    "\n\nDatei lowlevel.library wird ins Verzeichnis LIBS: kopiert.\n")

(set #tp_makeenvarc    "Verzeichnis ENVARC:AsimCDFS für die Standardeinstellungen wird erstellt."    )
(set #th_makeenvarc    "Hiermit wird ein Unterverzeichnis im Verzeichnis ENVARC: angelegt."        )

(set #tp_makeenv    "Verzeichnos ENV:AsimCDFS für die Einstellungen wird erstellt."    )
(set #th_makeenv    "Hiermit wird ein Unterverzeichnis im Verzeichnis ENV: angelegt."        )
(set #tp_copyicons    "\n\nStandardpiktogramme werden ins Verzeichnis ENVARC:AsimCDFS kopiert.\n")
(set #th_copyicons    "\n\nHiermit werden Standardpiktogramme ins Verzeichnis ENVARC/ENV:AsimCDFS kopiert."    )

(set #tp_catalogs    "Welche Sprachen sollen installiert werden?"    )
(set #th_catalogs        (cat "Die verschiedenen Programme wurden in folgende Sprachen "
                                        "übersetzt:\n\n   Französisch, Italienisch und Deutsch\n\n"
                                        "Wählen Sie bitte, welche Sprachen Sie benutzen wollen. "
                                        "Englisch wird automatisch als Standard von der Software benutzt.")
)
(set #tp_copylocale1    "\n\nSprachkataloge "    )
(set #tp_copylocale2    " werden kopiert.\n"    )
(set #th_copylocale    "\n\nHiermit wird die gewünschte Sprache installiert.")

(set #text_message_flyer    (cat "Benutzer des NewTek Flyers\n"
        "--------------------------\n"
                "Ihr CD-ROM-Laufwerk wird nicht automatisch beim Hochfahren angemeldet.\n\n"
                "Um das Gerät von Hand anzumelden, klicken Sie bitte das Piktogramm CD6 "
                "im Verzeichnis Storage/DOSDrivers auf Ihrer Bootpartition "
                "doppelt an.\n\n"
                "Sie sollten das CD6-Piktogramm eventuell auf Ihrer Workbench auslagern "
                "(mit dem Eintrag \"Auslagern\" im Menü)." )    )


(set #text_message_extendedicons    (cat "Benutzer von NewIcons und MagicWB\n"
        "---------------------------------\n"
        "Für die AsimCDFS-Hilfsprogramme sind jetzt auch NewIcons- und "
        "MagicWB-Piktogramme erhältlich. Leider ist es wegen des "
        "beschränkten Platzes nicht möglich, diese Piktogramme auf "
        "der Installationsdiskette unterzubringen.\n\n"
        "Die Piktogramme können Sie aber auf unserer WWW-Seite "
        "http://www.asimware.com, in unserer Mailbox oder im Aminet finden." ))
))










(complete 0)


;*****
;  Please!  Use Novice!
(if (> @user-level 0)
    (message #text_please_use_novice)
)


;*****
;  Need WB 2.0 or higher.
(if (< #wbversion 37)
    (abort #text_needwb_2)
)


;*****
;  Lock our install disk
(askdisk
    (prompt #tp_insert_disk)
    (help    #th_insert_disk)
    (dest  "AsimCDFS_v3_Install")
    (newname "AsimCDFSInst")
)



;*****
;  Need lots of space on sys volume for devs, l, etc.
;    assume about:  55K for asimcdfs.device
;                        110K for AsimCDFS

(set #installsize 168960)
(set #installsize (+ #installsize (getsize "AsimCDFSInst:devs/asim_atapi.device") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:AsimTunes") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:DiscChanger") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:AsimCDFS_Prefs") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:SimBoot") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:PD_Format") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:CD³²_Prefs") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:CDTV_Prefs") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCDFS_Prefs.info") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCDTV_Prefs.info") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Track.info") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Disk.info") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Drawer.info") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:PhotoCD_Disk.info") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:PhotoCD_Drawer.info") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:Raw_Sector.info") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:Raw_Disk.info") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:MPEG_Track.info") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:MPEG_Disk.info") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCD³²_Prefs.info") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:Storage/DOSDrivers/CD0") ))
(set #installsize (+ #installsize (getsize "AsimCDFSInst:Storage/DOSDrivers/CD0.info") ))

(if (< (getdiskspace "SYS:") #installsize)
    (abort  #text_abort1 (/ #installsize 1024) #text_abort2 (/ (getdiskspace "SYS:") 1024)    #text_abort3 )
)


(user 2)

(complete 3)
;*****
;  Ask if CDTV (1) , CD³² (2) or Amiga (0)
(set #IsAmiga
    (askchoice
        (prompt #tp_isamiga )
        (default 0 )
        (choices #tc_isamiga_1 #tc_isamiga_2 #tc_isamiga_3 #tc_isamiga_4 #tc_isamiga_5 )
        (help #th_isamiga )
    )
)

(complete 6)
;*****
;  Is CDTV
(if (= #IsAmiga #typeCDTV)
    ((set #CDDefault_NC "CD1" )
    (set #SCSIDevice "cdtv.device")
    (set #SCSIUnit 0)
    )
)

;*****
;  Is CD³²
(if (= #IsAmiga #typeCD32)
    ((set #CDDefault_NC "CD1" )
    (set #SCSIDevice "cd.device")
    (set #SCSIUnit 0)
    )
)

;*****
;  Flyer
(if (= #IsAmiga #typeFLYER)
    (set #CDDefault_NC "CD6" )
)


;*****
;  If amiga, ask if using Pioneer or other
(if (= #IsAmiga #typeAMIGA)
    (set #isPioneer
        (askbool
            (prompt #tp_ispioneer )
            (default 0)
            (choices "Pioneer DRM-60x" #tc_othercdrom)
            (help #th_ispioneer )
        )
    )
)


;*****
;  If ispioneer==0, ask if using Nakamichi or other
(if (and (= #isPioneer 0) (= #IsAmiga #typeAMIGA))
    (set #isNakamichi
        (askbool
            (prompt #tp_isnakamichi )
            (default 0)
            (choices "MBR-7 / NEC 2xc, 4xc" #tc_othercdrom)
            (help #th_isnakamichi )
        )
    )
)

;*****
;  If ispioneer==0 & isnakamichi==0, ask if using nak4disc or other
(if (and (= #isNakamichi 0) (and (= #isPioneer 0) (= #IsAmiga #typeAMIGA)) )
    (set #isNakamichi4Disc
        (askbool
            (prompt #tp_isnakamichi4disc )
            (default 0)
            (choices "MJ-4" #tc_othercdrom)
            (help #th_isnakamichi4disc )
        )
    )
)

;*****
;  If ispioneer==0 & isnakamichi==0, isnakamichi4disc==0 ask if using PD/CD-ROM or other
(if (and (= #isNakamichi 0) (and (= #isPioneer 0) (and (= #isNakamichi4Disc 0) (= #IsAmiga #typeAMIGA))) )
    (set #isPDCD
        (askbool
            (prompt #tp_ispd )
            (default 0)
            (choices "LF-1000 PD/CD-ROM" #tc_othercdrom)
            (help #th_ispd )
        )
    )
)



(if (= #isPDCD 1)
    (message #text_lf1000_users )
)



;*****
;  If is atapi, then ask if it is a 4x4
(if (= #IsAmiga #typeATAPI)
    (set #is4X4
        (askbool
            (prompt #tp_is4x4 )
            (default 0)
            (choices "NEC 4X4" #tc_othercdrom)
            (help #th_is4x4 )
        )
    )
)

(complete 9)
(if (or #is4X4 (or #isPioneer (or #isNakamichi4Disc #isNakamichi)))
    (
    ;*****
    ;  ask if Pioneer/Nakamichi/NEC is separate or pooled
    (set #PioneerSeparate
            (askbool
                (prompt #tp_separatepool )
                (default 0 )
                (choices #tc_separate #tc_pooled)
                (help #th_separatepool )
            )
        )



    ;*****
    ;  If pioneer separate, ask for base name
    (if #PioneerSeparate
        ((if #isPioneer
            (set #ourhelp #text_ourhelp_pionner )
        )

        (if #isNakamichi
            (set #ourhelp #text_ourhelp_nakamichi )
        )

        (if (or #is4X4 #isNakamichi4Disc)
            (set #ourhelp #text_ourhelp_4x4 )
        )

        (set #CDDevice_NC
                (askstring
                    (prompt #tp_basedevice )
                    (default "CD" )
                    (help #ourhelp)
                )
            )
        (set #CDDevice (cat #CDDevice_NC "0:")))
        )
    )
)


;*****
;  If pioneer pooled or other CD-ROM, ask for CD0 device alternate
(if (not #PioneerSeparate)
    ((set #CDDevice_NC
        (askstring
            (prompt #tp_cddevice )
            (default #CDDefault_NC )
            (help #th_cddevice )
        )
    )

    (set #CDDevice (cat #CDDevice_NC ":") ))
)


;*****
;  Copy over asim_atapi.device
(if (= #IsAmiga #typeATAPI)
    ((user #theirlevel)

    (copyfiles
        (prompt #tp_copyasimatapi )
        (source "AsimCDFSInst:devs/asim_atapi.device")
        (dest "DEVS:")
        (confirm)
        (help #th_copyasimatapi)
    )

    (user 2)
    )
)

;*****
;  Ask to run SCSI Inquire
(if (or (= #IsAmiga #typeAMIGA) (= #IsAmiga #typeATAPI))
    (set #useInquire
        (askbool
            (prompt #tp_runinquire )
            (default 1 )
            (help #th_runinquire )
        )
    )
)


;*****
;  Run SCSI Inquire
(if #useInquire
    (
    (if (= #IsAmiga #typeATAPI)
        (run "AsimCDFS_v3_Install:SCSI_Inquire force_atapi")
    )

    (if (= #IsAmiga #typeAMIGA)
        (run "AsimCDFS_v3_Install:SCSI_Inquire")
    )

    (if (exists "ENV:SCSI_Device")
        ((set #SCSIDevice (getenv "SCSI_Device"))
        (set #SCSIUnit (+ (getenv "SCSI_Unit")))
        ))
    )
)



;*****
;  The LF-1000 PD/CD-ROM drive uses LUN #1 for the CD-ROM operation
(if (= #isPDCD 1)
    (set #SCSIUnit (+ 10 #SCSIUnit))
)


(complete 12)
(if (= #IsAmiga #typeAMIGA)
    ;*****
    ;  Ask for device name
    ((set #SCSIDevice
        (askstring
            (prompt #tp_devicename )
            (default #SCSIDevice )
            (help #th_devicename )
        )
    )

    (complete 15)
    ;****
    ;  Ask for unit number
    (set #SCSIUnit
        (asknumber
            (prompt #tp_unitnumber )
            (default #SCSIUnit )
            (help #th_unitnumber )
        )
    ))
)


;*****
;  Ask for automount?
(complete 18)
(if (not (= #IsAmiga #typeFLYER))
    (set #autoMount
        (askbool
            (prompt #tp_automount )
            (help #th_automount)
            (default 1)
        )
    )
)

(if (= #IsAmiga #typeFLYER)
    ((set #autoMount 0)
    (set #SCSIUnit 206)
    (set #SCSIDevice "flyerscsi.device"))
)


(set #mountDirectory "sys:storage/DOSDrivers/")



;*****
;  Ask for AsimCDFS:
(set #tunesDir
    (askdir
        (prompt #tp_tunesdir )
        (help #th_tunesdir)
        (default @default-dest)
        (newpath)
    )
)

(if (not (exists #tunesDir (noreq)))
    (makedir #tunesDir
        (prompt #tp_creatingdir)
        (help #th_creatingdir)
        (infos)
        )
)
(makeassign "AsimCDFS" #tunesDir)


;*****
;  Ask for AsimCDFS_Buffer:
(set #bufferDir "Work:AsimCDFS_Buffer")
(run "AsimCDFS_v3_Install:c/MostFree")

(if (exists "ENV:MostFree")
    (set #bufferDir (cat (getenv "MostFree") "AsimCDFS_Buffer"))
)

(if (= #IsAmiga #typeFLYER)
    (if (exists "WORK:" (noreq))
        (set #bufferDir "WORK:AsimCDFS_Buffer")
        (set #bufferDir "SYS:AsimCDFS_Buffer")
    )

)


(set #bufferDir
    (askdir
        (prompt #tp_bufferdir )
        (help #th_bufferdir )
        (default #bufferDir )
        (newpath)
    )
)

(if (not (exists #bufferDir (noreq)))
    (makedir #bufferDir
        (prompt #tp_createbuffer)
        (help #th_createbuffer)
        (infos)
        )
)
(makeassign "AsimCDFS_Buffer" #bufferDir)
(user #theirlevel)


(set n 0)
(while
    (set #buffsubdir
        (select n "AsimCDFS_Buffer:PhotoCDIcon_Buffer"
                     "AsimCDFS_Buffer:Audio"
                     "AsimCDFS_Buffer:Raw"
                     "AsimCDFS_Buffer:Marks"
                     "AsimCDFS_Buffer:NonVolatile"
                   ""
            )
        )
    (
    (if (not (exists #buffsubdir (noreq)))
        (makedir #buffsubdir
            (prompt #tp_createsub1 #buffsubdir )
            (help #th_createsub )
            (infos)
            )
    )

    (set n (+ n 1))
    )
)


(copyfiles
    (prompt #tp_copycorel )
    (source "AsimCDFSInst:Corel_Directory")
    (dest "AsimCDFS_Buffer:")
    (confirm)
    (help #th_copycorel)
)



(if (not (exists "C:ViewTek" (noreq)))
    ((copyfiles
        (prompt #tp_copyviewtek)
        (source "AsimCDFSInst:C/VT")
        (dest "C:")
        (newname "ViewTek")
        (help #th_copyviewtek)
        (confirm)
    ))
)



;*****
;  delete obsolete files
;  Delete old AsimPhoto, if present in AsimCDFS dir.
;  all other files are either the user's or will be over written
(if (exists "AsimCDFS:AsimPhoto")
    ((delete "AsimCDFS:AsimPhoto"
        (prompt #tp_deletephoto )
        (confirm)
        (help #th_deletephoto )
        )
    )
)


(if (exists "AsimCDFS:AsimPhoto.info")
    ((delete "AsimCDFS:AsimPhoto.info"
        (prompt #tp_deletephoto )
        (confirm)
        (help #th_deletephoto )
        )
    )
)

(if (exists "ENVARC:AsimCDFS/Photo.info")
    ((delete "ENVARC:AsimCDFS/Photo.info"
        (prompt #tp_deletephoto )
        (confirm)
        (help #th_deletephoto )
        )
    )
)


(if (exists "ENVARC:AsimCDFS/DiscChanger.prefs")
    ((delete "ENVARC:AsimCDFS/DiscChanger.prefs"
        (prompt #tp_deleteprefs )
        (confirm)
        (help #th_deleteprefs )
        )
    )
)

(if (exists "ENVARC:AsimCDFS/AsimTunes.prefs")
    ((delete "ENVARC:AsimCDFS/AsimTunes.prefs"
        (prompt #tp_deleteprefs )
        (confirm)
        (help #th_deleteprefs )
        )
    )
)


(if (exists "ENVARC:AsimCDFS/AsimPhoto.prefs")
    ((delete "ENVARC:AsimCDFS/AsimPhoto.prefs"
        (prompt #tp_deleteprefs )
        (confirm)
        (help #th_deleteprefs )
        )
    )
)



;*****
;  l:AsimCDFS
(complete 21)
(protect "l:AsimCDFS" "rwed" )
(run "AsimCDFSInst:c/lx e AsimCDFSInst:l/AsimCDFS.lha l:"
    (prompt #tp_copyasimcdfs )
    (confirm)
    (help #th_copyasimcdfs )
)



;*****
;  devs:asimcdfs.device
(complete 25)
(protect "devs:asimcdfs.device" "rwed" )
(run "AsimCDFSInst:c/lx e AsimCDFSInst:devs/asimcdfs.lha devs:"
    (prompt #tp_copycdfsdevice )
    (confirm)
    (help #th_copycdfsdevice )
)





;*****
;  Create PD0 mountlist for PD/CD-ROM drive
;(if (= #isPDCD 1)
;    (
;    )
;)



(if (and (= #IsAmiga #typeATAPI) (< #wbversion 39) )
    (abort #text_abort_atapiwb #wbversion ".")
)


;*****
;  Create mountlists and alter user-startup
;
;  no need to worry about NEC 4X4 as the atapi.device requires WB3.0 or above
;  (at this time!)
;*****
(if (= #wbversion 37)
    ((if #PioneerSeparate
        ((set #startupCommand1 (cat "mount >NIL: " #CDDevice_NC "0: from devs:MountList." #CDDevice_NC "\n") )
        (set #startupCommand2 (cat "mount >NIL: " #CDDevice_NC "1: from devs:MountList." #CDDevice_NC "\n") )
        (set #startupCommand3 (cat "mount >NIL: " #CDDevice_NC "2: from devs:MountList." #CDDevice_NC "\n") )
        (set #startupCommand4 (cat "mount >NIL: " #CDDevice_NC "3: from devs:MountList." #CDDevice_NC "\n") )
        (set #startupCommand5 (cat "mount >NIL: " #CDDevice_NC "4: from devs:MountList." #CDDevice_NC "\n") )
        (if #isPioneer
            (set #startupCommand6 (cat #startupCommand5 "mount >NIL: " #CDDevice_NC "5: from devs:MountList." #CDDevice_NC "\n") )
        )
        (if #isNakamichi
            (set #startupCommand6 (cat #startupCommand5 "mount >NIL: " #CDDevice_NC "5: from devs:MountList." #CDDevice_NC "\n" "mount >NIL: " #CDDevice_NC "6: from devs:MountList." #CDDevice_NC "\n") )
        )


        (if #autoMount
            ((protect "S:User-Startup" "rwed" )
            (protect "S:Startup-Sequence" "rwed" )

            (startup "AsimCDFS"
                (command #echotxt)
                (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
                (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
                (command #startupCommand1 )
                (command #startupCommand2 )
                (command #startupCommand3 )
                (command #startupCommand4 )
                (command #startupCommand6 )
                (prompt #tp_insertmount)
                (help #th_insertmount1 #CDDevice_NC #th_insertmount2)
            ))
        ))
    )

    (if (not #PioneerSeparate)
        ((set #startupCommand (cat "mount >NIL: " #CDDevice " from devs:MountList." #CDDevice_NC "\n") )
        (if #autoMount
            ((protect "S:User-Startup" "rwed" )
            (protect "S:Startup-Sequence" "rwed" )

            (startup "AsimCDFS"
                (command #echotxt)
                (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
                (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
                (command #startupCommand )
                (prompt #tp_insertmount)
                (help #th_insertmount1 #CDDevice #th_insertmount2)
            ))
        ))
    )


    (if (not #autoMount)
        ((protect "S:User-Startup" "rwed" )
        (protect "S:Startup-Sequence" "rwed" )

        (startup "AsimCDFS"
            (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
            (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
            (prompt #tp_insertmount)
            (help #th_insertmount1 #CDDevice #th_insertmount2)
        ))
    )

    (protect (cat "devs:MountList." #CDDevice_NC) "rwed" )

    (set #Mount_Five
        (cat
            #CDDevice_NC "4:\n"
            "    Device         = " #SCSIDevice "\n"
            "    Unit           = "(+ 40 #SCSIUnit) "\n"
            "    Mount          = 1\n"
            #text_mountfiller
            "#\n\n"
            #CDDevice_NC "5:\n"
            "    Device         = " #SCSIDevice "\n"
            "    Unit           = "(+ 50 #SCSIUnit) "\n"
            "    Mount          = 1\n"
            #text_mountfiller
            "#\n\n"
        )
    )


    (if #isPioneer
        (set #LastLine (cat #Mount5 "\n"))
    )

    (if #isNakamichi
        (set #LastLine (cat    #Mount5
                            #CDDevice_NC "6:\n"
                            "    Device         = " #SCSIDevice "\n"
                            "    Unit           = "(+ 60 #SCSIUnit) "\n"
                            "    Mount          = 1\n"
                            #text_mountfiller
                            "#\n\n"
                            )
            )
        )

    (if #isNakamichi4Disc
        (set #LastLine "\n")
    )


    (if #PioneerSeparate
        (textfile
            (dest (cat "devs:MountList." #CDDevice_NC) )
            (append #text_mountheader)
            (append #CDDevice_NC "0:\n")
            (append "    Device         = " #SCSIDevice "\n" )
            (append "    Unit           = "(+ 00 #SCSIUnit) "\n" )
            (append "    Mount          = 1\n")
            (append #text_mountfiller)
            (append "#\n\n")
            (append #CDDevice_NC "1:\n")
            (append "    Device         = " #SCSIDevice "\n" )
            (append "    Unit           = "(+ 10 #SCSIUnit) "\n" )
            (append "    Mount          = 1\n")
            (append #text_mountfiller)
            (append "#\n\n")
            (append #CDDevice_NC "2:\n")
            (append "    Device         = " #SCSIDevice "\n" )
            (append "    Unit           = "(+ 20 #SCSIUnit) "\n" )
            (append "    Mount          = 1\n")
            (append #text_mountfiller)
            (append "#\n\n")
            (append #CDDevice_NC "3:\n")
            (append "    Device         = " #SCSIDevice "\n" )
            (append "    Unit           = "(+ 30 #SCSIUnit) "\n" )
            (append "    Mount          = 1\n")
            (append #text_mountfiller)
            (append "#\n\n")
            (append #LastLine )
        )
    )



    (if (not #PioneerSeparate)
        (textfile
            (dest (cat "devs:MountList." #CDDevice_NC) )
            (append #text_mountheader)
            (append #CDDevice "\n")
            (append "    Device         = " #SCSIDevice "\n" )
            (append "    Unit           = " #SCSIUnit "\n" )
            (append "    Mount          = " #autoMount "\n")
            (append #text_mountfiller)
            (append "#\n")
        )
    ))
)



(if (> #wbversion 37)
    ((if (not #PioneerSeparate)
        ((textfile
            (dest (cat #mountDirectory #CDDevice_NC) )
            (append #text_mountheader)
            (append "    Device         = " #SCSIDevice "\n" )
            (append "    Unit           = " #SCSIUnit "\n" )
            (append "    Mount          = 1\n")
            (append #text_mountfiller)
        )

        (copyfiles
                (prompt #tp_copymounticon)
                (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
                (dest #mountDirectory)
                (newname (cat #CDDevice_NC ".info"))
                (help #th_copymounticon)
                (confirm)
            )

    ))


    (if #PioneerSeparate
        ((textfile
            (dest (cat #mountDirectory #CDDevice_NC "0") )
            (append #text_mountheader)
            (append "    Device         = " #SCSIDevice "\n" )
            (append "    Unit           = "(+ 00 #SCSIUnit) "\n" )
            (append "    Mount          = 1\n")
            (append #text_mountfiller)
        )

        (copyfiles
                (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
                (dest #mountDirectory)
                (newname (cat #CDDevice_NC "0.info"))
                (prompt #tp_copymounticon)
                (help #th_copymounticon)
                (confirm)
            )

        (textfile
            (dest (cat #mountDirectory #CDDevice_NC "1") )
            (append #text_mountheader)
            (append "    Device         = " #SCSIDevice "\n" )
            (append "    Unit           = "(+ 10 #SCSIUnit) "\n" )
            (append "    Mount          = 1\n")
            (append #text_mountfiller)
        )

        (copyfiles
                (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
                (dest #mountDirectory)
                (newname (cat #CDDevice_NC "1.info"))
                (prompt #tp_copymounticon)
                (help #th_copymounticon)
                (confirm)
            )

        (textfile
            (dest (cat #mountDirectory #CDDevice_NC "2") )
            (append #text_mountheader)
            (append "    Device         = " #SCSIDevice "\n" )
            (append "    Unit           = "(+ 20 #SCSIUnit) "\n" )
            (append "    Mount          = 1\n")
            (append #text_mountfiller)
        )


        (copyfiles
                (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
                (dest #mountDirectory)
                (newname (cat #CDDevice_NC "2.info"))
                (prompt #tp_copymounticon)
                (help #th_copymounticon)
                (confirm)
            )

        (textfile
            (dest (cat #mountDirectory #CDDevice_NC "3") )
            (append #text_mountheader)
            (append "    Device         = " #SCSIDevice "\n" )
            (append "    Unit           = "(+ 30 #SCSIUnit) "\n" )
            (append "    Mount          = 1\n")
            (append #text_mountfiller)
        )

        (copyfiles
                (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
                (dest #mountDirectory)
                (newname (cat #CDDevice_NC "3.info"))
                (prompt #tp_copymounticon)
                (help #th_copymounticon)
                (confirm)
            )

        (if (or #isPioneer #isNakamichi)
            ((textfile
                (dest (cat #mountDirectory #CDDevice_NC "4") )
                (append #text_mountheader)
                (append "    Device         = " #SCSIDevice "\n" )
                (append "    Unit           = "(+ 40 #SCSIUnit) "\n" )
                (append "    Mount          = 1\n")
                (append #text_mountfiller)
            )

            (copyfiles
                    (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
                    (dest #mountDirectory)
                    (newname (cat #CDDevice_NC "4.info"))
                    (prompt #tp_copymounticon)
                    (help #th_copymounticon)
                    (confirm)
                )

            (textfile
                (dest (cat #mountDirectory #CDDevice_NC "5") )
                (append #text_mountheader)
                (append "    Device         = " #SCSIDevice "\n" )
                (append "    Unit           = "(+ 50 #SCSIUnit) "\n" )
                (append "    Mount          = 1\n")
                (append #text_mountfiller)
            )
            (copyfiles
                    (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
                    (dest #mountDirectory)
                    (newname (cat #CDDevice_NC "5.info"))
                    (prompt #tp_copymounticon)
                    (help #th_copymounticon)
                    (confirm)
                )

            (if #isNakamichi
                ((textfile
                    (dest (cat #mountDirectory #CDDevice_NC "6") )
                    (append #text_mountheader)
                    (append "    Device         = " #SCSIDevice "\n" )
                    (append "    Unit           = "(+ 60 #SCSIUnit) "\n" )
                    (append "    Mount          = 1\n")
                    (append #text_mountfiller)
                )
                (copyfiles
                        (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
                        (dest #mountDirectory)
                        (newname (cat #CDDevice_NC "6.info"))
                        (prompt #tp_copymounticon)
                        (help #th_copymounticon)
                        (confirm)
                ))
            ))
        )
    ))


    (protect "S:User-Startup" "rwed" )
    (protect "S:Startup-Sequence" "rwed" )

    (if (not #autoMount)
        (startup "AsimCDFS"
            (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
            (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
            (prompt #tp_insertassign)
            (help #th_insertassign)
            )
        )



    (if #autoMount
        ((if #isPioneer
            (set #mountCommand6 (cat "\nmount >NIL: " #CDDevice_NC "4:\n" "mount >NIL: " #CDDevice_NC "5:\n") )
            )
        (if #isNakamichi
            (set #mountCommand6 (cat "\nmount >NIL: " #CDDevice_NC "4:\n" "mount >NIL: " #CDDevice_NC "5:\n" "mount >NIL: " #CDDevice_NC "6:\n") )
            )
        (if (or #is4X4 #isNakamichi4Disc)
            (set #mountCommand6 "\n")
            )


        (if #PioneerSeparate
            (startup "AsimCDFS"
                (command #echotxt)
                (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
                (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
                (command (cat "mount >NIL: " #CDDevice_NC "0:\n") )
                (command (cat "mount >NIL: " #CDDevice_NC "1:\n") )
                (command (cat "mount >NIL: " #CDDevice_NC "2:\n") )
                (command (cat "mount >NIL: " #CDDevice_NC "3:") )
                (command #mountCommand6 )
                (prompt #tp_insertassign)
                (help #th_insertassign)
                )
            )

        (if (not #PioneerSeparate)
            (startup "AsimCDFS"
                (command #echotxt)
                (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
                (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
                (command (cat "mount >NIL: " #CDDevice "\n") )
                (prompt #tp_insertassign)
                (help #th_insertassign)
                )
            )
        )
    )
))


;*****
;  Delete old mountlists is DEVS:DosDrivers/
(if (> #wbversion 37)
    ((if (not #PioneerSeparate)
        ((if (exists (cat "DEVS:DosDrivers/" #CDDevice_NC))
            ((delete (cat "DEVS:DosDrivers/" #CDDevice_NC)
            (confirm)
            (prompt #tp_deletemountlist )
            (help #tp_deletemountlist )
            )

            (delete (cat "DEVS:DosDrivers/" #CDDevice_NC ".info")
            (confirm)
            (prompt #tp_deletemountlist )
            (help #tp_deletemountlist )
            )
            )
        ))
    ))

    (if #PioneerSeparate
        ((set n 0)
        (while
            (set #oldml
                (select n (cat "DEVS:DosDrivers/" #CDDevice_NC "0")
                             (cat "DEVS:DosDrivers/" #CDDevice_NC "1")
                             (cat "DEVS:DosDrivers/" #CDDevice_NC "2")
                             (cat "DEVS:DosDrivers/" #CDDevice_NC "3")
                             (cat "DEVS:DosDrivers/" #CDDevice_NC "4")
                             (cat "DEVS:DosDrivers/" #CDDevice_NC "5")
                             (cat "DEVS:DosDrivers/" #CDDevice_NC "6")
                           ""
                    )
                )


            ((if (exists #oldml)
                ((delete #oldml
                (confirm)
                (prompt #tp_deletemountlist )
                (help #tp_deletemountlist )
                )


                (delete (cat #oldml ".info")
                (confirm)
                (prompt #tp_deletemountlist )
                (help #tp_deletemountlist )
                )
                )
            )

            (set n (+ n 1)))
            )
        )
))

;*****
;  Default prefs files
(if (or (= #IsAmiga #typeAMIGA) (= #IsAmiga #typeFLYER))
    ((if (or #isPioneer (or #isNakamichi4Disc #isNakamichi))
        ;*****
        ;  Default prefs file for a Pioneer drive, separate
        ((if #PioneerSeparate
            ((copyfiles
                (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
                (dest "ENVArc:AsimCDFS")
                (newname (cat #CDDevice_NC "0"))
                (prompt #tp_copyprefs )
                (help #th_copyprefs)
                (confirm)
            )

            (copyfiles
                (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
                (dest "ENVArc:AsimCDFS")
                (newname (cat #CDDevice_NC "1"))
                (prompt #tp_copyprefs )
                (help #th_copyprefs)
                (confirm)
            )

            (copyfiles
                (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
                (dest "ENVArc:AsimCDFS")
                (newname (cat #CDDevice_NC "2"))
                (prompt #tp_copyprefs )
                (help #th_copyprefs)
                (confirm)
            )

            (copyfiles
                (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
                (dest "ENVArc:AsimCDFS")
                (newname (cat #CDDevice_NC "3"))
                (prompt #tp_copyprefs )
                (help #th_copyprefs)
                (confirm)
            )

            (if (or #isNakamichi #isPioneer)
            ((copyfiles
                (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
                (dest "ENVArc:AsimCDFS")
                (newname (cat #CDDevice_NC "4"))
                (prompt #tp_copyprefs )
                (help #th_copyprefs)
                (confirm)
            )

            (copyfiles
                (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
                (dest "ENVArc:AsimCDFS")
                (newname (cat #CDDevice_NC "5"))
                (prompt #tp_copyprefs )
                (help #th_copyprefs)
                (confirm)
            )

            (if #isNakamichi
                (copyfiles
                    (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
                    (dest "ENVArc:AsimCDFS")
                    (newname (cat #CDDevice_NC "6"))
                    (prompt #tp_copyprefs )
                    (help #th_copyprefs)
                    (confirm)
                ))))
            )
        )

        ;*****
        ;  Default prefs file for a Pioneer drive, pooled
        (if (not #PioneerSeparate)
            (
            (if #isPioneer
                (copyfiles
                    (source "AsimCDFSInst:Default_Prefs/Pioneer_Pool")
                    (dest "ENVArc:AsimCDFS")
                    (newname #CDDevice_NC)
                    (prompt #tp_copyprefs )
                    (help #th_copyprefs)
                    (confirm)
                ))

            (if #IsNakamichi
                (copyfiles
                    (source "AsimCDFSInst:Default_Prefs/Nakamichi_Pool")
                    (dest "ENVArc:AsimCDFS")
                    (newname #CDDevice_NC)
                    (prompt #tp_copyprefs )
                    (help #th_copyprefs)
                    (confirm)
                ))

            (if #IsNakamichi4Disc
                (copyfiles
                    (source "AsimCDFSInst:Default_Prefs/Nakamichi4_Pool")
                    (dest "ENVArc:AsimCDFS")
                    (newname #CDDevice_NC)
                    (prompt #tp_copyprefs )
                    (help #th_copyprefs)
                    (confirm)
                ))
            )
        )
    ))


    ;*****
    ;  Default prefs file for a SCSI CD-ROM drive
    (if (and (not #isNakamichi) (not #isPioneer))
        (copyfiles
            (source "AsimCDFSInst:Default_Prefs/Default")
            (dest "ENVArc:AsimCDFS")
            (newname #CDDevice_NC)
            (prompt #tp_copyprefs )
            (help #th_copyprefs)
            (confirm)
        )
    ))
)




;*****
;  Default prefs file for an ATAPI CD-ROM drive
(if (= #IsAmiga #typeATAPI)
    (
    (if (not #is4X4)
        (copyfiles
            (source "AsimCDFSInst:Default_Prefs/ATAPI")
            (dest "ENVArc:AsimCDFS")
            (newname #CDDevice_NC)
            (prompt #tp_copyprefs )
            (help #th_copyprefs)
            (confirm)
        )
    )

    (if #is4X4
        ((if #PioneerSeparate
            ((copyfiles
                (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
                (dest "ENVArc:AsimCDFS")
                (newname (cat #CDDevice_NC "0"))
                (prompt #tp_copyprefs )
                (help #th_copyprefs)
                (confirm)
            )

            (copyfiles
                (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
                (dest "ENVArc:AsimCDFS")
                (newname (cat #CDDevice_NC "1"))
                (prompt #tp_copyprefs )
                (help #th_copyprefs)
                (confirm)
            )

            (copyfiles
                (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
                (dest "ENVArc:AsimCDFS")
                (newname (cat #CDDevice_NC "2"))
                (prompt #tp_copyprefs )
                (help #th_copyprefs)
                (confirm)
            )

            (copyfiles
                (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
                (dest "ENVArc:AsimCDFS")
                (newname (cat #CDDevice_NC "3"))
                (prompt #tp_copyprefs )
                (help #th_copyprefs)
                (confirm)
            )
            )
        )

        (if (not #PioneerSeparate)
            (copyfiles
                (source "AsimCDFSInst:Default_Prefs/4X4_Pooled")
                (dest "ENVArc:AsimCDFS")
                (newname #CDDevice_NC)
                (prompt #tp_copyprefs )
                (help #th_copyprefs)
                (confirm)
            )
        ))
    )
    )
)


;*****
;  Default prefs file for a CDTV
(if (= #IsAmiga #typeCDTV)
    (copyfiles
        (source "AsimCDFSInst:Default_Prefs/CDTV")
        (dest "ENVArc:AsimCDFS")
        (newname #CDDevice_NC)
        (prompt #tp_copyprefs )
        (help #th_copyprefs)
        (confirm)
    )
)


;*****
;  Default prefs file for a CD³²
(if (= #IsAmiga #typeCD32)
    (copyfiles
        (source "AsimCDFSInst:Default_Prefs/CD³²")
        (dest "ENVArc:AsimCDFS")
        (newname #CDDevice_NC)
        (prompt #tp_copyprefs )
        (help #th_copyprefs)
        (confirm)
    )
)

(complete 28)



;*****
;  AsimTunes
(set #instTunes
    (askbool
        (prompt #tp_copytunes)
        (help #th_copytunes )
        (default 1)
    )
)

(if #instTunes
    ((protect "AsimCDFS:AsimTunes" "rwed" )
    (protect "AsimCDFS:AsimTunes.info" "rwed" )
    (copyfiles
        (prompt #tp_copyingtunes )
        (source "AsimCDFSInst:AsimTunes")
        (dest "AsimCDFS:")
        (infos)
        (noposition)
        (help #th_copytunes)
        (confirm)
    )

    (tooltype
        (dest "AsimCDFS:AsimTunes" )
        (settooltype "CDROM" #CDDevice )
        (noposition)
    )


    (complete 31)
    (protect "fonts:AsimTunes2" "rwed" )
    (protect "fonts:AsimTunes2.font" "rwed" )
    (protect "fonts:AsimTunes2/11" "rwed" )
    (protect "fonts:AsimTunes2/20" "rwed" )
    (copyfiles
        (prompt #tp_copytunesfont )
        (source "AsimCDFSInst:fonts")
        (dest "fonts:" )
        (all)
        (help #th_copytunesfont )
        (confirm) )
))



;*****
;  DiscChanger
(complete 34)

(set #instChanger
    (askbool
        (prompt #tp_copydc)
        (help #th_copydc )
        (default 1)
    )
)

(complete 37)
(if #instChanger
    ((protect "AsimCDFS:DiscChanger" "rwed" )
    (copyfiles
        (prompt #tp_copyingdc )
        (source "AsimCDFSInst:DiscChanger")
        (dest "AsimCDFS:")
        (infos)
        (noposition)
        (help #th_copydc)
        (confirm)
    )

    (tooltype
        (dest "AsimCDFS:DiscChanger" )
        (settooltype "CDROM" #CDDevice )
        (noposition)
    )
))



;*****
;  PDFormat
(complete 38)

(if (= #isPDCD 1)
    (
    (set #instPDFormat
        (askbool
            (prompt #tp_copypd)
            (help #th_copypd )
            (default 1)
        )
    )

    (complete 39)
    (if #instPDFormat
        ((protect "AsimCDFS:PD_Format" "rwed" )
        (copyfiles
            (prompt #tp_copyingdc )
            (source "AsimCDFSInst:PD_Format")
            (dest "AsimCDFS:")
            (infos)
            (noposition)
            (help #th_copydc )
            (confirm)
        )

        (tooltype
            (dest "AsimCDFS:PD_Format" )
            (noposition)
        )
    ))
))



;*****
;  AsimCDFS_Prefs
(complete 40)
(set #instPrefs
    (askbool
        (prompt #tp_copyasimprefs)
        (help  )
        (default 1)
    )
)

(complete 43)
(if #instPrefs
    ((protect "AsimCDFS:AsimCDFS_Prefs" "rwed" )
    (copyfiles
        (prompt  )
        (source "AsimCDFSInst:AsimCDFS_Prefs")
        (dest "AsimCDFS:")
        (infos)
        (noposition)
        (help #th_copyasimprefs )
        (confirm)
    )
))




;*****
;  SimBoot
(complete 46)
(set #instSimBoot
    (askbool
        (prompt #tp_copysimboot)
        (help #th_copysimboot )
        (default 1)
    )
)

(complete 50)
(if #instSimBoot
    ((protect "AsimCDFS:SimBoot" "rwed" )
    (copyfiles
        (prompt #th_copyingsimboot )
        (source "AsimCDFSInst:SimBoot")
        (dest "AsimCDFS:")
        (infos)
        (noposition)
        (help #th_copysimboot )
        (confirm)
    )

))


;*****
;  CD³²_Prefs
(complete 53)
(set #instCD32Prefs
    (askbool
        (prompt #tp_copycd32prefs)
        (help #th_copycd32prefs )
        (default 1)
    )
)

(complete 56)
(if #instCD32Prefs
    ((protect "AsimCDFS:CD³²_Prefs" "rwed" )
    (copyfiles
        (prompt #tp_copyingcd32prefs )
        (source "AsimCDFSInst:CD³²_Prefs")
        (dest "AsimCDFS:")
        (infos)
        (noposition)
        (help #th_copycd32prefs )
        (confirm)
    )

))



;*****
;  CDTV Prefs
(complete 59)
(set #instCDTVPrefs
    (askbool
        (prompt #tp_copycdtvprefs)
        (help #th_copycdtvprefs )
        (default 1)
    )
)

(complete 62)
(if #instCDTVPrefs
    ((protect "AsimCDFS:CDTV_Prefs" "rwed" )
    (copyfiles
        (prompt #tp_copyingcdtvprefs )
        (source "AsimCDFSInst:CDTV_Prefs")
        (dest "AsimCDFS:")
        (infos)
        (noposition)
        (help #th_copycdtvprefs )
        (confirm)
    )

))



(complete 65)
(set #instCDTVEmul
    (askbool
        (prompt #tp_copycdtvemul)
        (help #th_copycdtvemul )
        (default 1)
    )
)

(complete 68)
(if #instCDTVEmul
    ((complete 71)
    ;********************
    ;  devs:cdtv.device, devs:bookmark.device, devs:cardmark.device
    (protect "devs:cdtv.device" "rwed" )
    (protect "devs:bookmark.device" "rwed" )
    (protect "devs:cardmark.device" "rwed" )

    (run "AsimCDFSInst:c/lx e AsimCDFSInst:devs/cdtv.lha devs:"
        (prompt #tp_copycdtvdevice )
        (confirm)
        (help #th_copycdtvemul )
    )

    ;*****
    ;  libs:playerprefs.library
    (complete 81)
    (protect "devs:playerprefs.library" "rwed" )
    (copyfiles
        (prompt #tp_copyplayerprefs )
        (source "AsimCDFSInst:libs/playerprefs.library")
        (dest "libs:")
        (confirm)
        (help #th_copycdtvemul )
    )
))



(set #instCD32Emul
    (askbool
        (prompt #tp_copycd32emul)
        (help #th_copycd32emul )
        (default 1)
    )
)

(complete 84)
(if #instCD32Emul
    ((complete 87)
    ;*****
    ;  devs:cd.device

    (protect "devs:cd.device" "rwed" )
    (copyfiles
        (prompt #tp_copycddevice )
        (source "AsimCDFSInst:devs/cd.device")
        (dest "devs:")
        (confirm)
        (help #th_copycd32emul )
    )


    ;*****
    ;  libs:nonvolatile.library
    (complete 90)
    (protect "devs:nonvolatile.library" "rwed" )
    (copyfiles
        (prompt #tp_copynv )
        (source "AsimCDFSInst:libs/nonvolatile.library")
        (dest "libs:")
        (confirm)
        (help #th_copycd32emul )
    )


    ;*****
    ;  libs:lowlevel.library
    (complete 93)
    (protect "devs:lowlevel.library" "rwed" )
    (copyfiles
        (prompt #tp_copylowlevel )
        (source "AsimCDFSInst:libs/lowlevel.library")
        (dest "libs:")
        (confirm)
        (help #th_copycd32emul )
    )
))



;*****
;  default icons in ENV

(makedir "ENVARC:AsimCDFS"
    (prompt #tp_makeenvarc)
    (help #th_makeenvarc)
    )

(makedir "ENV:AsimCDFS"
    (prompt #tp_makeenv)
    (help #th_makeenv)
    )

(copyfiles
    (source "AsimCDFSInst:ENVArc/AsimCDFS")
    (dest "ENVArc:AsimCDFS")
    (infos)
    (all)
    (prompt #tp_copyicons )
    (help #th_copyicons)
    (confirm)
)

(copyfiles
    (source "AsimCDFSInst:ENVArc/AsimCDFS")
    (dest "ENV:AsimCDFS")
    (infos)
    (all)
    (prompt #tp_copyicons )
    (help #th_copyicons)
    (confirm)
)




;*****
;  ask which languages to be added
(if (exists "LOCALE:" (noreq))
    ((user 2)
    (set #language
        (askoptions
            (prompt #tp_catalogs)
            (help #th_catalogs )
            (choices "Deutsch" "Français" "Italiano")
            (default (shiftleft 1 (- #our_language 1)) )
        )
    )
    (user #theirlevel)


    (set n 0)
    (while
        (set #langdir
            (select n "deutsch"
                         "français"
                       "italiano"
                       ""
                )
            )
        (

        (if (IN #language n)
            ((set #langdest (tackon "LOCALE:catalogs/" #langdir))
            (set #langsrc (tackon "AsimCDFSInst:catalogs/" #langdir))

            (run (cat "AsimCDFSInst:c/lx e " (tackon #langsrc "Catalogs.lha") " " #langdest)
                (prompt #tp_copylocale1 #langdir #tp_copylocale2 )
                (help #th_copylocale)
                (confirm))

            (copyfiles
                (prompt #tp_copylocale1 #langdir #tp_copylocale2 )
                (source (tackon #langsrc "SCSIInquire.catalog") )
                (dest #langdest)
                (help #th_copylocale)
                (confirm))
            )
        )

        (set n (+ n 1))
        )
    )
))







;*****
;  Create a 'SYS/NV_Location' environment variable
(run "setenv SYS/NV_Location AsimCDFS_Buffer:NonVolatile/")


;*****
;  Create a CD³² Preferences file
(run "AsimCDFS:CD³²_Prefs SAVE DEFAULT")


;*****
;  Create a CDTV Preferences file
(run "AsimCDFS:CDTV_Prefs SAVE DEFAULT")


;*****
;  Tell NewTek Flyer users where the CD-ROM drive is located
(if (= #IsAmiga #typeFLYER)
    (
    (user 2)
    (message #text_message_flyer    )

    (user #theirlevel)
    )
)



;*****
;  Tell About Extended icons
(user 2)
(message #text_message_extendedicons)
(user #theirlevel)


;*****
;  remove assign to AsimCDFSInst
(makeassign "AsimCDFSInst")
(makeassign "AsimCDFS")
(makeassign "AsimCDFS_Buffer")


(complete 100)