(if (= @language "deutsch")
    (
        (set destdir
            (askdir
                (prompt "Wohin soll ich das Programm \"GetIcon!\" kopieren ?" )
                (help @askdir-help)
                (default "SYS:WBStartup")
            )
        )
        (set @default-dest destdir)
        (set docdir
            (askdir
                (prompt "Wohin soll ich die Dokumentation kopieren ?")
                (help @askdir-help)
                (default "HELP:deutsch")
            )
        )
        (set copyrexx
            (askbool
                (prompt "Soll ich die ARexx-Dateien auch kopieren ?")
                (help @askbool-help)
                (choices "Ja" "Nein")
                (default 0)
            )
        )
        (if (= copyrexx 1)
            (set arexxdir
                (askdir
                    (prompt "Wohin soll ich die ARexx-Dateien kopieren ?")
                    (help @askdir-help)
                    (default "S:")
                )
            )
        )
        (set localeexists
            (exists "LOCALE:Catalogs/deutsch" (noreq))
        )
        (copyfiles
            (prompt "Kopiere Programm nach " destdir "...")
            (help @copyfiles-help)
            (source "GetIcon!")
            (dest destdir)
            (infos)
            (noposition)
        )
        (set iconmcc
            (exists "MUI:Libs/MUI/Icon.mcc" (noreq))
        )
        (if (= iconmcc 0)
            (copyfiles
                (prompt "Kopiere Icon.mcc nach \\"MUI:Libs/MUI\\"...")
                (help @copyfiles-help)
                (source "Libs/MUI/Icon.mcc")
                (dest "MUI:Libs/MUI")
            )
        )
        (copyfiles
            (prompt "Kopiere Dokumentation nach " docdir "...")
            (help @copyfiles-help)
            (source "Docs/GetIcon!_D.guide")
            (dest docdir)
            (newname "GetIcon!.guide")
            (infos)
            (noposition)
        )
        (if (= copyrexx 1)
            (copyfiles
                (prompt "Kopiere ARexx-Dateien nach " arexxdir "...")
                (help @copyfiles-help)
                (source "ARexx")
                (dest arexxdir)
                (all)
            )
        )
        (if (> localeexists 0)
            (copyfiles
                (prompt "Kopiere Katalog-Datei nach LOCALE:Catalogs/deutsch...")
                (help @copyfiles-help)
                (source "Catalogs/deutsch/geticon!.catalog")
                (dest "LOCALE:Catalogs/deutsch/")
            )
        )
    )
    (
        (set destdir
            (askdir
                (prompt "Where shall I copy the program \"GetIcon!\" kopieren ?" )
                (help @askdir-help)
                (default "SYS:WBStartup")
            )
        )
        (set @default-dest destdir)
        (set docdir
            (askdir
                (prompt "Where shall I copy the documentation ?")
                (help @askdir-help)
                (default "HELP:")
            )
        )
        (set copyrexx
            (askbool
                (prompt "Shall I also copy the ARexx-Files ?")
                (help @askbool-help)
                (choices "Yes" "No")
                (default 0)
            )
        )
        (if (= copyrexx 1)
            (set arexxdir
                (askdir
                    (prompt "Where shall I copy the Arexx-Files ?")
                    (help @askdir-help)
                    (default "S:")
                )
            )
        )
        (copyfiles
            (prompt "Copying program to " destdir "...")
            (help @copyfiles-help)
            (source "GetIcon!")
            (dest destdir)
            (infos)
            (noposition)
        )
        (set icon
            (exists "MUI:Libs/MUI/Icon.mcc" (noreq))
        )
        (if (= iconmcc 0)
            (copyfiles
                (prompt "Copying Icon.mcc to \\"MUI:Libs/MUI\\"...")
                (help @copyfiles-help)
                (source "Libs/MUI/Icon.mcc")
                (dest "MUI:Libs/MUI")
            )
        )

        (copyfiles
            (prompt "Copying documentation to " docdir "...")
            (help @copyfiles-help)
            (source "Docs/GetIcon!.guide")
            (dest docdir)
            (infos)
            (noposition)
        )
        (if (= copyrexx 1)
            (copyfiles
                (prompt "Copying ARexx-Files to " arexxdir "...")
                (help @copyfiles-help)
                (source "ARexx")
                (dest arexxdir)
                (all)
            )
        )
    )
)