# HG changeset patch
# User Robert McIntyre <rlm@mit.edu>
# Date 1346596420 18000
# Node ID b3e5006e23f05c4f4f5045786c2fba2909c3d1fa
# Parent  0e30fd920e6a956a2fe808939fa3d142423d665c
cache advanced moves.

diff -r 0e30fd920e6a -r b3e5006e23f0 clojure/com/aurellem/run/adv_choreo.clj
--- a/clojure/com/aurellem/run/adv_choreo.clj	Sun Sep 02 09:28:08 2012 -0500
+++ b/clojure/com/aurellem/run/adv_choreo.clj	Sun Sep 02 09:33:40 2012 -0500
@@ -398,12 +398,18 @@
        (fn [a b  d] (println d) [a b d]))
       move-images screenshots targets))))
 
+(defn write-advanced-script!
+  [] (write-script! (launch-bootstrap-program) "advanced"))
+                    
+(defn advanced-script []
+  (read-script "advanced"))
+
 (defn advanced-step-1! []
   (render-files!
    advanced-render-dir
    adv-write-move-image!
    false
-   (root) (advanced-steps)))
+   (root) (first (advanced-script))))
 
 (defn advanced-step-2! []
   (adv-generate-composite-frames!
diff -r 0e30fd920e6a -r b3e5006e23f0 clojure/com/aurellem/run/bootstrap_1.clj
--- a/clojure/com/aurellem/run/bootstrap_1.clj	Sun Sep 02 09:28:08 2012 -0500
+++ b/clojure/com/aurellem/run/bootstrap_1.clj	Sun Sep 02 09:33:40 2012 -0500
@@ -812,8 +812,8 @@
 (defn launch-main-bootstrap-program
   ([] (launch-main-bootstrap-program
        ;;(control-checkpoint)
-       ;;(launch-bootstrap-program)
-       (item-writer-test-script)
+       (launch-bootstrap-program)
+       ;;(item-writer-test-script)
        ))
   ([script]
      (->> script