home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / CDRom / asim3.lha / asimcdfs_v3_install / Install-AsimCDFS < prev    next >
Encoding:
Text File  |  1995-06-17  |  53.5 KB  |  1,664 lines
  1. ;$VER: AsimCDFS Install 3.0 (1.6.95) 
  2. ;Copyright ©1993-1995 Asimware Innovations Inc.
  3.  
  4. (onerror (makeassign "AsimCDFSInst") )
  5.  
  6. (set #autoMount 1)
  7. (set #CDDefault_NC "CD0" )
  8. (set #isPioneer 0)
  9. (set #PioneerSeparate 0)
  10. (set #supportLUN 1)
  11.  
  12. (set #wbversion (getversion "libs:version.library"))
  13. (set #wbversion (/ #wbversion 65536) )
  14.  
  15. (set #SCSIDevice "scsi.device")
  16. (set #SCSIUnit 4)
  17.  
  18. (set @default-dest "SYS:AsimCDFS")
  19. (set #echotxt "echo \"Mounting AsimCDFS...\"\n" )
  20.  
  21. (complete 0)
  22.  
  23.  
  24. ;  **********************************************************************
  25. ;  Need WB 2.0 or higher.
  26. ;  **********************************************************************
  27. (if (< #wbversion 37)
  28.     (abort "\n\nAmigaDOS 2.0 or higher is required for AsimCDFS 2.0. "
  29.              "\n\nAn upgrade will be needed for your Amiga."
  30.              "\n\nYou are currently running version " #wbversion ".")
  31. )
  32.  
  33.  
  34. ;  **********************************************************************
  35. ;  Need lots of space on sys volume for devs and l
  36. ;  **********************************************************************
  37. (if (< (getdiskspace "SYS:") 150000)
  38.     (abort "\n\nApproximately 150K of disk space is needed on your SYS: volume."
  39.              "\n\nYou only have " (/ (getdiskspace "SYS:") 1024)    "K free.\n\n"
  40.              "Delete or transfer some files from the SYS: volume and try again." )
  41. )
  42.  
  43.  
  44. ;  **********************************************************************
  45. ;  Lock our install disk
  46. ;  **********************************************************************
  47. (askdisk
  48.     (prompt "Please insert the disk labeled \"AsimCDFS_v3_Install\".")
  49.     (help    "AsimCDFS FileSystem and other utilities will be copied "
  50.             "from this disk into your system.")
  51.     (dest  "AsimCDFS_v3_Install")
  52.     (newname "AsimCDFSInst")
  53. )
  54.  
  55.  
  56. (set #theirlevel @user-level )
  57. (user 2)
  58.  
  59. (complete 0 )
  60. ;  **********************************************************************
  61. ;  Ask if CDTV (1) , CD³² (2) or Amiga (0)
  62. ;  **********************************************************************
  63. (set #IsAmiga
  64.     (askchoice
  65.         (prompt "\n\nAre you installing AsimCDFS on a CDTV/A570, a CD³² or an Amiga?" )
  66.         (default 0 )
  67.         (choices "Amiga" "CDTV/A570" "CD³²")
  68.         (help "\n\nIf AsimCDFS is being used in conjunction with a CDTV/A570 unit "
  69.                 "then note this with the CDTV/A570 selection.\n\n"
  70.                 "If AsimCDFS is being used with a CD³² unit, then note this with the CD³² selection.\n\n"
  71.                 "Otherwise, you will be installing AsimCDFS on an Amiga equipped "
  72.                 "with a SCSI or IDE controller and SCSI or ATAPI CD-ROM drive." )
  73.     )
  74. )
  75.  
  76.  
  77. (complete 5 )
  78. ;  **********************************************************************
  79. ;  Is CDTV
  80. ;  **********************************************************************
  81. (if (= #IsAmiga 1) 
  82.     ((set #CDDefault_NC "CD1" )
  83.     (set #SCSIDevice "cdtv.device")
  84.     (set #SCSIUnit 0)
  85.     )
  86. )
  87.  
  88. ;  **********************************************************************
  89. ;  Is CD³²
  90. ;  **********************************************************************
  91. (if (= #IsAmiga 2) 
  92.     ((set #CDDefault_NC "CD1" )
  93.     (set #SCSIDevice "cd.device")
  94.     (set #SCSIUnit 0)
  95.     )
  96. )
  97.  
  98.  
  99.  
  100. ;  **********************************************************************
  101. ;  If amiga, ask if using Pioneer or other
  102. ;  **********************************************************************
  103. (if (= #IsAmiga 0)
  104.     (set #isPioneer 
  105.         (askbool
  106.             (prompt "\n\n\nIs your CD-ROM drive a Pioneer DRM-60x?" )
  107.             (default 0)
  108.             (choices "Pioneer DRM-60x" "Other CD-ROM")
  109.             (help "\n\nIf you are using AsimCDFS with a Pioneer DRM-60x, indicate this "
  110.                     "in your choice.  This drive is a high-performance 6-disc minichanger and "
  111.                     "is not common."
  112.                     "\n\nOtherwise select Other CD-ROM." )
  113.         )
  114.     )
  115. )
  116.  
  117.  
  118. (complete 10 )
  119. (if #isPioneer
  120.     (
  121.     ;  **********************************************************************
  122.     ;  ask if pioneer is separate or pooled
  123.     ;  **********************************************************************
  124.     (set #PioneerSeparate
  125.             (askbool
  126.                 (prompt "\n\nDo you wish to have 6 separate devices mounted, or would you like all 6 discs pooled into 1 device?\n\n" )
  127.                 (default 0 )
  128.                 (choices "Separate" "Pooled")
  129.                 (help "\n\nIf you wish to have access to all 6 discs simultaneously, then "
  130.                         "select Separate, otherwise select Pooled  --  in the latter case, "
  131.                         "you can switch between the discs with DiscChanger." )
  132.             )
  133.         )
  134.  
  135.     ;  **********************************************************************
  136.     ;  If pioneer separate, ask for base name
  137.     ;  **********************************************************************
  138.     (if #PioneerSeparate
  139.         ((set #CDDevice_NC 
  140.                 (askstring
  141.                     (prompt "\n\nWhat is the base-name for the AmigaDOS device?\n\n(The trailing colon MUST NOT be present.  See manual for explanation.)" )
  142.                     (default "CD" )
  143.                     (help "\n\nThis is the base name under which AmigaDOS will reference the "
  144.                             "CD-ROM as.  As you are installing AsimCDFS for a Pioneer 6-disc changer "
  145.                             ", 6 such devices named <basename>0 through <basename>5 will be mounted (ie.  CD0, CD1, ..., CD5) "
  146.                             "\n\nThe trailing : (colon) or the 0 through 5 MUST NOT be present." )
  147.                 )
  148.             )
  149.         (set #CDDevice (cat #CDDevice_NC "0:")))
  150.         )
  151.     )
  152. )
  153.  
  154.  
  155.  
  156.  
  157. ;  **********************************************************************
  158. ;  If pioneer pooled or other CD-ROM, ask for CD0 device alternate
  159. ;  **********************************************************************
  160. (if (not #PioneerSeparate)
  161.     ((set #CDDevice_NC 
  162.         (askstring
  163.             (prompt "\n\nWhat is the name for the AmigaDOS device?\n\n(The trailing colon MUST NOT be present)" )
  164.             (default #CDDefault_NC )
  165.             (help "\n\nThis is the name under which AmigaDOS will reference the "
  166.                     "CD-ROM as.  While usually "
  167.                     #CDDefault_NC
  168.                     ", it can be any name you choose. "
  169.                     "\n\nThe trailing : (colon) MUST NOT be present." )
  170.         )
  171.     )
  172.  
  173.     (set #CDDevice (cat #CDDevice_NC ":") ))
  174. )
  175.  
  176.  
  177.  
  178. ;  **********************************************************************
  179. ;  Ask to run SCSI Inquire
  180. ;  **********************************************************************
  181. (if (= #IsAmiga 0)
  182.     (set #useInquire
  183.         (askbool
  184.             (prompt "\n\nWould you like to use the SCSI Inquire utility to locate your CD-ROM drive?" )
  185.             (default 1 )
  186.             (help "\n\nThe SCSI Inquire utility will scan your system for suitable SCSI "
  187.                     "or ATAPI devices and display a listing of all units connected to the device.  "
  188.                     "Your CD-ROM drive must be powered-on and correctly connected "
  189.                     "for it to be acknowledged by this utility.  Consult the SCSI Inquire "
  190.                     "chapter for more information." )
  191.         )
  192.     )
  193. )
  194.  
  195.  
  196. ;  **********************************************************************
  197. ;  Run SCSI Inquire
  198. ;  **********************************************************************
  199. (if #useInquire
  200.     (
  201.     (run "AsimCDFS_v3_Install:SCSI_Inquire")    
  202.     
  203.     (if (exists "ENV:SCSI_Device")
  204.         ((set #SCSIDevice (getenv "SCSI_Device"))
  205.         (set #SCSIUnit (+ (getenv "SCSI_Unit")))
  206.         ))
  207.     )
  208. )
  209.  
  210.  
  211.  
  212. (complete 15 )
  213. (if (= #IsAmiga 0)
  214.     ;  **********************************************************************
  215.     ;  Ask for device name
  216.     ;  **********************************************************************
  217.     ((set #SCSIDevice 
  218.         (askstring
  219.             (prompt "\n\nWhat is the name of your SCSI or ATAPI device?" )
  220.             (default #SCSIDevice )
  221.             (help "\n\nThis is the name of the device driver for your particular "
  222.                     "SCSI card.  For example, the Commodore 2091/590/Amiga3000 has "
  223.                     "a name of \"scsi.device\" while our ATAPI driver has a name of \"asim_ide.device\".\n\n"
  224.                     "If you successfully ran the SCSI Inquire utility, this question will default to the correct unit number. "
  225.                     "Otherwise, consult either the AsimCDFS User's Guide or contact the controller card manufacturer." )
  226.         )
  227.     )
  228.     
  229.     (complete 18 )
  230.     ;  **********************************************************************
  231.     ;  Ask for unit number
  232.     ;  **********************************************************************
  233.     (set #SCSIUnit 
  234.         (asknumber
  235.             (prompt "\n\nWhat is the unit number of your CD-ROM drive?" )
  236.             (default #SCSIUnit )
  237.             (help "\n\nThis is the unit # of the CD-ROM drive.  This is usually a "
  238.                     "numerical value between 0 and 6 for SCSI units and between 0 and 1 for ATAPI units.\n\n"
  239.                     "If you successfully ran the SCSI Inquire utility, this question will default to the correct unit number.  "
  240.                     "Otherwise, consult the CD-ROM drive documentation for instructions on "
  241.                     "determining the unit #." )
  242.         )
  243.     ))
  244. )
  245.  
  246.  
  247. ;  **********************************************************************
  248. ;  Ask for automount?
  249. ;  **********************************************************************
  250. (complete 35 )
  251. (set #autoMount
  252.     (askbool
  253.         (prompt "\n\nWould you like the CD-ROM drive automatically mounted upon bootup?" )
  254.         (help "\n\nIf you would like, the appropriate commands will be added to your user-startup file to automatically mount AsimCDFS.\n")
  255.         (default 1)
  256.     )
  257. )
  258.  
  259. (set #mountDirectory "sys:storage/DOSDrivers/")
  260.  
  261.  
  262.  
  263.  
  264.  
  265. ;  **********************************************************************
  266. ;  Ask for AsimCDFS:
  267. ;  **********************************************************************
  268. (set #tunesDir
  269.     (askdir
  270.         (prompt "Specify the directory in which the AsimCDFS support programs will be placed:" )
  271.         (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.")
  272.         (default @default-dest)
  273.         (newpath)
  274.     )
  275. )
  276.  
  277. (if (not (exists #tunesDir (noreq)))
  278.     (makedir #tunesDir
  279.         (prompt "Creating the AsimCDFS: directory...")
  280.         (help "This will create the specified directory for the support programs.")
  281.         (infos)
  282.         )
  283. )
  284. (makeassign "AsimCDFS" #tunesDir)
  285.  
  286.  
  287.  
  288.  
  289. ;  **********************************************************************
  290. ;  Ask for AsimCDFS_Buffer:
  291. ;  **********************************************************************
  292. (set #bufferDir "Work:AsimCDFS_Buffer")
  293. (run "AsimCDFS_v3_Install:c/MostFree")    
  294.     
  295. (if (exists "ENV:MostFree")
  296.     (set #bufferDir (cat (getenv "MostFree") "AsimCDFS_Buffer"))
  297. )
  298.  
  299. (set #bufferDir
  300.     (askdir
  301.         (prompt "Specify the directory which can be used for buffering AsimCDFS files:" )
  302.         (help "AsimCDFS will require a directory in which it will buffer "
  303.                 "various files, including PhotoCD thumbnail icons, snapshot icon files "
  304.                 "and audio library files.  As the number of files in this directory "
  305.                 "may grow as your CD-ROM collection expands, it is "
  306.                 "advisable to put this directory on a large hard drive partition." )
  307.         (default #bufferDir )
  308.         (newpath)
  309.     )
  310. )
  311.  
  312. (if (not (exists #bufferDir (noreq)))
  313.     (makedir #bufferDir
  314.         (prompt "Creating the AsimCDFS_Buffer: directory...")
  315.         (help "This will create the specified directory for the buffered files.")
  316.         (infos)
  317.         )
  318. )
  319. (makeassign "AsimCDFS_Buffer" #bufferDir)
  320. (user #theirlevel)
  321.  
  322.  
  323. (set n 0)
  324. (while
  325.     (set #buffsubdir 
  326.         (select n "AsimCDFS_Buffer:PhotoCDIcon_Buffer"
  327.                      "AsimCDFS_Buffer:Audio"
  328.                      "AsimCDFS_Buffer:Raw"
  329.                      "AsimCDFS_Buffer:Marks"
  330.                      "AsimCDFS_Buffer:NonVolatile"
  331.                    ""
  332.             )
  333.         )
  334.     (
  335.     (if (not (exists #buffsubdir (noreq)))
  336.         (makedir #buffsubdir
  337.             (prompt "Creating the " #buffsubdir " directory...")
  338.             (help "This will create the specified directory for the buffered files.")
  339.             (infos)
  340.             )
  341.     )
  342.  
  343.     (set n (+ n 1))
  344.     )
  345. )
  346.  
  347.  
  348.  
  349. ;  **********************************************************************
  350. ;  delete obsolete files
  351. ;  **********************************************************************
  352. ;  Delete old AsimPhoto, if present in AsimCDFS dir.
  353. ;  all other files are either the user's or will be over written
  354. (if (exists "AsimCDFS:AsimPhoto")
  355.     ((delete "AsimCDFS:AsimPhoto"
  356.         (prompt "\n\Deleting obsolete AsimPhoto.\n" )
  357.         (confirm)
  358.         (help "\n\nThis will delete the old AsimPhoto program, which is "
  359.             "no longer required for AsimCDFS v3.x\n" )
  360.         )
  361.     )
  362. )        
  363.  
  364.  
  365. (if (exists "AsimCDFS:AsimPhoto.info")
  366.     ((delete "AsimCDFS:AsimPhoto.info"
  367.         (prompt "\n\Deleting obsolete AsimPhoto.info.\n" )
  368.         (confirm)
  369.         (help "\n\nThis will delete the old AsimPhoto icon, which is "
  370.             "no longer required for AsimCDFS v3.x\n" )
  371.         )
  372.     )
  373. )        
  374.  
  375. (if (exists "ENVARC:AsimCDFS/Photo.info")
  376.     ((delete "ENVARC:AsimCDFS/Photo.info"
  377.         (prompt "\n\Deleting obsolete default Photo icon.\n" )
  378.         (confirm)
  379.         (help "\n\nThis will delete the old default Photo icon, which is "
  380.             "no longer required for AsimCDFS v3.x\n" )
  381.         )
  382.     )
  383. )        
  384.  
  385.  
  386.  
  387.  
  388. (if (exists "ENVARC:AsimCDFS/DiscChanger.prefs")
  389.     ((delete "ENVARC:AsimCDFS/DiscChanger.prefs"
  390.         (prompt "\n\Deleting obsolete DiscChanger preferences file.\n" )
  391.         (confirm)
  392.         (help "\n\nThis will delete the old DiscChanger preferences file, which is "
  393.             "no longer required for AsimCDFS v3.x\n" )
  394.         )
  395.     )
  396. )        
  397.  
  398. (if (exists "ENVARC:AsimCDFS/AsimTunes.prefs")
  399.     ((delete "ENVARC:AsimCDFS/AsimTunes.prefs"
  400.         (prompt "\n\Deleting obsolete AsimTunes preferences file.\n" )
  401.         (confirm)
  402.         (help "\n\nThis will delete the old AsimTunes preferences file, which is "
  403.             "no longer required for AsimCDFS v3.x\n" )
  404.         )
  405.     )
  406. )        
  407.  
  408.  
  409. (if (exists "ENVARC:AsimCDFS/AsimPhoto.prefs")
  410.     ((delete "ENVARC:AsimCDFS/AsimPhoto.prefs"
  411.         (prompt "\n\Deleting obsolete AsimPhoto preferences file.\n" )
  412.         (confirm)
  413.         (help "\n\nThis will delete the old AsimPhoto preferences file, which is "
  414.             "no longer required for AsimCDFS v3.x\n" )
  415.         )
  416.     )
  417. )        
  418.  
  419.  
  420.  
  421. ;  **********************************************************************
  422. ;  l:AsimCDFS
  423. ;  **********************************************************************
  424. (complete 30 )
  425. (protect "l:AsimCDFS" "rwed" )
  426. (copyfiles
  427.     (prompt "\n\nCopying AsimCDFS FileSystem to the l: directory.\n" )
  428.     (source "AsimCDFSInst:l/AsimCDFS")
  429.     (dest "l:")
  430.     (confirm)
  431.     (help "\n\nThis will copy over the AsimCDFS FileSystem program to your "
  432.         "l: directory\n\nThis is an essential step in the installation "
  433.         "process.\n" )
  434. )
  435.  
  436.  
  437.  
  438. ;  **********************************************************************
  439. ;  devs:asimcdfs.device
  440. ;  **********************************************************************
  441. (complete 30 )
  442. (protect "devs:asimcdfs.device" "rwed" )
  443. (copyfiles
  444.     (prompt "\n\nCopying asimcdfs.device to the devs: directory.\n" )
  445.     (source "AsimCDFSInst:devs/asimcdfs.device")
  446.     (dest "devs:")
  447.     (confirm)
  448.     (help "\n\nThis will copy over the asimcdfs.device program to your "
  449.         "devs: directory\n\nThis is an essential step in the installation "
  450.         "process.\n" )
  451. )
  452.  
  453.  
  454.  
  455.  
  456.  
  457. ;  **********************************************************************
  458. ;  Create mountlists and alter user-startup
  459. ;  **********************************************************************
  460. (if (= #wbversion 37) 
  461.     ((if #PioneerSeparate
  462.         ((set #startupCommand1 (cat "mount >NIL: " #CDDevice_NC "0: from devs:MountList." #CDDevice_NC "\n") )
  463.         (set #startupCommand2 (cat "mount >NIL: " #CDDevice_NC "1: from devs:MountList." #CDDevice_NC "\n") )
  464.         (set #startupCommand3 (cat "mount >NIL: " #CDDevice_NC "2: from devs:MountList." #CDDevice_NC "\n") )
  465.         (set #startupCommand4 (cat "mount >NIL: " #CDDevice_NC "3: from devs:MountList." #CDDevice_NC "\n") )
  466.         (set #startupCommand5 (cat "mount >NIL: " #CDDevice_NC "4: from devs:MountList." #CDDevice_NC "\n") )
  467.         (set #startupCommand6 (cat "mount >NIL: " #CDDevice_NC "5: from devs:MountList." #CDDevice_NC "\n") )
  468.         (set #startupWait "wait sec=4\n" )
  469.         
  470.         (if #autoMount
  471.             ((protect "S:User-Startup" "rwed" )
  472.             (protect "S:Startup-Sequence" "rwed" )
  473.             
  474.             (startup "AsimCDFS"
  475.                 (command #echotxt)
  476.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  477.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  478.                 (command #startupCommand1 )
  479.                 (command #startupCommand2 )
  480.                 (command #startupCommand3 )
  481.                 (command #startupCommand4 )
  482.                 (command #startupCommand5 )
  483.                 (command #startupCommand6 )
  484.                 (prompt "Inserting MOUNT commands into the startup-sequence")
  485.                 (help "\n\nThe command \"MOUNT " #CDDevice " FROM DEVS:MOUNTLIST." #CDDevice_NC "\" is being inserted into your "
  486.                         "\"S:Startup-Sequence\" or \"S:User-Startup\" file to "
  487.                         "automatically start AsimCDFS upon bootup." )
  488.             ))
  489.         ))
  490.     )
  491.  
  492.     (if (not #PioneerSeparate)
  493.         ((set #startupCommand (cat "mount >NIL: " #CDDevice " from devs:MountList." #CDDevice_NC "\n") )
  494.         (if #autoMount
  495.             ((protect "S:User-Startup" "rwed" )
  496.             (protect "S:Startup-Sequence" "rwed" )
  497.             
  498.             (startup "AsimCDFS"
  499.                 (command #echotxt)
  500.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  501.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  502.                 (command #startupCommand )
  503.                 (prompt "Inserting MOUNT command into the startup-sequence")
  504.                 (help "\n\nThe command \"MOUNT " #CDDevice " FROM DEVS:MOUNTLIST." #CDDevice_NC "\" is being inserted into your "
  505.                         "\"S:Startup-Sequence\" or \"S:User-Startup\" file to "
  506.                         "automatically start AsimCDFS upon bootup." )
  507.             ))
  508.         ))
  509.     )
  510.     
  511.     (if (not #autoMount)
  512.         ((protect "S:User-Startup" "rwed" )
  513.         (protect "S:Startup-Sequence" "rwed" )
  514.         
  515.         (startup "AsimCDFS"
  516.             (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  517.             (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  518.             (prompt "Inserting MOUNT command into the startup-sequence")
  519.             (help "\n\nThe command \"MOUNT " #CDDevice " FROM DEVS:MOUNTLIST." #CDDevice_NC "\" is being inserted into your "
  520.                     "\"S:Startup-Sequence\" or \"S:User-Startup\" file to "
  521.                     "automatically start AsimCDFS upon bootup." )
  522.         ))
  523.     )
  524.  
  525.     (protect (cat "devs:MountList." #CDDevice_NC) "rwed" )
  526.  
  527.     (if #isPioneer
  528.         (textfile
  529.             (dest (cat "devs:MountList." #CDDevice_NC) )
  530.             (append "/************************************************************************/\n"
  531.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  532.                       "/************************************************************************/\n")
  533.             (append #CDDevice_NC "0:\n")
  534.             (append "    Device         = " #SCSIDevice "\n" )
  535.             (append "    Unit           = 0" #SCSIUnit "\n" )
  536.             (append "    Buffers        = 0\n")
  537.             (append "    BufMemType     = 5\n" )
  538.             (append "    Mask           = 0xffffffe\n" )
  539.             (append "    Flags          = 0\n" )
  540.             (append "    FileSystem     = l:AsimCDFS\n")
  541.             (append "    DosType        = 0x662dabac\n")
  542.             (append "    GlobVec        = -1\n")
  543.             (append "    Mount          = 1\n")
  544.             (append "    Reserved       = 0\n")
  545.             (append "    LowCyl         = 0\n")
  546.             (append "    HighCyl        = 999\n")
  547.             (append "    Surfaces       = 1\n")
  548.             (append "    BlocksPerTrack = 32\n")
  549.             (append "    Priority       = 10\n")
  550.             (append "    StackSize      = 5000\n")
  551.             (append "#\n\n")
  552.             (append #CDDevice_NC "1:\n")
  553.             (append "    Device         = " #SCSIDevice "\n" )
  554.             (append "    Unit           = 1" #SCSIUnit "\n" )
  555.             (append "    Buffers        = 0\n")
  556.             (append "    BufMemType     = 5\n" )
  557.             (append "    Mask           = 0xffffffe\n" )
  558.             (append "    Flags          = 0\n" )
  559.             (append "    FileSystem     = l:AsimCDFS\n")
  560.             (append "    DosType        = 0x662dabac\n")
  561.             (append "    GlobVec        = -1\n")
  562.             (append "    Mount          = 1\n")
  563.             (append "    Reserved       = 0\n")
  564.             (append "    LowCyl         = 0\n")
  565.             (append "    HighCyl        = 999\n")
  566.             (append "    Surfaces       = 1\n")
  567.             (append "    BlocksPerTrack = 32\n")
  568.             (append "    Priority       = 10\n")
  569.             (append "    StackSize      = 5000\n")
  570.             (append "#\n\n")
  571.             (append #CDDevice_NC "2:\n")
  572.             (append "    Device         = " #SCSIDevice "\n" )
  573.             (append "    Unit           = 2" #SCSIUnit "\n" )
  574.             (append "    Buffers        = 0\n")
  575.             (append "    BufMemType     = 5\n" )
  576.             (append "    Mask           = 0xffffffe\n" )
  577.             (append "    Flags          = 0\n" )
  578.             (append "    FileSystem     = l:AsimCDFS\n")
  579.             (append "    DosType        = 0x662dabac\n")
  580.             (append "    GlobVec        = -1\n")
  581.             (append "    Mount          = 1\n")
  582.             (append "    Reserved       = 0\n")
  583.             (append "    LowCyl         = 0\n")
  584.             (append "    HighCyl        = 999\n")
  585.             (append "    Surfaces       = 1\n")
  586.             (append "    BlocksPerTrack = 32\n")
  587.             (append "    Priority       = 10\n")
  588.             (append "    StackSize      = 5000\n")
  589.             (append "#\n\n")
  590.             (append #CDDevice_NC "3:\n")
  591.             (append "    Device         = " #SCSIDevice "\n" )
  592.             (append "    Unit           = 3" #SCSIUnit "\n" )
  593.             (append "    Buffers        = 0\n")
  594.             (append "    BufMemType     = 5\n" )
  595.             (append "    Mask           = 0xffffffe\n" )
  596.             (append "    Flags          = 0\n" )
  597.             (append "    FileSystem     = l:AsimCDFS\n")
  598.             (append "    DosType        = 0x662dabac\n")
  599.             (append "    GlobVec        = -1\n")
  600.             (append "    Mount          = 1\n")
  601.             (append "    Reserved       = 0\n")
  602.             (append "    LowCyl         = 0\n")
  603.             (append "    HighCyl        = 999\n")
  604.             (append "    Surfaces       = 1\n")
  605.             (append "    BlocksPerTrack = 32\n")
  606.             (append "    Priority       = 10\n")
  607.             (append "    StackSize      = 5000\n")
  608.             (append "#\n\n")
  609.             (append #CDDevice_NC "4:\n")
  610.             (append "    Device         = " #SCSIDevice "\n" )
  611.             (append "    Unit           = 4" #SCSIUnit "\n" )
  612.             (append "    Buffers        = 0\n")
  613.             (append "    BufMemType     = 5\n" )
  614.             (append "    Mask           = 0xffffffe\n" )
  615.             (append "    Flags          = 0\n" )
  616.             (append "    FileSystem     = l:AsimCDFS\n")
  617.             (append "    DosType        = 0x662dabac\n")
  618.             (append "    GlobVec        = -1\n")
  619.             (append "    Mount          = 1\n")
  620.             (append "    Reserved       = 0\n")
  621.             (append "    LowCyl         = 0\n")
  622.             (append "    HighCyl        = 999\n")
  623.             (append "    Surfaces       = 1\n")
  624.             (append "    BlocksPerTrack = 32\n")
  625.             (append "    Priority       = 10\n")
  626.             (append "    StackSize      = 5000\n")
  627.             (append "#\n\n")
  628.             (append #CDDevice_NC "5:\n")
  629.             (append "    Device         = " #SCSIDevice "\n" )
  630.             (append "    Unit           = 5" #SCSIUnit "\n" )
  631.             (append "    Buffers        = 0\n")
  632.             (append "    BufMemType     = 5\n" )
  633.             (append "    Mask           = 0xffffffe\n" )
  634.             (append "    Flags          = 0\n" )
  635.             (append "    FileSystem     = l:AsimCDFS\n")
  636.             (append "    DosType        = 0x662dabac\n")
  637.             (append "    GlobVec        = -1\n")
  638.             (append "    Mount          = 1\n")
  639.             (append "    Reserved       = 0\n")
  640.             (append "    LowCyl         = 0\n")
  641.             (append "    HighCyl        = 999\n")
  642.             (append "    Surfaces       = 1\n")
  643.             (append "    BlocksPerTrack = 32\n")
  644.             (append "    Priority       = 10\n")
  645.             (append "    StackSize      = 5000\n")
  646.             (append "#\n\n")
  647.         )
  648.     )
  649.  
  650.  
  651.  
  652.     (if (not #isPioneer)
  653.         (textfile
  654.             (dest (cat "devs:MountList." #CDDevice_NC) )
  655.             (append "/************************************************************************/\n"
  656.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  657.                       "/************************************************************************/\n")
  658.             (append #CDDevice "\n")
  659.             (append "    Device         = " #SCSIDevice "\n" )
  660.             (append "    Unit           = " #SCSIUnit "\n" )
  661.             (append "    Buffers        = 0\n")
  662.             (append "    BufMemType     = 5\n" )
  663.             (append "    Mask           = 0xffffffe\n" )
  664.             (append "    Flags          = 0\n" )
  665.             (append "    FileSystem     = l:AsimCDFS\n")
  666.             (append "    DosType        = 0x662dabac\n")
  667.             (append "    GlobVec        = -1\n")
  668.             (append "    Mount          = " #autoMount "\n")
  669.             (append "    Reserved       = 0\n")
  670.             (append "    LowCyl         = 0\n")
  671.             (append "    HighCyl        = 999\n")
  672.             (append "    Surfaces       = 1\n")
  673.             (append "    BlocksPerTrack = 32\n")
  674.             (append "    Priority       = 10\n")
  675.             (append "    StackSize      = 5000\n")
  676.             (append "#\n")
  677.         )
  678.     ))
  679. )
  680.  
  681.  
  682.  
  683. (if (> #wbversion 37) 
  684.     ((if (not #PioneerSeparate)
  685.         ((textfile
  686.             (dest (cat #mountDirectory #CDDevice_NC) )
  687.             (append "/************************************************************************/\n"
  688.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  689.                       "/************************************************************************/\n")
  690.             (append "    Device         = " #SCSIDevice "\n" )
  691.             (append "    Unit           = " #SCSIUnit "\n" )
  692.             (append "    Buffers        = 0\n")
  693.             (append "    BufMemType     = 5\n" )
  694.             (append "    Mask           = 0xffffffe\n" )
  695.             (append "    Flags          = 0\n" )
  696.             (append "    FileSystem     = l:AsimCDFS\n")
  697.             (append "    DosType        = 0x662dabac\n")
  698.             (append "    GlobVec        = -1\n")
  699.             (append "    Reserved       = 0\n")
  700.             (append "    LowCyl         = 0\n")
  701.             (append "    HighCyl        = 999\n")
  702.             (append "    Mount          = 1\n")
  703.             (append "    Surfaces       = 1\n")
  704.             (append "    BlocksPerTrack = 32\n")
  705.             (append "    Priority       = 10\n")
  706.             (append "    StackSize      = 5000\n")
  707.         )
  708.  
  709.         (copyfiles
  710.                 (prompt "\n\nCopying Mountlist icon")
  711.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  712.                 (dest #mountDirectory)
  713.                 (newname (cat #CDDevice_NC ".info"))
  714.                 (help "\n\nThis will copy over an icon for the mountlist file.")
  715.                 (confirm)
  716.             )        
  717.  
  718.     ))
  719.  
  720.  
  721.     (if #PioneerSeparate
  722.         ((textfile
  723.             (dest (cat #mountDirectory #CDDevice_NC "0") )
  724.             (append "/************************************************************************/\n"
  725.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  726.                       "/************************************************************************/\n")
  727.             (append "    Device         = " #SCSIDevice "\n" )
  728.             (append "    Unit           = 0" #SCSIUnit "\n" )
  729.             (append "    Buffers        = 0\n")
  730.             (append "    BufMemType     = 5\n" )
  731.             (append "    Mask           = 0xffffffe\n" )
  732.             (append "    Flags          = 0\n" )
  733.             (append "    FileSystem     = l:AsimCDFS\n")
  734.             (append "    DosType        = 0x662dabac\n")
  735.             (append "    GlobVec        = -1\n")
  736.             (append "    Reserved       = 0\n")
  737.             (append "    LowCyl         = 0\n")
  738.             (append "    HighCyl        = 999\n")
  739.             (append "    Mount          = 1\n")
  740.             (append "    Surfaces       = 1\n")
  741.             (append "    BlocksPerTrack = 32\n")
  742.             (append "    Priority       = 10\n")
  743.             (append "    StackSize      = 5000\n")
  744.         )
  745.  
  746.         (copyfiles
  747.                 (prompt "\n\nCopying Mountlist icon")
  748.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  749.                 (dest #mountDirectory)
  750.                 (newname (cat #CDDevice_NC "0.info"))
  751.                 (help "\n\nThis will copy over an icon for the mountlist file.")
  752.                 (confirm)
  753.             )
  754.         
  755.         (textfile
  756.             (dest (cat #mountDirectory #CDDevice_NC "1") )
  757.             (append "/************************************************************************/\n"
  758.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  759.                       "/************************************************************************/\n")
  760.             (append "    Device         = " #SCSIDevice "\n" )
  761.             (append "    Unit           = 1" #SCSIUnit "\n" )
  762.             (append "    Buffers        = 0\n")
  763.             (append "    BufMemType     = 5\n" )
  764.             (append "    Mask           = 0xffffffe\n" )
  765.             (append "    Flags          = 0\n" )
  766.             (append "    FileSystem     = l:AsimCDFS\n")
  767.             (append "    DosType        = 0x662dabac\n")
  768.             (append "    GlobVec        = -1\n")
  769.             (append "    Reserved       = 0\n")
  770.             (append "    LowCyl         = 0\n")
  771.             (append "    HighCyl        = 999\n")
  772.             (append "    Mount          = 1\n")
  773.             (append "    Surfaces       = 1\n")
  774.             (append "    BlocksPerTrack = 32\n")
  775.             (append "    Priority       = 10\n")
  776.             (append "    StackSize      = 5000\n")
  777.         )
  778.  
  779.         (copyfiles
  780.                 (prompt "\n\nCopying Mountlist icon")
  781.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  782.                 (dest #mountDirectory)
  783.                 (newname (cat #CDDevice_NC "1.info"))
  784.                 (help "\n\nThis will copy over an icon for the mountlist file.")
  785.                 (confirm)
  786.             )
  787.  
  788.         (textfile
  789.             (dest (cat #mountDirectory #CDDevice_NC "2") )
  790.             (append "/************************************************************************/\n"
  791.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  792.                       "/************************************************************************/\n")
  793.             (append "    Device         = " #SCSIDevice "\n" )
  794.             (append "    Unit           = 2" #SCSIUnit "\n" )
  795.             (append "    Buffers        = 0\n")
  796.             (append "    BufMemType     = 5\n" )
  797.             (append "    Mask           = 0xffffffe\n" )
  798.             (append "    Flags          = 0\n" )
  799.             (append "    FileSystem     = l:AsimCDFS\n")
  800.             (append "    DosType        = 0x662dabac\n")
  801.             (append "    GlobVec        = -1\n")
  802.             (append "    Reserved       = 0\n")
  803.             (append "    LowCyl         = 0\n")
  804.             (append "    HighCyl        = 999\n")
  805.             (append "    Mount          = 1\n")
  806.             (append "    Surfaces       = 1\n")
  807.             (append "    BlocksPerTrack = 32\n")
  808.             (append "    Priority       = 10\n")
  809.             (append "    StackSize      = 5000\n")
  810.         )
  811.         
  812.  
  813.         (copyfiles
  814.                 (prompt "\n\nCopying Mountlist icon")
  815.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  816.                 (dest #mountDirectory)
  817.                 (newname (cat #CDDevice_NC "2.info"))
  818.                 (help "\n\nThis will copy over an icon for the mountlist file.")
  819.                 (confirm)
  820.             )
  821.  
  822.         (textfile
  823.             (dest (cat #mountDirectory #CDDevice_NC "3") )
  824.             (append "/************************************************************************/\n"
  825.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  826.                       "/************************************************************************/\n")
  827.             (append "    Device         = " #SCSIDevice "\n" )
  828.             (append "    Unit           = 3" #SCSIUnit "\n" )
  829.             (append "    Buffers        = 0\n")
  830.             (append "    BufMemType     = 5\n" )
  831.             (append "    Mask           = 0xffffffe\n" )
  832.             (append "    Flags          = 0\n" )
  833.             (append "    FileSystem     = l:AsimCDFS\n")
  834.             (append "    DosType        = 0x662dabac\n")
  835.             (append "    GlobVec        = -1\n")
  836.             (append "    Reserved       = 0\n")
  837.             (append "    LowCyl         = 0\n")
  838.             (append "    HighCyl        = 999\n")
  839.             (append "    Mount          = 1\n")
  840.             (append "    Surfaces       = 1\n")
  841.             (append "    BlocksPerTrack = 32\n")
  842.             (append "    Priority       = 10\n")
  843.             (append "    StackSize      = 5000\n")
  844.         )
  845.         
  846.         (copyfiles
  847.                 (prompt "\n\nCopying Mountlist icon")
  848.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  849.                 (dest #mountDirectory)
  850.                 (newname (cat #CDDevice_NC "3.info"))
  851.                 (help "\n\nThis will copy over an icon for the mountlist file.")
  852.                 (confirm)
  853.             )
  854.  
  855.         (textfile
  856.             (dest (cat #mountDirectory #CDDevice_NC "4") )
  857.             (append "/************************************************************************/\n"
  858.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  859.                       "/************************************************************************/\n")
  860.             (append "    Device         = " #SCSIDevice "\n" )
  861.             (append "    Unit           = 4" #SCSIUnit "\n" )
  862.             (append "    Buffers        = 0\n")
  863.             (append "    BufMemType     = 5\n" )
  864.             (append "    Mask           = 0xffffffe\n" )
  865.             (append "    Flags          = 0\n" )
  866.             (append "    FileSystem     = l:AsimCDFS\n")
  867.             (append "    DosType        = 0x662dabac\n")
  868.             (append "    GlobVec        = -1\n")
  869.             (append "    Reserved       = 0\n")
  870.             (append "    LowCyl         = 0\n")
  871.             (append "    HighCyl        = 999\n")
  872.             (append "    Mount          = 1\n")
  873.             (append "    Surfaces       = 1\n")
  874.             (append "    BlocksPerTrack = 32\n")
  875.             (append "    Priority       = 10\n")
  876.             (append "    StackSize      = 5000\n")
  877.         )
  878.  
  879.         (copyfiles
  880.                 (prompt "\n\nCopying Mountlist icon")
  881.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  882.                 (dest #mountDirectory)
  883.                 (newname (cat #CDDevice_NC "4.info"))
  884.                 (help "\n\nThis will copy over an icon for the mountlist file.")
  885.                 (confirm)
  886.             )
  887.  
  888.         (textfile
  889.             (dest (cat #mountDirectory #CDDevice_NC "5") )
  890.             (append "/************************************************************************/\n"
  891.                       "/*  AsimCDFS v3 MountList entry -- ©1993-1995 Asimware Innovations Inc. */\n"
  892.                       "/************************************************************************/\n")
  893.             (append "    Device         = " #SCSIDevice "\n" )
  894.             (append "    Unit           = 5" #SCSIUnit "\n" )
  895.             (append "    Buffers        = 0\n")
  896.             (append "    BufMemType     = 5\n" )
  897.             (append "    Mask           = 0xffffffe\n" )
  898.             (append "    Flags          = 0\n" )
  899.             (append "    FileSystem     = l:AsimCDFS\n")
  900.             (append "    DosType        = 0x662dabac\n")
  901.             (append "    GlobVec        = -1\n")
  902.             (append "    Reserved       = 0\n")
  903.             (append "    LowCyl         = 0\n")
  904.             (append "    HighCyl        = 999\n")
  905.             (append "    Mount          = 1\n")
  906.             (append "    Surfaces       = 1\n")
  907.             (append "    BlocksPerTrack = 32\n")
  908.             (append "    Priority       = 10\n")
  909.             (append "    StackSize      = 5000\n")
  910.         )
  911.         (copyfiles
  912.                 (prompt "\n\nCopying Mountlist icon")
  913.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  914.                 (dest #mountDirectory)
  915.                 (newname (cat #CDDevice_NC "5.info"))
  916.                 (help "\n\nThis will copy over an icon for the mountlist file.")
  917.                 (confirm)
  918.             )
  919.     ))
  920.  
  921.  
  922.     (protect "S:User-Startup" "rwed" )
  923.     (protect "S:Startup-Sequence" "rwed" )
  924.  
  925.     (if (not #autoMount)
  926.         (startup "AsimCDFS"
  927.             (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  928.             (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  929.             (prompt "Inserting Assign command into the startup-sequence")
  930.             (help "\n\nThe command assign AsimCDFS: and assign AsimCDFS_Buffer are being entered into your s:user-startup file.")
  931.             )
  932.         )
  933.  
  934.     (if #autoMount
  935.         ((if #PioneerSeparate
  936.             (startup "AsimCDFS"
  937.                 (command #echotxt)
  938.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  939.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  940.                 (command (cat "mount >NIL: " #CDDevice_NC "0:\n") )
  941.                 (command (cat "mount >NIL: " #CDDevice_NC "1:\n") )
  942.                 (command (cat "mount >NIL: " #CDDevice_NC "2:\n") )
  943.                 (command (cat "mount >NIL: " #CDDevice_NC "3:\n") )
  944.                 (command (cat "mount >NIL: " #CDDevice_NC "4:\n") )
  945.                 (command (cat "mount >NIL: " #CDDevice_NC "5:\n") )
  946.                 (prompt "Inserting Assign command into the startup-sequence")
  947.                 (help "\n\nThe command assign AsimCDFS: and assign AsimCDFS_Buffer are being entered into your s:user-startup file.")
  948.                 )
  949.             )
  950.             
  951.         (if (not #PioneerSeparate)
  952.             (startup "AsimCDFS"
  953.                 (command #echotxt)
  954.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  955.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  956.                 (command (cat "mount >NIL: " #CDDevice "\n") )
  957.                 (prompt "Inserting Assign command into the startup-sequence")
  958.                 (help "\n\nThe command assign AsimCDFS: and assign AsimCDFS_Buffer are being entered into your s:user-startup file.")
  959.                 )
  960.             )            
  961.         )
  962.     )
  963. ))
  964.  
  965.  
  966. ;  **********************************************************************
  967. ;  Delete old mountlists is DEVS:DosDrivers/
  968. ;  **********************************************************************
  969. (if (> #wbversion 37) 
  970.     ((if (not #PioneerSeparate)
  971.         ((if (exists (cat "DEVS:DosDrivers/" #CDDevice_NC))
  972.             ((delete (cat "DEVS:DosDrivers/" #CDDevice_NC)
  973.             (prompt "\n\Deleting obsolete MountList file from DEVS:DosDrivers/\n" )
  974.             (confirm)
  975.             (help "\n\nThis will delete the obsolete MountList file from the DEVS:DosDrivers/ directory.  "
  976.                     "MountList files for AsimCDFS v3.x are now put into the SYS:Storage/DOSDrivers directory.\n" )
  977.                 )
  978.  
  979.             (delete (cat "DEVS:DosDrivers/" #CDDevice_NC ".info")
  980.             (prompt "\n\Deleting obsolete MountList file from DEVS:DosDrivers/\n" )
  981.             (confirm)
  982.             (help "\n\nThis will delete the obsolete MountList file from the DEVS:DosDrivers/ directory.  "
  983.                     "MountList files for AsimCDFS v3.x are now put into the SYS:Storage/DOSDrivers directory.\n" )
  984.                 )
  985.             )
  986.         ))
  987.     ))
  988.  
  989.     (if #PioneerSeparate
  990.         ((set n 0)
  991.         (while
  992.             (set #oldml
  993.                 (select n (cat "DEVS:DosDrivers/" #CDDevice_NC "0")
  994.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "1")
  995.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "2")
  996.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "3")
  997.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "4")
  998.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "5")
  999.                            ""
  1000.                     )
  1001.                 )
  1002.                 
  1003.             (if (exists #oldml)
  1004.                 ((delete #oldml
  1005.                 (prompt "\n\Deleting obsolete MountList file from DEVS:DosDrivers/\n" )
  1006.                 (confirm)
  1007.                 (help "\n\nThis will delete the obsolete MountList file from the DEVS:DosDrivers/ directory.  "
  1008.                         "MountList files for AsimCDFS v3.x are now put into the SYS:Storage/DOSDrivers directory.\n" )
  1009.                     )
  1010.  
  1011.  
  1012.                 (delete (cat #oldml ".info")
  1013.                 (prompt "\n\Deleting obsolete MountList file from DEVS:DosDrivers/\n" )
  1014.                 (confirm)
  1015.                 (help "\n\nThis will delete the obsolete MountList file from the DEVS:DosDrivers/ directory.  "
  1016.                         "MountList files for AsimCDFS v3.x are now put into the SYS:Storage/DOSDrivers directory.\n" )
  1017.                     )
  1018.                 )
  1019.             )        
  1020.             )
  1021.         )
  1022. ))
  1023.  
  1024. ;  **********************************************************************
  1025. ;  Default prefs files
  1026. ;  **********************************************************************
  1027. (if (= #IsAmiga 0)
  1028.     ((if #isPioneer
  1029.         ;  **********************************************************************
  1030.         ;  Default prefs file for a Pioneer drive, separate
  1031.         ;  **********************************************************************
  1032.         ((if #PioneerSeparate
  1033.             ((copyfiles
  1034.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1035.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1036.                 (dest "ENVArc:AsimCDFS")
  1037.                 (newname (cat #CDDevice_NC "0"))
  1038.                 (help "\n\nThis will copy over a default preferences file.")
  1039.                 (confirm)
  1040.             )
  1041.     
  1042.             (copyfiles
  1043.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1044.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1045.                 (dest "ENVArc:AsimCDFS")
  1046.                 (newname (cat #CDDevice_NC "1"))
  1047.                 (help "\n\nThis will copy over a default preferences file.")
  1048.                 (confirm)
  1049.             )
  1050.     
  1051.             (copyfiles
  1052.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1053.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1054.                 (dest "ENVArc:AsimCDFS")
  1055.                 (newname (cat #CDDevice_NC "2"))
  1056.                 (help "\n\nThis will copy over a default preferences file.")
  1057.                 (confirm)
  1058.             )
  1059.     
  1060.             (copyfiles
  1061.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1062.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1063.                 (dest "ENVArc:AsimCDFS")
  1064.                 (newname (cat #CDDevice_NC "3"))
  1065.                 (help "\n\nThis will copy over a default preferences file.")
  1066.                 (confirm)
  1067.             )
  1068.     
  1069.             (copyfiles
  1070.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1071.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1072.                 (dest "ENVArc:AsimCDFS")
  1073.                 (newname (cat #CDDevice_NC "4"))
  1074.                 (help "\n\nThis will copy over a default preferences file.")
  1075.                 (confirm)
  1076.             )
  1077.     
  1078.             (copyfiles
  1079.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1080.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1081.                 (dest "ENVArc:AsimCDFS")
  1082.                 (newname (cat #CDDevice_NC "5"))
  1083.                 (help "\n\nThis will copy over a default preferences file.")
  1084.                 (confirm)
  1085.             ))
  1086.         )
  1087.             
  1088.         ;  **********************************************************************
  1089.         ;  Default prefs file for a Pioneer drive, pooled
  1090.         ;  **********************************************************************
  1091.         (if (not #PioneerSeparate)
  1092.             (copyfiles
  1093.                 (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1094.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Pool")
  1095.                 (dest "ENVArc:AsimCDFS")
  1096.                 (newname #CDDevice_NC)
  1097.                 (help "\n\nThis will copy over a default preferences file.")
  1098.                 (confirm)
  1099.             )
  1100.         )        
  1101.     ))
  1102.     
  1103.     
  1104.     ;  **********************************************************************
  1105.     ;  Default prefs file for a SCSI or ATAPI CD-ROM drive
  1106.     ;  **********************************************************************
  1107.     (if (not #isPioneer)
  1108.         (copyfiles
  1109.             (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1110.             (source "AsimCDFSInst:Default_Prefs/Default")
  1111.             (dest "ENVArc:AsimCDFS")
  1112.             (newname #CDDevice_NC)
  1113.             (help "\n\nThis will copy over a default preferences file.")
  1114.             (confirm)
  1115.         )
  1116.     ))
  1117. )
  1118.  
  1119.  
  1120.  
  1121.  
  1122. ;  **********************************************************************
  1123. ;  Default prefs file for a CDTV
  1124. ;  **********************************************************************
  1125. (if (= #IsAmiga 1)
  1126.     (copyfiles
  1127.         (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1128.         (source "AsimCDFSInst:Default_Prefs/CDTV")
  1129.         (dest "ENVArc:AsimCDFS")
  1130.         (newname #CDDevice_NC)
  1131.         (help "\n\nThis will copy over a default preferences file.")
  1132.         (confirm)
  1133.     )
  1134. )
  1135.  
  1136.  
  1137. ;  **********************************************************************
  1138. ;  Default prefs file for a CD³²
  1139. ;  **********************************************************************
  1140. (if (= #IsAmiga 2)
  1141.     (copyfiles
  1142.         (prompt "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n" )
  1143.         (source "AsimCDFSInst:Default_Prefs/CD³²")
  1144.         (dest "ENVArc:AsimCDFS")
  1145.         (newname #CDDevice_NC)
  1146.         (help "\n\nThis will copy over a default preferences file.")
  1147.         (confirm)
  1148.     )
  1149. )
  1150.  
  1151. (complete 60 )
  1152.  
  1153.  
  1154.  
  1155.  
  1156.  
  1157.  
  1158.  
  1159. ;  **********************************************************************
  1160. ;  AsimTunes
  1161. ;  **********************************************************************
  1162. (set #instTunes
  1163.     (askbool
  1164.         (prompt "\n\nShould the AsimTunes utility be installed?")
  1165.         (help "\n\nThis will copy over the AsimTunes utility "
  1166.                 "to your AsimCDFS: directory\n\nIf you do not "
  1167.                 "wish the AsimTunes program to be transferred to your system, "
  1168.                 "skip this step.\n" )
  1169.         (default 1)
  1170.     )
  1171. )
  1172.  
  1173. (if #instTunes 
  1174.     ((protect "AsimCDFS:AsimTunes" "rwed" )
  1175.     (protect "AsimCDFS:AsimTunes.info" "rwed" )
  1176.     (copyfiles
  1177.         (prompt "\n\nCopying AsimTunes audio CD controller program to the "
  1178.                   "AsimCDFS: directory.\n" )
  1179.         (source "AsimCDFSInst:AsimTunes")
  1180.         (dest "AsimCDFS:")
  1181.         (infos)
  1182.         (noposition)
  1183.         (help "\n\nThis will copy over the AsimTunes audio CD controller "
  1184.                 "program to your AsimCDFS: directory\n\nIf you do not "
  1185.                 "wish the AsimTunes program to be transferred to your system, "
  1186.                 "skip this step.\n" )
  1187.         (confirm)
  1188.     )
  1189.     
  1190.     (tooltype
  1191.         (dest "AsimCDFS:AsimTunes" )
  1192.         (settooltype "CDROM" #CDDevice )
  1193.         (noposition)
  1194.     )
  1195.         
  1196.         
  1197.     (complete 70 )
  1198.     (protect "fonts:AsimTunes2" "rwed" )
  1199.     (protect "fonts:AsimTunes2.font" "rwed" )
  1200.     (protect "fonts:AsimTunes2/11" "rwed" )
  1201.     (protect "fonts:AsimTunes2/20" "rwed" )
  1202.     (copyfiles
  1203.         (prompt "\n\nCopying AsimTunes fonts to the FONTS: directory\n" )
  1204.         (source "AsimCDFSInst:fonts")
  1205.         (dest "fonts:" )
  1206.         (all)
  1207.         (help "\n\nThis will copy over the fonts needed for AsimTunes.\n\n"
  1208.                 "They will be placed into your fonts: directory.\n\n" )
  1209.         (confirm) )
  1210. ))
  1211.  
  1212.  
  1213.  
  1214.  
  1215.  
  1216. ;  **********************************************************************
  1217. ;  DiscChanger
  1218. ;  **********************************************************************
  1219. (complete 80 )
  1220.  
  1221. (set #instChanger
  1222.     (askbool
  1223.         (prompt "\n\nShould the DiscChanger utility be installed?")
  1224.         (help "\n\nThis will copy over the DiscChanger utility "
  1225.                 "to your AsimCDFS: directory\n\nIf you do not "
  1226.                 "wish the DiscChanger program to be transferred to your system, "
  1227.                 "skip this step.\n" )
  1228.         (default 1)
  1229.     )
  1230. )
  1231.  
  1232. (complete 85 )
  1233. (if #instChanger
  1234.     ((protect "AsimCDFS:DiscChanger" "rwed" )
  1235.     (copyfiles
  1236.         (prompt "\n\nCopying the DiscChanger utility to the AsimCDFS: "
  1237.                   "directory.\n" )
  1238.         (source "AsimCDFSInst:DiscChanger")
  1239.         (dest "AsimCDFS:")
  1240.         (infos)
  1241.         (noposition)
  1242.         (help "\n\nThis will copy over the DiscChanger utility "
  1243.                 "program to your AsimCDFS: directory\n\nIf you do not "
  1244.                 "wish the DiscChanger program to be transferred to your system, "
  1245.                 "skip this step.\n" )
  1246.         (confirm)
  1247.     )
  1248.     
  1249.     (tooltype
  1250.         (dest "AsimCDFS:DiscChanger" )
  1251.         (settooltype "CDROM" #CDDevice )
  1252.         (noposition)
  1253.     )
  1254. ))
  1255.  
  1256.  
  1257.  
  1258.  
  1259.  
  1260. ;  **********************************************************************
  1261. ;  AsimCDFS_Prefs
  1262. ;  **********************************************************************
  1263. (complete 80 )
  1264. (set #instPrefs
  1265.     (askbool
  1266.         (prompt "\n\nShould the AsimCDFS_Prefs utility be installed?")
  1267.         (help "\n\nThis will copy over the AsimCDFS_Prefs utility "
  1268.                 "to your AsimCDFS: directory\n\nIf you do not "
  1269.                 "wish the AsimCDFS_Prefs program to be transferred to your system, "
  1270.                 "skip this step.\n" )
  1271.         (default 1)
  1272.     )
  1273. )
  1274.  
  1275. (complete 85 )
  1276. (if #instPrefs
  1277.     ((protect "AsimCDFS:AsimCDFS_Prefs" "rwed" )
  1278.     (copyfiles
  1279.         (prompt "\n\nCopying the AsimCDFS_Prefs utility to the AsimCDFS: "
  1280.                   "directory.\n" )
  1281.         (source "AsimCDFSInst:AsimCDFS_Prefs")
  1282.         (dest "AsimCDFS:")
  1283.         (infos)
  1284.         (noposition)
  1285.         (help "\n\nThis will copy over the AsimCDFS_Prefs utility "
  1286.                 "program to your AsimCDFS: directory\n\nIf you do not "
  1287.                 "wish the AsimCDFS_Prefs program to be transferred to your system, "
  1288.                 "skip this step.\n" )
  1289.         (confirm)
  1290.     )
  1291. ))
  1292.  
  1293.  
  1294.  
  1295.  
  1296. ;  **********************************************************************
  1297. ;  SimBoot
  1298. ;  **********************************************************************
  1299. (complete 80 )
  1300. (set #instSimBoot
  1301.     (askbool
  1302.         (prompt "\n\nShould the SimBoot utility be installed?")
  1303.         (help "\n\nThis will copy over the SimBoot utility "
  1304.                 "to your AsimCDFS: directory\n\nIf you do not "
  1305.                 "wish the SimBoot program to be transferred to your system, "
  1306.                 "skip this step.\n" )
  1307.         (default 1)
  1308.     )
  1309. )
  1310.  
  1311. (complete 85 )
  1312. (if #instSimBoot
  1313.     ((protect "AsimCDFS:SimBoot" "rwed" )
  1314.     (copyfiles
  1315.         (prompt "\n\nCopying the SimBoot utility to the AsimCDFS: "
  1316.                   "directory.\n" )
  1317.         (source "AsimCDFSInst:SimBoot")
  1318.         (dest "AsimCDFS:")
  1319.         (infos)
  1320.         (noposition)
  1321.         (help "\n\nThis will copy over the SimBoot utility "
  1322.                 "program to your AsimCDFS: directory\n\nIf you do not "
  1323.                 "wish the SimBoot program to be transferred to your system, "
  1324.                 "skip this step.\n" )
  1325.         (confirm)
  1326.     )
  1327.  
  1328. ))
  1329.  
  1330.  
  1331.  
  1332. ;  **********************************************************************
  1333. ;  CD³²_Prefs
  1334. ;  **********************************************************************
  1335. (complete 80 )
  1336. (set #instCD32Prefs
  1337.     (askbool
  1338.         (prompt "\n\nShould the CD³²_Prefs utility be installed?")
  1339.         (help "\n\nThis will copy over the CD³²_Prefs utility "
  1340.                 "to your AsimCDFS: directory\n\nIf you do not "
  1341.                 "wish the CD³²_Prefs program to be transferred to your system, "
  1342.                 "skip this step.\n" )
  1343.         (default 1)
  1344.     )
  1345. )
  1346.  
  1347. (complete 85 )
  1348. (if #instCD32Prefs
  1349.     ((protect "AsimCDFS:CD³²_Prefs" "rwed" )
  1350.     (copyfiles
  1351.         (prompt "\n\nCopying the CD³²_Prefs utility to the AsimCDFS: "
  1352.                   "directory.\n" )
  1353.         (source "AsimCDFSInst:CD³²_Prefs")
  1354.         (dest "AsimCDFS:")
  1355.         (infos)
  1356.         (noposition)
  1357.         (help "\n\nThis will copy over the CD³²_Prefs utility "
  1358.                 "program to your AsimCDFS: directory\n\nIf you do not "
  1359.                 "wish the CD³²_Prefs program to be transferred to your system, "
  1360.                 "skip this step.\n" )
  1361.         (confirm)
  1362.     )
  1363.  
  1364. ))
  1365.  
  1366.  
  1367.  
  1368.  
  1369. ;  **********************************************************************
  1370. ;  CDTV Prefs
  1371. ;  **********************************************************************
  1372. (complete 80 )
  1373. (set #instCDTVPrefs
  1374.     (askbool
  1375.         (prompt "\n\nShould the CDTV_Prefs utility be installed?")
  1376.         (help "\n\nThis will copy over the CDTV_Prefs utility "
  1377.                 "to your AsimCDFS: directory\n\nIf you do not "
  1378.                 "wish the CDTV_Prefs program to be transferred to your system, "
  1379.                 "skip this step.\n" )
  1380.         (default 1)
  1381.     )
  1382. )
  1383.  
  1384. (complete 85 )
  1385. (if #instCDTVPrefs
  1386.     ((protect "AsimCDFS:CDTV_Prefs" "rwed" )
  1387.     (copyfiles
  1388.         (prompt "\n\nCopying the CDTV_Prefs utility to the AsimCDFS: "
  1389.                   "directory.\n" )
  1390.         (source "AsimCDFSInst:CDTV_Prefs")
  1391.         (dest "AsimCDFS:")
  1392.         (infos)
  1393.         (noposition)
  1394.         (help "\n\nThis will copy over the CDTV_Prefs utility "
  1395.                 "program to your AsimCDFS: directory\n\nIf you do not "
  1396.                 "wish the CDTV_Prefs program to be transferred to your system, "
  1397.                 "skip this step.\n" )
  1398.         (confirm)
  1399.     )
  1400.  
  1401. ))
  1402.  
  1403.  
  1404.  
  1405.  
  1406.  
  1407.  
  1408.  
  1409. (complete 80 )
  1410. (set #instCDTVEmul
  1411.     (askbool
  1412.         (prompt "\n\nShould the CDTV emulation option be installed?")
  1413.         (help "\n\nThis will copy over the required files for the "
  1414.                 "CDTV emulation:\n   devs:cdtv.device\n   devs:bookmark.device\n   devs:cardmark.device\n   libs:playerprefs.library\n\nIf you do not "
  1415.                 "wish the CDTV emulation option to be transferred to your system, "
  1416.                 "skip this step.\n" )
  1417.         (default 1)
  1418.     )
  1419. )
  1420.  
  1421. (complete 85 )
  1422. (if #instCDTVEmul
  1423.     ((complete 30 )
  1424.     ;  **********************************************************************
  1425.     ;  devs:cdtv.device
  1426.     ;  **********************************************************************
  1427.     (protect "devs:cdtv.device" "rwed" )
  1428.     (copyfiles
  1429.         (prompt "\n\nCopying cdtv.device to the devs: directory.\n" )
  1430.         (source "AsimCDFSInst:devs/cdtv.device")
  1431.         (dest "devs:")
  1432.         (confirm)
  1433.         (help "\n\nThis will copy over the cdtv.device program to your "
  1434.             "devs: directory\n\nThis is part of the CDTV emulation\n" )
  1435.     )
  1436.     
  1437.     
  1438.     
  1439.     ;  **********************************************************************
  1440.     ;  devs:bookmark.device
  1441.     ;  **********************************************************************
  1442.     (complete 30 )
  1443.     (protect "devs:bookmark.device" "rwed" )
  1444.     (copyfiles
  1445.         (prompt "\n\nCopying bookmark.device to the devs: directory.\n" )
  1446.         (source "AsimCDFSInst:devs/bookmark.device")
  1447.         (dest "devs:")
  1448.         (confirm)
  1449.         (help "\n\nThis will copy over the bookmark.device program to your "
  1450.             "devs: directory\n\nThis is part of the CDTV emulation\n" )
  1451.     )
  1452.     
  1453.     
  1454.     ;  **********************************************************************
  1455.     ;  devs:cardmark.device
  1456.     ;  **********************************************************************
  1457.     (complete 30 )
  1458.     (protect "devs:cardmark.device" "rwed" )
  1459.     (copyfiles
  1460.         (prompt "\n\nCopying cardmark.device to the devs: directory.\n" )
  1461.         (source "AsimCDFSInst:devs/cardmark.device")
  1462.         (dest "devs:")
  1463.         (confirm)
  1464.         (help "\n\nThis will copy over the cardmark.device program to your "
  1465.             "devs: directory\n\nThis is part of the CDTV emulation\n" )
  1466.     )
  1467.     
  1468.     
  1469.     ;  **********************************************************************
  1470.     ;  libs:playerprefs.library
  1471.     ;  **********************************************************************
  1472.     (complete 30 )
  1473.     (protect "devs:playerprefs.library" "rwed" )
  1474.     (copyfiles
  1475.         (prompt "\n\nCopying playerprefs.library to the libs: directory.\n" )
  1476.         (source "AsimCDFSInst:libs/playerprefs.library")
  1477.         (dest "libs:")
  1478.         (confirm)
  1479.         (help "\n\nThis will copy over the playerprefs.library program to your "
  1480.             "libs: directory\n\nThis is part of the CDTV emulation\n" )
  1481.     )
  1482. ))    
  1483.  
  1484.  
  1485.  
  1486. (set #instCD32Emul
  1487.     (askbool
  1488.         (prompt "\n\nShould the CD³² emulation option be installed?")
  1489.         (help "\n\nThis will copy over the required files for the "
  1490.                 "CD³² emulation:\n   devs:cd.device\n   libs:nonvolatile.library\n   libs:lowlevel.library\n\nIf you do not "
  1491.                 "wish the CD³² emulation option to be transferred to your system, "
  1492.                 "skip this step.\n" )
  1493.         (default 1)
  1494.     )
  1495. )
  1496.  
  1497. (complete 85 )
  1498. (if #instCD32Emul
  1499.     ((complete 30 )
  1500.     ;  **********************************************************************
  1501.     ;  devs:cd.device
  1502.     ;  **********************************************************************
  1503.     
  1504.     (protect "devs:cd.device" "rwed" )
  1505.     (copyfiles
  1506.         (prompt "\n\nCopying cd.device to the devs: directory.\n" )
  1507.         (source "AsimCDFSInst:devs/cd.device")
  1508.         (dest "devs:")
  1509.         (confirm)
  1510.         (help "\n\nThis will copy over the cd.device program to your "
  1511.             "devs: directory\n\nThis is part of the CD³² emulation\n" )
  1512.     )
  1513.     
  1514.     
  1515.     ;  **********************************************************************
  1516.     ;  libs:nonvolatile.library
  1517.     ;  **********************************************************************
  1518.     (complete 30 )
  1519.     (protect "devs:nonvolatile.library" "rwed" )
  1520.     (copyfiles
  1521.         (prompt "\n\nCopying nonvolatile.library to the libs: directory.\n" )
  1522.         (source "AsimCDFSInst:libs/nonvolatile.library")
  1523.         (dest "libs:")
  1524.         (confirm)
  1525.         (help "\n\nThis will copy over the nonvolatile.library program to your "
  1526.             "libs: directory\n\nThis is part of the CD³² emulation\n" )
  1527.     )
  1528.     
  1529.     
  1530.     ;  **********************************************************************
  1531.     ;  libs:lowlevel.library
  1532.     ;  **********************************************************************
  1533.     (complete 30 )
  1534.     (protect "devs:lowlevel.library" "rwed" )
  1535.     (copyfiles
  1536.         (prompt "\n\nCopying lowlevel.library to the libs: directory.\n" )
  1537.         (source "AsimCDFSInst:libs/lowlevel.library")
  1538.         (dest "libs:")
  1539.         (confirm)
  1540.         (help "\n\nThis will copy over the lowlevel.library program to your "
  1541.             "libs: directory\n\nThis is part of the CD³² emulation\n" )
  1542.     )
  1543. ))
  1544.  
  1545.  
  1546.  
  1547. ;  **********************************************************************
  1548. ;  default icons in ENV
  1549. ;  **********************************************************************
  1550.  
  1551. (makedir "ENVARC:AsimCDFS"
  1552.     (prompt "Making the ENVARC:AsimCDFS directory, in which various default files will be placed.")
  1553.     (help "This will create a directory in your ENVARC: directory")
  1554.     )
  1555.  
  1556. (makedir "ENV:AsimCDFS"
  1557.     (prompt "Making the ENV:AsimCDFS directory, in which various default files will be placed.")
  1558.     (help "This will create a directory in your ENV: directory")
  1559.     )
  1560.  
  1561. (copyfiles
  1562.     (prompt "\n\nCopying default icons to the ENVARC:AsimCDFS "
  1563.               "directory.\n" )
  1564.     (source "AsimCDFSInst:ENVArc/AsimCDFS")
  1565.     (dest "ENVArc:AsimCDFS")
  1566.     (infos)
  1567.     (all)
  1568.     (help "\n\nThis will copy over default icon files to the ENVArc:AsimCDFS directory.")
  1569.     (confirm)
  1570. )
  1571.  
  1572. (copyfiles
  1573.     (prompt "\n\nCopying default icons to the ENV:AsimCDFS "
  1574.               "directory.\n" )
  1575.     (source "AsimCDFSInst:ENVArc/AsimCDFS")
  1576.     (dest "ENV:AsimCDFS")
  1577.     (infos)
  1578.     (all)
  1579.     (help "\n\nThis will copy over default icon files to the ENV:AsimCDFS directory.")
  1580.     (confirm)
  1581. )
  1582.  
  1583.  
  1584.  
  1585. ;  **********************************************************************
  1586. ;  ask which languages to be added
  1587. ;  **********************************************************************
  1588. ;(if (exists "LOCALE:")
  1589. ;    ((user 2)
  1590. ;    (set #language
  1591. ;        (askoptions
  1592. ;            (prompt "Which language catalogs would you like installed?")
  1593. ;            (help "The various programs have been configured to the following "
  1594. ;                    "languages:\n    English\n   Deutsch\n   Français\n\nSelect which"
  1595. ;                    "languages you would like to use with our software." )
  1596. ;            (choices "English" "Deutsch" "Français")
  1597. ;            (default 1)
  1598. ;        )
  1599. ;    )
  1600. ;    (user #theirlevel)
  1601. ;    
  1602. ;    
  1603. ;    (set n 0)
  1604. ;    (while
  1605. ;        (set #langdir
  1606. ;            (select n "english"
  1607. ;                         "deutsch"
  1608. ;                         "français"
  1609. ;                       ""
  1610. ;                )
  1611. ;            )
  1612. ;        (
  1613. ;        
  1614. ;        (if (IN #language n)
  1615. ;            ((set #langdest (tackon "LOCALE:catalogs/" #langdir))
  1616. ;            (set #langsrc (tackon "AsimCDFSInst:Locale/catalogs/" #langdir))
  1617. ;            
  1618. ;            (copyfiles
  1619. ;                (prompt "\n\nCopying locale " #langdir " language catalogs.\n" )
  1620. ;                (source #langsrc)
  1621. ;                (dest #langdest)
  1622. ;                (infos)
  1623. ;                (all)
  1624. ;                (help "\n\nThis will copy over the desired langauge file.")
  1625. ;                (confirm))
  1626. ;            )
  1627. ;        )
  1628. ;    
  1629. ;        (set n (+ n 1))
  1630. ;        )
  1631. ;    )
  1632. ;))    
  1633.     
  1634.  
  1635.  
  1636.  
  1637.  
  1638. ;  **********************************************************************
  1639. ;  Create a 'SYS/NV_Location' environment variable
  1640. ;  **********************************************************************
  1641. (run "setenv SYS/NV_Location AsimCDFS_Buffer:NonVolatile/")
  1642.  
  1643.  
  1644. ;  **********************************************************************
  1645. ;  Create a CD³² Preferences file
  1646. ;  **********************************************************************
  1647. (run "AsimCDFS:CD³²_Prefs SAVE DEFAULT")    
  1648.  
  1649.  
  1650. ;  **********************************************************************
  1651. ;  Create a CDTV Preferences file
  1652. ;  **********************************************************************
  1653. (run "AsimCDFS:CDTV_Prefs SAVE DEFAULT")    
  1654.  
  1655.  
  1656.  
  1657. ;  **********************************************************************
  1658. ;  remove assign to AsimCDFSInst
  1659. ;  **********************************************************************
  1660. (makeassign "AsimCDFSInst")
  1661.  
  1662.  
  1663. (complete 100 )
  1664.