home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / CDRom / PET-A381.DMS / in.adf / Install-AsimCDFS < prev    next >
Encoding:
Text File  |  1992-09-02  |  75.4 KB  |  2,506 lines
  1. ;$VER: AsimCDFS Install 3.9 (28.4.97) 
  2. ;Copyright ©1993-1997 Asimware Innovations Inc.
  3.  
  4. (onerror (
  5.     (makeassign "AsimCDFSInst")
  6.     (makeassign "AsimCDFS")
  7.     (makeassign "AsimCDFS_Buffer")
  8. ))
  9.  
  10. (set #typeAMIGA 0)
  11. (set #typeCDTV 1)
  12. (set #typeCD32 2)
  13. (set #typeATAPI 3)
  14. (set #typeFLYER 4)
  15.  
  16. (set #autoMount 1)
  17. (set #CDDefault_NC "CD0" )
  18. (set #isPioneer 0)
  19. (set #isNakamichi 0)
  20. (set #isNakamichi4Disc 0)
  21. (set #isPDCD 0)
  22. (set #is4X4 0)
  23. (set #PioneerSeparate 0)
  24.  
  25. (set #wbversion (getversion "libs:version.library"))
  26. (set #wbversion (/ #wbversion 65536) )
  27.  
  28. (set #SCSIDevice "scsi.device")
  29. (set #SCSIUnit 4)
  30.  
  31. (set @default-dest "SYS:AsimCDFS")
  32.  
  33.  
  34. (set #text_mountheader (cat
  35.             "/************************************************************************/\n"
  36.             "/*  AsimCDFS v3 MountList entry -- ©1993-1997 Asimware Innovations Inc. */\n"
  37.             "/************************************************************************/\n"
  38. ))
  39.  
  40. (set #text_mountfiller (cat
  41.             "    Buffers        = 0\n"
  42.             "    BufMemType     = 5\n" 
  43.             "    Mask           = 0xffffffe\n" 
  44.             "    Flags          = 0\n" 
  45.             "    FileSystem     = l:AsimCDFS\n"
  46.             "    DosType        = 0x662dabac\n"
  47.             "    GlobVec        = -1\n"
  48.             "    Reserved       = 0\n"
  49.             "    LowCyl         = 0\n"
  50.             "    HighCyl        = 999\n"
  51.             "    Surfaces       = 1\n"
  52.             "    BlocksPerTrack = 32\n"
  53.             "    Priority       = 10\n"
  54.             "    StackSize      = 5000\n"
  55. ))
  56.  
  57.  
  58. (set #theirlevel @user-level )
  59. (user 2)
  60.  
  61. (set #English 0)
  62. (set #Deutsch 1)
  63. (set #Français 2)
  64. (set #Italiano 3)
  65. (set #Svenska 4)
  66.  
  67.  
  68. ;*****
  69. ; set the language we will be using
  70. ;
  71. (if (= @language "english") 
  72.     (set #our_language #English) 
  73. )
  74. (if (= @language "deutsch") 
  75.     (set #our_language #Deutsch) 
  76. )
  77.  
  78.  
  79. (user #theirlevel)
  80.  
  81.  
  82.  
  83.  
  84. ;*****
  85. ; set English language strings
  86. (if (= #our_language #English) (
  87.  
  88. (set #echotxt "echo \"Mounting AsimCDFS...\"\n" )
  89.  
  90. (set #text_please_use_novice  (cat
  91.              "Installation notes\n"
  92.            "------------------\n\n"
  93.              "We have noticed problems with the Installer "
  94.              "program when using Expert or Intermediate mode.  The "
  95.              "general Novice install is recommended for most, if not "
  96.              "all situations.\n"
  97. ))
  98.  
  99. (set #text_needwb_2 (cat "\n\nAmigaDOS 2.0 or higher is required for AsimCDFS 3.x. "
  100.              "\n\nAn upgrade will be needed for your Amiga."
  101.              "\n\nYou are currently running version " #wbversion "."
  102. ))
  103.  
  104.  
  105. (set #tp_insert_disk "Please insert the disk labeled \"AsimCDFS_v3_Install\"." )
  106. (set #th_insert_disk "AsimCDFS FileSystem and other utilities will be copied from this disk into your system.")
  107.  
  108.  
  109. (set #text_abort1    "\n\nApproximately ")
  110. (set #text_abort2    "K of disk space is needed on your SYS: volume.\n\nYou only have ")
  111. (set #text_abort3    "K free.\n\nDelete or transfer some files from the SYS: volume and try again.")
  112.  
  113. (set #tp_isamiga    "\nAsimCDFS v3.8 Install\n-------------------\n\Please describe your setup:")
  114. (set #th_isamiga    (cat "\n\nIf AsimCDFS is being used in conjunction with a CDTV/A570 unit "
  115.                 "then note this with the CDTV/A570 selection.\n\n"
  116.                 "If AsimCDFS is being used with a CD³² unit, then note this with the CD³² selection.\n\n"
  117.                 "Otherwise, you will be installing AsimCDFS on an Amiga equipped "
  118.                 "with a SCSI or IDE controller and SCSI or ATAPI CD-ROM drive.")
  119. )
  120.  
  121. (set #tc_isamiga_1    "Amiga with SCSI CD-ROM")
  122. (set #tc_isamiga_2    "CDTV/A570")
  123. (set #tc_isamiga_3    "CD³²")
  124. (set #tc_isamiga_4    "ATAPI CD-ROM on A4000/A1200")
  125. (set #tc_isamiga_5    "NewTek Flyer with CD-ROM (unit #6) on SCSI-C")
  126.  
  127. (set #tp_ispioneer    "\n\n\nIs your CD-ROM drive a Pioneer DRM-60x?")
  128. (set #th_ispioneer        (cat "\n\nIf you are using AsimCDFS with a Pioneer DRM-60x, indicate this "
  129.                     "in your choice.  This drive is a high-performance 6-disc minichanger and "
  130.                     "is not common."
  131.                     "\n\nOtherwise select Other CD-ROM.")
  132. )
  133.  
  134. (set #tc_othercdrom "Other CD-ROM")
  135.  
  136. (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?")
  137. (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 "
  138.                     "in your choice.  This drive is a high-performance 7-disc minichanger and "
  139.                     "is not common."
  140.                     "\n\nOtherwise select Other CD-ROM.")
  141. )
  142.  
  143. (set #tp_isnakamichi4disc        "\n\n\nIs your CD-ROM drive a Nakamichi MJ-4 4-disc CD-ROM changer?")
  144. (set #th_isnakamichi4disc (cat "\n\nIf you are using AsimCDFS with a Nakamichi MJ-4 4-disc CD-ROM changer, indicate this "
  145.                     "in your choice.  This drive is a high-performance 4-disc minichanger."
  146.                     "\n\nOtherwise select Other CD-ROM.")
  147. )
  148.  
  149. (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)")
  150. (set #th_ispd        (cat "\n\nIf you are using AsimCDFS with a Panasonic PD/CD-ROM drive, indicate this "
  151.                     "in your choice.  This drive is a combination read/write optical drive and CD-ROM drive.\n\n"
  152.                     "This drive is also bundled under 3rd party names such as Smart & Friendly and Toray.\n\n"
  153.                     "\n\nOtherwise select Other CD-ROM.")
  154. )
  155.  
  156. (set #text_lf1000_users    (cat "Panasonic LF-1000 PD/CD-ROM users\n"
  157.                       "---------------------------------\n"
  158.         "Please ensure that your drive is set to the "
  159.         "\"Two LUN Mode\".  This is done via jumper switches "
  160.         "on the back of the drive.  Consult the manufacturer's "
  161.         "documentation for further information.\n\n"
  162.         "Also ensure that your SCSI controller is setup to "
  163.         "recognize LUNs."
  164.          )
  165. )
  166.  
  167. (set #tp_is4x4        "\n\n\nIs your drive a NEC 4X4 4-disc ATAPI CD-ROM Changer?\n")
  168. (set #th_is4x4        (cat "\n\nIf you are using AsimCDFS with a NEC 4x4 ATAPI 4-disc CD-ROM Changer, indicate this "
  169.                     "in your choice.  This drive is a 1/2 height 5 1/2\" device.\n\n "
  170.                     "\n\nOtherwise select Other CD-ROM.")
  171. )
  172.  
  173. (set #tp_separatepool    "\n\nDo you wish to have separate devices mounted, or would you like all discs pooled into 1 device?\n\n")
  174. (set #th_separatepool    (cat "\n\nIf you wish to have access to all discs simultaneously, then "
  175.                         "select Separate, otherwise select Pooled  --  in the latter case, "
  176.                         "you can switch between the discs with DiscChanger.")
  177. )
  178. (set #tc_separate    "Separate")
  179. (set #tc_pooled    "Pooled")
  180.  
  181. (set #text_ourhelp_pioneer        (cat "\n\nThis is the base name under which AmigaDOS will reference the "
  182.                                 "CD-ROM as.  As you are installing AsimCDFS for a Pioneer 6-disc changer "
  183.                                 ", 6 such devices named <basename>0 through <basename>5 will be mounted (ie.  CD0, CD1, ..., CD5) "
  184.                                 "\n\nThe trailing : (colon) or the 0 through 5 MUST NOT be present.")
  185. )
  186.  
  187. (set #text_ourhelp_nakamichi    (cat "\n\nThis is the base name under which AmigaDOS will reference the "
  188.                                 "CD-ROM as.  As you are installing AsimCDFS for a Nakamichi 7-disc changer "
  189.                                 ", 7 such devices named <basename>0 through <basename>6 will be mounted (ie.  CD0, CD1, ..., CD6) "
  190.                                 "\n\nThe trailing : (colon) or the 0 through 6 MUST NOT be present.")
  191. )
  192.  
  193. (set #text_ourhelp_4x4        (cat "\n\nThis is the base name under which AmigaDOS will reference the "
  194.                                 "CD-ROM as.  As you are installing AsimCDFS for a 4-disc changer "
  195.                                 ", 4 such devices named <basename>0 through <basename>3 will be mounted (ie.  CD0, CD1, CD2 & CD3) "
  196.                                 "\n\nThe trailing : (colon) or the 0 through 3 MUST NOT be present.")
  197. )
  198.  
  199. (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.)")
  200.  
  201. (set #tp_cddevice    "\n\nWhat is the name for the AmigaDOS device?\n\n(The trailing colon MUST NOT be present)")
  202. (set #th_cddevice    (cat "\n\nThis is the name under which AmigaDOS will reference the "
  203.                     "CD-ROM as.  While usually CD0:, "
  204.                     "it can be any name you choose. "
  205.                     "\n\nThe trailing : (colon) MUST NOT be present.")
  206. )
  207.  
  208. (set #tp_copyasimatapi    "\n\nCopying asim_atapi.device ATAPI CD-ROM driver\n")
  209. (set #th_copyasimatapi    "\n\nThis will copy the asim_atapi.device ATAPI CD-ROM driver file to your devs: directory\n")
  210.  
  211. (set #tp_runinquire    "\n\nWould you like to use the SCSI Inquire utility to locate your CD-ROM drive?")
  212. (set #th_runinquire        (cat "\n\nThe SCSI Inquire utility will scan your system for suitable SCSI "
  213.                     "or ATAPI devices and display a listing of all units connected to the device.  "
  214.                     "Your CD-ROM drive must be powered-on and correctly connected "
  215.                     "for it to be acknowledged by this utility.  Consult the SCSI Inquire "
  216.                     "chapter for more information.")
  217. )
  218.  
  219.  
  220. (set #tp_devicename        "\n\nWhat is the name of your SCSI or ATAPI device?")
  221. (set #th_devicename            (cat "\n\nThis is the name of the device driver for your particular "
  222.                     "SCSI card.  For example, the Commodore 2091/590/Amiga3000 has "
  223.                     "a name of \"scsi.device\" while our ATAPI driver has a name of \"asim_ide.device\".\n\n"
  224.                     "If you successfully ran the SCSI Inquire utility, this question will default to the correct unit number. "
  225.                     "Otherwise, consult either the AsimCDFS User's Guide or contact the controller card manufacturer.")
  226. )
  227.  
  228. (set #tp_unitnumber        "\n\nWhat is the unit number of your CD-ROM drive?")
  229. (set #th_unitnumber            (cat "\n\nThis is the unit # of the CD-ROM drive.  This is usually a "
  230.                     "numerical value between 0j and 6 for SCSI units and between 0 and 1 for ATAPI units.\n\n"
  231.                     "If you successfully ran the SCSI Inquire utility, this question will default to the correct unit number.  "
  232.                     "Otherwise, consult the CD-ROM drive documentation for instructions on "
  233.                     "determining the unit #.")
  234. )
  235.  
  236. (set #tp_automount        "\n\nWould you like the CD-ROM drive automatically mounted upon bootup?")
  237. (set #th_automount        "\n\nIf you would like, the appropriate commands will be added to your user-startup file to automatically mount AsimCDFS.\n")
  238.  
  239.  
  240. (set #tp_tunesdir        "Specify the directory in which the AsimCDFS support programs will be placed:")
  241. (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.")
  242.  
  243.  
  244.  
  245. (set #tp_creatingdir        "Creating the AsimCDFS: directory...")
  246. (set #th_creatingdir "This will create the specified directory for the support programs.")
  247.  
  248. (set #tp_bufferdir    "Specify the directory which can be used for buffering AsimCDFS files:")
  249. (set #th_bufferdir        (cat "AsimCDFS will require a directory in which it will buffer "
  250.                 "various files, including PhotoCD thumbnail icons, snapshot icon files "
  251.                 "and audio library files.  As the number of files in this directory "
  252.                 "may grow as your CD-ROM collection expands, it is "
  253.                 "advisable to put this directory on a large hard drive partition.")
  254. )
  255.  
  256. (set #tp_createbuffer        "Creating the AsimCDFS_Buffer: directory...")
  257. (set #th_createbuffer        "This will create the specified directory for the buffered files.")
  258.  
  259. (set #tp_createsub1        "Creating the ")
  260. (set #tp_createsub2        " directory...")
  261. (set #th_createsub            "This will create the specified directory for the buffered files.")
  262.  
  263. (set #tp_copycorel        "\n\nCopying Corel_Directory index file to the AsimCDFS_Buffer: directory.\n")
  264. (set #th_copycorel            "\n\nThis will copy an index file containing proper disc names for the Corel ProPhoto library (Volumes 1 and 2).")
  265.  
  266.  
  267. (set #tp_copyviewtek    "\n\nCopying the public domain program ViewTek by Thomas Krehbiel to your C: directory.")
  268. (set #th_copyviewtek    (cat "\n\nThis will copy over the public domain viewing "
  269.             "program ViewTek to your C: directory where it will be "
  270.             "automatically used when you double-click on PhotoCD and "
  271.             "Corel ProPhoto thumbnail icons.")
  272. )
  273.  
  274. (set #tp_deletephoto        "\n\Deleting obsolete AsimPhoto.\n")
  275. (set #th_deletephoto        (cat "\n\nThis will delete the old AsimPhoto program, which is "
  276.             "no longer required for AsimCDFS v3.x\n")
  277. )
  278.  
  279.  
  280. (set #tp_deleteprefs        "\n\Deleting obsolete preferences files.\n")
  281. (set #th_deleteprefs        (cat "\n\nThis will delete the old preferences files which are "
  282.             "no longer required for AsimCDFS v3.x\n")
  283. )
  284.  
  285.  
  286. (set #tp_copyasimcdfs    "\n\nCopying AsimCDFS FileSystem to the l: directory.\n")
  287. (set #th_copyasimcdfs        (cat"\n\nThis will copy over the AsimCDFS FileSystem program to your "
  288.         "l: directory\n\nThis is an essential step in the installation "
  289.         "process.\n")
  290. )
  291.  
  292.  
  293. (set #tp_copycdfsdevice    "\n\nCopying asimcdfs.device to the devs: directory.\n")
  294. (set #th_copycdfsdevice    (cat "\n\nThis will copy over the asimcdfs.device program to your "
  295.         "devs: directory\n\nThis is an essential step in the installation "
  296.         "process.\n")
  297. )
  298.  
  299. (set #text_abort_atapiwb    (cat "\n\nAmigaDOS 3.0 or higher is required for the asim_atapi.device.  "
  300.              "\n\nIf you are currently using an Amiga 1200 or Amiga 4000, check "
  301.              "your libs:version.library file.\n\n"
  302.              "\n\nYour libs:version.library file currently reports version ")
  303. )
  304.  
  305. (set #tp_insertmount        "Inserting MOUNT commands into the startup-sequence")
  306. (set #th_insertmount1        "\n\nThe command \"MOUNT ")
  307. (set #th_insertmount2        (cat " FROM DEVS:MOUNTLIST.xxx\" is being inserted into your "
  308.                         "\"S:Startup-Sequence\" or \"S:User-Startup\" file to "
  309.                         "automatically start AsimCDFS upon bootup.")
  310. )
  311.  
  312. (set #tp_copymounticon    "\n\nCopying Mountlist icon")
  313. (set #th_copymounticon "\n\nThis will copy over an icon for the mountlist file.")
  314.  
  315.  
  316. (set #tp_insertassign        "Inserting Assign command into the startup-sequence")
  317. (set #th_insertassign            "\n\nThe command assign AsimCDFS: and assign AsimCDFS_Buffer are being entered into your s:user-startup file.")
  318.  
  319. (set #tp_deletemountlist    "\n\Deleting obsolete MountList file from DEVS:DosDrivers/\n")
  320. (set #th_deletemountlist        (cat "\n\nThis will delete the obsolete MountList file from the DEVS:DosDrivers/ directory.  "
  321.                     "MountList files for AsimCDFS v3.x are now put into the SYS:Storage/DOSDrivers directory.\n")
  322. )
  323.  
  324. (set #tp_copyprefs        "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n")
  325. (set #th_copyprefs            "\n\nThis will copy over a default preferences file.")
  326.  
  327.  
  328. (set #tp_copytunes        "\n\nShould the AsimTunes utility be installed?")
  329. (set #th_copytunes            (cat "\n\nThis will copy over the AsimTunes utility "
  330.                 "to your AsimCDFS: directory\n\nIf you do not "
  331.                 "wish the AsimTunes program to be transferred to your system, "
  332.                 "skip this step.\n")
  333. )
  334. (set #tp_copyingtunes        "\n\nCopying AsimTunes audio CD controller program to the AsimCDFS: directory.\n")
  335. (set #tp_copytunesfont        "\n\nCopying AsimTunes fonts to the FONTS: directory\n")
  336. (set #th_copytunesfont            (cat "\n\nThis will copy over the fonts needed for AsimTunes.\n\n"
  337.                 "They will be placed into your fonts: directory.\n\n")
  338. )
  339.  
  340.  
  341. (set #tp_copydc        "\n\nShould the DiscChanger utility be installed?")
  342. (set #th_copydc            (cat "\n\nThis will copy over the DiscChanger utility "
  343.                 "to your AsimCDFS: directory\n\nIf you do not "
  344.                 "wish the DiscChanger program to be transferred to your system, "
  345.                 "skip this step.\n")
  346. )
  347. (set #tp_copyingdc        "\n\nCopying the DiscChanger utility to the AsimCDFS: directory.\n")
  348.  
  349. (set #tp_copypd            "\n\nShould the PD_Format utility be installed?")
  350. (set #th_copypd                (cat "\n\nThis will copy over the PD_Format utility "
  351.                     "to your AsimCDFS: directory\n\nIf you do not "
  352.                     "wish the PD_Format program to be transferred to your system, "
  353.                     "skip this step.\n")
  354. )
  355. (set #tp_copyingdc        "\n\nCopying the PD_Format utility to the AsimCDFS: directory.\n")
  356.  
  357. (set #tp_copyasimprefs        "\n\nShould the AsimCDFS_Prefs utility be installed?")
  358. (set #th_copyasimprefs            (cat "\n\nThis will copy over the AsimCDFS_Prefs utility "
  359.                 "to your AsimCDFS: directory\n\nIf you do not "
  360.                 "wish the AsimCDFS_Prefs program to be transferred to your system, "
  361.                 "skip this step.\n")
  362. )
  363. (set #tp_copyingasimprefs        "\n\nCopying the AsimCDFS_Prefs utility to the AsimCDFS: directory.\n")
  364.  
  365.  
  366. (set #tp_copysimboot        "\n\nShould the SimBoot utility be installed?")
  367. (set #th_copysimboot        (cat "\n\nThis will copy over the SimBoot utility "
  368.                 "to your AsimCDFS: directory\n\nIf you do not "
  369.                 "wish the SimBoot program to be transferred to your system, "
  370.                 "skip this step.\n")
  371. )
  372. (set #th_copyingsimboot        "\n\nCopying the SimBoot utility to the AsimCDFS: directory.\n")
  373.  
  374. (set #tp_copycd32prefs        "\n\nShould the CD³²_Prefs utility be installed?")
  375. (set #th_copycd32prefs            (cat "\n\nThis will copy over the CD³²_Prefs utility "
  376.                 "to your AsimCDFS: directory\n\nIf you do not "
  377.                 "wish the CD³²_Prefs program to be transferred to your system, "
  378.                 "skip this step.\n")
  379. )
  380.  
  381. (set #tp_copyingcd32prefs        "\n\nCopying the CD³²_Prefs utility to the AsimCDFS: directory.\n")
  382.  
  383. (set #tp_copycdtvprefs        "\n\nShould the CDTV_Prefs utility be installed?")
  384. (set #th_copycdtvprefs            (cat "\n\nThis will copy over the CDTV_Prefs utility "
  385.                 "to your AsimCDFS: directory\n\nIf you do not "
  386.                 "wish the CDTV_Prefs program to be transferred to your system, "
  387.                 "skip this step.\n")
  388. )
  389.  
  390. (set #tp_copyingcdtvprefs        "\n\nCopying the CDTV_Prefs utility to the AsimCDFS: directory.\n")
  391.  
  392. (set #tp_copycdtvemul        "\n\nShould the CDTV emulation option be installed?")
  393. (set #th_copycdtvemul            (cat "\n\nThis will copy over the required files for the "
  394.                 "CDTV emulation:\n   devs:cdtv.device\n   devs:bookmark.device\n   devs:cardmark.device\n   libs:playerprefs.library\n\nIf you do not "
  395.                 "wish the CDTV emulation option to be transferred to your system, "
  396.                 "skip this step.\n")
  397. )
  398. (set #tp_copycdtvdevice        "\n\nCopying cdtv.device to the devs: directory.\n")
  399. (set #tp_copybookmark        "\n\nCopying bookmark.device to the devs: directory.\n")
  400. (set #tp_copycardmark        "\n\nCopying cardmark.device to the devs: directory.\n")
  401. (set #tp_copyplayerprefs    "\n\nCopying playerprefs.library to the libs: directory.\n")
  402.  
  403.  
  404. (set #tp_copycd32emul    "\n\nShould the CD³² emulation option be installed?")
  405. (set #th_copycd32emul        (cat "\n\nThis will copy over the required files for the "
  406.                 "CD³² emulation:\n   devs:cd.device\n   libs:nonvolatile.library\n   libs:lowlevel.library\n\nIf you do not "
  407.                 "wish the CD³² emulation option to be transferred to your system, "
  408.                 "skip this step.\n")
  409. )
  410. (set #tp_copycddevice    "\n\nCopying cd.device to the devs: directory.\n")
  411. (set #tp_copynv        "\n\nCopying nonvolatile.library to the libs: directory.\n")
  412. (set #tp_copylowlevel    "\n\nCopying lowlevel.library to the libs: directory.\n")
  413.  
  414. (set #tp_makeenvarc        "Making the ENVARC:AsimCDFS directory, in which various default files will be placed.")
  415. (set #th_makeenvarc            "This will create a directory in your ENVARC: directory")
  416.  
  417. (set #tp_makeenv        "Making the ENV:AsimCDFS directory, in which various default files will be placed.")
  418. (set #th_makeenv            "This will create a directory in your ENV: directory")
  419. (set #tp_copyicons    "\n\nCopying default icons to the ENVARC: and ENV:AsimCDFS directory.\n")
  420. (set #th_copyicons        "\n\nThis will copy over default icon files to the ENVArc: and ENV:AsimCDFS directory.")
  421.  
  422. (set #tp_catalogs        "Which alternate language catalogs would you like installed?")
  423. (set #th_catalogs        (cat "The various programs have been configured to the following "
  424.                     "alternate languages:\n    Français, Italiano and Deutsch\n\nSelect which"
  425.                     "languages you would like to use with our software.  English "
  426.                     "language support is automatically provided as standard within the software.")
  427. )
  428. (set #tp_copylocale1        "\n\nCopying locale ")
  429. (set #tp_copylocale2        " language catalogs.\n")
  430. (set #th_copylocale    "\n\nThis will copy over the desired langauge file.")
  431.  
  432. (set #text_message_flyer        (cat "NewTek Flyer users\n"
  433.        "------------------\n"
  434.         "Your CD-ROM drive will not be automatically started upon bootup.\n\n"
  435.         "To manually start your CD-ROM drive, you must double-click on the "
  436.         "CD6 icon located in the Storage/DOSDrivers directory on your " 
  437.         "Workbench partition.\n\n"
  438.         "You may wish to leave out the CD6 icon on your Workbench screen "
  439.         "using the \"Leave Out\" menu item in Workbench."  )
  440. )
  441.  
  442.  
  443. (set #text_message_extendedicons    (cat "NewIcons and MagicWB users\n"
  444.     "--------------------------------\n"
  445.     "For NewIcons and MagicWB icons you must now click on the "
  446.     "Install-Icons button. " )
  447.      
  448. )
  449.  
  450.  
  451. ))
  452.  
  453.  
  454.  
  455.  
  456.  
  457.  
  458.  
  459. ;*****
  460. ; set German language strings
  461. (if (= #our_language #Deutsch) (
  462. (set #echotxt "echo \"AsimCDFS wird angemeldet...\"\n")
  463.  
  464. (set #text_please_use_novice (cat "Anmerkung zur Installation\n"
  465.                "--------------------------\n\n"
  466.                          "Wir haben Probleme mit dem Installer bemerkt, "
  467.                          "wenn die Modi 'geübter Benutzer' oder 'Experte' "
  468.                          "benutzt werden. Es wird dringend empfohlen, nur "
  469.                          "im Modus 'Einsteiger' zu installieren.\n"
  470.         ) )
  471.  
  472. (set #text_needwb_2 (cat "\n\nAsimCDFS 3.x benötigt AmigaDOS 2.0 oder höher. "
  473.                          "\n\nSie müssen Ihr Betriebssystem aktualisieren."
  474.                          "\n\nMomentan benutzen Sie Version " #wbversion "."
  475. ))
  476.  
  477.  
  478. (set #tp_insert_disk "Bitte legen Sie die Diskette \"AsimCDFS_v3_Install\" ein.")
  479. (set #th_insert_disk (cat "AsimCDFS und andere Hilfsprogramme werden von dieser "
  480.                         "Diskette auf Ihr System kopiert.")
  481. )
  482.  
  483.  
  484. (set #text_abort1    "\n\nEs werden ungefähr " )
  485. (set #text_abort2    "KB freier Platz auf Ihrer Bootpartition benötigt.\n\nSie haben nur ")
  486. (set #text_abort3    "KB frei.\n\nLöschen oder verschieben Sie Dateien von Ihrer Bootpartition und versuchen Sie es erneut.")
  487.  
  488. (set #tp_isamiga    "\nAsimCDFS v3.8 Installation\n---------------------------\n\Bitte geben Sie Ihre Konfiguration an:")
  489. (set #th_isamiga    (cat    "\n\nWenn AsimCDFS zusammen mit einem CDTV/A570 benutzt wird, dann "
  490.                                 "geben Sie bitte CDTV/A570 an.\n\n"
  491.                                 "Wenn AsimCDFS mit einem CD³² benutzt wird, dann wählen Sie bitte CD³² aus.\n\n"
  492.                                 "Andernfalls wird AsimCDFS für einen Amiga mit SCSI- oder ATAPI-Controller "
  493.                                 "mit einem passenden CD-ROM-Laufwerk installiert.")
  494. )
  495. (set #tc_isamiga_1    "Amiga mit SCSI CD-ROM-Laufwerk")
  496. (set #tc_isamiga_2    "CDTV/A570")
  497. (set #tc_isamiga_3    "CD³²")
  498. (set #tc_isamiga_4    "ATAPI CD-ROM-Laufwerk am A4000/A1200")
  499. (set #tc_isamiga_5    "NewTek Flyer mit CD-ROM (Unit 6) an SCSI")
  500.     
  501.  
  502. (set #tp_ispioneer    "\n\n\nIst Ihr Laufwerk ein Pioneer DRM-60x?")
  503. (set #th_ispioneer    (cat "\n\nFalls Sie AsimCDFS mit einem Pioneer DRM-60x benutzen wollen, "
  504.                                         "treffen Sie bitte die entsprechende Auswahl. Dieses Laufwerk "
  505.                                         "ist ein Hochleistungs-Diskwechsler für 6 CDs und ist nicht "
  506.                                         "sehr verbreitet."
  507.                                         "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")    
  508. )
  509.  
  510. (set #tc_othercdrom    "anderes CD-ROM-Laufwerk")
  511.  
  512. (set #tp_isnakamichi    "\n\n\nIst Ihr Laufwerk ein Nakamichi MBR-7,\nein NEC 4xc oder ein NEC 2cx Diskwechsler?"    )
  513. (set #th_isnakamichi (cat "\n\nFalls Sie AsimCDFS mit einem Nakamichi MBR-7, einem NEC 4xc oder einem NEC 2xc Diskwechsler benutzen wollen, "
  514.                                         "treffen Sie bitte die entsprechende Wahl. Dieses Laufwerk ist ein"
  515.                                         "Hochleistungs-Diskwechsler für 7 CDs und ist nicht sehr verbreitet."
  516.                                         "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")
  517. )
  518.  
  519. (set #tp_isnakamichi4disc    "\n\n\nIst Ihr Laufwerk ein Nakamichi MJ-4 Diskwechsler?"    )
  520. (set #th_isnakamichi4disc (cat "\n\nFalls Sie AsimCDFS mit einem Nakamichi MJ-4 Diskwechsler benutzen wollen, "
  521.                                         "treffen Sie bitte die entsprechende Wahl. Dieses Laufwerk ist ein"
  522.                                         "Hochleistungs-Diskwechsler für 4 CDs und ist nicht sehr verbreitet."
  523.                                         "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")
  524. )
  525.  
  526. (set #tp_ispd        "\n\n\nIst Ihr Laufwerk ein Panasonic LF-1000 PD/CD-ROM-Laufwerk?\n(Kombination aus optischem und CD-ROM-Laufwerk)"    )
  527. (set #th_ispd     (cat "\n\nFalls Sie AsimCDFS mit einem Panasonic PD/CD-ROM-Laufwerk betreiben, "
  528.                                         "treffen Sie bitte die entsprechende Wahl. Dieses Laufwerk ist eine Kombination aus einem "
  529.                                         "optischen Laufwerk (mit Schreib- und Lesezugriff) und einem CD-ROM-Laufwerk.\n"
  530.                                         "Dieses Gerät wird außerdem von Dritten angeboten unter Namen wie Smart & Friendly und Toray.\n\n"
  531.                                         "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")
  532. )
  533.  
  534. (set #text_lf1000_users    (cat "Anmerkung zum Panasonic LF-1000 PD/CD-ROM-Laufwerk\n"
  535.                       "--------------------------------------------------\n"
  536.                 "Bitte stellen Sie sicher, daß Ihr Laufwerk sich im "
  537.                 "\"Two LUN Mode\" befindet. Dies wird mittels Steckbrücken "
  538.                 "an der Rückseite des Laufwerks eingestellt. Näheres "
  539.                 "finden Sie in der Dokumentation, die dem Laufwerk beiliegt.\n\n"
  540.                 "Bitte stellen Sie außerdem sicher, daß Ihr SCSI-Controller "
  541.                 "die Erkennung von LUNs unterstützt."
  542.                 )
  543. )
  544.  
  545. (set #tp_is4x4    "\n\n\nIst Ihr Laufwerk ein NEC4x4 ATAPI Diskwechsler?\n"    )
  546. (set #th_is4x4    (cat "\n\nFalls Sie AsimCDFS mit einem NEC 4x4 ATAPI Diskwechsler benutzen, treffen Sie bitte "
  547.                                         "die entsprechende Auswahl.\n\n"
  548.                                         "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")    
  549. )
  550.  
  551.  
  552. (set #tp_separatepool    "\n\nMöchten Sie getrennte Geräte anmelden oder alle CD-ROMs als EIN Gerät behandeln?\n\n")
  553. (set #th_separatepool    (cat "\n\nFalls Sie Zugriff auf alle CD-ROMs gleichzeitig wünschen, wählen "
  554.                                                 "Sie bitte 'getrennt', andernfalls 'zusammen' - bei letzterem "
  555.                                                 "können Sie mit dem DiscChanger zwischen den CD-ROMs wechseln.")
  556. )
  557. (set #tc_separate    "getrennt")
  558. (set #tc_pooled    "zusammen")
  559.  
  560. (set #text_ourhelp_pioneer        (cat "\n\nDies ist der Basisname, unter dem AmigaDOS die einzelnen CD-ROMs "
  561.                                                                 "anspricht. Da Sie AsimCDFS für einen Pioneer 6-fach-Wechsler installieren, "
  562.                                                                 "werden 6 Geräte von <Basisname>0 bis <Basisname>5 angemeldet (CD0, CD1, ..., CD5). "
  563.                                                                 "\n\nEs darf kein abschließender Doppelpunkt oder die 0 bis 5 vorhanden sein.")
  564. )
  565.  
  566. (set #text_ourhelp_nakamichi    (cat "\n\nDies ist der Basisname, unter dem AmigaDOS die einzelnen CD-ROMs "
  567.                                                                 "anspricht. Da Sie AsimCDFS für einen Nakamichi 7-fach-Wechsler installieren, "
  568.                                                                 "werden 7 Geräte von <Basisname>0 bis <Basisname>6 angemeldet (CD0, CD1, ..., CD6). "
  569.                                                                 "\n\nEs darf kein abschließender Doppelpunkt oder die 0 bis 6 vorhanden sein.")
  570. )
  571.  
  572. (set #text_ourhelp_4x4        (cat "\n\nDies ist der Basisname, unter dem AmigaDOS die einzelnen CD-ROMs "
  573.                                                                 "anspricht. Da Sie AsimCDFS für einen NEC 4x4 4-fach-Wechsler installieren, "
  574.                                                                 "werden 7 Geräte von <Basisname>0 bis <Basisname>3 angemeldet (CD0, CD1, CD2 und CD3). "
  575.                                                                  "\n\nEs darf kein abschließender Doppelpunkt oder die 0 bis 3 vorhanden sein.")
  576. )
  577.  
  578. (set #tp_basedevice    "\n\nWelchen Basisnamen soll das AmigaDOS-Gerät erhalten?\n\n(Es darf kein abschließender Doppelpunkt vorhanden sein.)")
  579.  
  580. (set #tp_cddevice    "\n\nWelchen Namen soll das AmigaDOS-Gerät erhalten?\n\n(Es darf kein abschließender Doppelpunkt vorhanden sein.)")
  581. (set #th_cddevice    (cat "\n\nUnter diesem Namen wird AmigaDOS das CD-ROM-Laufwerk ansprechen. "
  582.                                         "Gebräuchlich ist CD0, Sie können aber auch einen beliebigen anderen Namen wählen. "
  583.                                         "\n\nEs darf kein abschließender Doppelpunkt vorhanden sein.")
  584. )
  585.  
  586. (set #tp_copyasimatapi    "\n\nDatei 'asim_atapi.device' kopieren\n")
  587. (set #th_copyasimatapi    "\n\nDer ATAPI CD-ROM-Treiber asim_atapi.device wird in das Verzeichnis DEVS: kopiert.\n")
  588.  
  589. (set #tp_runinquire    "\n\nMöchten Sie das Hilfsprogramm SCSI Inquire benutzen, um Ihr CD-ROM-Laufwerk zu finden?")
  590. (set #th_runinquire    (cat "\n\nDas Hilfsprogramm SCSI Inquire sucht Ihr System nach passenden "
  591.                                         "SCSI- oder ATAPI-Controllern ab und zeigt eine Liste aller angeschlossenen Geräte. "
  592.                                         "Ihr CD-ROM-Laufwerk muß korrekt angeschlossen und eingeschaltet sein, sonst "
  593.                                         "kann es vom Programm nicht erkannt werden.")    
  594. )
  595.  
  596.  
  597. (set #tp_devicename    "\n\nWie heißt Ihr SCSI- oder ATAPI-Treiber?"    )
  598. (set #th_devicename    (cat "\n\nBitte geben Sie den Namen des Treibers Ihres SCSI-Controllers "
  599.                                         "ein. Die Geräte A2091/A590 und der Amiga 3000 z.B. benutzen "
  600.                                         "\"scsi.device\", unser ATAPI-Treiber heißt \"asim_atapi.device\".\n\n"
  601.                                         "Wenn Sie das Hilfsprogramm SCSI Inquire richtig benutzt haben, dann steht im Eingabefeld bereits "
  602.                                         "der korrekte Name. Andernfalls ziehen Sie bitte die beigefügte Dokumentation zu Rate.")        
  603. )
  604.  
  605. (set #tp_unitnumber    "\n\nUnter welcher Gerätenummer wird Ihr Laufwerk angesprochen?"    )
  606. (set #th_unitnumber    (cat "\n\nBitte geben Sie die Gerätenummer Ihres CD-ROM-Laufwerks an. "
  607.                                         "Dies ist in der Regel eine Nummer zwischen 0 und 6 bei SCSI und zwischen 0 und 1 "
  608.                                         "bei ATAPI-Geräten.\n\n"
  609.                                         "Wenn Sie das Hilfsprogramm SCSI Inquire richtig benutzt haben, dann steht im Eingabefeld bereits "
  610.                                         "die korrekte Gerätenummer. Andernfalls ziehen Sie bitte die beigefügte Dokumentation zu Rate.")        
  611. )
  612.  
  613. (set #tp_automount    "\n\nSoll das CD-ROM-Laufwerk beim Hochfahren automatisch angemeldet werden?"    )
  614. (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"    )
  615.  
  616.  
  617. (set #tp_tunesdir    "Bitte geben Sie an, in welches Verzeichnis die Hilfsprogramme von AsimCDFS kopiert werden sollen:"    )
  618. (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.")
  619.  
  620.  
  621.  
  622. (set #tp_creatingdir    "Das Verzeichnis AsimCDFS: wird angelegt..."    )
  623. (set #th_creatingdir "Es wird das angegebene Verzeichnis für die Hilfsprogramme angelegt.")
  624.  
  625. (set #tp_bufferdir    "Bitte geben Sie das Verzeichnis für die AsimCDFS-Puffer an:")
  626. (set #th_bufferdir    (cat "AsimCDFS benötigt ein Verzeichnis, in dem verschiedene Dateien "
  627.                                 "gepuffert werden können. Dazu gehören Thumbnail-Piktogramme für "
  628.                                 "PhotoCDs, fixierte Piktogramme und Audio-Kataloge. Da die Anzahl der "
  629.                                 "Dateien in diesem Verzeichnis mit Ihrer CD-ROM-Sammlung wächst, wird "
  630.                                 "empfohlen, es möglichst auf einer Partition mit viel Platz einzurichten.")    
  631. )
  632.  
  633. (set #tp_createbuffer    "Das Pufferverzeichnis für AsimCDFS wird eingerichtet..."    )
  634. (set #th_createbuffer    "Das angegebene Verzeichnis für die Pufferung von Daten wird angelegt."    )
  635.  
  636. (set #tp_createsub1    "Das Verzeichnis "    )
  637. (set #tp_createsub2    " wird angelegt..."    )
  638. (set #th_createsub        "Das angegebene Verzeichnis für die Pufferung von Daten wird angelegt."    )
  639.  
  640. (set #tp_copycorel    (cat "\n\nDie Indexdatei Corel_Directory wird in das "
  641.                              "AsimCDFS-Pufferverzeichnis (AsimCDFS_Buffer:) kopiert.\n")    )
  642. (set #th_copycorel    (cat "\n\nEine Indexdatei mit passenden Disknamen für die Corel ProPhoto "
  643.                              "Library (Vol. 1 und 2) wird kopiert.")        )
  644.  
  645.  
  646. (set #tp_copyviewtek    (cat "\n\nDas frei vertreibbare Programm ViewTek "
  647.                         "von Thomas Krehbiel wird ins Verzeichnis C: kopiert.")
  648. )
  649. (set #th_copyviewtek    (cat "\n\nDas frei vertreibbare Bildanzeigeprogramm ViewTek "
  650.                         "wird in Ihr Verzeichnis C: kopiert. Dort wird es automatisch "
  651.                         "aufgerufen, wenn Sie auf Thumbnail-Piktogramme von PhotoCDs "
  652.                         "oder Corel ProPhoto-CDs klicken.")
  653. )
  654.  
  655. (set #tp_deletephoto    "\n\Das überflüssige Programm AsimPhoto wird gelöscht.\n"    )
  656. (set #th_deletephoto        (cat "\n\nDas alte AsimPhoto-Programm wird von AsimCDFS 3.x "
  657.                         "nicht mehr benötigt und kann gelöscht werden.\n")
  658. )
  659.  
  660.  
  661. (set #tp_deleteprefs        "\n\Überflüssige Voreinstellungen für AsimCDFS werden gelöscht.\n")
  662. (set #th_deleteprefs        (cat "\n\nDie alte Voreinstellungsdatei für AsimCDFS wird von "
  663.                         "AsimCDFS 3.x nicht mehr benötigt und kann gelöscht werden.\n")
  664. )
  665.  
  666.  
  667. (set #tp_copyasimcdfs    "\n\nDas AsimCDFS Filesystem wird ins Verzeichnis L: kopiert.\n")
  668. (set #th_copyasimcdfs        (cat "\n\nDas AsimCDFS Filesystem wird in Ihr Verzeichnis L: kopiert.\n\n"
  669.                 "Dies ist ein wesentlicher Schritt bei der Installation und sollte "
  670.                 "keinesfalls ausgelassen werden.\n")
  671. )
  672.  
  673.  
  674. (set #tp_copycdfsdevice    "\n\nDie Datei asimcdfs.device wird ins Verzeichnis DEVS: kopiert.\n")
  675. (set #th_copycdfsdevice    (cat "\n\nDie Datei asimcdfs.device wird in Ihr Verzeichnis DEVS: kopiert.\n\n"
  676.                 "Dies ist ein wesentlicher Schritt bei der Installation und sollte "
  677.                 "keinesfalls ausgelassen werden.\n")
  678. )
  679.  
  680. (set #text_abort_atapiwb    (cat "\n\nFür das asim_atapi.device wird AmigaDOS 3.0 oder höher benötigt. "
  681.                          "\n\nFalls Sie einen Amiga 1200 oder Amiga 4000 benutzen, überprüfen "
  682.                          "Sie bitte die Datei LIBS:version.library.\n\n"
  683.                          "\n\nMomentan liegt LIBS:version.library in der Version " #wbversion " vor.")
  684. )
  685.  
  686. (set #tp_insertmount        "Der MOUNT-Befehl wird in die Startup-Sequence eingefügt...")
  687. (set #th_insertmount1    "\n\nDer Befehl \"MOUNT "    )
  688. (set #th_insertmount2        (cat " FROM DEVS:MOUNTLIST.xxx\" wird in die "
  689.                                                 "\"S:Startup-Sequence\" oder \"S:User-Startup\" eingefügt, "
  690.                                                 "um AsimCDFS beim Hochfahren automatisch zu starten.")
  691. )
  692.  
  693. (set #tp_copymounticon    "\n\nDas Piktogramm für die Mountlist wird kopiert")
  694. (set #th_copymounticon "\n\nDas Piktogramm für die Mountlist-Datei wird kopiert.")
  695.  
  696.  
  697. (set #tp_insertassign        "Zuweisungen werden in die User-Startup eingefügt")
  698. (set #th_insertassign        "\n\nDie Befehle ASSIGN AsimCDFS: und ASSIGN AsimCDFS_Buffer werden in die Datei S:User-Startup eingefügt."    )
  699.  
  700. (set #tp_deletemountlist    "\n\Die überflüssige Mountlist in DEVS:DOSDrivers/ wird gelöscht\n")
  701. (set #th_deletemountlist    (cat "\n\nDie überflüssige Mountlist in DEVS:DOSDrivers/ wird gelöscht. Die Mountlists "
  702.                                         "für AsimCDFS 3.x werden nun in SYS:Storage/DOSDrivers/ abgelegt.\n")    
  703. )
  704.  
  705. (set #tp_copyprefs    "\n\nStandardeinstellungen werden ins Verzeichnis ENVARC:AsimCDFS kopiert.\n"    )
  706. (set #th_copyprefs     "\n\nEine Standard-Voreinstellungsdatei wird kopiert."        )
  707.  
  708.  
  709. (set #tp_copytunes        "\n\nSoll das Hilfsprogramm AsimTunes installiert werden?")
  710. (set #th_copytunes        (cat "\n\nHiermit wird das Hilfsprogramm AsimTunes "
  711.                                 "in das Verzeichnis AsimCDFS: kopiert.\n\n"
  712.                                 "Falls Sie AsimTunes nicht installieren möchten, "
  713.                                 "überspringen Sie diesen Schritt.\n")    
  714. )
  715. (set #tp_copyingtunes    (cat "\n\nDas CD-Audio-Programm AsimTunes wird in das Verzeichnis "
  716.                                   "AsimCDFS: kopiert.\n")    )
  717. (set #tp_copytunesfont    "\n\nDie Zeichensätze für AsimTunes werden nach FONTS: kopiert\n"    )
  718. (set #th_copytunesfont            (cat "\n\nHiermit werden die von AsimTunes benötigten Zeichensätzte kopiert.\n\n"
  719.                                 "Sie werden in das Verzeichnis FONTS: übertragen.\n\n")
  720. )
  721.  
  722.  
  723. (set #tp_copydc    "\n\nSoll das Hilfsprogramm DiscChanger installiert werden?"    )
  724. (set #th_copydc    (cat "\n\nHiermit wird das Hilfsprogramm DiskChanger "
  725.                                 "in das Verzeichnis AsimCDFS: kopiert.\n\n"
  726.                                 "Falls Sie DiscChanger nicht installieren möchten, "
  727.                                 "überspringen Sie diesen Schritt.\n")        
  728. )
  729. (set #tp_copyingdc    "\n\nDas Hilfsprogramm DiscChanger wird ins Verzeichnis AsimCDFS: kopiert.\n" )
  730.  
  731. (set #tp_copypd        "\n\nSoll das Hilfsprogramm PD_Format installiert werden?"    )
  732. (set #th_copypd        (cat "\n\nHiermit wird das Hilfsprogramm PD-Format "
  733.                                         "in das Verzeichnis AsimCDFS: kopiert.\n\n"
  734.                                         "Falls Sie PD_Format nicht installieren möchten, "
  735.                                         "überspringen Sie diesen Schritt.\n")        
  736. )
  737. (set #tp_copyingdc    "\n\nDas Hilfsprogramm PD-Format wird ins Verzeichnis AsimCDFS: kopiert.\n"    )
  738.  
  739. (set #tp_copyasimprefs    "\n\nSoll das Voreinstellerprogramm AsimCDFS_Prefs installiert werden?"    )
  740. (set #th_copyasimprefs    (cat "\n\nHiermit wird das Voreinstellerprogramm AsimCDFS_Prefs "
  741.                                 "ins Verzeichnis AsimCDFS: kopiert.\n\n"
  742.                                 "Falls Sie AsimCDFS_Prefs nicht installieren möchten, "
  743.                                 "überspringen Sie diesen Schritt.\n")        
  744. )
  745. (set #tp_copyingasimprefs    "\n\nDas Voreinstellerprogramm AsimCDFS_Prefs wird ins Verzeichnis AsimCDFS: kopiert.\n"    )
  746.  
  747.  
  748. (set #tp_copysimboot    "\n\nSoll das Hilfsprogramm SimBoot installiert werden?"    )
  749. (set #th_copysimboot    (cat "\n\nHiermit wird das Hilfsprogramm SimBoot "
  750.                                 "ins Verzeichnis AsimCDFS: kopiert.\n\n"
  751.                                 "Falls Sie SimBoot nicht installieren möchten, "
  752.                                 "überspringen Sie diesen Schritt.\n")    
  753. )
  754. (set #th_copyingsimboot    "\n\nDas Hilfsprogramm SimBoot wird ins Verzeichnis AsimCDFS: kopiert.\n"    )
  755.  
  756. (set #tp_copycd32prefs    "\n\nSoll das Voreinstellungsprogramm CD³²_Prefs installiert werden?"    )
  757. (set #th_copycd32prefs    (cat "\n\nHiermit wird das Voreinstellungsprogramm "
  758.                                 "CD³²_Prefs ins Verzeichnis AsimCDFS: kopiert.\n\n"
  759.                                 "Falls Sie CD³²_Prefs nicht installieren möchten, "
  760.                                 "überspringen Sie diesen Schritt\n")        
  761. )
  762.  
  763. (set #tp_copyingcd32prefs    "\n\nDas Voreinstellungsprogramm CD³²_Prefs wird ins Verzeichnis AsimCDFS: kopiert.\n"    )
  764.  
  765. (set #tp_copycdtvprefs    "\n\nSoll das Voreinstellerprogramm CDTV_Prefs installiert werden?"    )
  766. (set #th_copycdtvprefs    (cat "\n\nHiermit wird das Voreinstellerprogramm "
  767.                                 "CDTV_Prefs ins Verzeichnis AsimCDFS: kopiert.\n\n"
  768.                                 "Falls Sie CDTV_Prefs nicht installieren möchten, "
  769.                                 "überspringen Sie diesen Schritt.\n")        
  770. )
  771.  
  772. (set #tp_copyingcdtvprefs    "\n\nDas Voreinstellerprogramm CDTV_Prefs wird ins Verzeichnis AsimCDFS: kopiert.\n"    )
  773.  
  774. (set #tp_copycdtvemul    "\n\nSoll die CDTV-Emulation installiert werden?"    )
  775. (set #th_copycdtvemul    (cat "\n\nHiermit werden die benötigten Dateien für "
  776.                                 "die CDTV-Emulation kopiert:\n   DEVS:cdtv.device\n   DEVS:bookmark.device\n   DEVS:cardmark.device\n   LIBS:playerprefs.library\n\n"
  777.                                 "Falls Sie die CDTV-Emulation nicht installieren möchten, "
  778.                                 "überspringen Sie diesen Schritt.\n")        
  779. )
  780. (set #tp_copycdtvdevice    "\n\nDatei cdtv.device wird ins Verzeichnis DEVS: kopiert.\n"    )
  781. (set #tp_copybookmark    "\n\nDatei bookmark.device wird ins Verzeichnis DEVS: kopiert.\n"    )
  782. (set #tp_copycardmark    "\n\nDatei cardmark.device wird ins Verzeichnis DEVS: kopiert.\n"    )
  783. (set #tp_copyplayerprefs    "\n\nDatei playerprefs.library wird ins Verzeichnis LIBS: kopiert.\n")
  784.  
  785.  
  786. (set #tp_copycd32emul    "\n\nSoll die CD³²-Emulation installiert werden?")
  787. (set #th_copycd32emul    (cat "\n\nHiermit werden die benötigten Dateien für die "
  788.                                 "CD³²-Emulation kopiert:\n   DEVS:cd.device\n   LIBS:nonvolatile.library\n   LIBS:lowlevel.library\n\n"
  789.                                 "Falls Sie die CD³²-Emulation nicht installieren möchten, "
  790.                                 "überspringen Sie diesen Schritt.\n")    
  791. )
  792. (set #tp_copycddevice  "\n\nDatei cd.device wird ins Verzeichnis DEVS: kopiert.\n"    )
  793. (set #tp_copynv    "\n\nDatei nonvolatile.library wird ins Verzeichnis LIBS: kopiert.\n"    )
  794. (set #tp_copylowlevel    "\n\nDatei lowlevel.library wird ins Verzeichnis LIBS: kopiert.\n")
  795.  
  796. (set #tp_makeenvarc    "Verzeichnis ENVARC:AsimCDFS für die Standardeinstellungen wird erstellt."    )
  797. (set #th_makeenvarc    "Hiermit wird ein Unterverzeichnis im Verzeichnis ENVARC: angelegt."        )
  798.  
  799. (set #tp_makeenv    "Verzeichnos ENV:AsimCDFS für die Einstellungen wird erstellt."    )
  800. (set #th_makeenv    "Hiermit wird ein Unterverzeichnis im Verzeichnis ENV: angelegt."        )
  801. (set #tp_copyicons    "\n\nStandardpiktogramme werden ins Verzeichnis ENVARC:AsimCDFS kopiert.\n")
  802. (set #th_copyicons    "\n\nHiermit werden Standardpiktogramme ins Verzeichnis ENVARC/ENV:AsimCDFS kopiert."    )
  803.  
  804. (set #tp_catalogs    "Welche Sprachen sollen installiert werden?"    )
  805. (set #th_catalogs        (cat "Die verschiedenen Programme wurden in folgende Sprachen "
  806.                                         "übersetzt:\n\n   Französisch, Italienisch und Deutsch\n\n"
  807.                                         "Wählen Sie bitte, welche Sprachen Sie benutzen wollen. "
  808.                                         "Englisch wird automatisch als Standard von der Software benutzt.")
  809. )
  810. (set #tp_copylocale1    "\n\nSprachkataloge "    )
  811. (set #tp_copylocale2    " werden kopiert.\n"    )
  812. (set #th_copylocale    "\n\nHiermit wird die gewünschte Sprache installiert.")
  813.  
  814. (set #text_message_flyer    (cat "Benutzer des NewTek Flyers\n"
  815.         "--------------------------\n"
  816.                 "Ihr CD-ROM-Laufwerk wird nicht automatisch beim Hochfahren angemeldet.\n\n"
  817.                 "Um das Gerät von Hand anzumelden, klicken Sie bitte das Piktogramm CD6 "
  818.                 "im Verzeichnis Storage/DOSDrivers auf Ihrer Bootpartition "
  819.                 "doppelt an.\n\n"
  820.                 "Sie sollten das CD6-Piktogramm eventuell auf Ihrer Workbench auslagern "
  821.                 "(mit dem Eintrag \"Auslagern\" im Menü)." )    )
  822.  
  823.  
  824. (set #text_message_extendedicons    (cat "Benutzer von NewIcons und MagicWB\n"
  825.         "---------------------------------\n"
  826.         "Für die AsimCDFS-Hilfsprogramme sind jetzt auch NewIcons- und "
  827.         "MagicWB-Piktogramme auf der Installations-Diskette zu finden. "
  828.         "Um diese zu installieren, klicken Sie nun auf das Install-Icons "
  829.         "Piktogramm .\n\n"
  830.         "Aktuelle Piktogramme können Sie aber auf unserer WWW-Seite "
  831.         "http://www.asimware.com, in unserer Mailbox oder im Aminet finden." ))
  832. ))
  833.  
  834.  
  835.  
  836.  
  837.  
  838.  
  839.  
  840.  
  841.  
  842.  
  843. (complete 0)
  844.  
  845.  
  846. ;*****
  847. ;  Please!  Use Novice!
  848. (if (> @user-level 0)
  849.     (message #text_please_use_novice)
  850. )
  851.  
  852.  
  853. ;*****
  854. ;  Need WB 2.0 or higher.
  855. (if (< #wbversion 37)
  856.     (abort #text_needwb_2)
  857. )
  858.  
  859.  
  860. ;*****
  861. ;  Lock our install disk
  862. (askdisk
  863.     (prompt #tp_insert_disk)
  864.     (help    #th_insert_disk)
  865.     (dest  "AsimCDFS_v3_Install")
  866.     (newname "AsimCDFSInst")
  867. )
  868.  
  869.  
  870.  
  871. ;*****
  872. ;  Need lots of space on sys volume for devs, l, etc.
  873. ;    assume about:  55K for asimcdfs.device
  874. ;                        110K for AsimCDFS
  875.  
  876. (set #installsize 168960)
  877. (set #installsize (+ #installsize (getsize "AsimCDFSInst:devs/asim_atapi.device") ))
  878. (set #installsize (+ #installsize (getsize "AsimCDFSInst:AsimTunes") ))
  879. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DiscChanger") ))
  880. (set #installsize (+ #installsize (getsize "AsimCDFSInst:AsimCDFS_Prefs") ))
  881. (set #installsize (+ #installsize (getsize "AsimCDFSInst:SimBoot") ))
  882. (set #installsize (+ #installsize (getsize "AsimCDFSInst:PD_Format") ))
  883. (set #installsize (+ #installsize (getsize "AsimCDFSInst:CD³²_Prefs") ))
  884. (set #installsize (+ #installsize (getsize "AsimCDFSInst:CDTV_Prefs") ))
  885. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCDFS_Prefs.info") ))
  886. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCDTV_Prefs.info") ))
  887. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Track.info") ))
  888. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Disk.info") ))
  889. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Drawer.info") ))
  890. (set #installsize (+ #installsize (getsize "AsimCDFSInst:PhotoCD_Disk.info") ))
  891. (set #installsize (+ #installsize (getsize "AsimCDFSInst:PhotoCD_Drawer.info") ))
  892. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Raw_Sector.info") ))
  893. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Raw_Disk.info") ))
  894. (set #installsize (+ #installsize (getsize "AsimCDFSInst:MPEG_Track.info") ))
  895. (set #installsize (+ #installsize (getsize "AsimCDFSInst:MPEG_Disk.info") ))
  896. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCD³²_Prefs.info") ))
  897. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Storage/DOSDrivers/CD0") ))
  898. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Storage/DOSDrivers/CD0.info") ))
  899.  
  900. (if (< (getdiskspace "SYS:") #installsize)
  901.     (abort  #text_abort1 (/ #installsize 1024) #text_abort2 (/ (getdiskspace "SYS:") 1024)    #text_abort3 )
  902. )
  903.  
  904.  
  905. (user 2)
  906.  
  907. (complete 3)
  908. ;*****
  909. ;  Ask if CDTV (1) , CD³² (2) or Amiga (0)
  910. (set #IsAmiga
  911.     (askchoice
  912.         (prompt #tp_isamiga )
  913.         (default 0 )
  914.         (choices #tc_isamiga_1 #tc_isamiga_2 #tc_isamiga_3 #tc_isamiga_4 #tc_isamiga_5 )
  915.         (help #th_isamiga )
  916.     )
  917. )
  918.  
  919. (complete 6)
  920. ;*****
  921. ;  Is CDTV
  922. (if (= #IsAmiga #typeCDTV) 
  923.     ((set #CDDefault_NC "CD1" )
  924.     (set #SCSIDevice "cdtv.device")
  925.     (set #SCSIUnit 0)
  926.     )
  927. )
  928.  
  929. ;*****
  930. ;  Is CD³²
  931. (if (= #IsAmiga #typeCD32) 
  932.     ((set #CDDefault_NC "CD1" )
  933.     (set #SCSIDevice "cd.device")
  934.     (set #SCSIUnit 0)
  935.     )
  936. )
  937.  
  938. ;*****
  939. ;  Flyer
  940. (if (= #IsAmiga #typeFLYER) 
  941.     (set #CDDefault_NC "CD6" )
  942. )
  943.  
  944.  
  945. ;*****
  946. ;  If amiga, ask if using Pioneer or other
  947. (if (= #IsAmiga #typeAMIGA)
  948.     (set #isPioneer 
  949.         (askbool
  950.             (prompt #tp_ispioneer )
  951.             (default 0)
  952.             (choices "Pioneer DRM-60x" #tc_othercdrom)
  953.             (help #th_ispioneer )
  954.         )
  955.     )
  956. )
  957.  
  958.  
  959. ;*****
  960. ;  If ispioneer==0, ask if using Nakamichi or other
  961. (if (and (= #isPioneer 0) (= #IsAmiga #typeAMIGA))
  962.     (set #isNakamichi 
  963.         (askbool
  964.             (prompt #tp_isnakamichi )
  965.             (default 0)
  966.             (choices "MBR-7 / NEC 2xc, 4xc" #tc_othercdrom)
  967.             (help #th_isnakamichi )
  968.         )
  969.     )
  970. )
  971.  
  972. ;*****
  973. ;  If ispioneer==0 & isnakamichi==0, ask if using nak4disc or other
  974. (if (and (= #isNakamichi 0) (and (= #isPioneer 0) (= #IsAmiga #typeAMIGA)) )
  975.     (set #isNakamichi4Disc 
  976.         (askbool
  977.             (prompt #tp_isnakamichi4disc )
  978.             (default 0)
  979.             (choices "MJ-4" #tc_othercdrom)
  980.             (help #th_isnakamichi4disc )
  981.         )
  982.     )
  983. )
  984.  
  985. ;*****
  986. ;  If ispioneer==0 & isnakamichi==0, isnakamichi4disc==0 ask if using PD/CD-ROM or other
  987. (if (and (= #isNakamichi 0) (and (= #isPioneer 0) (and (= #isNakamichi4Disc 0) (= #IsAmiga #typeAMIGA))) )
  988.     (set #isPDCD 
  989.         (askbool
  990.             (prompt #tp_ispd )
  991.             (default 0)
  992.             (choices "LF-1000 PD/CD-ROM" #tc_othercdrom)
  993.             (help #th_ispd )
  994.         )
  995.     )
  996. )
  997.  
  998.  
  999.  
  1000. (if (= #isPDCD 1)
  1001.     (message #text_lf1000_users )
  1002. )
  1003.  
  1004.  
  1005.  
  1006. ;*****
  1007. ;  If is atapi, then ask if it is a 4x4
  1008. (if (= #IsAmiga #typeATAPI) 
  1009.     (set #is4X4 
  1010.         (askbool
  1011.             (prompt #tp_is4x4 )
  1012.             (default 0)
  1013.             (choices "NEC 4X4" #tc_othercdrom)
  1014.             (help #th_is4x4 )
  1015.         )
  1016.     )
  1017. )
  1018.  
  1019. (complete 9)
  1020. (if (or #is4X4 (or #isPioneer (or #isNakamichi4Disc #isNakamichi)))
  1021.     (
  1022.     ;*****
  1023.     ;  ask if Pioneer/Nakamichi/NEC is separate or pooled
  1024.     (set #PioneerSeparate
  1025.             (askbool
  1026.                 (prompt #tp_separatepool )
  1027.                 (default 0 )
  1028.                 (choices #tc_separate #tc_pooled)
  1029.                 (help #th_separatepool )
  1030.             )
  1031.         )
  1032.  
  1033.  
  1034.  
  1035.     ;*****
  1036.     ;  If pioneer separate, ask for base name
  1037.     (if #PioneerSeparate
  1038.         ((if #isPioneer
  1039.             (set #ourhelp #text_ourhelp_pionner )
  1040.         )
  1041.     
  1042.         (if #isNakamichi
  1043.             (set #ourhelp #text_ourhelp_nakamichi )
  1044.         )
  1045.  
  1046.         (if (or #is4X4 #isNakamichi4Disc)
  1047.             (set #ourhelp #text_ourhelp_4x4 )
  1048.         )
  1049.     
  1050.         (set #CDDevice_NC 
  1051.                 (askstring
  1052.                     (prompt #tp_basedevice )
  1053.                     (default "CD" )
  1054.                     (help #ourhelp)
  1055.                 )
  1056.             )
  1057.         (set #CDDevice (cat #CDDevice_NC "0:")))
  1058.         )
  1059.     )
  1060. )
  1061.  
  1062.  
  1063. ;*****
  1064. ;  If pioneer pooled or other CD-ROM, ask for CD0 device alternate
  1065. (if (not #PioneerSeparate)
  1066.     ((set #CDDevice_NC 
  1067.         (askstring
  1068.             (prompt #tp_cddevice )
  1069.             (default #CDDefault_NC )
  1070.             (help #th_cddevice )
  1071.         )
  1072.     )
  1073.  
  1074.     (set #CDDevice (cat #CDDevice_NC ":") ))
  1075. )
  1076.  
  1077.  
  1078. ;*****
  1079. ;  Copy over asim_atapi.device
  1080. (if (= #IsAmiga #typeATAPI)
  1081.     ((user #theirlevel)
  1082.  
  1083.     (copyfiles
  1084.         (prompt #tp_copyasimatapi )
  1085.         (source "AsimCDFSInst:devs/asim_atapi.device")
  1086.         (dest "DEVS:")
  1087.         (confirm)
  1088.         (help #th_copyasimatapi)
  1089.     )
  1090.  
  1091.     (user 2)
  1092.     )
  1093. )
  1094.  
  1095. ;*****
  1096. ;  Ask to run SCSI Inquire
  1097. (if (or (= #IsAmiga #typeAMIGA) (= #IsAmiga #typeATAPI))
  1098.     (set #useInquire
  1099.         (askbool
  1100.             (prompt #tp_runinquire )
  1101.             (default 1 )
  1102.             (help #th_runinquire )
  1103.         )
  1104.     )
  1105. )
  1106.  
  1107.  
  1108. ;*****
  1109. ;  Run SCSI Inquire
  1110. (if #useInquire
  1111.     (
  1112.     (if (= #IsAmiga #typeATAPI)
  1113.         (run "AsimCDFS_v3_Install:SCSI_Inquire force_atapi")    
  1114.     )
  1115.  
  1116.     (if (= #IsAmiga #typeAMIGA)
  1117.         (run "AsimCDFS_v3_Install:SCSI_Inquire")    
  1118.     )
  1119.     
  1120.     (if (exists "ENV:SCSI_Device")
  1121.         ((set #SCSIDevice (getenv "SCSI_Device"))
  1122.         (set #SCSIUnit (+ (getenv "SCSI_Unit")))
  1123.         ))
  1124.     )
  1125. )
  1126.  
  1127.  
  1128.  
  1129. ;*****
  1130. ;  The LF-1000 PD/CD-ROM drive uses LUN #1 for the CD-ROM operation
  1131. (if (= #isPDCD 1)
  1132.     (set #SCSIUnit (+ 10 #SCSIUnit))
  1133. )
  1134.  
  1135.  
  1136. (complete 12)
  1137. (if (= #IsAmiga #typeAMIGA)
  1138.     ;*****
  1139.     ;  Ask for device name
  1140.     ((set #SCSIDevice 
  1141.         (askstring
  1142.             (prompt #tp_devicename )
  1143.             (default #SCSIDevice )
  1144.             (help #th_devicename )
  1145.         )
  1146.     )
  1147.     
  1148.     (complete 15)
  1149.     ;****
  1150.     ;  Ask for unit number
  1151.     (set #SCSIUnit 
  1152.         (asknumber
  1153.             (prompt #tp_unitnumber )
  1154.             (default #SCSIUnit )
  1155.             (help #th_unitnumber )
  1156.         )
  1157.     ))
  1158. )
  1159.  
  1160.  
  1161. ;*****
  1162. ;  Ask for automount?
  1163. (complete 18)
  1164. (if (not (= #IsAmiga #typeFLYER))
  1165.     (set #autoMount
  1166.         (askbool
  1167.             (prompt #tp_automount )
  1168.             (help #th_automount)
  1169.             (default 1)
  1170.         )
  1171.     )
  1172. )
  1173.  
  1174. (if (= #IsAmiga #typeFLYER)
  1175.     ((set #autoMount 0)
  1176.     (set #SCSIUnit 206)
  1177.     (set #SCSIDevice "flyerscsi.device"))
  1178. )
  1179.  
  1180.  
  1181. (set #mountDirectory "sys:storage/DOSDrivers/")
  1182.  
  1183.  
  1184.  
  1185. ;*****
  1186. ;  Ask for AsimCDFS:
  1187. (set #tunesDir
  1188.     (askdir
  1189.         (prompt #tp_tunesdir )
  1190.         (help #th_tunesdir)
  1191.         (default @default-dest)
  1192.         (newpath)
  1193.     )
  1194. )
  1195.  
  1196. (if (not (exists #tunesDir (noreq)))
  1197.     (makedir #tunesDir
  1198.         (prompt #tp_creatingdir)
  1199.         (help #th_creatingdir)
  1200.         (infos)
  1201.         )
  1202. )
  1203. (makeassign "AsimCDFS" #tunesDir)
  1204.  
  1205.  
  1206. ;*****
  1207. ;  Ask for AsimCDFS_Buffer:
  1208. (set #bufferDir "Work:AsimCDFS_Buffer")
  1209. (run "AsimCDFS_v3_Install:c/MostFree")    
  1210.     
  1211. (if (exists "ENV:MostFree")
  1212.     (set #bufferDir (cat (getenv "MostFree") "AsimCDFS_Buffer"))
  1213. )
  1214.  
  1215. (if (= #IsAmiga #typeFLYER)
  1216.     (if (exists "WORK:" (noreq))
  1217.         (set #bufferDir "WORK:AsimCDFS_Buffer")
  1218.         (set #bufferDir "SYS:AsimCDFS_Buffer")
  1219.     )
  1220.     
  1221. )
  1222.  
  1223.  
  1224. (set #bufferDir
  1225.     (askdir
  1226.         (prompt #tp_bufferdir )
  1227.         (help #th_bufferdir )
  1228.         (default #bufferDir )
  1229.         (newpath)
  1230.     )
  1231. )
  1232.  
  1233. (if (not (exists #bufferDir (noreq)))
  1234.     (makedir #bufferDir
  1235.         (prompt #tp_createbuffer)
  1236.         (help #th_createbuffer)
  1237.         (infos)
  1238.         )
  1239. )
  1240. (makeassign "AsimCDFS_Buffer" #bufferDir)
  1241. (user #theirlevel)
  1242.  
  1243.  
  1244. (set n 0)
  1245. (while
  1246.     (set #buffsubdir 
  1247.         (select n "AsimCDFS_Buffer:PhotoCDIcon_Buffer"
  1248.                      "AsimCDFS_Buffer:Audio"
  1249.                      "AsimCDFS_Buffer:Raw"
  1250.                      "AsimCDFS_Buffer:Marks"
  1251.                      "AsimCDFS_Buffer:NonVolatile"
  1252.                    ""
  1253.             )
  1254.         )
  1255.     (
  1256.     (if (not (exists #buffsubdir (noreq)))
  1257.         (makedir #buffsubdir
  1258.             (prompt #tp_createsub1 #buffsubdir )
  1259.             (help #th_createsub )
  1260.             (infos)
  1261.             )
  1262.     )
  1263.  
  1264.     (set n (+ n 1))
  1265.     )
  1266. )
  1267.  
  1268.  
  1269. (copyfiles
  1270.     (prompt #tp_copycorel )
  1271.     (source "AsimCDFSInst:Corel_Directory")
  1272.     (dest "AsimCDFS_Buffer:")
  1273.     (confirm)
  1274.     (help #th_copycorel)
  1275. )
  1276.  
  1277.  
  1278.  
  1279. (if (not (exists "C:ViewTek" (noreq)))
  1280.     ((copyfiles
  1281.         (prompt #tp_copyviewtek)
  1282.         (source "AsimCDFSInst:C/VT")
  1283.         (dest "C:")
  1284.         (newname "ViewTek")
  1285.         (help #th_copyviewtek)
  1286.         (confirm)
  1287.     ))
  1288. )
  1289.  
  1290.  
  1291.  
  1292. ;*****
  1293. ;  delete obsolete files
  1294. ;  Delete old AsimPhoto, if present in AsimCDFS dir.
  1295. ;  all other files are either the user's or will be over written
  1296. (if (exists "AsimCDFS:AsimPhoto")
  1297.     ((delete "AsimCDFS:AsimPhoto"
  1298.         (prompt #tp_deletephoto )
  1299.         (confirm)
  1300.         (help #th_deletephoto )
  1301.         )
  1302.     )
  1303. )        
  1304.  
  1305.  
  1306. (if (exists "AsimCDFS:AsimPhoto.info")
  1307.     ((delete "AsimCDFS:AsimPhoto.info"
  1308.         (prompt #tp_deletephoto )
  1309.         (confirm)
  1310.         (help #th_deletephoto )
  1311.         )
  1312.     )
  1313. )        
  1314.  
  1315. (if (exists "ENVARC:AsimCDFS/Photo.info")
  1316.     ((delete "ENVARC:AsimCDFS/Photo.info"
  1317.         (prompt #tp_deletephoto )
  1318.         (confirm)
  1319.         (help #th_deletephoto )
  1320.         )
  1321.     )
  1322. )        
  1323.  
  1324.  
  1325. (if (exists "ENVARC:AsimCDFS/DiscChanger.prefs")
  1326.     ((delete "ENVARC:AsimCDFS/DiscChanger.prefs"
  1327.         (prompt #tp_deleteprefs )
  1328.         (confirm)
  1329.         (help #th_deleteprefs )
  1330.         )
  1331.     )
  1332. )        
  1333.  
  1334. (if (exists "ENVARC:AsimCDFS/AsimTunes.prefs")
  1335.     ((delete "ENVARC:AsimCDFS/AsimTunes.prefs"
  1336.         (prompt #tp_deleteprefs )
  1337.         (confirm)
  1338.         (help #th_deleteprefs )
  1339.         )
  1340.     )
  1341. )        
  1342.  
  1343.  
  1344. (if (exists "ENVARC:AsimCDFS/AsimPhoto.prefs")
  1345.     ((delete "ENVARC:AsimCDFS/AsimPhoto.prefs"
  1346.         (prompt #tp_deleteprefs )
  1347.         (confirm)
  1348.         (help #th_deleteprefs )
  1349.         )
  1350.     )
  1351. )        
  1352.  
  1353.  
  1354.  
  1355. ;*****
  1356. ;  l:AsimCDFS
  1357. (complete 21)
  1358. (protect "l:AsimCDFS" "rwed" )
  1359. (run "AsimCDFSInst:c/lx e AsimCDFSInst:l/AsimCDFS.lha l:"
  1360.     (prompt #tp_copyasimcdfs )
  1361.     (confirm)
  1362.     (help #th_copyasimcdfs )
  1363. )
  1364.  
  1365.  
  1366.  
  1367. ;*****
  1368. ;  devs:asimcdfs.device
  1369. (complete 25)
  1370. (protect "devs:asimcdfs.device" "rwed" )
  1371. (run "AsimCDFSInst:c/lx e AsimCDFSInst:devs/asimcdfs.lha devs:"
  1372.     (prompt #tp_copycdfsdevice )
  1373.     (confirm)
  1374.     (help #th_copycdfsdevice )
  1375. )
  1376.  
  1377.  
  1378.  
  1379.  
  1380.  
  1381. ;*****
  1382. ;  Create PD0 mountlist for PD/CD-ROM drive
  1383. ;(if (= #isPDCD 1)
  1384. ;    (
  1385. ;    )
  1386. ;)
  1387.  
  1388.  
  1389.  
  1390. (if (and (= #IsAmiga #typeATAPI) (< #wbversion 39) )
  1391.     (abort #text_abort_atapiwb #wbversion ".")
  1392. )
  1393.  
  1394.  
  1395. ;*****
  1396. ;  Create mountlists and alter user-startup
  1397. ;
  1398. ;  no need to worry about NEC 4X4 as the atapi.device requires WB3.0 or above
  1399. ;  (at this time!)
  1400. ;*****
  1401. (if (= #wbversion 37) 
  1402.     ((if #PioneerSeparate
  1403.         ((set #startupCommand1 (cat "mount >NIL: " #CDDevice_NC "0: from devs:MountList." #CDDevice_NC "\n") )
  1404.         (set #startupCommand2 (cat "mount >NIL: " #CDDevice_NC "1: from devs:MountList." #CDDevice_NC "\n") )
  1405.         (set #startupCommand3 (cat "mount >NIL: " #CDDevice_NC "2: from devs:MountList." #CDDevice_NC "\n") )
  1406.         (set #startupCommand4 (cat "mount >NIL: " #CDDevice_NC "3: from devs:MountList." #CDDevice_NC "\n") )
  1407.         (set #startupCommand5 (cat "mount >NIL: " #CDDevice_NC "4: from devs:MountList." #CDDevice_NC "\n") )
  1408.         (if #isPioneer
  1409.             (set #startupCommand6 (cat #startupCommand5 "mount >NIL: " #CDDevice_NC "5: from devs:MountList." #CDDevice_NC "\n") )
  1410.         )
  1411.         (if #isNakamichi
  1412.             (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") )
  1413.         )
  1414.             
  1415.         
  1416.         (if #autoMount
  1417.             ((protect "S:User-Startup" "rwed" )
  1418.             (protect "S:Startup-Sequence" "rwed" )
  1419.             
  1420.             (startup "AsimCDFS"
  1421.                 (command #echotxt)
  1422.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1423.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1424.                 (command #startupCommand1 )
  1425.                 (command #startupCommand2 )
  1426.                 (command #startupCommand3 )
  1427.                 (command #startupCommand4 )
  1428.                 (command #startupCommand6 )
  1429.                 (prompt #tp_insertmount)
  1430.                 (help #th_insertmount1 #CDDevice_NC #th_insertmount2)
  1431.             ))
  1432.         ))
  1433.     )
  1434.  
  1435.     (if (not #PioneerSeparate)
  1436.         ((set #startupCommand (cat "mount >NIL: " #CDDevice " from devs:MountList." #CDDevice_NC "\n") )
  1437.         (if #autoMount
  1438.             ((protect "S:User-Startup" "rwed" )
  1439.             (protect "S:Startup-Sequence" "rwed" )
  1440.             
  1441.             (startup "AsimCDFS"
  1442.                 (command #echotxt)
  1443.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1444.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1445.                 (command #startupCommand )
  1446.                 (prompt #tp_insertmount)
  1447.                 (help #th_insertmount1 #CDDevice #th_insertmount2)
  1448.             ))
  1449.         ))
  1450.     )
  1451.  
  1452.     
  1453.     (if (not #autoMount)
  1454.         ((protect "S:User-Startup" "rwed" )
  1455.         (protect "S:Startup-Sequence" "rwed" )
  1456.         
  1457.         (startup "AsimCDFS"
  1458.             (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1459.             (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1460.             (prompt #tp_insertmount)
  1461.             (help #th_insertmount1 #CDDevice #th_insertmount2)
  1462.         ))
  1463.     )
  1464.  
  1465.     (protect (cat "devs:MountList." #CDDevice_NC) "rwed" )
  1466.  
  1467.     (set #Mount_Five 
  1468.         (cat
  1469.             #CDDevice_NC "4:\n"
  1470.             "    Device         = " #SCSIDevice "\n" 
  1471.             "    Unit           = "(+ 40 #SCSIUnit) "\n" 
  1472.             "    Mount          = 1\n"
  1473.             #text_mountfiller
  1474.             "#\n\n"
  1475.             #CDDevice_NC "5:\n"
  1476.             "    Device         = " #SCSIDevice "\n" 
  1477.             "    Unit           = "(+ 50 #SCSIUnit) "\n" 
  1478.             "    Mount          = 1\n"
  1479.             #text_mountfiller
  1480.             "#\n\n"
  1481.         )
  1482.     )
  1483.  
  1484.  
  1485.     (if #isPioneer 
  1486.         (set #LastLine (cat #Mount5 "\n"))
  1487.     )
  1488.  
  1489.     (if #isNakamichi 
  1490.         (set #LastLine (cat    #Mount5
  1491.                             #CDDevice_NC "6:\n"
  1492.                             "    Device         = " #SCSIDevice "\n"
  1493.                             "    Unit           = "(+ 60 #SCSIUnit) "\n"
  1494.                             "    Mount          = 1\n"
  1495.                             #text_mountfiller
  1496.                             "#\n\n"
  1497.                             )
  1498.             )
  1499.         )
  1500.                             
  1501.     (if #isNakamichi4Disc
  1502.         (set #LastLine "\n")
  1503.     )
  1504.  
  1505.  
  1506.     (if #PioneerSeparate
  1507.         (textfile
  1508.             (dest (cat "devs:MountList." #CDDevice_NC) )
  1509.             (append #text_mountheader)
  1510.             (append #CDDevice_NC "0:\n")
  1511.             (append "    Device         = " #SCSIDevice "\n" )
  1512.             (append "    Unit           = "(+ 00 #SCSIUnit) "\n" )
  1513.             (append "    Mount          = 1\n")
  1514.             (append #text_mountfiller)
  1515.             (append "#\n\n")
  1516.             (append #CDDevice_NC "1:\n")
  1517.             (append "    Device         = " #SCSIDevice "\n" )
  1518.             (append "    Unit           = "(+ 10 #SCSIUnit) "\n" )
  1519.             (append "    Mount          = 1\n")
  1520.             (append #text_mountfiller)
  1521.             (append "#\n\n")
  1522.             (append #CDDevice_NC "2:\n")
  1523.             (append "    Device         = " #SCSIDevice "\n" )
  1524.             (append "    Unit           = "(+ 20 #SCSIUnit) "\n" )
  1525.             (append "    Mount          = 1\n")
  1526.             (append #text_mountfiller)
  1527.             (append "#\n\n")
  1528.             (append #CDDevice_NC "3:\n")
  1529.             (append "    Device         = " #SCSIDevice "\n" )
  1530.             (append "    Unit           = "(+ 30 #SCSIUnit) "\n" )
  1531.             (append "    Mount          = 1\n")
  1532.             (append #text_mountfiller)
  1533.             (append "#\n\n")
  1534.             (append #LastLine )
  1535.         )
  1536.     )
  1537.  
  1538.  
  1539.  
  1540.     (if (not #PioneerSeparate)
  1541.         (textfile
  1542.             (dest (cat "devs:MountList." #CDDevice_NC) )
  1543.             (append #text_mountheader)
  1544.             (append #CDDevice "\n")
  1545.             (append "    Device         = " #SCSIDevice "\n" )
  1546.             (append "    Unit           = " #SCSIUnit "\n" )
  1547.             (append "    Mount          = " #autoMount "\n")
  1548.             (append #text_mountfiller)
  1549.             (append "#\n")
  1550.         )
  1551.     ))
  1552. )
  1553.  
  1554.  
  1555.  
  1556. (if (> #wbversion 37) 
  1557.     ((if (not #PioneerSeparate)
  1558.         ((textfile
  1559.             (dest (cat #mountDirectory #CDDevice_NC) )
  1560.             (append #text_mountheader)
  1561.             (append "    Device         = " #SCSIDevice "\n" )
  1562.             (append "    Unit           = " #SCSIUnit "\n" )
  1563.             (append "    Mount          = 1\n")
  1564.             (append #text_mountfiller)
  1565.         )
  1566.  
  1567.         (copyfiles
  1568.                 (prompt #tp_copymounticon)
  1569.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1570.                 (dest #mountDirectory)
  1571.                 (newname (cat #CDDevice_NC ".info"))
  1572.                 (help #th_copymounticon)
  1573.                 (confirm)
  1574.             )        
  1575.  
  1576.     ))
  1577.  
  1578.  
  1579.     (if #PioneerSeparate
  1580.         ((textfile
  1581.             (dest (cat #mountDirectory #CDDevice_NC "0") )
  1582.             (append #text_mountheader)
  1583.             (append "    Device         = " #SCSIDevice "\n" )
  1584.             (append "    Unit           = "(+ 00 #SCSIUnit) "\n" )
  1585.             (append "    Mount          = 1\n")
  1586.             (append #text_mountfiller)
  1587.         )
  1588.  
  1589.         (copyfiles
  1590.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1591.                 (dest #mountDirectory)
  1592.                 (newname (cat #CDDevice_NC "0.info"))
  1593.                 (prompt #tp_copymounticon)
  1594.                 (help #th_copymounticon)
  1595.                 (confirm)
  1596.             )
  1597.         
  1598.         (textfile
  1599.             (dest (cat #mountDirectory #CDDevice_NC "1") )
  1600.             (append #text_mountheader)
  1601.             (append "    Device         = " #SCSIDevice "\n" )
  1602.             (append "    Unit           = "(+ 10 #SCSIUnit) "\n" )
  1603.             (append "    Mount          = 1\n")
  1604.             (append #text_mountfiller)
  1605.         )
  1606.  
  1607.         (copyfiles
  1608.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1609.                 (dest #mountDirectory)
  1610.                 (newname (cat #CDDevice_NC "1.info"))
  1611.                 (prompt #tp_copymounticon)
  1612.                 (help #th_copymounticon)
  1613.                 (confirm)
  1614.             )
  1615.  
  1616.         (textfile
  1617.             (dest (cat #mountDirectory #CDDevice_NC "2") )
  1618.             (append #text_mountheader)
  1619.             (append "    Device         = " #SCSIDevice "\n" )
  1620.             (append "    Unit           = "(+ 20 #SCSIUnit) "\n" )
  1621.             (append "    Mount          = 1\n")
  1622.             (append #text_mountfiller)
  1623.         )
  1624.         
  1625.  
  1626.         (copyfiles
  1627.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1628.                 (dest #mountDirectory)
  1629.                 (newname (cat #CDDevice_NC "2.info"))
  1630.                 (prompt #tp_copymounticon)
  1631.                 (help #th_copymounticon)
  1632.                 (confirm)
  1633.             )
  1634.  
  1635.         (textfile
  1636.             (dest (cat #mountDirectory #CDDevice_NC "3") )
  1637.             (append #text_mountheader)
  1638.             (append "    Device         = " #SCSIDevice "\n" )
  1639.             (append "    Unit           = "(+ 30 #SCSIUnit) "\n" )
  1640.             (append "    Mount          = 1\n")
  1641.             (append #text_mountfiller)
  1642.         )
  1643.         
  1644.         (copyfiles
  1645.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1646.                 (dest #mountDirectory)
  1647.                 (newname (cat #CDDevice_NC "3.info"))
  1648.                 (prompt #tp_copymounticon)
  1649.                 (help #th_copymounticon)
  1650.                 (confirm)
  1651.             )
  1652.  
  1653.         (if (or #isPioneer #isNakamichi)
  1654.             ((textfile
  1655.                 (dest (cat #mountDirectory #CDDevice_NC "4") )
  1656.                 (append #text_mountheader)
  1657.                 (append "    Device         = " #SCSIDevice "\n" )
  1658.                 (append "    Unit           = "(+ 40 #SCSIUnit) "\n" )
  1659.                 (append "    Mount          = 1\n")
  1660.                 (append #text_mountfiller)
  1661.             )
  1662.     
  1663.             (copyfiles
  1664.                     (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1665.                     (dest #mountDirectory)
  1666.                     (newname (cat #CDDevice_NC "4.info"))
  1667.                     (prompt #tp_copymounticon)
  1668.                     (help #th_copymounticon)
  1669.                     (confirm)
  1670.                 )
  1671.     
  1672.             (textfile
  1673.                 (dest (cat #mountDirectory #CDDevice_NC "5") )
  1674.                 (append #text_mountheader)
  1675.                 (append "    Device         = " #SCSIDevice "\n" )
  1676.                 (append "    Unit           = "(+ 50 #SCSIUnit) "\n" )
  1677.                 (append "    Mount          = 1\n")
  1678.                 (append #text_mountfiller)
  1679.             )
  1680.             (copyfiles
  1681.                     (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1682.                     (dest #mountDirectory)
  1683.                     (newname (cat #CDDevice_NC "5.info"))
  1684.                     (prompt #tp_copymounticon)
  1685.                     (help #th_copymounticon)
  1686.                     (confirm)
  1687.                 )
  1688.     
  1689.             (if #isNakamichi
  1690.                 ((textfile
  1691.                     (dest (cat #mountDirectory #CDDevice_NC "6") )
  1692.                     (append #text_mountheader)
  1693.                     (append "    Device         = " #SCSIDevice "\n" )
  1694.                     (append "    Unit           = "(+ 60 #SCSIUnit) "\n" )
  1695.                     (append "    Mount          = 1\n")
  1696.                     (append #text_mountfiller)
  1697.                 )
  1698.                 (copyfiles
  1699.                         (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1700.                         (dest #mountDirectory)
  1701.                         (newname (cat #CDDevice_NC "6.info"))
  1702.                         (prompt #tp_copymounticon)
  1703.                         (help #th_copymounticon)
  1704.                         (confirm)
  1705.                 ))
  1706.             ))
  1707.         )
  1708.     ))
  1709.  
  1710.  
  1711.     (protect "S:User-Startup" "rwed" )
  1712.     (protect "S:Startup-Sequence" "rwed" )
  1713.  
  1714.     (if (not #autoMount)
  1715.         (startup "AsimCDFS"
  1716.             (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1717.             (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1718.             (prompt #tp_insertassign)
  1719.             (help #th_insertassign)
  1720.             )
  1721.         )
  1722.  
  1723.  
  1724.  
  1725.     (if #autoMount
  1726.         ((if #isPioneer
  1727.             (set #mountCommand6 (cat "\nmount >NIL: " #CDDevice_NC "4:\n" "mount >NIL: " #CDDevice_NC "5:\n") )
  1728.             )
  1729.         (if #isNakamichi
  1730.             (set #mountCommand6 (cat "\nmount >NIL: " #CDDevice_NC "4:\n" "mount >NIL: " #CDDevice_NC "5:\n" "mount >NIL: " #CDDevice_NC "6:\n") )
  1731.             )
  1732.         (if (or #is4X4 #isNakamichi4Disc)
  1733.             (set #mountCommand6 "\n")
  1734.             )
  1735.  
  1736.  
  1737.         (if #PioneerSeparate
  1738.             (startup "AsimCDFS"
  1739.                 (command #echotxt)
  1740.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1741.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1742.                 (command (cat "mount >NIL: " #CDDevice_NC "0:\n") )
  1743.                 (command (cat "mount >NIL: " #CDDevice_NC "1:\n") )
  1744.                 (command (cat "mount >NIL: " #CDDevice_NC "2:\n") )
  1745.                 (command (cat "mount >NIL: " #CDDevice_NC "3:") )
  1746.                 (command #mountCommand6 )
  1747.                 (prompt #tp_insertassign)
  1748.                 (help #th_insertassign)
  1749.                 )
  1750.             )
  1751.             
  1752.         (if (not #PioneerSeparate)
  1753.             (startup "AsimCDFS"
  1754.                 (command #echotxt)
  1755.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1756.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1757.                 (command (cat "mount >NIL: " #CDDevice "\n") )
  1758.                 (prompt #tp_insertassign)
  1759.                 (help #th_insertassign)
  1760.                 )
  1761.             )            
  1762.         )
  1763.     )
  1764. ))
  1765.  
  1766.  
  1767. ;*****
  1768. ;  Delete old mountlists is DEVS:DosDrivers/
  1769. (if (> #wbversion 37) 
  1770.     ((if (not #PioneerSeparate)
  1771.         ((if (exists (cat "DEVS:DosDrivers/" #CDDevice_NC))
  1772.             ((delete (cat "DEVS:DosDrivers/" #CDDevice_NC)
  1773.             (confirm)
  1774.             (prompt #tp_deletemountlist )
  1775.             (help #tp_deletemountlist )
  1776.             )
  1777.  
  1778.             (delete (cat "DEVS:DosDrivers/" #CDDevice_NC ".info")
  1779.             (confirm)
  1780.             (prompt #tp_deletemountlist )
  1781.             (help #tp_deletemountlist )
  1782.             )
  1783.             )
  1784.         ))
  1785.     ))
  1786.  
  1787.     (if #PioneerSeparate
  1788.         ((set n 0)
  1789.         (while
  1790.             (set #oldml
  1791.                 (select n (cat "DEVS:DosDrivers/" #CDDevice_NC "0")
  1792.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "1")
  1793.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "2")
  1794.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "3")
  1795.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "4")
  1796.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "5")
  1797.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "6")
  1798.                            ""
  1799.                     )
  1800.                 )
  1801.                 
  1802.             
  1803.             ((if (exists #oldml)
  1804.                 ((delete #oldml
  1805.                 (confirm)
  1806.                 (prompt #tp_deletemountlist )
  1807.                 (help #tp_deletemountlist )
  1808.                 )
  1809.  
  1810.  
  1811.                 (delete (cat #oldml ".info")
  1812.                 (confirm)
  1813.                 (prompt #tp_deletemountlist )
  1814.                 (help #tp_deletemountlist )
  1815.                 )
  1816.                 )
  1817.             )        
  1818.  
  1819.             (set n (+ n 1)))
  1820.             )
  1821.         )
  1822. ))
  1823.  
  1824. ;*****
  1825. ;  Default prefs files
  1826. (if (or (= #IsAmiga #typeAMIGA) (= #IsAmiga #typeFLYER))
  1827.     ((if (or #isPioneer (or #isNakamichi4Disc #isNakamichi))
  1828.         ;*****
  1829.         ;  Default prefs file for a Pioneer drive, separate
  1830.         ((if #PioneerSeparate
  1831.             ((copyfiles
  1832.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1833.                 (dest "ENVArc:AsimCDFS")
  1834.                 (newname (cat #CDDevice_NC "0"))
  1835.                 (prompt #tp_copyprefs )
  1836.                 (help #th_copyprefs)
  1837.                 (confirm)
  1838.             )
  1839.     
  1840.             (copyfiles
  1841.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1842.                 (dest "ENVArc:AsimCDFS")
  1843.                 (newname (cat #CDDevice_NC "1"))
  1844.                 (prompt #tp_copyprefs )
  1845.                 (help #th_copyprefs)
  1846.                 (confirm)
  1847.             )
  1848.     
  1849.             (copyfiles
  1850.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1851.                 (dest "ENVArc:AsimCDFS")
  1852.                 (newname (cat #CDDevice_NC "2"))
  1853.                 (prompt #tp_copyprefs )
  1854.                 (help #th_copyprefs)
  1855.                 (confirm)
  1856.             )
  1857.     
  1858.             (copyfiles
  1859.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1860.                 (dest "ENVArc:AsimCDFS")
  1861.                 (newname (cat #CDDevice_NC "3"))
  1862.                 (prompt #tp_copyprefs )
  1863.                 (help #th_copyprefs)
  1864.                 (confirm)
  1865.             )
  1866.     
  1867.             (if (or #isNakamichi #isPioneer) 
  1868.             ((copyfiles
  1869.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1870.                 (dest "ENVArc:AsimCDFS")
  1871.                 (newname (cat #CDDevice_NC "4"))
  1872.                 (prompt #tp_copyprefs )
  1873.                 (help #th_copyprefs)
  1874.                 (confirm)
  1875.             )
  1876.     
  1877.             (copyfiles
  1878.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1879.                 (dest "ENVArc:AsimCDFS")
  1880.                 (newname (cat #CDDevice_NC "5"))
  1881.                 (prompt #tp_copyprefs )
  1882.                 (help #th_copyprefs)
  1883.                 (confirm)
  1884.             )
  1885.  
  1886.             (if #isNakamichi
  1887.                 (copyfiles
  1888.                     (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1889.                     (dest "ENVArc:AsimCDFS")
  1890.                     (newname (cat #CDDevice_NC "6"))
  1891.                     (prompt #tp_copyprefs )
  1892.                     (help #th_copyprefs)
  1893.                     (confirm)
  1894.                 ))))
  1895.             )
  1896.         )
  1897.             
  1898.         ;*****
  1899.         ;  Default prefs file for a Pioneer drive, pooled
  1900.         (if (not #PioneerSeparate)
  1901.             (
  1902.             (if #isPioneer
  1903.                 (copyfiles
  1904.                     (source "AsimCDFSInst:Default_Prefs/Pioneer_Pool")
  1905.                     (dest "ENVArc:AsimCDFS")
  1906.                     (newname #CDDevice_NC)
  1907.                     (prompt #tp_copyprefs )
  1908.                     (help #th_copyprefs)
  1909.                     (confirm)
  1910.                 ))
  1911.                 
  1912.             (if #IsNakamichi
  1913.                 (copyfiles
  1914.                     (source "AsimCDFSInst:Default_Prefs/Nakamichi_Pool")
  1915.                     (dest "ENVArc:AsimCDFS")
  1916.                     (newname #CDDevice_NC)
  1917.                     (prompt #tp_copyprefs )
  1918.                     (help #th_copyprefs)
  1919.                     (confirm)
  1920.                 ))
  1921.  
  1922.             (if #IsNakamichi4Disc
  1923.                 (copyfiles
  1924.                     (source "AsimCDFSInst:Default_Prefs/Nakamichi4_Pool")
  1925.                     (dest "ENVArc:AsimCDFS")
  1926.                     (newname #CDDevice_NC)
  1927.                     (prompt #tp_copyprefs )
  1928.                     (help #th_copyprefs)
  1929.                     (confirm)
  1930.                 ))
  1931.             )
  1932.         )        
  1933.     ))
  1934.     
  1935.     
  1936.     ;*****
  1937.     ;  Default prefs file for a SCSI CD-ROM drive
  1938.     (if (and (not #isNakamichi) (not #isPioneer))
  1939.         (copyfiles
  1940.             (source "AsimCDFSInst:Default_Prefs/Default")
  1941.             (dest "ENVArc:AsimCDFS")
  1942.             (newname #CDDevice_NC)
  1943.             (prompt #tp_copyprefs )
  1944.             (help #th_copyprefs)
  1945.             (confirm)
  1946.         )
  1947.     ))
  1948. )
  1949.  
  1950.  
  1951.  
  1952.  
  1953. ;*****
  1954. ;  Default prefs file for an ATAPI CD-ROM drive
  1955. (if (= #IsAmiga #typeATAPI)
  1956.     (
  1957.     (if (not #is4X4)        
  1958.         (copyfiles
  1959.             (source "AsimCDFSInst:Default_Prefs/ATAPI")
  1960.             (dest "ENVArc:AsimCDFS")
  1961.             (newname #CDDevice_NC)
  1962.             (prompt #tp_copyprefs )
  1963.             (help #th_copyprefs)
  1964.             (confirm)
  1965.         )
  1966.     )
  1967.  
  1968.     (if #is4X4
  1969.         ((if #PioneerSeparate
  1970.             ((copyfiles
  1971.                 (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
  1972.                 (dest "ENVArc:AsimCDFS")
  1973.                 (newname (cat #CDDevice_NC "0"))
  1974.                 (prompt #tp_copyprefs )
  1975.                 (help #th_copyprefs)
  1976.                 (confirm)
  1977.             )
  1978.     
  1979.             (copyfiles
  1980.                 (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
  1981.                 (dest "ENVArc:AsimCDFS")
  1982.                 (newname (cat #CDDevice_NC "1"))
  1983.                 (prompt #tp_copyprefs )
  1984.                 (help #th_copyprefs)
  1985.                 (confirm)
  1986.             )
  1987.     
  1988.             (copyfiles
  1989.                 (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
  1990.                 (dest "ENVArc:AsimCDFS")
  1991.                 (newname (cat #CDDevice_NC "2"))
  1992.                 (prompt #tp_copyprefs )
  1993.                 (help #th_copyprefs)
  1994.                 (confirm)
  1995.             )
  1996.     
  1997.             (copyfiles
  1998.                 (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
  1999.                 (dest "ENVArc:AsimCDFS")
  2000.                 (newname (cat #CDDevice_NC "3"))
  2001.                 (prompt #tp_copyprefs )
  2002.                 (help #th_copyprefs)
  2003.                 (confirm)
  2004.             )
  2005.             )
  2006.         )
  2007.  
  2008.         (if (not #PioneerSeparate)
  2009.             (copyfiles
  2010.                 (source "AsimCDFSInst:Default_Prefs/4X4_Pooled")
  2011.                 (dest "ENVArc:AsimCDFS")
  2012.                 (newname #CDDevice_NC)
  2013.                 (prompt #tp_copyprefs )
  2014.                 (help #th_copyprefs)
  2015.                 (confirm)
  2016.             )
  2017.         ))
  2018.     )
  2019.     )
  2020. )
  2021.  
  2022.  
  2023. ;*****
  2024. ;  Default prefs file for a CDTV
  2025. (if (= #IsAmiga #typeCDTV)
  2026.     (copyfiles
  2027.         (source "AsimCDFSInst:Default_Prefs/CDTV")
  2028.         (dest "ENVArc:AsimCDFS")
  2029.         (newname #CDDevice_NC)
  2030.         (prompt #tp_copyprefs )
  2031.         (help #th_copyprefs)
  2032.         (confirm)
  2033.     )
  2034. )
  2035.  
  2036.  
  2037. ;*****
  2038. ;  Default prefs file for a CD³²
  2039. (if (= #IsAmiga #typeCD32)
  2040.     (copyfiles
  2041.         (source "AsimCDFSInst:Default_Prefs/CD³²")
  2042.         (dest "ENVArc:AsimCDFS")
  2043.         (newname #CDDevice_NC)
  2044.         (prompt #tp_copyprefs )
  2045.         (help #th_copyprefs)
  2046.         (confirm)
  2047.     )
  2048. )
  2049.  
  2050. (complete 28)
  2051.  
  2052.  
  2053.  
  2054. ;*****
  2055. ;  AsimTunes
  2056. (set #instTunes
  2057.     (askbool
  2058.         (prompt #tp_copytunes)
  2059.         (help #th_copytunes )
  2060.         (default 1)
  2061.     )
  2062. )
  2063.  
  2064. (if #instTunes 
  2065.     ((protect "AsimCDFS:AsimTunes" "rwed" )
  2066.     (protect "AsimCDFS:AsimTunes.info" "rwed" )
  2067.     (copyfiles
  2068.         (prompt #tp_copyingtunes )
  2069.         (source "AsimCDFSInst:AsimTunes")
  2070.         (dest "AsimCDFS:")
  2071.         (infos)
  2072.         (noposition)
  2073.         (help #th_copytunes)
  2074.         (confirm)
  2075.     )
  2076.     
  2077.     (tooltype
  2078.         (dest "AsimCDFS:AsimTunes" )
  2079.         (settooltype "CDROM" #CDDevice )
  2080.         (noposition)
  2081.     )
  2082.         
  2083.         
  2084.     (complete 31)
  2085.     (protect "fonts:AsimTunes2" "rwed" )
  2086.     (protect "fonts:AsimTunes2.font" "rwed" )
  2087.     (protect "fonts:AsimTunes2/11" "rwed" )
  2088.     (protect "fonts:AsimTunes2/20" "rwed" )
  2089.     (copyfiles
  2090.         (prompt #tp_copytunesfont )
  2091.         (source "AsimCDFSInst:fonts")
  2092.         (dest "fonts:" )
  2093.         (all)
  2094.         (help #th_copytunesfont )
  2095.         (confirm) )
  2096. ))
  2097.  
  2098.  
  2099.  
  2100. ;*****
  2101. ;  DiscChanger
  2102. (complete 34)
  2103.  
  2104. (set #instChanger
  2105.     (askbool
  2106.         (prompt #tp_copydc)
  2107.         (help #th_copydc )
  2108.         (default 1)
  2109.     )
  2110. )
  2111.  
  2112. (complete 37)
  2113. (if #instChanger
  2114.     ((protect "AsimCDFS:DiscChanger" "rwed" )
  2115.     (copyfiles
  2116.         (prompt #tp_copyingdc )
  2117.         (source "AsimCDFSInst:DiscChanger")
  2118.         (dest "AsimCDFS:")
  2119.         (infos)
  2120.         (noposition)
  2121.         (help #th_copydc)
  2122.         (confirm)
  2123.     )
  2124.     
  2125.     (tooltype
  2126.         (dest "AsimCDFS:DiscChanger" )
  2127.         (settooltype "CDROM" #CDDevice )
  2128.         (noposition)
  2129.     )
  2130. ))
  2131.  
  2132.  
  2133.  
  2134. ;*****
  2135. ;  PDFormat
  2136. (complete 38)
  2137.  
  2138. (if (= #isPDCD 1)
  2139.     (
  2140.     (set #instPDFormat
  2141.         (askbool
  2142.             (prompt #tp_copypd)
  2143.             (help #th_copypd )
  2144.             (default 1)
  2145.         )
  2146.     )
  2147.  
  2148.     (complete 39)
  2149.     (if #instPDFormat
  2150.         ((protect "AsimCDFS:PD_Format" "rwed" )
  2151.         (copyfiles
  2152.             (prompt #tp_copyingdc )
  2153.             (source "AsimCDFSInst:PD_Format")
  2154.             (dest "AsimCDFS:")
  2155.             (infos)
  2156.             (noposition)
  2157.             (help #th_copydc )
  2158.             (confirm)
  2159.         )
  2160.         
  2161.         (tooltype
  2162.             (dest "AsimCDFS:PD_Format" )
  2163.             (noposition)
  2164.         )
  2165.     ))
  2166. ))
  2167.  
  2168.  
  2169.  
  2170. ;*****
  2171. ;  AsimCDFS_Prefs
  2172. (complete 40)
  2173. (set #instPrefs
  2174.     (askbool
  2175.         (prompt #tp_copyasimprefs)
  2176.         (help  )
  2177.         (default 1)
  2178.     )
  2179. )
  2180.  
  2181. (complete 43)
  2182. (if #instPrefs
  2183.     ((protect "AsimCDFS:AsimCDFS_Prefs" "rwed" )
  2184.     (copyfiles
  2185.         (prompt  )
  2186.         (source "AsimCDFSInst:AsimCDFS_Prefs")
  2187.         (dest "AsimCDFS:")
  2188.         (infos)
  2189.         (noposition)
  2190.         (help #th_copyasimprefs )
  2191.         (confirm)
  2192.     )
  2193. ))
  2194.  
  2195.  
  2196.  
  2197.  
  2198. ;*****
  2199. ;  SimBoot
  2200. (complete 46)
  2201. (set #instSimBoot
  2202.     (askbool
  2203.         (prompt #tp_copysimboot)
  2204.         (help #th_copysimboot )
  2205.         (default 1)
  2206.     )
  2207. )
  2208.  
  2209. (complete 50)
  2210. (if #instSimBoot
  2211.     ((protect "AsimCDFS:SimBoot" "rwed" )
  2212.     (copyfiles
  2213.         (prompt #th_copyingsimboot )
  2214.         (source "AsimCDFSInst:SimBoot")
  2215.         (dest "AsimCDFS:")
  2216.         (infos)
  2217.         (noposition)
  2218.         (help #th_copysimboot )
  2219.         (confirm)
  2220.     )
  2221.  
  2222. ))
  2223.  
  2224.  
  2225. ;*****
  2226. ;  CD³²_Prefs
  2227. (complete 53)
  2228. (set #instCD32Prefs
  2229.     (askbool
  2230.         (prompt #tp_copycd32prefs)
  2231.         (help #th_copycd32prefs )
  2232.         (default 1)
  2233.     )
  2234. )
  2235.  
  2236. (complete 56)
  2237. (if #instCD32Prefs
  2238.     ((protect "AsimCDFS:CD³²_Prefs" "rwed" )
  2239.     (copyfiles
  2240.         (prompt #tp_copyingcd32prefs )
  2241.         (source "AsimCDFSInst:CD³²_Prefs")
  2242.         (dest "AsimCDFS:")
  2243.         (infos)
  2244.         (noposition)
  2245.         (help #th_copycd32prefs )
  2246.         (confirm)
  2247.     )
  2248.  
  2249. ))
  2250.  
  2251.  
  2252.  
  2253. ;*****
  2254. ;  CDTV Prefs
  2255. (complete 59)
  2256. (set #instCDTVPrefs
  2257.     (askbool
  2258.         (prompt #tp_copycdtvprefs)
  2259.         (help #th_copycdtvprefs )
  2260.         (default 1)
  2261.     )
  2262. )
  2263.  
  2264. (complete 62)
  2265. (if #instCDTVPrefs
  2266.     ((protect "AsimCDFS:CDTV_Prefs" "rwed" )
  2267.     (copyfiles
  2268.         (prompt #tp_copyingcdtvprefs )
  2269.         (source "AsimCDFSInst:CDTV_Prefs")
  2270.         (dest "AsimCDFS:")
  2271.         (infos)
  2272.         (noposition)
  2273.         (help #th_copycdtvprefs )
  2274.         (confirm)
  2275.     )
  2276.  
  2277. ))
  2278.  
  2279.  
  2280.  
  2281. (complete 65)
  2282. (set #instCDTVEmul
  2283.     (askbool
  2284.         (prompt #tp_copycdtvemul)
  2285.         (help #th_copycdtvemul )
  2286.         (default 1)
  2287.     )
  2288. )
  2289.  
  2290. (complete 68)
  2291. (if #instCDTVEmul
  2292.     ((complete 71)
  2293.     ;********************
  2294.     ;  devs:cdtv.device, devs:bookmark.device, devs:cardmark.device
  2295.     (protect "devs:cdtv.device" "rwed" )
  2296.     (protect "devs:bookmark.device" "rwed" )
  2297.     (protect "devs:cardmark.device" "rwed" )
  2298.  
  2299.     (run "AsimCDFSInst:c/lx e AsimCDFSInst:devs/cdtv.lha devs:"
  2300.         (prompt #tp_copycdtvdevice )
  2301.         (confirm)
  2302.         (help #th_copycdtvemul )
  2303.     )
  2304.  
  2305.     ;*****
  2306.     ;  libs:playerprefs.library
  2307.     (complete 81)
  2308.     (protect "devs:playerprefs.library" "rwed" )
  2309.     (copyfiles
  2310.         (prompt #tp_copyplayerprefs )
  2311.         (source "AsimCDFSInst:libs/playerprefs.library")
  2312.         (dest "libs:")
  2313.         (confirm)
  2314.         (help #th_copycdtvemul )
  2315.     )
  2316. ))    
  2317.  
  2318.  
  2319.  
  2320. (set #instCD32Emul
  2321.     (askbool
  2322.         (prompt #tp_copycd32emul)
  2323.         (help #th_copycd32emul )
  2324.         (default 1)
  2325.     )
  2326. )
  2327.  
  2328. (complete 84)
  2329. (if #instCD32Emul
  2330.     ((complete 87)
  2331.     ;*****
  2332.     ;  devs:cd.device
  2333.     
  2334.     (protect "devs:cd.device" "rwed" )
  2335.     (copyfiles
  2336.         (prompt #tp_copycddevice )
  2337.         (source "AsimCDFSInst:devs/cd.device")
  2338.         (dest "devs:")
  2339.         (confirm)
  2340.         (help #th_copycd32emul )
  2341.     )
  2342.     
  2343.     
  2344.     ;*****
  2345.     ;  libs:nonvolatile.library
  2346.     (complete 90)
  2347.     (protect "devs:nonvolatile.library" "rwed" )
  2348.     (copyfiles
  2349.         (prompt #tp_copynv )
  2350.         (source "AsimCDFSInst:libs/nonvolatile.library")
  2351.         (dest "libs:")
  2352.         (confirm)
  2353.         (help #th_copycd32emul )
  2354.     )
  2355.     
  2356.     
  2357.     ;*****
  2358.     ;  libs:lowlevel.library
  2359.     (complete 93)
  2360.     (protect "devs:lowlevel.library" "rwed" )
  2361.     (copyfiles
  2362.         (prompt #tp_copylowlevel )
  2363.         (source "AsimCDFSInst:libs/lowlevel.library")
  2364.         (dest "libs:")
  2365.         (confirm)
  2366.         (help #th_copycd32emul )
  2367.     )
  2368. ))
  2369.  
  2370.  
  2371.  
  2372. ;*****
  2373. ;  default icons in ENV
  2374.  
  2375. (makedir "ENVARC:AsimCDFS"
  2376.     (prompt #tp_makeenvarc)
  2377.     (help #th_makeenvarc)
  2378.     )
  2379.  
  2380. (makedir "ENV:AsimCDFS"
  2381.     (prompt #tp_makeenv)
  2382.     (help #th_makeenv)
  2383.     )
  2384.  
  2385. (copyfiles
  2386.     (source "AsimCDFSInst:ENVArc/AsimCDFS")
  2387.     (dest "ENVArc:AsimCDFS")
  2388.     (infos)
  2389.     (all)
  2390.     (prompt #tp_copyicons )
  2391.     (help #th_copyicons)
  2392.     (confirm)
  2393. )
  2394.  
  2395. (copyfiles
  2396.     (source "AsimCDFSInst:ENVArc/AsimCDFS")
  2397.     (dest "ENV:AsimCDFS")
  2398.     (infos)
  2399.     (all)
  2400.     (prompt #tp_copyicons )
  2401.     (help #th_copyicons)
  2402.     (confirm)
  2403. )
  2404.  
  2405.  
  2406.  
  2407.  
  2408. ;*****
  2409. ;  ask which languages to be added
  2410. (if (exists "LOCALE:" (noreq))
  2411.     ((user 2)
  2412.     (set #language
  2413.         (askoptions
  2414.             (prompt #tp_catalogs)
  2415.             (help #th_catalogs )
  2416.             (choices "Deutsch" "Français" "Italiano")
  2417.             (default (shiftleft 1 (- #our_language 1)) )
  2418.         )
  2419.     )
  2420.     (user #theirlevel)
  2421.     
  2422.     
  2423.     (set n 0)
  2424.     (while
  2425.         (set #langdir
  2426.             (select n "deutsch"
  2427.                          "français"
  2428.                        "italiano"
  2429.                        ""
  2430.                 )
  2431.             )
  2432.         (
  2433.         
  2434.         (if (IN #language n)
  2435.             ((set #langdest (tackon "LOCALE:catalogs/" #langdir))
  2436.             (set #langsrc (tackon "AsimCDFSInst:catalogs/" #langdir))
  2437.             
  2438.             (run (cat "AsimCDFSInst:c/lx e " (tackon #langsrc "Catalogs.lha") " " #langdest)
  2439.                 (prompt #tp_copylocale1 #langdir #tp_copylocale2 )
  2440.                 (help #th_copylocale)
  2441.                 (confirm))
  2442.  
  2443.             (copyfiles
  2444.                 (prompt #tp_copylocale1 #langdir #tp_copylocale2 )
  2445.                 (source (tackon #langsrc "SCSIInquire.catalog") )
  2446.                 (dest #langdest)
  2447.                 (help #th_copylocale)
  2448.                 (confirm))
  2449.             )
  2450.         )
  2451.     
  2452.         (set n (+ n 1))
  2453.         )
  2454.     )
  2455. ))    
  2456.  
  2457.  
  2458.     
  2459.  
  2460.  
  2461.  
  2462.  
  2463. ;*****
  2464. ;  Create a 'SYS/NV_Location' environment variable
  2465. (run "setenv SYS/NV_Location AsimCDFS_Buffer:NonVolatile/")
  2466.  
  2467.  
  2468. ;*****
  2469. ;  Create a CD³² Preferences file
  2470. (run "AsimCDFS:CD³²_Prefs SAVE DEFAULT")    
  2471.  
  2472.  
  2473. ;*****
  2474. ;  Create a CDTV Preferences file
  2475. (run "AsimCDFS:CDTV_Prefs SAVE DEFAULT")    
  2476.  
  2477.  
  2478. ;*****
  2479. ;  Tell NewTek Flyer users where the CD-ROM drive is located
  2480. (if (= #IsAmiga #typeFLYER) 
  2481.     (
  2482.     (user 2)
  2483.     (message #text_message_flyer    )
  2484.     
  2485.     (user #theirlevel)
  2486.     )
  2487. )
  2488.  
  2489.  
  2490.  
  2491. ;*****
  2492. ;  Tell About Extended icons
  2493. (user 2)
  2494. (message #text_message_extendedicons)
  2495. (user #theirlevel)
  2496.  
  2497.  
  2498. ;*****
  2499. ;  remove assign to AsimCDFSInst
  2500. (makeassign "AsimCDFSInst")
  2501. (makeassign "AsimCDFS")
  2502. (makeassign "AsimCDFS_Buffer")
  2503.  
  2504.  
  2505. (complete 100)
  2506.