home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / CDRom / ASIM36.DMS / in.adf / Install-AsimCDFS < prev    next >
Encoding:
Text File  |  1996-06-10  |  70.5 KB  |  2,187 lines
  1. ;$VER: AsimCDFS Install 3.6 (30.5.96) 
  2. ;Copyright ©1993-1996 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 #isPDCD 0)
  21. (set #is4X4 0)
  22. (set #PioneerSeparate 0)
  23.  
  24. (set #wbversion (getversion "libs:version.library"))
  25. (set #wbversion (/ #wbversion 65536) )
  26.  
  27. (set #SCSIDevice "scsi.device")
  28. (set #SCSIUnit 4)
  29.  
  30. (set @default-dest "SYS:AsimCDFS")
  31. (set #echotxt "echo \"Mounting AsimCDFS...\"\n" )
  32.  
  33. (complete 0)
  34.  
  35.  
  36. ;  **********************************************************************
  37. ;  Please!  Use Novice!
  38. ;  **********************************************************************
  39. (if (> @user-level 0)
  40.     (message (cat "Installation notes\n"
  41.            "------------------\n\n"
  42.              "We have noticed problems with the Installer "
  43.              "program when using Expert or Intermediate mode.  The "
  44.              "general Novice install is recommended for most, if not "
  45.              "all situations.\n"
  46.     ))
  47. )
  48.  
  49.  
  50. ;  **********************************************************************
  51. ;  Need WB 2.0 or higher.
  52. ;  **********************************************************************
  53. (if (< #wbversion 37)
  54.     (abort "\n\nAmigaDOS 2.0 or higher is required for AsimCDFS 3.x. "
  55.              "\n\nAn upgrade will be needed for your Amiga."
  56.              "\n\nYou are currently running version " #wbversion ".")
  57. )
  58.  
  59.  
  60. ;  **********************************************************************
  61. ;  Lock our install disk
  62. ;  **********************************************************************
  63. (askdisk
  64.     (prompt "Please insert the disk labeled \"AsimCDFS_v3_Install\".")
  65.     (help    "AsimCDFS FileSystem and other utilities will be copied "
  66.             "from this disk into your system.")
  67.     (dest  "AsimCDFS_v3_Install")
  68.     (newname "AsimCDFSInst")
  69. )
  70.  
  71.  
  72.  
  73. ;  **********************************************************************
  74. ;  Need lots of space on sys volume for devs, l, etc.
  75. ;  **********************************************************************
  76. (set #installsize 0)
  77. (set #installsize (+ #installsize (getsize "AsimCDFSInst:l/AsimCDFS") ))
  78. (set #installsize (+ #installsize (getsize "AsimCDFSInst:devs/asimcdfs.devce") ))
  79. (set #installsize (+ #installsize (getsize "AsimCDFSInst:devs/asim_atapi.device") ))
  80. (set #installsize (+ #installsize (getsize "AsimCDFSInst:AsimTunes") ))
  81. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DiscChanger") ))
  82. (set #installsize (+ #installsize (getsize "AsimCDFSInst:AsimCDFS_Prefs") ))
  83. (set #installsize (+ #installsize (getsize "AsimCDFSInst:SimBoot") ))
  84. (set #installsize (+ #installsize (getsize "AsimCDFSInst:PD_Format") ))
  85. (set #installsize (+ #installsize (getsize "AsimCDFSInst:CD³²_Prefs") ))
  86. (set #installsize (+ #installsize (getsize "AsimCDFSInst:CDTV_Prefs") ))
  87. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCDFS_Prefs.info") ))
  88. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCDTV_Prefs.info") ))
  89. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Track.info") ))
  90. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Disk.info") ))
  91. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Drawer.info") ))
  92. (set #installsize (+ #installsize (getsize "AsimCDFSInst:PhotoCD_Disk.info") ))
  93. (set #installsize (+ #installsize (getsize "AsimCDFSInst:PhotoCD_Drawer.info") ))
  94. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Raw_Sector.info") ))
  95. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Raw_Disk.info") ))
  96. (set #installsize (+ #installsize (getsize "AsimCDFSInst:MPEG_Track.info") ))
  97. (set #installsize (+ #installsize (getsize "AsimCDFSInst:MPEG_Disk.info") ))
  98. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCD³²_Prefs.info") ))
  99. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Storage/DOSDrivers/CD0") ))
  100. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Storage/DOSDrivers/CD0.info") ))
  101.  
  102. (if (< (getdiskspace "SYS:") #installsize)
  103.     (abort "\n\nApproximately " (/ #installsize 1024) "K of disk space is needed on your SYS: volume."
  104.              "\n\nYou only have " (/ (getdiskspace "SYS:") 1024)    "K free.\n\n"
  105.              "Delete or transfer some files from the SYS: volume and try again." )
  106. )
  107.  
  108.  
  109.  
  110.  
  111. (set #theirlevel @user-level )
  112. (user 2)
  113.  
  114. (complete 3)
  115. ;  **********************************************************************
  116. ;  Ask if CDTV (1) , CD³² (2) or Amiga (0)
  117. ;  **********************************************************************
  118. (set #IsAmiga
  119.     (askchoice
  120.         (prompt "\nAsimCDFS v3.6 Install\n--------------------\n\Please describe your setup:" )
  121.         (default 0 )
  122.         (choices "Amiga with SCSI CD-ROM" "CDTV/A570" "CD³²" "ATAPI CD-ROM on A4000/A1200" "NewTek Flyer with CD-ROM (unit #6) on SCSI-C" )
  123.         (help "\n\nIf AsimCDFS is being used in conjunction with a CDTV/A570 unit "
  124.                 "then note this with the CDTV/A570 selection.\n\n"
  125.                 "If AsimCDFS is being used with a CD³² unit, then note this with the CD³² selection.\n\n"
  126.                 "Otherwise, you will be installing AsimCDFS on an Amiga equipped "
  127.                 "with a SCSI or IDE controller and SCSI or ATAPI CD-ROM drive." )
  128.     )
  129. )
  130.  
  131.  
  132. (complete 6)
  133. ;  **********************************************************************
  134. ;  Is CDTV
  135. ;  **********************************************************************
  136. (if (= #IsAmiga #typeCDTV) 
  137.     ((set #CDDefault_NC "CD1" )
  138.     (set #SCSIDevice "cdtv.device")
  139.     (set #SCSIUnit 0)
  140.     )
  141. )
  142.  
  143. ;  **********************************************************************
  144. ;  Is CD³²
  145. ;  **********************************************************************
  146. (if (= #IsAmiga #typeCD32) 
  147.     ((set #CDDefault_NC "CD1" )
  148.     (set #SCSIDevice "cd.device")
  149.     (set #SCSIUnit 0)
  150.     )
  151. )
  152.  
  153.  
  154.  
  155. ;  **********************************************************************
  156. ;  Flyer
  157. ;  **********************************************************************
  158. (if (= #IsAmiga #typeFLYER) 
  159.     (set #CDDefault_NC "CD6" )
  160. )
  161.  
  162.  
  163.  
  164.  
  165. ;  **********************************************************************
  166. ;  If amiga, ask if using Pioneer or other
  167. ;  **********************************************************************
  168. (if (= #IsAmiga #typeAMIGA)
  169.     (set #isPioneer 
  170.         (askbool
  171.             (prompt "\n\n\nIs your CD-ROM drive a Pioneer DRM-60x?" )
  172.             (default 0)
  173.             (choices "Pioneer DRM-60x" "Other CD-ROM")
  174.             (help "\n\nIf you are using AsimCDFS with a Pioneer DRM-60x, indicate this "
  175.                     "in your choice.  This drive is a high-performance 6-disc minichanger and "
  176.                     "is not common."
  177.                     "\n\nOtherwise select Other CD-ROM." )
  178.         )
  179.     )
  180. )
  181.  
  182.  
  183. ;  **********************************************************************
  184. ;  If ispioneer==0, ask if using Nakamichi or other
  185. ;  **********************************************************************
  186. (if (and (= #isPioneer 0) (= #IsAmiga #typeAMIGA))
  187.     (set #isNakamichi 
  188.         (askbool
  189.             (prompt "\n\n\nIs your CD-ROM drive a Nakamichi MBR-7,\n a NEC 4xc or a NEC 2xc 7-disc CD-ROM changer?" )
  190.             (default 0)
  191.             (choices "MBR-7 / NEC 2xc, 4xc" "Other CD-ROM")
  192.             (help "\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 "
  193.                     "in your choice.  This drive is a high-performance 7-disc minichanger and "
  194.                     "is not common."
  195.                     "\n\nOtherwise select Other CD-ROM." )
  196.         )
  197.     )
  198. )
  199.  
  200. ;  **********************************************************************
  201. ;  If ispioneer==0 & isnakamichi==0, ask if using PD/CD-ROM or other
  202. ;  **********************************************************************
  203. (if (and (= #isNakamichi 0) (and (= #isPioneer 0) (= #IsAmiga #typeAMIGA)) )
  204.     (set #isPDCD 
  205.         (askbool
  206.             (prompt "\n\n\nIs your drive a Panasonic LF-1000 PD/CD-ROM drive?\n(combination read/write optical drive and CD-ROM drive)" )
  207.             (default 0)
  208.             (choices "LF-1000 PD/CD-ROM" "Other CD-ROM")
  209.             (help "\n\nIf you are using AsimCDFS with a Panasonic PD/CD-ROM drive, indicate this "
  210.                     "in your choice.  This drive is a combination read/write optical drive and CD-ROM drive.\n\n"
  211.                     "This drive is also bundled under 3rd party names such as Smart & Friendly and Toray.\n\n"
  212.                     "\n\nOtherwise select Other CD-ROM." )
  213.         )
  214.     )
  215. )
  216.  
  217.  
  218. (if (= #isPDCD 1)
  219.     (message (cat "Panasonic LF-1000 PD/CD-ROM users\n"
  220.                       "---------------------------------\n"
  221.         "Please ensure that your drive is set to the "
  222.         "\"Two LUN Mode\".  This is done via jumper switches "
  223.         "on the back of the drive.  Consult the manufacturer's "
  224.         "documentation for further information.\n\n"
  225.         "Also ensure that your SCSI controller is setup to "
  226.         "recognize LUNs."
  227.          )
  228.     )
  229. )
  230.  
  231.  
  232.  
  233. ;  **********************************************************************
  234. ;  If ispioneer==0 & isnakamichi==0, ask if using PD/CD-ROM or other
  235. ;  **********************************************************************
  236. (if (= #IsAmiga #typeATAPI) 
  237.     (set #is4X4 
  238.         (askbool
  239.             (prompt "\n\n\nIs your drive a NEC 4X4 4-disc ATAPI CD-ROM Changer?\n" )
  240.             (default 0)
  241.             (choices "NEC 4X4" "Other CD-ROM")
  242.             (help "\n\nIf you are using AsimCDFS with a NEC 4x4 ATAPI 4-disc CD-ROM Changer, indicate this "
  243.                     "in your choice.  This drive is a 1/2 height 5 1/2\" device.\n\n "
  244.                     "\n\nOtherwise select Other CD-ROM." )
  245.         )
  246.     )
  247. )
  248.  
  249. (complete 9)
  250. (if (or #is4X4 (or #isPioneer #isNakamichi))
  251.     (
  252.     ;  **********************************************************************
  253.     ;  ask if Pioneer/Nakamichi/NEC is separate or pooled
  254.     ;  **********************************************************************
  255.     (set #PioneerSeparate
  256.             (askbool
  257.                 (prompt "\n\nDo you wish to have separate devices mounted, or would you like all discs pooled into 1 device?\n\n" )
  258.                 (default 0 )
  259.                 (choices "Separate" "Pooled")
  260.                 (help "\n\nIf you wish to have access to all discs simultaneously, then "
  261.                         "select Separate, otherwise select Pooled  --  in the latter case, "
  262.                         "you can switch between the discs with DiscChanger." )
  263.             )
  264.         )
  265.  
  266.  
  267.  
  268.     ;  **********************************************************************
  269.     ;  If pioneer separate, ask for base name
  270.     ;  **********************************************************************
  271.     (if #PioneerSeparate
  272.         ((if #isPioneer
  273.             (set #ourhelp (cat "\n\nThis is the base name under which AmigaDOS will reference the "
  274.                                 "CD-ROM as.  As you are installing AsimCDFS for a Pioneer 6-disc changer "
  275.                                 ", 6 such devices named <basename>0 through <basename>5 will be mounted (ie.  CD0, CD1, ..., CD5) "
  276.                                 "\n\nThe trailing : (colon) or the 0 through 5 MUST NOT be present.") )
  277.         )
  278.     
  279.         (if #isNakamichi
  280.             (set #ourhelp (cat "\n\nThis is the base name under which AmigaDOS will reference the "
  281.                                 "CD-ROM as.  As you are installing AsimCDFS for a Nakamichi 7-disc changer "
  282.                                 ", 7 such devices named <basename>0 through <basename>6 will be mounted (ie.  CD0, CD1, ..., CD6) "
  283.                                 "\n\nThe trailing : (colon) or the 0 through 6 MUST NOT be present.") )
  284.         )
  285.  
  286.         (if #is4X4
  287.             (set #ourhelp (cat "\n\nThis is the base name under which AmigaDOS will reference the "
  288.                                 "CD-ROM as.  As you are installing AsimCDFS for a NEC 4X4 4-disc changer "
  289.                                 ", 4 such devices named <basename>0 through <basename>3 will be mounted (ie.  CD0, CD1, CD2 & CD3) "
  290.                                 "\n\nThe trailing : (colon) or the 0 through 3 MUST NOT be present.") )
  291.         )
  292.     
  293.         (set #CDDevice_NC 
  294.                 (askstring
  295.                     (prompt "\n\nWhat is the base-name for the AmigaDOS device?\n\n(The trailing colon MUST NOT be present.  See manual for explanation.)" )
  296.                     (default "CD" )
  297.                     (help #ourhelp)
  298.                 )
  299.             )
  300.         (set #CDDevice (cat #CDDevice_NC "0:")))
  301.         )
  302.     )
  303. )
  304.  
  305.  
  306.  
  307.  
  308.  
  309.  
  310. ;  **********************************************************************
  311. ;  If pioneer pooled or other CD-ROM, ask for CD0 device alternate
  312. ;  **********************************************************************
  313. (if (not #PioneerSeparate)
  314.     ((set #CDDevice_NC 
  315.         (askstring
  316.             (prompt "\n\nWhat is the name for the AmigaDOS device?\n\n(The trailing colon MUST NOT be present)" )
  317.             (default #CDDefault_NC )
  318.             (help "\n\nThis is the name under which AmigaDOS will reference the "
  319.                     "CD-ROM as.  While usually "
  320.                     #CDDefault_NC
  321.                     ", it can be any name you choose. "
  322.                     "\n\nThe trailing : (colon) MUST NOT be present." )
  323.         )
  324.     )
  325.  
  326.     (set #CDDevice (cat #CDDevice_NC ":") ))
  327. )
  328.  
  329.  
  330.  
  331. ;  **********************************************************************
  332. ;  Copy over asim_atapi.device
  333. ;  **********************************************************************
  334. (if (= #IsAmiga #typeATAPI)
  335.     ((user #theirlevel)
  336.  
  337.     (copyfiles
  338.         (prompt "\n\nCopying asim_atapi.device ATAPI CD-ROM driver\n" )
  339.         (source "AsimCDFSInst:devs/asim_atapi.device")
  340.         (dest "DEVS:")
  341.         (confirm)
  342.         (help "\n\nThis will copy the asim_atapi.device ATAPI CD-ROM driver file to your devs: directory\n")
  343.     )
  344.  
  345.     (user 2)
  346.     )
  347. )
  348.  
  349. ;  **********************************************************************
  350. ;  Ask to run SCSI Inquire
  351. ;  **********************************************************************
  352. (if (or (= #IsAmiga #typeAMIGA) (= #IsAmiga #typeATAPI))
  353.     (set #useInquire
  354.         (askbool
  355.             (prompt "\n\nWould you like to use the SCSI Inquire utility to locate your CD-ROM drive?" )
  356.             (default 1 )
  357.             (help "\n\nThe SCSI Inquire utility will scan your system for suitable SCSI "
  358.                     "or ATAPI devices and display a listing of all units connected to the device.  "
  359.                     "Your CD-ROM drive must be powered-on and correctly connected "
  360.                     "for it to be acknowledged by this utility.  Consult the SCSI Inquire "
  361.                     "chapter for more information." )
  362.         )
  363.     )
  364. )
  365.  
  366.  
  367. ;  **********************************************************************
  368. ;  Run SCSI Inquire
  369. ;  **********************************************************************
  370. (if #useInquire
  371.     (
  372.     (if (= #IsAmiga #typeATAPI)
  373.         (run "AsimCDFS_v3_Install:SCSI_Inquire force_atapi")    
  374.     )
  375.  
  376.     (if (= #IsAmiga #typeAMIGA)
  377.         (run "AsimCDFS_v3_Install:SCSI_Inquire")    
  378.     )
  379.     
  380.     (if (exists "ENV:SCSI_Device")
  381.         ((set #SCSIDevice (getenv "SCSI_Device"))
  382.         (set #SCSIUnit (+ (getenv "SCSI_Unit")))
  383.         ))
  384.     )
  385. )
  386.  
  387.  
  388.  
  389. ;  **********************************************************************
  390. ;  The LF-1000 PD/CD-ROM drive uses LUN #1 for the CD-ROM operation
  391. ;  **********************************************************************
  392. (if (= #isPDCD 1)
  393.     (set #SCSIUnit (+ 10 #SCSIUnit))
  394. )
  395.  
  396.  
  397. (complete 12)
  398. (if (= #IsAmiga #typeAMIGA)
  399.     ;  **********************************************************************
  400.     ;  Ask for device name
  401.     ;  **********************************************************************
  402.     ((set #SCSIDevice 
  403.         (askstring
  404.             (prompt "\n\nWhat is the name of your SCSI or ATAPI device?" )
  405.             (default #SCSIDevice )
  406.             (help "\n\nThis is the name of the device driver for your particular "
  407.                     "SCSI card.  For example, the Commodore 2091/590/Amiga3000 has "
  408.                     "a name of \"scsi.device\" while our ATAPI driver has a name of \"asim_ide.device\".\n\n"
  409.                     "If you successfully ran the SCSI Inquire utility, this question will default to the correct unit number. "
  410.                     "Otherwise, consult either the AsimCDFS User's Guide or contact the controller card manufacturer." )
  411.         )
  412.     )
  413.     
  414.     (complete 15)
  415.     ;  **********************************************************************
  416.     ;  Ask for unit number
  417.     ;  **********************************************************************
  418.     (set #SCSIUnit 
  419.         (asknumber
  420.             (prompt "\n\nWhat is the unit number of your CD-ROM drive?" )
  421.             (default #SCSIUnit )
  422.             (help "\n\nThis is the unit # of the CD-ROM drive.  This is usually a "
  423.                     "numerical value between 0j and 6 for SCSI units and between 0 and 1 for ATAPI units.\n\n"
  424.                     "If you successfully ran the SCSI Inquire utility, this question will default to the correct unit number.  "
  425.                     "Otherwise, consult the CD-ROM drive documentation for instructions on "
  426.                     "determining the unit #." )
  427.         )
  428.     ))
  429. )
  430.  
  431.  
  432. ;  **********************************************************************
  433. ;  Ask for automount?
  434. ;  **********************************************************************
  435. (complete 18)
  436. (if (not (= #IsAmiga #typeFLYER))
  437.     (set #autoMount
  438.         (askbool
  439.             (prompt "\n\nWould you like the CD-ROM drive automatically mounted upon bootup?" )
  440.             (help "\n\nIf you would like, the appropriate commands will be added to your user-startup file to automatically mount AsimCDFS.\n")
  441.             (default 1)
  442.         )
  443.     )
  444. )
  445.  
  446. (if (= #IsAmiga #typeFLYER)
  447.     ((set #autoMount 0)
  448.     (set #SCSIUnit 206)
  449.     (set #SCSIDevice "flyerscsi.device"))
  450. )
  451.  
  452.  
  453. (set #mountDirectory "sys:storage/DOSDrivers/")
  454.  
  455.  
  456.  
  457.  
  458.  
  459. ;  **********************************************************************
  460. ;  Ask for AsimCDFS:
  461. ;  **********************************************************************
  462. (set #tunesDir
  463.     (askdir
  464.         (prompt "Specify the directory in which the AsimCDFS support programs will be placed:" )
  465.         (help "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.")
  466.         (default @default-dest)
  467.         (newpath)
  468.     )
  469. )
  470.  
  471. (if (not (exists #tunesDir (noreq)))
  472.     (makedir #tunesDir
  473.         (prompt "Creating the AsimCDFS: directory...")
  474.         (help "This will create the specified directory for the support programs.")
  475.         (infos)
  476.         )
  477. )
  478. (makeassign "AsimCDFS" #tunesDir)
  479.  
  480.  
  481.  
  482.  
  483. ;  **********************************************************************
  484. ;  Ask for AsimCDFS_Buffer:
  485. ;  **********************************************************************
  486. (set #bufferDir "Work:AsimCDFS_Buffer")
  487. (run "AsimCDFS_v3_Install:c/MostFree")    
  488.     
  489. (if (exists "ENV:MostFree")
  490.     (set #bufferDir (cat (getenv "MostFree") "AsimCDFS_Buffer"))
  491. )
  492.  
  493. (if (= #IsAmiga #typeFLYER)
  494.     (if (exists "WORK:" (noreq))
  495.         (set #bufferDir "WORK:AsimCDFS_Buffer")
  496.         (set #bufferDir "SYS:AsimCDFS_Buffer")
  497.     )
  498.     
  499. )
  500.  
  501.  
  502. (set #bufferDir
  503.     (askdir
  504.         (prompt "Specify the directory which can be used for buffering AsimCDFS files:" )
  505.         (help "AsimCDFS will require a directory in which it will buffer "
  506.                 "various files, including PhotoCD thumbnail icons, snapshot icon files "
  507.                 "and audio library files.  As the number of files in this directory "
  508.                 "may grow as your CD-ROM collection expands, it is "
  509.                 "advisable to put this directory on a large hard drive partition." )
  510.         (default #bufferDir )
  511.         (newpath)
  512.     )
  513. )
  514.  
  515. (if (not (exists #bufferDir (noreq)))
  516.     (makedir #bufferDir
  517.         (prompt "Creating the AsimCDFS_Buffer: directory...")
  518.         (help "This will create the specified directory for the buffered files.")
  519.         (infos)
  520.         )
  521. )
  522. (makeassign "AsimCDFS_Buffer" #bufferDir)
  523. (user #theirlevel)
  524.  
  525.  
  526. (set n 0)
  527. (while
  528.     (set #buffsubdir 
  529.         (select n "AsimCDFS_Buffer:PhotoCDIcon_Buffer"
  530.                      "AsimCDFS_Buffer:Audio"
  531.                      "AsimCDFS_Buffer:Raw"
  532.                      "AsimCDFS_Buffer:Marks"
  533.                      "AsimCDFS_Buffer:NonVolatile"
  534.                    ""
  535.             )
  536.         )
  537.     (
  538.     (if (not (exists #buffsubdir (noreq)))
  539.         (makedir #buffsubdir
  540.             (prompt "Creating the " #buffsubdir " directory...")
  541.             (help "This will create the specified directory for the buffered files.")
  542.             (infos)
  543.             )
  544.     )
  545.  
  546.     (set n (+ n 1))
  547.     )
  548. )
  549.  
  550.  
  551. (copyfiles
  552.     (prompt "\n\nCopying Corel_Directory index file to the "
  553.         "AsimCDFS_Buffer: directory.\n" )
  554.     (source "AsimCDFSInst:Corel_Directory")
  555.     (dest "AsimCDFS_Buffer:")
  556.     (confirm)
  557.     (help "\n\nThis will copy an index file containing proper disc "
  558.         "names for the Corel ProPhoto library (Volumes 1 and 2).")
  559. )
  560.  
  561.  
  562.  
  563. (if (not (exists "C:ViewTek" (noreq)))
  564.     ((copyfiles
  565.         (prompt "\n\nCopying the public domain program ViewTek by "
  566.             "Thomas Krehbiel to your C: directory.")
  567.         (source "AsimCDFSInst:C/VT")
  568.         (dest "C:")
  569.         (newname "ViewTek")
  570.         (help "\n\nThis will copy over the public domain viewing "
  571.             "program ViewTek to your C: directory where it will be "
  572.             "automatically used when you double-click on PhotoCD and "
  573.             "Corel ProPhoto thumbnail icons.")
  574.         (confirm)
  575.     ))
  576. )
  577.  
  578.  
  579.  
  580. ;  **********************************************************************
  581. ;  delete obsolete files
  582. ;  **********************************************************************
  583. ;  Delete old AsimPhoto, if present in AsimCDFS dir.
  584. ;  all other files are either the user's or will be over written
  585. (if (exists "AsimCDFS:AsimPhoto")
  586.     ((delete "AsimCDFS:AsimPhoto"
  587.         (prompt "\n\Deleting obsolete AsimPhoto.\n" )
  588.         (confirm)
  589.         (help "\n\nThis will delete the old AsimPhoto program, which is "
  590.             "no longer required for AsimCDFS v3.x\n" )
  591.         )
  592.     )
  593. )        
  594.  
  595.  
  596. (if (exists "AsimCDFS:AsimPhoto.info")
  597.     ((delete "AsimCDFS:AsimPhoto.info"
  598.         (prompt "\n\Deleting obsolete AsimPhoto.info.\n" )
  599.         (confirm)
  600.         (help "\n\nThis will delete the old AsimPhoto icon, which is "
  601.             "no longer required for AsimCDFS v3.x\n" )
  602.         )
  603.     )
  604. )        
  605.  
  606. (if (exists "ENVARC:AsimCDFS/Photo.info")
  607.     ((delete "ENVARC:AsimCDFS/Photo.info"
  608.         (prompt "\n\Deleting obsolete default Photo icon.\n" )
  609.         (confirm)
  610.         (help "\n\nThis will delete the old default Photo icon, which is "
  611.             "no longer required for AsimCDFS v3.x\n" )
  612.         )
  613.     )
  614. )        
  615.  
  616.  
  617.  
  618.  
  619. (if (exists "ENVARC:AsimCDFS/DiscChanger.prefs")
  620.     ((delete "ENVARC:AsimCDFS/DiscChanger.prefs"
  621.         (prompt "\n\Deleting obsolete DiscChanger preferences file.\n" )
  622.         (confirm)
  623.         (help "\n\nThis will delete the old DiscChanger preferences file, which is "
  624.             "no longer required for AsimCDFS v3.x\n" )
  625.         )
  626.     )
  627. )        
  628.  
  629. (if (exists "ENVARC:AsimCDFS/AsimTunes.prefs")
  630.     ((delete "ENVARC:AsimCDFS/AsimTunes.prefs"
  631.         (prompt "\n\Deleting obsolete AsimTunes preferences file.\n" )
  632.         (confirm)
  633.         (help "\n\nThis will delete the old AsimTunes preferences file, which is "
  634.             "no longer required for AsimCDFS v3.x\n" )
  635.         )
  636.     )
  637. )        
  638.  
  639.  
  640. (if (exists "ENVARC:AsimCDFS/AsimPhoto.prefs")
  641.     ((delete "ENVARC:AsimCDFS/AsimPhoto.prefs"
  642.         (prompt "\n\Deleting obsolete AsimPhoto preferences file.\n" )
  643.         (confirm)
  644.         (help "\n\nThis will delete the old AsimPhoto preferences file, which is "
  645.             "no longer required for AsimCDFS v3.x\n" )
  646.         )
  647.     )
  648. )        
  649.  
  650.  
  651.  
  652. ;  **********************************************************************
  653. ;  l:AsimCDFS
  654. ;  **********************************************************************
  655. (complete 21)
  656. (protect "l:AsimCDFS" "rwed" )
  657. (copyfiles
  658.     (prompt "\n\nCopying AsimCDFS FileSystem to the l: directory.\n" )
  659.     (source "AsimCDFSInst:l/AsimCDFS")
  660.     (dest "l:")
  661.     (confirm)
  662.     (help "\n\nThis will copy over the AsimCDFS FileSystem program to your "
  663.         "l: directory\n\nThis is an essential step in the installation "
  664.         "process.\n" )
  665. )
  666.  
  667.  
  668.  
  669. ;  **********************************************************************
  670. ;  devs:asimcdfs.device
  671. ;  **********************************************************************
  672. (complete 25)
  673. (protect "devs:asimcdfs.device" "rwed" )
  674. (copyfiles
  675.     (prompt "\n\nCopying asimcdfs.device to the devs: directory.\n" )
  676.     (source "AsimCDFSInst:devs/asimcdfs.device")
  677.     (dest "devs:")
  678.     (confirm)
  679.     (help "\n\nThis will copy over the asimcdfs.device program to your "
  680.         "devs: directory\n\nThis is an essential step in the installation "
  681.         "process.\n" )
  682. )
  683.  
  684.  
  685.  
  686.  
  687.  
  688. ;  **********************************************************************
  689. ;  Create PD0 mountlist for PD/CD-ROM drive
  690. ;  **********************************************************************
  691. ;(if (= #isPDCD 1)
  692. ;    (
  693. ;    )
  694. ;)
  695.  
  696.  
  697.  
  698. (if (and (= #IsAmiga #typeATAPI) (< #wbversion 39) )
  699.     (abort "\n\nAmigaDOS 3.0 or higher is required for the asim_atapi.device.  "
  700.              "\n\nIf you are currently using an Amiga 1200 or Amiga 4000, check "
  701.              "your libs:version.library file.\n\n"
  702.              "\n\nYour libs:version.library file currently reports version " #wbversion ".")
  703. )
  704.  
  705.  
  706. ;  **********************************************************************
  707. ;  Create mountlists and alter user-startup
  708. ;
  709. ;  no need to worry about NEC 4X4 as the atapi.device requires WB3.0 or above
  710. ;  (at this time!)
  711. ;  **********************************************************************
  712. (if (= #wbversion 37) 
  713.     ((if #PioneerSeparate
  714.         ((set #startupCommand1 (cat "mount >NIL: " #CDDevice_NC "0: from devs:MountList." #CDDevice_NC "\n") )
  715.         (set #startupCommand2 (cat "mount >NIL: " #CDDevice_NC "1: from devs:MountList." #CDDevice_NC "\n") )
  716.         (set #startupCommand3 (cat "mount >NIL: " #CDDevice_NC "2: from devs:MountList." #CDDevice_NC "\n") )
  717.         (set #startupCommand4 (cat "mount >NIL: " #CDDevice_NC "3: from devs:MountList." #CDDevice_NC "\n") )
  718.         (set #startupCommand5 (cat "mount >NIL: " #CDDevice_NC "4: from devs:MountList." #CDDevice_NC "\n") )
  719.         (if #isPioneer
  720.             (set #startupCommand6 (cat "mount >NIL: " #CDDevice_NC "5: from devs:MountList." #CDDevice_NC "\n") )
  721.         )
  722.         (if #isNakamichi
  723.             (set #startupCommand6 (cat "mount >NIL: " #CDDevice_NC "5: from devs:MountList." #CDDevice_NC "\n" "mount >NIL: " #CDDevice_NC "6: from devs:MountList." #CDDevice_NC "\n") )
  724.         )
  725.             
  726.         
  727.         (if #autoMount
  728.             ((protect "S:User-Startup" "rwed" )
  729.             (protect "S:Startup-Sequence" "rwed" )
  730.             
  731.             (startup "AsimCDFS"
  732.                 (command #echotxt)
  733.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  734.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  735.                 (command #startupCommand1 )
  736.                 (command #startupCommand2 )
  737.                 (command #startupCommand3 )
  738.                 (command #startupCommand4 )
  739.                 (command #startupCommand5 )
  740.                 (command #startupCommand6 )
  741.                 (prompt "Inserting MOUNT commands into the startup-sequence")
  742.                 (help "\n\nThe command \"MOUNT " #CDDevice " FROM DEVS:MOUNTLIST." #CDDevice_NC "\" is being inserted into your "
  743.                         "\"S:Startup-Sequence\" or \"S:User-Startup\" file to "
  744.                         "automatically start AsimCDFS upon bootup." )
  745.             ))
  746.         ))
  747.     )
  748.  
  749.     (if (not #PioneerSeparate)
  750.         ((set #startupCommand (cat "mount >NIL: " #CDDevice " from devs:MountList." #CDDevice_NC "\n") )
  751.         (if #autoMount
  752.             ((protect "S:User-Startup" "rwed" )
  753.             (protect "S:Startup-Sequence" "rwed" )
  754.             
  755.             (startup "AsimCDFS"
  756.                 (command #echotxt)
  757.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  758.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  759.                 (command #startupCommand )
  760.                 (prompt "Inserting MOUNT command into the startup-sequence")
  761.                 (help "\n\nThe command \"MOUNT " #CDDevice " FROM DEVS:MOUNTLIST." #CDDevice_NC "\" is being inserted into your "
  762.                         "\"S:Startup-Sequence\" or \"S:User-Startup\" file to "
  763.                         "automatically start AsimCDFS upon bootup." )
  764.             ))
  765.         ))
  766.     )
  767.     
  768.     (if (not #autoMount)
  769.         ((protect "S:User-Startup" "rwed" )
  770.         (protect "S:Startup-Sequence" "rwed" )
  771.         
  772.         (startup "AsimCDFS"
  773.             (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  774.             (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  775.             (prompt "Inserting MOUNT command into the startup-sequence")
  776.             (help "\n\nThe command \"MOUNT " #CDDevice " FROM DEVS:MOUNTLIST." #CDDevice_NC "\" is being inserted into your "
  777.                     "\"S:Startup-Sequence\" or \"S:User-Startup\" file to "
  778.                     "automatically start AsimCDFS upon bootup." )
  779.         ))
  780.     )
  781.  
  782.     (protect (cat "devs:MountList." #CDDevice_NC) "rwed" )
  783.  
  784.     (if #isPioneer 
  785.         (set #LastLine "\n")
  786.     )
  787.  
  788.     (if #isNakamichi 
  789.         (set #LastLine (cat #CDDevice_NC "6:\n"
  790.                             "    Device         = " #SCSIDevice "\n"
  791.                             "    Unit           = 6" #SCSIUnit "\n"
  792.                             "    Buffers        = 0\n"
  793.                             "    BufMemType     = 5\n"
  794.                             "    Mask           = 0xffffffe\n"
  795.                             "    Flags          = 0\n"
  796.                             "    FileSystem     = l:AsimCDFS\n"
  797.                             "    DosType        = 0x662dabac\n"
  798.                             "    GlobVec        = -1\n"
  799.                             "    Mount          = 1\n"
  800.                             "    Reserved       = 0\n"
  801.                             "    LowCyl         = 0\n"
  802.                             "    HighCyl        = 999\n"
  803.                             "    Surfaces       = 1\n"
  804.                             "    BlocksPerTrack = 32\n"
  805.                             "    Priority       = 10\n"
  806.                             "    StackSize      = 5000\n"
  807.                             "#\n\n")
  808.             )
  809.         )
  810.                             
  811.  
  812.  
  813.     (if #PioneerSeparate
  814.         (textfile
  815.             (dest (cat "devs:MountList." #CDDevice_NC) )
  816.             (append "/************************************************************************/\n"
  817.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  818.                       "/************************************************************************/\n")
  819.             (append #CDDevice_NC "0:\n")
  820.             (append "    Device         = " #SCSIDevice "\n" )
  821.             (append "    Unit           = 0" #SCSIUnit "\n" )
  822.             (append "    Buffers        = 0\n")
  823.             (append "    BufMemType     = 5\n" )
  824.             (append "    Mask           = 0xffffffe\n" )
  825.             (append "    Flags          = 0\n" )
  826.             (append "    FileSystem     = l:AsimCDFS\n")
  827.             (append "    DosType        = 0x662dabac\n")
  828.             (append "    GlobVec        = -1\n")
  829.             (append "    Mount          = 1\n")
  830.             (append "    Reserved       = 0\n")
  831.             (append "    LowCyl         = 0\n")
  832.             (append "    HighCyl        = 999\n")
  833.             (append "    Surfaces       = 1\n")
  834.             (append "    BlocksPerTrack = 32\n")
  835.             (append "    Priority       = 10\n")
  836.             (append "    StackSize      = 5000\n")
  837.             (append "#\n\n")
  838.             (append #CDDevice_NC "1:\n")
  839.             (append "    Device         = " #SCSIDevice "\n" )
  840.             (append "    Unit           = 1" #SCSIUnit "\n" )
  841.             (append "    Buffers        = 0\n")
  842.             (append "    BufMemType     = 5\n" )
  843.             (append "    Mask           = 0xffffffe\n" )
  844.             (append "    Flags          = 0\n" )
  845.             (append "    FileSystem     = l:AsimCDFS\n")
  846.             (append "    DosType        = 0x662dabac\n")
  847.             (append "    GlobVec        = -1\n")
  848.             (append "    Mount          = 1\n")
  849.             (append "    Reserved       = 0\n")
  850.             (append "    LowCyl         = 0\n")
  851.             (append "    HighCyl        = 999\n")
  852.             (append "    Surfaces       = 1\n")
  853.             (append "    BlocksPerTrack = 32\n")
  854.             (append "    Priority       = 10\n")
  855.             (append "    StackSize      = 5000\n")
  856.             (append "#\n\n")
  857.             (append #CDDevice_NC "2:\n")
  858.             (append "    Device         = " #SCSIDevice "\n" )
  859.             (append "    Unit           = 2" #SCSIUnit "\n" )
  860.             (append "    Buffers        = 0\n")
  861.             (append "    BufMemType     = 5\n" )
  862.             (append "    Mask           = 0xffffffe\n" )
  863.             (append "    Flags          = 0\n" )
  864.             (append "    FileSystem     = l:AsimCDFS\n")
  865.             (append "    DosType        = 0x662dabac\n")
  866.             (append "    GlobVec        = -1\n")
  867.             (append "    Mount          = 1\n")
  868.             (append "    Reserved       = 0\n")
  869.             (append "    LowCyl         = 0\n")
  870.             (append "    HighCyl        = 999\n")
  871.             (append "    Surfaces       = 1\n")
  872.             (append "    BlocksPerTrack = 32\n")
  873.             (append "    Priority       = 10\n")
  874.             (append "    StackSize      = 5000\n")
  875.             (append "#\n\n")
  876.             (append #CDDevice_NC "3:\n")
  877.             (append "    Device         = " #SCSIDevice "\n" )
  878.             (append "    Unit           = 3" #SCSIUnit "\n" )
  879.             (append "    Buffers        = 0\n")
  880.             (append "    BufMemType     = 5\n" )
  881.             (append "    Mask           = 0xffffffe\n" )
  882.             (append "    Flags          = 0\n" )
  883.             (append "    FileSystem     = l:AsimCDFS\n")
  884.             (append "    DosType        = 0x662dabac\n")
  885.             (append "    GlobVec        = -1\n")
  886.             (append "    Mount          = 1\n")
  887.             (append "    Reserved       = 0\n")
  888.             (append "    LowCyl         = 0\n")
  889.             (append "    HighCyl        = 999\n")
  890.             (append "    Surfaces       = 1\n")
  891.             (append "    BlocksPerTrack = 32\n")
  892.             (append "    Priority       = 10\n")
  893.             (append "    StackSize      = 5000\n")
  894.             (append "#\n\n")
  895.             (append #CDDevice_NC "4:\n")
  896.             (append "    Device         = " #SCSIDevice "\n" )
  897.             (append "    Unit           = 4" #SCSIUnit "\n" )
  898.             (append "    Buffers        = 0\n")
  899.             (append "    BufMemType     = 5\n" )
  900.             (append "    Mask           = 0xffffffe\n" )
  901.             (append "    Flags          = 0\n" )
  902.             (append "    FileSystem     = l:AsimCDFS\n")
  903.             (append "    DosType        = 0x662dabac\n")
  904.             (append "    GlobVec        = -1\n")
  905.             (append "    Mount          = 1\n")
  906.             (append "    Reserved       = 0\n")
  907.             (append "    LowCyl         = 0\n")
  908.             (append "    HighCyl        = 999\n")
  909.             (append "    Surfaces       = 1\n")
  910.             (append "    BlocksPerTrack = 32\n")
  911.             (append "    Priority       = 10\n")
  912.             (append "    StackSize      = 5000\n")
  913.             (append "#\n\n")
  914.             (append #CDDevice_NC "5:\n")
  915.             (append "    Device         = " #SCSIDevice "\n" )
  916.             (append "    Unit           = 5" #SCSIUnit "\n" )
  917.             (append "    Buffers        = 0\n")
  918.             (append "    BufMemType     = 5\n" )
  919.             (append "    Mask           = 0xffffffe\n" )
  920.             (append "    Flags          = 0\n" )
  921.             (append "    FileSystem     = l:AsimCDFS\n")
  922.             (append "    DosType        = 0x662dabac\n")
  923.             (append "    GlobVec        = -1\n")
  924.             (append "    Mount          = 1\n")
  925.             (append "    Reserved       = 0\n")
  926.             (append "    LowCyl         = 0\n")
  927.             (append "    HighCyl        = 999\n")
  928.             (append "    Surfaces       = 1\n")
  929.             (append "    BlocksPerTrack = 32\n")
  930.             (append "    Priority       = 10\n")
  931.             (append "    StackSize      = 5000\n")
  932.             (append "#\n\n")
  933.             (append #LastLine )
  934.         )
  935.     )
  936.  
  937.  
  938.  
  939.     (if (not #PioneerSeparate)
  940.         (textfile
  941.             (dest (cat "devs:MountList." #CDDevice_NC) )
  942.             (append "/************************************************************************/\n"
  943.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  944.                       "/************************************************************************/\n")
  945.             (append #CDDevice "\n")
  946.             (append "    Device         = " #SCSIDevice "\n" )
  947.             (append "    Unit           = " #SCSIUnit "\n" )
  948.             (append "    Buffers        = 0\n")
  949.             (append "    BufMemType     = 5\n" )
  950.             (append "    Mask           = 0xffffffe\n" )
  951.             (append "    Flags          = 0\n" )
  952.             (append "    FileSystem     = l:AsimCDFS\n")
  953.             (append "    DosType        = 0x662dabac\n")
  954.             (append "    GlobVec        = -1\n")
  955.             (append "    Mount          = " #autoMount "\n")
  956.             (append "    Reserved       = 0\n")
  957.             (append "    LowCyl         = 0\n")
  958.             (append "    HighCyl        = 999\n")
  959.             (append "    Surfaces       = 1\n")
  960.             (append "    BlocksPerTrack = 32\n")
  961.             (append "    Priority       = 10\n")
  962.             (append "    StackSize      = 5000\n")
  963.             (append "#\n")
  964.         )
  965.     ))
  966. )
  967.  
  968.  
  969.  
  970. (if (> #wbversion 37) 
  971.     ((if (not #PioneerSeparate)
  972.         ((textfile
  973.             (dest (cat #mountDirectory #CDDevice_NC) )
  974.             (append "/************************************************************************/\n"
  975.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  976.                       "/************************************************************************/\n")
  977.             (append "    Device         = " #SCSIDevice "\n" )
  978.             (append "    Unit           = " #SCSIUnit "\n" )
  979.             (append "    Buffers        = 0\n")
  980.             (append "    BufMemType     = 5\n" )
  981.             (append "    Mask           = 0xffffffe\n" )
  982.             (append "    Flags          = 0\n" )
  983.             (append "    FileSystem     = l:AsimCDFS\n")
  984.             (append "    DosType        = 0x662dabac\n")
  985.             (append "    GlobVec        = -1\n")
  986.             (append "    Reserved       = 0\n")
  987.             (append "    LowCyl         = 0\n")
  988.             (append "    HighCyl        = 999\n")
  989.             (append "    Mount          = 1\n")
  990.             (append "    Surfaces       = 1\n")
  991.             (append "    BlocksPerTrack = 32\n")
  992.             (append "    Priority       = 10\n")
  993.             (append "    StackSize      = 5000\n")
  994.         )
  995.  
  996.         (copyfiles
  997.                 (prompt "\n\nCopying Mountlist icon")
  998.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  999.                 (dest #mountDirectory)
  1000.                 (newname (cat #CDDevice_NC ".info"))
  1001.                 (help "\n\nThis will copy over an icon for the mountlist file.")
  1002.                 (confirm)
  1003.             )        
  1004.  
  1005.     ))
  1006.  
  1007.  
  1008.     (if #PioneerSeparate
  1009.         ((textfile
  1010.             (dest (cat #mountDirectory #CDDevice_NC "0") )
  1011.             (append "/************************************************************************/\n"
  1012.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  1013.                       "/************************************************************************/\n")
  1014.             (append "    Device         = " #SCSIDevice "\n" )
  1015.             (append "    Unit           = 0" #SCSIUnit "\n" )
  1016.             (append "    Buffers        = 0\n")
  1017.             (append "    BufMemType     = 5\n" )
  1018.             (append "    Mask           = 0xffffffe\n" )
  1019.             (append "    Flags          = 0\n" )
  1020.             (append "    FileSystem     = l:AsimCDFS\n")
  1021.             (append "    DosType        = 0x662dabac\n")
  1022.             (append "    GlobVec        = -1\n")
  1023.             (append "    Reserved       = 0\n")
  1024.             (append "    LowCyl         = 0\n")
  1025.             (append "    HighCyl        = 999\n")
  1026.             (append "    Mount          = 1\n")
  1027.             (append "    Surfaces       = 1\n")
  1028.             (append "    BlocksPerTrack = 32\n")
  1029.             (append "    Priority       = 10\n")
  1030.             (append "    StackSize      = 5000\n")
  1031.         )
  1032.  
  1033.         (copyfiles
  1034.                 (prompt "\n\nCopying Mountlist icon")
  1035.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1036.                 (dest #mountDirectory)
  1037.                 (newname (cat #CDDevice_NC "0.info"))
  1038.                 (help "\n\nThis will copy over an icon for the mountlist file.")
  1039.                 (confirm)
  1040.             )
  1041.         
  1042.         (textfile
  1043.             (dest (cat #mountDirectory #CDDevice_NC "1") )
  1044.             (append "/************************************************************************/\n"
  1045.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  1046.                       "/************************************************************************/\n")
  1047.             (append "    Device         = " #SCSIDevice "\n" )
  1048.             (append "    Unit           = 1" #SCSIUnit "\n" )
  1049.             (append "    Buffers        = 0\n")
  1050.             (append "    BufMemType     = 5\n" )
  1051.             (append "    Mask           = 0xffffffe\n" )
  1052.             (append "    Flags          = 0\n" )
  1053.             (append "    FileSystem     = l:AsimCDFS\n")
  1054.             (append "    DosType        = 0x662dabac\n")
  1055.             (append "    GlobVec        = -1\n")
  1056.             (append "    Reserved       = 0\n")
  1057.             (append "    LowCyl         = 0\n")
  1058.             (append "    HighCyl        = 999\n")
  1059.             (append "    Mount          = 1\n")
  1060.             (append "    Surfaces       = 1\n")
  1061.             (append "    BlocksPerTrack = 32\n")
  1062.             (append "    Priority       = 10\n")
  1063.             (append "    StackSize      = 5000\n")
  1064.         )
  1065.  
  1066.         (copyfiles
  1067.                 (prompt "\n\nCopying Mountlist icon")
  1068.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1069.                 (dest #mountDirectory)
  1070.                 (newname (cat #CDDevice_NC "1.info"))
  1071.                 (help "\n\nThis will copy over an icon for the mountlist file.")
  1072.                 (confirm)
  1073.             )
  1074.  
  1075.         (textfile
  1076.             (dest (cat #mountDirectory #CDDevice_NC "2") )
  1077.             (append "/************************************************************************/\n"
  1078.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  1079.                       "/************************************************************************/\n")
  1080.             (append "    Device         = " #SCSIDevice "\n" )
  1081.             (append "    Unit           = 2" #SCSIUnit "\n" )
  1082.             (append "    Buffers        = 0\n")
  1083.             (append "    BufMemType     = 5\n" )
  1084.             (append "    Mask           = 0xffffffe\n" )
  1085.             (append "    Flags          = 0\n" )
  1086.             (append "    FileSystem     = l:AsimCDFS\n")
  1087.             (append "    DosType        = 0x662dabac\n")
  1088.             (append "    GlobVec        = -1\n")
  1089.             (append "    Reserved       = 0\n")
  1090.             (append "    LowCyl         = 0\n")
  1091.             (append "    HighCyl        = 999\n")
  1092.             (append "    Mount          = 1\n")
  1093.             (append "    Surfaces       = 1\n")
  1094.             (append "    BlocksPerTrack = 32\n")
  1095.             (append "    Priority       = 10\n")
  1096.             (append "    StackSize      = 5000\n")
  1097.         )
  1098.         
  1099.  
  1100.         (copyfiles
  1101.                 (prompt "\n\nCopying Mountlist icon")
  1102.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1103.                 (dest #mountDirectory)
  1104.                 (newname (cat #CDDevice_NC "2.info"))
  1105.                 (help "\n\nThis will copy over an icon for the mountlist file.")
  1106.                 (confirm)
  1107.             )
  1108.  
  1109.         (textfile
  1110.             (dest (cat #mountDirectory #CDDevice_NC "3") )
  1111.             (append "/************************************************************************/\n"
  1112.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  1113.                       "/************************************************************************/\n")
  1114.             (append "    Device         = " #SCSIDevice "\n" )
  1115.             (append "    Unit           = 3" #SCSIUnit "\n" )
  1116.             (append "    Buffers        = 0\n")
  1117.             (append "    BufMemType     = 5\n" )
  1118.             (append "    Mask           = 0xffffffe\n" )
  1119.             (append "    Flags          = 0\n" )
  1120.             (append "    FileSystem     = l:AsimCDFS\n")
  1121.             (append "    DosType        = 0x662dabac\n")
  1122.             (append "    GlobVec        = -1\n")
  1123.             (append "    Reserved       = 0\n")
  1124.             (append "    LowCyl         = 0\n")
  1125.             (append "    HighCyl        = 999\n")
  1126.             (append "    Mount          = 1\n")
  1127.             (append "    Surfaces       = 1\n")
  1128.             (append "    BlocksPerTrack = 32\n")
  1129.             (append "    Priority       = 10\n")
  1130.             (append "    StackSize      = 5000\n")
  1131.         )
  1132.         
  1133.         (copyfiles
  1134.                 (prompt "\n\nCopying Mountlist icon")
  1135.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1136.                 (dest #mountDirectory)
  1137.                 (newname (cat #CDDevice_NC "3.info"))
  1138.                 (help "\n\nThis will copy over an icon for the mountlist file.")
  1139.                 (confirm)
  1140.             )
  1141.  
  1142.         (if #isPioneer
  1143.             ((textfile
  1144.                 (dest (cat #mountDirectory #CDDevice_NC "4") )
  1145.                 (append "/************************************************************************/\n"
  1146.                           "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  1147.                           "/************************************************************************/\n")
  1148.                 (append "    Device         = " #SCSIDevice "\n" )
  1149.                 (append "    Unit           = 4" #SCSIUnit "\n" )
  1150.                 (append "    Buffers        = 0\n")
  1151.                 (append "    BufMemType     = 5\n" )
  1152.                 (append "    Mask           = 0xffffffe\n" )
  1153.                 (append "    Flags          = 0\n" )
  1154.                 (append "    FileSystem     = l:AsimCDFS\n")
  1155.                 (append "    DosType        = 0x662dabac\n")
  1156.                 (append "    GlobVec        = -1\n")
  1157.                 (append "    Reserved       = 0\n")
  1158.                 (append "    LowCyl         = 0\n")
  1159.                 (append "    HighCyl        = 999\n")
  1160.                 (append "    Mount          = 1\n")
  1161.                 (append "    Surfaces       = 1\n")
  1162.                 (append "    BlocksPerTrack = 32\n")
  1163.                 (append "    Priority       = 10\n")
  1164.                 (append "    StackSize      = 5000\n")
  1165.             )
  1166.     
  1167.             (copyfiles
  1168.                     (prompt "\n\nCopying Mountlist icon")
  1169.                     (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1170.                     (dest #mountDirectory)
  1171.                     (newname (cat #CDDevice_NC "4.info"))
  1172.                     (help "\n\nThis will copy over an icon for the mountlist file.")
  1173.                     (confirm)
  1174.                 )
  1175.     
  1176.             (textfile
  1177.                 (dest (cat #mountDirectory #CDDevice_NC "5") )
  1178.                 (append "/************************************************************************/\n"
  1179.                           "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  1180.                           "/************************************************************************/\n")
  1181.                 (append "    Device         = " #SCSIDevice "\n" )
  1182.                 (append "    Unit           = 5" #SCSIUnit "\n" )
  1183.                 (append "    Buffers        = 0\n")
  1184.                 (append "    BufMemType     = 5\n" )
  1185.                 (append "    Mask           = 0xffffffe\n" )
  1186.                 (append "    Flags          = 0\n" )
  1187.                 (append "    FileSystem     = l:AsimCDFS\n")
  1188.                 (append "    DosType        = 0x662dabac\n")
  1189.                 (append "    GlobVec        = -1\n")
  1190.                 (append "    Reserved       = 0\n")
  1191.                 (append "    LowCyl         = 0\n")
  1192.                 (append "    HighCyl        = 999\n")
  1193.                 (append "    Mount          = 1\n")
  1194.                 (append "    Surfaces       = 1\n")
  1195.                 (append "    BlocksPerTrack = 32\n")
  1196.                 (append "    Priority       = 10\n")
  1197.                 (append "    StackSize      = 5000\n")
  1198.             )
  1199.             (copyfiles
  1200.                     (prompt "\n\nCopying Mountlist icon")
  1201.                     (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1202.                     (dest #mountDirectory)
  1203.                     (newname (cat #CDDevice_NC "5.info"))
  1204.                     (help "\n\nThis will copy over an icon for the mountlist file.")
  1205.                     (confirm)
  1206.                 )
  1207.     
  1208.             (if #isNakamichi
  1209.                 ((textfile
  1210.                     (dest (cat #mountDirectory #CDDevice_NC "6") )
  1211.                     (append "/************************************************************************/\n"
  1212.                               "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  1213.                               "/************************************************************************/\n")
  1214.                     (append "    Device         = " #SCSIDevice "\n" )
  1215.                     (append "    Unit           = 6" #SCSIUnit "\n" )
  1216.                     (append "    Buffers        = 0\n")
  1217.                     (append "    BufMemType     = 5\n" )
  1218.                     (append "    Mask           = 0xffffffe\n" )
  1219.                     (append "    Flags          = 0\n" )
  1220.                     (append "    FileSystem     = l:AsimCDFS\n")
  1221.                     (append "    DosType        = 0x662dabac\n")
  1222.                     (append "    GlobVec        = -1\n")
  1223.                     (append "    Reserved       = 0\n")
  1224.                     (append "    LowCyl         = 0\n")
  1225.                     (append "    HighCyl        = 999\n")
  1226.                     (append "    Mount          = 1\n")
  1227.                     (append "    Surfaces       = 1\n")
  1228.                     (append "    BlocksPerTrack = 32\n")
  1229.                     (append "    Priority       = 10\n")
  1230.                     (append "    StackSize      = 5000\n")
  1231.                 )
  1232.                 (copyfiles
  1233.                         (prompt "\n\nCopying Mountlist icon")
  1234.                         (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1235.                         (dest #mountDirectory)
  1236.                         (newname (cat #CDDevice_NC "6.info"))
  1237.                         (help "\n\nThis will copy over an icon for the mountlist file.")
  1238.                         (confirm)
  1239.                 ))
  1240.             ))
  1241.         )
  1242.     ))
  1243.  
  1244.  
  1245.     (protect "S:User-Startup" "rwed" )
  1246.     (protect "S:Startup-Sequence" "rwed" )
  1247.  
  1248.     (if (not #autoMount)
  1249.         (startup "AsimCDFS"
  1250.             (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1251.             (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1252.             (prompt "Inserting Assign command into the startup-sequence")
  1253.             (help "\n\nThe command assign AsimCDFS: and assign AsimCDFS_Buffer are being entered into your s:user-startup file.")
  1254.             )
  1255.         )
  1256.  
  1257.  
  1258.  
  1259.     (if #autoMount
  1260.         ((if #isPioneer
  1261.             (set #mountCommand6 (cat "mount >NIL: " #CDDevice_NC "4:\n" "mount >NIL: " #CDDevice_NC "5:\n") )
  1262.             )
  1263.         (if #isNakamichi
  1264.             (set #mountCommand6 (cat "mount >NIL: " #CDDevice_NC "4:\n" "mount >NIL: " #CDDevice_NC "5:\n" "mount >NIL: " #CDDevice_NC "6:\n") )
  1265.             )
  1266.         (if #is4X4
  1267.             (set #mountCommand6 "\n")
  1268.             )
  1269.  
  1270.  
  1271.         (if #PioneerSeparate
  1272.             (startup "AsimCDFS"
  1273.                 (command #echotxt)
  1274.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1275.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1276.                 (command (cat "mount >NIL: " #CDDevice_NC "0:\n") )
  1277.                 (command (cat "mount >NIL: " #CDDevice_NC "1:\n") )
  1278.                 (command (cat "mount >NIL: " #CDDevice_NC "2:\n") )
  1279.                 (command (cat "mount >NIL: " #CDDevice_NC "3:") )
  1280.                 (command #mountCommand6 )
  1281.                 (prompt "Inserting Assign command into the startup-sequence")
  1282.                 (help "\n\nThe command assign AsimCDFS: and assign AsimCDFS_Buffer are being entered into your s:user-startup file.")
  1283.                 )
  1284.             )
  1285.             
  1286.         (if (not #PioneerSeparate)
  1287.             (startup "AsimCDFS"
  1288.                 (command #echotxt)
  1289.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1290.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1291.                 (command (cat "mount >NIL: " #CDDevice "\n") )
  1292.                 (prompt "Inserting Assign command into the startup-sequence")
  1293.                 (help "\n\nThe command assign AsimCDFS: and assign AsimCDFS_Buffer are being entered into your s:user-startup file.")
  1294.                 )
  1295.             )            
  1296.         )
  1297.     )
  1298. ))
  1299.  
  1300.  
  1301. ;  **********************************************************************
  1302. ;  Delete old mountlists is DEVS:DosDrivers/
  1303. ;  **********************************************************************
  1304. (if (> #wbversion 37) 
  1305.     ((if (not #PioneerSeparate)
  1306.         ((if (exists (cat "DEVS:DosDrivers/" #CDDevice_NC))
  1307.             ((delete (cat "DEVS:DosDrivers/" #CDDevice_NC)
  1308.             (prompt "\n\Deleting obsolete MountList file from DEVS:DosDrivers/\n" )
  1309.             (confirm)
  1310.             (help "\n\nThis will delete the obsolete MountList file from the DEVS:DosDrivers/ directory.  "
  1311.                     "MountList files for AsimCDFS v3.x are now put into the SYS:Storage/DOSDrivers directory.\n" )
  1312.                 )
  1313.  
  1314.             (delete (cat "DEVS:DosDrivers/" #CDDevice_NC ".info")
  1315.             (prompt "\n\Deleting obsolete MountList file from DEVS:DosDrivers/\n" )
  1316.             (confirm)
  1317.             (help "\n\nThis will delete the obsolete MountList file from the DEVS:DosDrivers/ directory.  "
  1318.                     "MountList files for AsimCDFS v3.x are now put into the SYS:Storage/DOSDrivers directory.\n" )
  1319.                 )
  1320.             )
  1321.         ))
  1322.     ))
  1323.  
  1324.     (if #PioneerSeparate
  1325.         ((set n 0)
  1326.         (while
  1327.             (set #oldml
  1328.                 (select n (cat "DEVS:DosDrivers/" #CDDevice_NC "0")
  1329.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "1")
  1330.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "2")
  1331.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "3")
  1332.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "4")
  1333.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "5")
  1334.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "6")
  1335.                            ""
  1336.                     )
  1337.                 )
  1338.                 
  1339.             
  1340.             ((if (exists #oldml)
  1341.                 ((delete #oldml
  1342.                 (prompt "\n\Deleting obsolete MountList file from DEVS:DosDrivers/\n" )
  1343.                 (confirm)
  1344.                 (help "\n\nThis will delete the obsolete MountList file from the DEVS:DosDrivers/ directory.  "
  1345.                         "MountList files for AsimCDFS v3.x are now put into the SYS:Storage/DOSDrivers directory.\n" )
  1346.                     )
  1347.  
  1348.  
  1349.                 (delete (cat #oldml ".info")
  1350.                 (prompt "\n\Deleting obsolete MountList file from DEVS:DosDrivers/\n" )
  1351.                 (confirm)
  1352.                 (help "\n\nThis will delete the obsolete MountList file from the DEVS:DosDrivers/ directory.  "
  1353.                         "MountList files for AsimCDFS v3.x are now put into the SYS:Storage/DOSDrivers directory.\n" )
  1354.                     )
  1355.                 )
  1356.             )        
  1357.  
  1358.             (set n (+ n 1)))
  1359.             )
  1360.         )
  1361. ))
  1362.  
  1363. ;  **********************************************************************
  1364. ;  Default prefs files
  1365. ;  **********************************************************************
  1366. (if (or (= #IsAmiga #typeAMIGA) (= #IsAmiga #typeFLYER))
  1367.     ((if (or #isNakamichi #isPioneer)
  1368.         ;  **********************************************************************
  1369.         ;  Default prefs file for a Pioneer drive, separate
  1370.         ;  **********************************************************************
  1371.         ((if #PioneerSeparate
  1372.             ((copyfiles
  1373.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1374.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1375.                 (dest "ENVArc:AsimCDFS")
  1376.                 (newname (cat #CDDevice_NC "0"))
  1377.                 (help "\n\nThis will copy over a default preferences file.")
  1378.                 (confirm)
  1379.             )
  1380.     
  1381.             (copyfiles
  1382.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1383.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1384.                 (dest "ENVArc:AsimCDFS")
  1385.                 (newname (cat #CDDevice_NC "1"))
  1386.                 (help "\n\nThis will copy over a default preferences file.")
  1387.                 (confirm)
  1388.             )
  1389.     
  1390.             (copyfiles
  1391.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1392.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1393.                 (dest "ENVArc:AsimCDFS")
  1394.                 (newname (cat #CDDevice_NC "2"))
  1395.                 (help "\n\nThis will copy over a default preferences file.")
  1396.                 (confirm)
  1397.             )
  1398.     
  1399.             (copyfiles
  1400.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1401.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1402.                 (dest "ENVArc:AsimCDFS")
  1403.                 (newname (cat #CDDevice_NC "3"))
  1404.                 (help "\n\nThis will copy over a default preferences file.")
  1405.                 (confirm)
  1406.             )
  1407.     
  1408.             (copyfiles
  1409.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1410.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1411.                 (dest "ENVArc:AsimCDFS")
  1412.                 (newname (cat #CDDevice_NC "4"))
  1413.                 (help "\n\nThis will copy over a default preferences file.")
  1414.                 (confirm)
  1415.             )
  1416.     
  1417.             (copyfiles
  1418.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1419.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1420.                 (dest "ENVArc:AsimCDFS")
  1421.                 (newname (cat #CDDevice_NC "5"))
  1422.                 (help "\n\nThis will copy over a default preferences file.")
  1423.                 (confirm)
  1424.             )
  1425.  
  1426.             (if #isNakamichi
  1427.                 (copyfiles
  1428.                     (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1429.                     (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1430.                     (dest "ENVArc:AsimCDFS")
  1431.                     (newname (cat #CDDevice_NC "6"))
  1432.                     (help "\n\nThis will copy over a default preferences file.")
  1433.                     (confirm)
  1434.                 ))
  1435.             )
  1436.         )
  1437.             
  1438.         ;  **********************************************************************
  1439.         ;  Default prefs file for a Pioneer drive, pooled
  1440.         ;  **********************************************************************
  1441.         (if (not #PioneerSeparate)
  1442.             (
  1443.             (if #isPioneer
  1444.                 (copyfiles
  1445.                     (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1446.                     (source "AsimCDFSInst:Default_Prefs/Pioneer_Pool")
  1447.                     (dest "ENVArc:AsimCDFS")
  1448.                     (newname #CDDevice_NC)
  1449.                     (help "\n\nThis will copy over a default preferences file.")
  1450.                     (confirm)
  1451.                 ))
  1452.                 
  1453.             (if #IsNakamichi
  1454.                 (copyfiles
  1455.                     (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1456.                     (source "AsimCDFSInst:Default_Prefs/Nakamichi_Pool")
  1457.                     (dest "ENVArc:AsimCDFS")
  1458.                     (newname #CDDevice_NC)
  1459.                     (help "\n\nThis will copy over a default preferences file.")
  1460.                     (confirm)
  1461.                 ))
  1462.             )
  1463.         )        
  1464.     ))
  1465.     
  1466.     
  1467.     ;  **********************************************************************
  1468.     ;  Default prefs file for a SCSI CD-ROM drive
  1469.     ;  **********************************************************************
  1470.     (if (and (not #isNakamichi) (not #isPioneer))
  1471.         (copyfiles
  1472.             (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1473.             (source "AsimCDFSInst:Default_Prefs/Default")
  1474.             (dest "ENVArc:AsimCDFS")
  1475.             (newname #CDDevice_NC)
  1476.             (help "\n\nThis will copy over a default preferences file.")
  1477.             (confirm)
  1478.         )
  1479.     ))
  1480. )
  1481.  
  1482.  
  1483.  
  1484.  
  1485. ;  **********************************************************************
  1486. ;  Default prefs file for an ATAPI CD-ROM drive
  1487. ;  **********************************************************************
  1488. (if (= #IsAmiga #typeATAPI)
  1489.     (
  1490.     (if (not #is4X4)        
  1491.         (copyfiles
  1492.             (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1493.             (source "AsimCDFSInst:Default_Prefs/ATAPI")
  1494.             (dest "ENVArc:AsimCDFS")
  1495.             (newname #CDDevice_NC)
  1496.             (help "\n\nThis will copy over a default preferences file.")
  1497.             (confirm)
  1498.         )
  1499.     )
  1500.  
  1501.     (if #is4X4
  1502.         ((if #PioneerSeparate
  1503.             ((copyfiles
  1504.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1505.                 (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
  1506.                 (dest "ENVArc:AsimCDFS")
  1507.                 (newname (cat #CDDevice_NC "0"))
  1508.                 (help "\n\nThis will copy over a default preferences file.")
  1509.                 (confirm)
  1510.             )
  1511.     
  1512.             (copyfiles
  1513.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1514.                 (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
  1515.                 (dest "ENVArc:AsimCDFS")
  1516.                 (newname (cat #CDDevice_NC "1"))
  1517.                 (help "\n\nThis will copy over a default preferences file.")
  1518.                 (confirm)
  1519.             )
  1520.     
  1521.             (copyfiles
  1522.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1523.                 (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
  1524.                 (dest "ENVArc:AsimCDFS")
  1525.                 (newname (cat #CDDevice_NC "2"))
  1526.                 (help "\n\nThis will copy over a default preferences file.")
  1527.                 (confirm)
  1528.             )
  1529.     
  1530.             (copyfiles
  1531.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1532.                 (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
  1533.                 (dest "ENVArc:AsimCDFS")
  1534.                 (newname (cat #CDDevice_NC "3"))
  1535.                 (help "\n\nThis will copy over a default preferences file.")
  1536.                 (confirm)
  1537.             )
  1538.             )
  1539.         )
  1540.  
  1541.         (if (not #PioneerSeparate)
  1542.             (copyfiles
  1543.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1544.                 (source "AsimCDFSInst:Default_Prefs/4X4_Pooled")
  1545.                 (dest "ENVArc:AsimCDFS")
  1546.                 (newname #CDDevice_NC)
  1547.                 (help "\n\nThis will copy over a default preferences file.")
  1548.                 (confirm)
  1549.             )
  1550.         ))
  1551.     )
  1552.     )
  1553. )
  1554.  
  1555.  
  1556. ;  **********************************************************************
  1557. ;  Default prefs file for a CDTV
  1558. ;  **********************************************************************
  1559. (if (= #IsAmiga #typeCDTV)
  1560.     (copyfiles
  1561.         (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1562.         (source "AsimCDFSInst:Default_Prefs/CDTV")
  1563.         (dest "ENVArc:AsimCDFS")
  1564.         (newname #CDDevice_NC)
  1565.         (help "\n\nThis will copy over a default preferences file.")
  1566.         (confirm)
  1567.     )
  1568. )
  1569.  
  1570.  
  1571. ;  **********************************************************************
  1572. ;  Default prefs file for a CD³²
  1573. ;  **********************************************************************
  1574. (if (= #IsAmiga #typeCD32)
  1575.     (copyfiles
  1576.         (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1577.         (source "AsimCDFSInst:Default_Prefs/CD³²")
  1578.         (dest "ENVArc:AsimCDFS")
  1579.         (newname #CDDevice_NC)
  1580.         (help "\n\nThis will copy over a default preferences file.")
  1581.         (confirm)
  1582.     )
  1583. )
  1584.  
  1585. (complete 28)
  1586.  
  1587.  
  1588.  
  1589.  
  1590.  
  1591.  
  1592.  
  1593. ;  **********************************************************************
  1594. ;  AsimTunes
  1595. ;  **********************************************************************
  1596. (set #instTunes
  1597.     (askbool
  1598.         (prompt "\n\nShould the AsimTunes utility be installed?")
  1599.         (help "\n\nThis will copy over the AsimTunes utility "
  1600.                 "to your AsimCDFS: directory\n\nIf you do not "
  1601.                 "wish the AsimTunes program to be transferred to your system, "
  1602.                 "skip this step.\n" )
  1603.         (default 1)
  1604.     )
  1605. )
  1606.  
  1607. (if #instTunes 
  1608.     ((protect "AsimCDFS:AsimTunes" "rwed" )
  1609.     (protect "AsimCDFS:AsimTunes.info" "rwed" )
  1610.     (copyfiles
  1611.         (prompt "\n\nCopying AsimTunes audio CD controller program to the "
  1612.                   "AsimCDFS: directory.\n" )
  1613.         (source "AsimCDFSInst:AsimTunes")
  1614.         (dest "AsimCDFS:")
  1615.         (infos)
  1616.         (noposition)
  1617.         (help "\n\nThis will copy over the AsimTunes audio CD controller "
  1618.                 "program to your AsimCDFS: directory\n\nIf you do not "
  1619.                 "wish the AsimTunes program to be transferred to your system, "
  1620.                 "skip this step.\n" )
  1621.         (confirm)
  1622.     )
  1623.     
  1624.     (tooltype
  1625.         (dest "AsimCDFS:AsimTunes" )
  1626.         (settooltype "CDROM" #CDDevice )
  1627.         (noposition)
  1628.     )
  1629.         
  1630.         
  1631.     (complete 31)
  1632.     (protect "fonts:AsimTunes2" "rwed" )
  1633.     (protect "fonts:AsimTunes2.font" "rwed" )
  1634.     (protect "fonts:AsimTunes2/11" "rwed" )
  1635.     (protect "fonts:AsimTunes2/20" "rwed" )
  1636.     (copyfiles
  1637.         (prompt "\n\nCopying AsimTunes fonts to the FONTS: directory\n" )
  1638.         (source "AsimCDFSInst:fonts")
  1639.         (dest "fonts:" )
  1640.         (all)
  1641.         (help "\n\nThis will copy over the fonts needed for AsimTunes.\n\n"
  1642.                 "They will be placed into your fonts: directory.\n\n" )
  1643.         (confirm) )
  1644. ))
  1645.  
  1646.  
  1647.  
  1648.  
  1649.  
  1650. ;  **********************************************************************
  1651. ;  DiscChanger
  1652. ;  **********************************************************************
  1653. (complete 34)
  1654.  
  1655. (set #instChanger
  1656.     (askbool
  1657.         (prompt "\n\nShould the DiscChanger utility be installed?")
  1658.         (help "\n\nThis will copy over the DiscChanger utility "
  1659.                 "to your AsimCDFS: directory\n\nIf you do not "
  1660.                 "wish the DiscChanger program to be transferred to your system, "
  1661.                 "skip this step.\n" )
  1662.         (default 1)
  1663.     )
  1664. )
  1665.  
  1666. (complete 37)
  1667. (if #instChanger
  1668.     ((protect "AsimCDFS:DiscChanger" "rwed" )
  1669.     (copyfiles
  1670.         (prompt "\n\nCopying the DiscChanger utility to the AsimCDFS: "
  1671.                   "directory.\n" )
  1672.         (source "AsimCDFSInst:DiscChanger")
  1673.         (dest "AsimCDFS:")
  1674.         (infos)
  1675.         (noposition)
  1676.         (help "\n\nThis will copy over the DiscChanger utility "
  1677.                 "program to your AsimCDFS: directory\n\nIf you do not "
  1678.                 "wish the DiscChanger program to be transferred to your system, "
  1679.                 "skip this step.\n" )
  1680.         (confirm)
  1681.     )
  1682.     
  1683.     (tooltype
  1684.         (dest "AsimCDFS:DiscChanger" )
  1685.         (settooltype "CDROM" #CDDevice )
  1686.         (noposition)
  1687.     )
  1688. ))
  1689.  
  1690.  
  1691.  
  1692.  
  1693.  
  1694. ;  **********************************************************************
  1695. ;  PDFormat
  1696. ;  **********************************************************************
  1697. (complete 38)
  1698.  
  1699. (if (= #isPDCD 1)
  1700.     (
  1701.     (set #instPDFormat
  1702.         (askbool
  1703.             (prompt "\n\nShould the PD_Format utility be installed?")
  1704.             (help "\n\nThis will copy over the PD_Format utility "
  1705.                     "to your AsimCDFS: directory\n\nIf you do not "
  1706.                     "wish the PD_Format program to be transferred to your system, "
  1707.                     "skip this step.\n" )
  1708.             (default 1)
  1709.         )
  1710.     )
  1711.  
  1712.     (complete 39)
  1713.     (if #instPDFormat
  1714.         ((protect "AsimCDFS:PD_Format" "rwed" )
  1715.         (copyfiles
  1716.             (prompt "\n\nCopying the PD_Format utility to the AsimCDFS: "
  1717.                       "directory.\n" )
  1718.             (source "AsimCDFSInst:PD_Format")
  1719.             (dest "AsimCDFS:")
  1720.             (infos)
  1721.             (noposition)
  1722.             (help "\n\nThis will copy over the PD_Format utility "
  1723.                     "program to your AsimCDFS: directory\n\nIf you do not "
  1724.                     "wish the PD_Format  program to be transferred to your system, "
  1725.                     "skip this step.\n" )
  1726.             (confirm)
  1727.         )
  1728.         
  1729.         (tooltype
  1730.             (dest "AsimCDFS:PD_Format" )
  1731.             (noposition)
  1732.         )
  1733.     ))
  1734. ))
  1735.  
  1736.  
  1737.  
  1738.  
  1739.  
  1740. ;  **********************************************************************
  1741. ;  AsimCDFS_Prefs
  1742. ;  **********************************************************************
  1743. (complete 40)
  1744. (set #instPrefs
  1745.     (askbool
  1746.         (prompt "\n\nShould the AsimCDFS_Prefs utility be installed?")
  1747.         (help "\n\nThis will copy over the AsimCDFS_Prefs utility "
  1748.                 "to your AsimCDFS: directory\n\nIf you do not "
  1749.                 "wish the AsimCDFS_Prefs program to be transferred to your system, "
  1750.                 "skip this step.\n" )
  1751.         (default 1)
  1752.     )
  1753. )
  1754.  
  1755. (complete 43)
  1756. (if #instPrefs
  1757.     ((protect "AsimCDFS:AsimCDFS_Prefs" "rwed" )
  1758.     (copyfiles
  1759.         (prompt "\n\nCopying the AsimCDFS_Prefs utility to the AsimCDFS: "
  1760.                   "directory.\n" )
  1761.         (source "AsimCDFSInst:AsimCDFS_Prefs")
  1762.         (dest "AsimCDFS:")
  1763.         (infos)
  1764.         (noposition)
  1765.         (help "\n\nThis will copy over the AsimCDFS_Prefs utility "
  1766.                 "program to your AsimCDFS: directory\n\nIf you do not "
  1767.                 "wish the AsimCDFS_Prefs program to be transferred to your system, "
  1768.                 "skip this step.\n" )
  1769.         (confirm)
  1770.     )
  1771. ))
  1772.  
  1773.  
  1774.  
  1775.  
  1776. ;  **********************************************************************
  1777. ;  SimBoot
  1778. ;  **********************************************************************
  1779. (complete 46)
  1780. (set #instSimBoot
  1781.     (askbool
  1782.         (prompt "\n\nShould the SimBoot utility be installed?")
  1783.         (help "\n\nThis will copy over the SimBoot utility "
  1784.                 "to your AsimCDFS: directory\n\nIf you do not "
  1785.                 "wish the SimBoot program to be transferred to your system, "
  1786.                 "skip this step.\n" )
  1787.         (default 1)
  1788.     )
  1789. )
  1790.  
  1791. (complete 50)
  1792. (if #instSimBoot
  1793.     ((protect "AsimCDFS:SimBoot" "rwed" )
  1794.     (copyfiles
  1795.         (prompt "\n\nCopying the SimBoot utility to the AsimCDFS: "
  1796.                   "directory.\n" )
  1797.         (source "AsimCDFSInst:SimBoot")
  1798.         (dest "AsimCDFS:")
  1799.         (infos)
  1800.         (noposition)
  1801.         (help "\n\nThis will copy over the SimBoot utility "
  1802.                 "program to your AsimCDFS: directory\n\nIf you do not "
  1803.                 "wish the SimBoot program to be transferred to your system, "
  1804.                 "skip this step.\n" )
  1805.         (confirm)
  1806.     )
  1807.  
  1808. ))
  1809.  
  1810.  
  1811.  
  1812. ;  **********************************************************************
  1813. ;  CD³²_Prefs
  1814. ;  **********************************************************************
  1815. (complete 53)
  1816. (set #instCD32Prefs
  1817.     (askbool
  1818.         (prompt "\n\nShould the CD³²_Prefs utility be installed?")
  1819.         (help "\n\nThis will copy over the CD³²_Prefs utility "
  1820.                 "to your AsimCDFS: directory\n\nIf you do not "
  1821.                 "wish the CD³²_Prefs program to be transferred to your system, "
  1822.                 "skip this step.\n" )
  1823.         (default 1)
  1824.     )
  1825. )
  1826.  
  1827. (complete 56)
  1828. (if #instCD32Prefs
  1829.     ((protect "AsimCDFS:CD³²_Prefs" "rwed" )
  1830.     (copyfiles
  1831.         (prompt "\n\nCopying the CD³²_Prefs utility to the AsimCDFS: "
  1832.                   "directory.\n" )
  1833.         (source "AsimCDFSInst:CD³²_Prefs")
  1834.         (dest "AsimCDFS:")
  1835.         (infos)
  1836.         (noposition)
  1837.         (help "\n\nThis will copy over the CD³²_Prefs utility "
  1838.                 "program to your AsimCDFS: directory\n\nIf you do not "
  1839.                 "wish the CD³²_Prefs program to be transferred to your system, "
  1840.                 "skip this step.\n" )
  1841.         (confirm)
  1842.     )
  1843.  
  1844. ))
  1845.  
  1846.  
  1847.  
  1848.  
  1849. ;  **********************************************************************
  1850. ;  CDTV Prefs
  1851. ;  **********************************************************************
  1852. (complete 59)
  1853. (set #instCDTVPrefs
  1854.     (askbool
  1855.         (prompt "\n\nShould the CDTV_Prefs utility be installed?")
  1856.         (help "\n\nThis will copy over the CDTV_Prefs utility "
  1857.                 "to your AsimCDFS: directory\n\nIf you do not "
  1858.                 "wish the CDTV_Prefs program to be transferred to your system, "
  1859.                 "skip this step.\n" )
  1860.         (default 1)
  1861.     )
  1862. )
  1863.  
  1864. (complete 62)
  1865. (if #instCDTVPrefs
  1866.     ((protect "AsimCDFS:CDTV_Prefs" "rwed" )
  1867.     (copyfiles
  1868.         (prompt "\n\nCopying the CDTV_Prefs utility to the AsimCDFS: "
  1869.                   "directory.\n" )
  1870.         (source "AsimCDFSInst:CDTV_Prefs")
  1871.         (dest "AsimCDFS:")
  1872.         (infos)
  1873.         (noposition)
  1874.         (help "\n\nThis will copy over the CDTV_Prefs utility "
  1875.                 "program to your AsimCDFS: directory\n\nIf you do not "
  1876.                 "wish the CDTV_Prefs program to be transferred to your system, "
  1877.                 "skip this step.\n" )
  1878.         (confirm)
  1879.     )
  1880.  
  1881. ))
  1882.  
  1883.  
  1884.  
  1885.  
  1886.  
  1887.  
  1888.  
  1889. (complete 65)
  1890. (set #instCDTVEmul
  1891.     (askbool
  1892.         (prompt "\n\nShould the CDTV emulation option be installed?")
  1893.         (help "\n\nThis will copy over the required files for the "
  1894.                 "CDTV emulation:\n   devs:cdtv.device\n   devs:bookmark.device\n   devs:cardmark.device\n   libs:playerprefs.library\n\nIf you do not "
  1895.                 "wish the CDTV emulation option to be transferred to your system, "
  1896.                 "skip this step.\n" )
  1897.         (default 1)
  1898.     )
  1899. )
  1900.  
  1901. (complete 68)
  1902. (if #instCDTVEmul
  1903.     ((complete 71)
  1904.     ;  **********************************************************************
  1905.     ;  devs:cdtv.device
  1906.     ;  **********************************************************************
  1907.     (protect "devs:cdtv.device" "rwed" )
  1908.     (copyfiles
  1909.         (prompt "\n\nCopying cdtv.device to the devs: directory.\n" )
  1910.         (source "AsimCDFSInst:devs/cdtv.device")
  1911.         (dest "devs:")
  1912.         (confirm)
  1913.         (help "\n\nThis will copy over the cdtv.device program to your "
  1914.             "devs: directory\n\nThis is part of the CDTV emulation\n" )
  1915.     )
  1916.     
  1917.     
  1918.     
  1919.     ;  **********************************************************************
  1920.     ;  devs:bookmark.device
  1921.     ;  **********************************************************************
  1922.     (complete 75)
  1923.     (protect "devs:bookmark.device" "rwed" )
  1924.     (copyfiles
  1925.         (prompt "\n\nCopying bookmark.device to the devs: directory.\n" )
  1926.         (source "AsimCDFSInst:devs/bookmark.device")
  1927.         (dest "devs:")
  1928.         (confirm)
  1929.         (help "\n\nThis will copy over the bookmark.device program to your "
  1930.             "devs: directory\n\nThis is part of the CDTV emulation\n" )
  1931.     )
  1932.     
  1933.     
  1934.     ;  **********************************************************************
  1935.     ;  devs:cardmark.device
  1936.     ;  **********************************************************************
  1937.     (complete 78)
  1938.     (protect "devs:cardmark.device" "rwed" )
  1939.     (copyfiles
  1940.         (prompt "\n\nCopying cardmark.device to the devs: directory.\n" )
  1941.         (source "AsimCDFSInst:devs/cardmark.device")
  1942.         (dest "devs:")
  1943.         (confirm)
  1944.         (help "\n\nThis will copy over the cardmark.device program to your "
  1945.             "devs: directory\n\nThis is part of the CDTV emulation\n" )
  1946.     )
  1947.     
  1948.     
  1949.     ;  **********************************************************************
  1950.     ;  libs:playerprefs.library
  1951.     ;  **********************************************************************
  1952.     (complete 81)
  1953.     (protect "devs:playerprefs.library" "rwed" )
  1954.     (copyfiles
  1955.         (prompt "\n\nCopying playerprefs.library to the libs: directory.\n" )
  1956.         (source "AsimCDFSInst:libs/playerprefs.library")
  1957.         (dest "libs:")
  1958.         (confirm)
  1959.         (help "\n\nThis will copy over the playerprefs.library program to your "
  1960.             "libs: directory\n\nThis is part of the CDTV emulation\n" )
  1961.     )
  1962. ))    
  1963.  
  1964.  
  1965.  
  1966. (set #instCD32Emul
  1967.     (askbool
  1968.         (prompt "\n\nShould the CD³² emulation option be installed?")
  1969.         (help "\n\nThis will copy over the required files for the "
  1970.                 "CD³² emulation:\n   devs:cd.device\n   libs:nonvolatile.library\n   libs:lowlevel.library\n\nIf you do not "
  1971.                 "wish the CD³² emulation option to be transferred to your system, "
  1972.                 "skip this step.\n" )
  1973.         (default 1)
  1974.     )
  1975. )
  1976.  
  1977. (complete 84)
  1978. (if #instCD32Emul
  1979.     ((complete 87)
  1980.     ;  **********************************************************************
  1981.     ;  devs:cd.device
  1982.     ;  **********************************************************************
  1983.     
  1984.     (protect "devs:cd.device" "rwed" )
  1985.     (copyfiles
  1986.         (prompt "\n\nCopying cd.device to the devs: directory.\n" )
  1987.         (source "AsimCDFSInst:devs/cd.device")
  1988.         (dest "devs:")
  1989.         (confirm)
  1990.         (help "\n\nThis will copy over the cd.device program to your "
  1991.             "devs: directory\n\nThis is part of the CD³² emulation\n" )
  1992.     )
  1993.     
  1994.     
  1995.     ;  **********************************************************************
  1996.     ;  libs:nonvolatile.library
  1997.     ;  **********************************************************************
  1998.     (complete 90)
  1999.     (protect "devs:nonvolatile.library" "rwed" )
  2000.     (copyfiles
  2001.         (prompt "\n\nCopying nonvolatile.library to the libs: directory.\n" )
  2002.         (source "AsimCDFSInst:libs/nonvolatile.library")
  2003.         (dest "libs:")
  2004.         (confirm)
  2005.         (help "\n\nThis will copy over the nonvolatile.library program to your "
  2006.             "libs: directory\n\nThis is part of the CD³² emulation\n" )
  2007.     )
  2008.     
  2009.     
  2010.     ;  **********************************************************************
  2011.     ;  libs:lowlevel.library
  2012.     ;  **********************************************************************
  2013.     (complete 93)
  2014.     (protect "devs:lowlevel.library" "rwed" )
  2015.     (copyfiles
  2016.         (prompt "\n\nCopying lowlevel.library to the libs: directory.\n" )
  2017.         (source "AsimCDFSInst:libs/lowlevel.library")
  2018.         (dest "libs:")
  2019.         (confirm)
  2020.         (help "\n\nThis will copy over the lowlevel.library program to your "
  2021.             "libs: directory\n\nThis is part of the CD³² emulation\n" )
  2022.     )
  2023. ))
  2024.  
  2025.  
  2026.  
  2027. ;  **********************************************************************
  2028. ;  default icons in ENV
  2029. ;  **********************************************************************
  2030.  
  2031. (makedir "ENVARC:AsimCDFS"
  2032.     (prompt "Making the ENVARC:AsimCDFS directory, in which various default files will be placed.")
  2033.     (help "This will create a directory in your ENVARC: directory")
  2034.     )
  2035.  
  2036. (makedir "ENV:AsimCDFS"
  2037.     (prompt "Making the ENV:AsimCDFS directory, in which various default files will be placed.")
  2038.     (help "This will create a directory in your ENV: directory")
  2039.     )
  2040.  
  2041. (copyfiles
  2042.     (prompt "\n\nCopying default icons to the ENVARC:AsimCDFS "
  2043.               "directory.\n" )
  2044.     (source "AsimCDFSInst:ENVArc/AsimCDFS")
  2045.     (dest "ENVArc:AsimCDFS")
  2046.     (infos)
  2047.     (all)
  2048.     (help "\n\nThis will copy over default icon files to the ENVArc:AsimCDFS directory.")
  2049.     (confirm)
  2050. )
  2051.  
  2052. (copyfiles
  2053.     (prompt "\n\nCopying default icons to the ENV:AsimCDFS "
  2054.               "directory.\n" )
  2055.     (source "AsimCDFSInst:ENVArc/AsimCDFS")
  2056.     (dest "ENV:AsimCDFS")
  2057.     (infos)
  2058.     (all)
  2059.     (help "\n\nThis will copy over default icon files to the ENV:AsimCDFS directory.")
  2060.     (confirm)
  2061. )
  2062.  
  2063.  
  2064.  
  2065.  
  2066.  
  2067.  
  2068. ;  **********************************************************************
  2069. ;  ask which languages to be added
  2070. ;  **********************************************************************
  2071. (if (exists "LOCALE:" (noreq))
  2072.     ((user 2)
  2073.     (set #language
  2074.         (askoptions
  2075.             (prompt "Which alternate language catalogs would you like installed?")
  2076.             (help "The various programs have been configured to the following "
  2077.                     "alternate languages:\n    Français, Italiano\n\nSelect which"
  2078.                     "languages you would like to use with our software.  English "
  2079.                     "language support is automatically provided as standard within the software." )
  2080.             (choices "Français" "Italiano" )
  2081.             (default 1)
  2082.         )
  2083.     )
  2084.     (user #theirlevel)
  2085.     
  2086.     
  2087.     (set n 0)
  2088.     (while
  2089.         (set #langdir
  2090.             (select n "français"
  2091.                        "italiano"
  2092.                        ""
  2093.                 )
  2094.             )
  2095.         (
  2096.         
  2097.         (if (IN #language n)
  2098.             ((set #langdest (tackon "LOCALE:catalogs/" #langdir))
  2099.             (set #langsrc (tackon "AsimCDFSInst:catalogs/" #langdir))
  2100.             
  2101.             (copyfiles
  2102.                 (prompt "\n\nCopying locale " #langdir " language catalogs.\n" )
  2103.                 (source #langsrc)
  2104.                 (dest #langdest)
  2105.                 (infos)
  2106.                 (all)
  2107.                 (help "\n\nThis will copy over the desired langauge file.")
  2108.                 (confirm))
  2109.             )
  2110.         )
  2111.     
  2112.         (set n (+ n 1))
  2113.         )
  2114.     )
  2115. ))    
  2116.  
  2117.  
  2118.     
  2119.  
  2120.  
  2121.  
  2122.  
  2123. ;  **********************************************************************
  2124. ;  Create a 'SYS/NV_Location' environment variable
  2125. ;  **********************************************************************
  2126. (run "setenv SYS/NV_Location AsimCDFS_Buffer:NonVolatile/")
  2127.  
  2128.  
  2129. ;  **********************************************************************
  2130. ;  Create a CD³² Preferences file
  2131. ;  **********************************************************************
  2132. (run "AsimCDFS:CD³²_Prefs SAVE DEFAULT")    
  2133.  
  2134.  
  2135. ;  **********************************************************************
  2136. ;  Create a CDTV Preferences file
  2137. ;  **********************************************************************
  2138. (run "AsimCDFS:CDTV_Prefs SAVE DEFAULT")    
  2139.  
  2140.  
  2141. ;  **********************************************************************
  2142. ;  Tell NewTek Flyer users where the CD-ROM drive is located
  2143. ;  **********************************************************************
  2144. (if (= #IsAmiga #typeFLYER) 
  2145.     (
  2146.     (user 2)
  2147.     (message (cat "NewTek Flyer users\n"
  2148.        "------------------\n"
  2149.         "Your CD-ROM drive will not be automatically started upon bootup.\n\n"
  2150.         "To manually start your CD-ROM drive, you must double-click on the "
  2151.         "CD6 icon located in the Storage/DOSDrivers directory on your " 
  2152.         "Workbench partition.\n\n"
  2153.         "You may wish to leave out the CD6 icon on your Workbench screen "
  2154.         "using the \"Leave Out\" menu item in Workbench."  )
  2155.     )
  2156.     
  2157.     (user #theirlevel)
  2158.     )
  2159. )
  2160.  
  2161.  
  2162.  
  2163. ;  **********************************************************************
  2164. ;  Tell About Extended icons
  2165. ;  **********************************************************************
  2166. (user 2)
  2167. (message (cat "NewIcons and Magic WorkBench users\n"
  2168.     "----------------------------------\n"
  2169.     "NewIcons and Magic WorkBench icons are now available for "
  2170.     "the utilities in AsimCDFS.  Due to space limitations, however, we "
  2171.     "are unable to include these on the install disk.\n\n" 
  2172.     "This set of extended icons may be found on our WWW site at "
  2173.     "http://www.asimware.com, on our BBS or on the Aminet archive." )
  2174. )
  2175. (user #theirlevel)
  2176.  
  2177.  
  2178. ;  **********************************************************************
  2179. ;  remove assign to AsimCDFSInst
  2180. ;  **********************************************************************
  2181. (makeassign "AsimCDFSInst")
  2182. (makeassign "AsimCDFS")
  2183. (makeassign "AsimCDFS_Buffer")
  2184.  
  2185.  
  2186. (complete 100)
  2187.