home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / CDRom / hf-cdcr1.lha / CD-Creator / cdcreatnews.dms / cdcreatnews.adf / FSInstallSkript < prev    next >
Encoding:
Text File  |  1996-07-09  |  3.0 KB  |  112 lines
  1. ;$VER: Installskript CD-Rom V1.01 (20.06.96)
  2. ;----------------------------------------------------------------------------
  3. ; Deutsche Texte
  4.  
  5. (if (= @language "deutsch")
  6. (
  7.   (set #AskDevice     "Geben Sie bitte den Namen des AmigaDos Devices ein !")
  8.   (set #AskDeviceHelp "Sie müssen hier den Namen des AmigaDos Devices eingeben, der das CD-Rom Laufwerk anspricht !")
  9.   (set #AskUnit       "Geben Sie bitte die Unitnummer des CD-Rom Laufwerks ein !")
  10.   (set #AskUnitHelp   "Sie müssen hier die Unitnummer Ihres CD-Rom Laufwerks eingeben ! Diese müßte der SCSI-ID entsprechen !")
  11.  
  12.   (set #ErfrageVolumeNameTeil1
  13.   (cat "Unter welchen Namen soll das CD-ROM Laufwerk an der Unit "
  14.   ))
  15.  
  16.   (set #ErfrageVolumeNameTeil2
  17.   (cat " angemeldet werden ?"
  18.   ))
  19.  
  20.   (set #ErfrageVolumeNameHelp
  21.   (cat "Das AmigaDOS verwaltet Laufwerke unter bestimmten Namen, wie z.b. "
  22.        " \"DF0:\", \"DF1:\", \"DH0:\" usw. Dieser Name kann hier für das CD-ROM "
  23.        "Laufwerk gewählt werden. Dabei dürfen in dem Namen keine Zeichen "
  24.        "\":\" und \"/\" autreten. Der Name sollte immer mit >CD< anfangen, "
  25.        "damit keine Probleme bei einer neuen Installation auftreten. "
  26.   ))
  27.  
  28.   (set #Automatisch   (cat "Automatisch" ))
  29.   (set #Manuell       (cat "Manuell"     ))
  30.  
  31.   (set #WannCDRomMounten
  32.     (cat "Soll das CD-ROM Laufwerk automatisch oder später manuell eingebunden werden ?"
  33.   ))
  34.  
  35.   (set #WannCDRomMountenHelp
  36.   (cat "Hier können Sie sich entscheiden, ob das CD-ROM Laufwerk während des "
  37.        "Bootvorgangs oder später manuell ( mit Hilfe des >Mount< - Befehls "
  38.        "oder durch Doppelklicken des entsprechenden Icons in dem Verzeichnis "
  39.        ">storage/dosdrivers<) eingebunden werden soll."
  40.   ))
  41. ))
  42.  
  43. (procedure InstallFileSystem
  44. (
  45.     (set #CDDevice
  46.         (askstring
  47.             (prompt  #AskDevice)
  48.             (help    #AskDeviceHelp)
  49.             (default #CDDevice)
  50.         )
  51.     )
  52.     (set #Unit
  53.         (askstring
  54.             (prompt  #AskUnit)
  55.             (help    #AskUnitHelp)
  56.             (default #Unit)
  57.         )
  58.     )
  59.     (set #VolumeName
  60.         (askstring
  61.             (prompt  #ErfrageVolumeNameTeil1 #Unit #ErfrageVolumeNameTeil2)
  62.             (default #DefaultName)
  63.             (help    #ErfrageVolumeNameHelp)
  64.         )
  65.     )
  66.  
  67.     ; Wann soll das CD-Rom Laufwerk gemountet werden ?
  68.  
  69.     (if    (askbool
  70.             (prompt  #WannCDRomMounten)
  71.             (help    #WannCDRomMountenHelp)
  72.             (choices #Automatisch #Manuell)
  73.             (default 1)
  74.         )
  75.         (set #MountDir "DEVS:DosDrivers")
  76.         (set #MountDir "SYS:Storage/DosDrivers")
  77.     )
  78.     (textfile
  79.         (dest (tackon #MountDir #VolumeName))
  80.         (append "Handler   = L:cdrom-handler\n")
  81.         (append "Stacksize = 10000\n")
  82.         (append "Priority  = 5\n")
  83.         (append "GlobVec   = -1\n")
  84.         (append "Mount     = 1\n")
  85.         (append "Startup   = \"DEVICE-"#CDDevice"-UNIT-"#Unit"-SB-5-FB-5-SI-3\"\n")
  86.         (append "#\n")
  87.     )
  88.     (copyfiles
  89.         (source  "CD-Creator-News:Devs/cd.info")
  90.         (files)
  91.         (optional "force")
  92.         (dest     #MountDir)
  93.         (newname  (cat #VolumeName ".info"))
  94.     )
  95.     ; Filesytem kopieren
  96.     (copyfiles
  97.         (source   "CD-Creator-News:l/cdrom-Handler")
  98.         (files)
  99.         (optional "force")
  100.         (dest     "l:")
  101.     )
  102. ))
  103.  
  104.  
  105. (set #Unit        "0")
  106. (set #CDDevice    "scsi.device")
  107. (set #DefaultName "CD0")
  108.  
  109. (InstallFileSystem)
  110.  
  111. (set @default-dest #MountDir)
  112.