;$VER: AsimCDFS Install 3.11 (3.4.98) 
;Copyright ©1993-1998 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-1998 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.9a 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.9a 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)
