(if (= @language "deutsch")
    (
        (SET Intro  "Wilkommen zum Installer-Script für Jukebox")
        (SET Where  "Wohin soll das Jukebox-Packet hinkopiert werden ? Es wird ein Verzeichnis namens Jukebox angelegt")
    )
)
(if (= @language "english")
    (
        (SET Intro  "Welcome to the installer-script for Jukebox")
        (SET Where  "Where do you want to place the Jukebox-package ? A drawer called Jukebox will be created")
    )
)

(MESSAGE Intro)

(SET WUWU
    (ASKDIR
        (PROMPT Where)
        (DEFAULT "sys:")
        (HELP   "")
    )
)

(SET BinDest (TACKON WUWU "Jukebox"))

(RUN (CAT "makedir \""BinDest"\""))

(COPYFILES
    (SOURCE ":DiskUtil/CD-ROM/Jukebox/")
    (DEST   BinDest)
    (ALL)
    (INFOS)
)
