1.1 --- a/clojure/com/aurellem/run/adv_choreo.clj	Sat Sep 01 12:52:46 2012 -0500
     1.2 +++ b/clojure/com/aurellem/run/adv_choreo.clj	Sat Sep 01 13:32:19 2012 -0500
     1.3 @@ -336,6 +336,24 @@
     1.4            (transfer-control main-program-base-address)
     1.5            (do-nothing 1800))))
     1.6  
     1.7 +(def advanced-render-dir
     1.8 +  (File. user-home "proj/vba-clojure/render/advanced"))
     1.9 +
    1.10 +(defn advanced-steps [] (first (activate-program)))
    1.11 +
    1.12 +(defn advanced-step-1! []
    1.13 +  (render-files!
    1.14 +   advanced-render-dir
    1.15 +   (root) (advanced-steps)))
    1.16 +
    1.17 +(defn advanced-step-2! []
    1.18 +  (generate-composite-frames!
    1.19 +   advanced-render-dir))
    1.20 +
    1.21 +(defn advanced-step-3! [] (final-cut! advanced-render-dir))
    1.22 +
    1.23 +
    1.24 +
    1.25  
    1.26  ;; possible screen writing programs
    1.27