# HG changeset patch
# User Robert McIntyre <rlm@mit.edu>
# Date 1333971013 18000
# Node ID 639db56f26703af699abbf57685ad0eb92f3d216
# Parent  4141489d140668ba65b94577e5038c1539cb265f
script: bought status healing items; floor two complete.

diff -r 4141489d1406 -r 639db56f2670 clojure/com/aurellem/run/bootstrap_1.clj
--- a/clojure/com/aurellem/run/bootstrap_1.clj	Mon Apr 09 06:09:49 2012 -0500
+++ b/clojure/com/aurellem/run/bootstrap_1.clj	Mon Apr 09 06:30:13 2012 -0500
@@ -433,9 +433,21 @@
   (->> script
        (first-difference [] direction AF)))
 
-(defn floor-two-items
-  [])
-  
+(defn-memo floor-two-items
+  ([] (floor-two-items (floor-two-more-money)))
+  ([script]
+     (->> script
+          (walk [←])
+          (turn ↑)
+          talk
+          select-menu-entry
+          (buy-item 5 12)  ;; burn heal
+          (buy-item 6 55)  ;; ice heal
+          (buy-item 7 4)   ;; awakening
+          (buy-item 8 99)  ;; parlyz heal
+          (buy-item 8 55)  ;; parlyz heal
+          close-menu
+          end-shop-conversation)))
 
 (defn go-to-floor-three
   [])
diff -r 4141489d1406 -r 639db56f2670 moves/temp.vbm
Binary file moves/temp.vbm has changed