Вложенные слайды Keynote с Applescript

Question

Есть ли способ добиться этого:

при программном создании презентации с помощью Applescript?

В качестве кода, который я сейчас имею, выглядитthis:

tell application "Keynote"
    set themeprops to {theme:"Gradient", slideSize:{800, 600}}
    set s to make new slideshow at end of slideshows with data themeprops
    repeat with content in {"a", "b", "c", "d"}
        tell s
            set titleMaster to item 7 of master slides -- using magic number :(
            set newslide to make new slide
            tell current slide
                set title to content
                set master to titleMaster
            end tell
        end tell
    end repeat
end tell

Для идей об обходных путях: Мое приложение сгенерирует этот код из документа Markdown, что позволит написать вашу презентацию в Markdown.Я надеялся, что разные уровни заголовков могут иметь разные уровни вложенности в конечном результате.