(complete 0)

(set destdir
    (askdir
        (prompt "Wohin wollen Sie IntuiCookie installieren?  Es wird kein neues Verzeichnis angelegt.")
        (help @askdir-help)
        (default "SYS:WBStartup")
    )
)

(complete 10)

(copyfiles
    (prompt "Kopiere IntuiCookie nach " destdir)
    (help @copyfiles-help)
    (source "/")
    (dest destdir)
    (pattern "IntuiCookie")
    (infos)
    (files)
)

(complete 30)

(set destcookiedir
    (askdir
        (prompt "Wohin wollen Sie das Datenverzeichnis installieren?  Ich schlage vor, Sie erzeugen zuerst ein neues Verzeichnis (z.B.: <IntuiCookie>) auf Ihrer Festplatte.")
        (help @copyfiles-help)
        (default "Work:IntuiCookie")
    )
)

(complete 40)

(copyfiles
    (prompt "Möchten Sie die Cookies-Datei nach " destcookiedir "kopieren?  Dies würde eine bestehende Cookies-Datei überschreiben.  Benutzen Sie <Skip This Part> wenn Sie dies nicht möchten.")
    (help @copyfiles-help)
    (source "/")
    (dest destcookiedir)
    (pattern "data")
    (confirm)
    (infos)
)

(complete 60)

(copyfiles
    (source "/")
    (dest destcookiedir)
    (pattern "CookHash")
    (infos)
)

(complete 70)

(copyfiles
    (source "/")
    (dest destcookiedir)
    (pattern "Docs")
    (infos)
)

(copyfiles
    (source "/")
    (dest destcookiedir)
    (pattern "CT files")
    (infos)
)

(complete 80)

(tooltype
    (dest (tackon destdir "IntuiCookie"))
    (settooltype "COOKIEFILE" (tackon destcookiedir "data/cookies"))
)

(complete 90)

(tooltype
    (dest (tackon destdir "IntuiCookie"))
    (settooltype "HASHFILE" (tackon destcookiedir "data/cookies.hash"))
)

(copyfiles
    (prompt "Wählen Sie die Kataloge, die Sie nach LOCALE:Catalogs kopieren möchten.")
    (help "Sorry, keine Hilfe hier")
    (source "/Catalogs")
    (dest "Locale:Catalogs/")
    (pattern "~(#?.info)")
    (confirm)
)


(complete 100)