# HG changeset patch
# User Robert McIntyre <rlm@mit.edu>
# Date 1332821052 18000
# Node ID c855494602184a6826d8e674882ec6b77f74898f
# Parent  7de2c855392c74c07b625d4e96a83c028abe2e4b
script: got oak's parcel

diff -r 7de2c855392c -r c85549460218 clojure/com/aurellem/run/bootstrap_0.clj
--- a/clojure/com/aurellem/run/bootstrap_0.clj	Mon Mar 26 22:46:11 2012 -0500
+++ b/clojure/com/aurellem/run/bootstrap_0.clj	Mon Mar 26 23:04:12 2012 -0500
@@ -275,7 +275,6 @@
            [↑ ↑ ↑ ↑ ↑])
           
           (walk [↑ ↑ ↑ ↑])
-
           
           (walk-thru-grass
            [← ← ↑])
@@ -289,6 +288,8 @@
             ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑
             → → → → ])
 
+          ;; this part it dependent on that
+          ;; stupid NPC in the grass patch
           (walk-thru-grass
            [→ →
             ↑ ↑ ↑ ↑ ↑ ↑ ↑ ↑ ])
@@ -300,5 +301,17 @@
             ← ←
             ↑ ↑ ↑ ↑
             → → → → → → → → → →
-            ↑ ↑ ↑ ↑ ↑ ↑])))) 
+            ↑ ↑ ↑ ↑ ↑ ↑ ↑])))) 
             
+(defn-memo get-oaks-parcel
+  ([] (get-oaks-parcel
+       (pallet-edge->viridian-mart)))
+  ([script]
+     (->> script
+          (end-text)
+          (scroll-text 3)
+          (do-nothing 197)
+          (play-moves [[:a] []])
+          (walk [↓ ↓ → ↓]))))
+
+