delay 0.25

tell application "Finder"
    repeat with a in (get selection as alias list)
        if item a's class = folder then
            tell item a
                open
                delay 0.5 -- Wartezeit, damit das Fenster vollständig geöffnet wird
                set theWindow to its container window
                tell theWindow
                    set toolbar visible to false
                    set bounds to {0, 30, 2750, 1650} -- {l, t, r, b}
                    set current view to icon view
                    delay 0.5 -- Wartezeit, damit der View-Wechsel vollzogen wird
                    tell its icon view options
                        set icon size to 512
                    end tell
                end tell
                set theWindow's index to 1 -- Fenster in den Vordergrund bringen
                delay 0.5 -- Nochmals kurz warten
                close
            end tell
        end if
    end repeat
end tell

tell application "Finder"
    set selectedItems to selection
    if selectedItems is not {} then
        repeat with theFolder in selectedItems
            if kind of theFolder is "Ordner" then
                set newWindow to (make new Finder window to theFolder)
                set current view of newWindow to icon view
            end if
        end repeat
    end if
end tell