下面是一个使用AppleScript将幻灯片从一个演示文稿复制到另一个演示文稿的代码示例：

tell application "Keynote"
    -- 打开源演示文稿
    set sourcePresentation to open "/path/to/source/presentation.key"
    
    -- 打开目标演示文稿
    set targetPresentation to open "/path/to/target/presentation.key"
    
    -- 获取源演示文稿中的所有幻灯片
    set sourceSlides to slides of sourcePresentation
    
    -- 复制每个幻灯片到目标演示文稿
    repeat with i from 1 to count of sourceSlides
        set sourceSlide to item i of sourceSlides
        copy sourceSlide to end of slides of targetPresentation
    end repeat
    
    -- 关闭源演示文稿
    close sourcePresentation saving no
    
    -- 保存并关闭目标演示文稿
    close targetPresentation saving yes
end tell

请注意，您需要将/path/to/source/presentation.key和/path/to/target/presentation.key替换为实际的源演示文稿和目标演示文稿的文件路径。