;$VER:ConfigScript 1.0 for HFMounter 2.1
(set @user-level 2)
(set @default-dest "SYS:C/")
(complete 0)
(message "HFMounter 2.1 Configuration-Utility\n HFMounter is ©1996 by SuicideSoft\n"
         "\nAfter choosing HFMounter, you may change it's"
         " behaviour with this installer-script, setting it's tooltypes according to your "
         "personal needs.  //\n\n"
         "Nach Auswahl des HFMounter's, kannst Du sein\n"
         "Verhalten durch Setzen der Tooltypes nach Deinen\n"
         "persönlichen Beduerfnissen konfigurieren.")
(set #File-Txt (cat "Where is your installed HFM? Please select the file!\n"
                    "//Wo hast Du HFM installiert? Bitte wähle es aus!"))
(set #File-Help (cat "\nThis section lets you choose the \n"
                     "installed HFMounter\n\n"
                     "Hier kannst Du den HFMounter auswählen, da\n"
                     "dessen Tooltypes geändert werden sollen.\n\n"
                     "Default SYS:C/HFM\n\n\n" @askfile-help))
(set @target
            (askfile
               (prompt #file-Txt)
               (help #file-Help)
               (default "SYS:C/HFM")))
(set @default-dest "")
(complete 25)
(set @pubscreen
 (askstring (prompt "On which Pubscreen should HfMounter pop up?")
            (help "No help available")
            (default "Workbench")))
(complete 50)
(set @hfname
 (askstring (prompt "Which name should the Hf-Units get after formatting?")
            (help @askstring-help)
            (default "HF")))
(complete 75)
(set bitmask
 (askoptions (prompt "Select the tooltypes for HF-Units")
             (help @askoptions-help)
              (choices "FFS" "INTL" "DIRCACHE" "NOICONS"
                          (default 11))))
(complete 80)
(working)
(if (= bitmask 15)
 (tooltype (prompt "No prompting") (dest @target)
 (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "TRUE")
   (settooltype "INTL" "TRUE") (settooltype "FFS" "TRUE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 14)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "TRUE")
   (settooltype "INTL" "TRUE") (settooltype "FFS" "FALSE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 13)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "TRUE")
   (settooltype "INTL" "FALSE") (settooltype "FFS" "TRUE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 12)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "TRUE")
   (settooltype "INTL" "FALSE") (settooltype "FFS" "FALSE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 11)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "FALSE")
   (settooltype "INTL" "TRUE") (settooltype "FFS" "TRUE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 10)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "FALSE")
   (settooltype "INTL" "TRUE") (settooltype "FFS" "FALSE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 9)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "FALSE")
   (settooltype "INTL" "FALSE") (settooltype "FFS" "TRUE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 8)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "TRUE") (settooltype "DIRCACHE" "FALSE")
   (settooltype "INTL" "FALSE") (settooltype "FFS" "FALSE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 7)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "TRUE")
   (settooltype "INTL" "TRUE") (settooltype "FFS" "TRUE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 6)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "TRUE")
   (settooltype "INTL" "TRUE") (settooltype "FFS" "FALSE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 5)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "TRUE")
   (settooltype "INTL" "FALSE") (settooltype "FFS" "TRUE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 4)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "TRUE")
   (settooltype "INTL" "FALSE") (settooltype "FFS" "FALSE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 3)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "FALSE")
   (settooltype "INTL" "TRUE") (settooltype "FFS" "TRUE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 2)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "FALSE")
   (settooltype "INTL" "TRUE") (settooltype "FFS" "FALSE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 1)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "FALSE")
   (settooltype "INTL" "FALSE") (settooltype "FFS" "TRUE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(if (= bitmask 0)
 (tooltype (prompt "No prompting") (dest @target)
   (settooltype "NOICONS" "FALSE") (settooltype "DIRCACHE" "FALSE")
   (settooltype "INTL" "FALSE") (settooltype "FFS" "FALSE")
   (settooltype "NAME" @hfname) (settooltype "PUBSCREEN" @pubscreen)
   (settooltype "PUBSCREEN") (settooltype "NAME") (settooltype "FFS")
   (settooltype "INTL") (settooltype "DIRCACHE") (settooltype "NOICONS")))
(complete 100)
(exit "That's all, configuration is finished now \n\n"
      "Das wars Leute, Konfiguration abgeschlossen.")