Mercurial > vba-clojure
annotate clojure/com/aurellem/save_corruption.clj @ 90:778cb84a2244
added save corruption
| author | Robert McIntyre <rlm@mit.edu> |
|---|---|
| date | Sat, 10 Mar 2012 19:44:32 -0600 |
| parents | |
| children | 613353b7e012 |
| rev | line source |
|---|---|
| rlm@90 | 1 (ns com.aurellem.save-corruption |
| rlm@90 | 2 (:use (com.aurellem gb-driver vbm title))) |
| rlm@90 | 3 |
| rlm@90 | 4 (use 'clojure.repl) |
| rlm@90 | 5 |
| rlm@90 | 6 (defn-memo activate-menu [] |
| rlm@90 | 7 (->> (intro) |
| rlm@90 | 8 (advance [:b] [:a :b :start]))) |
| rlm@90 | 9 |
| rlm@90 | 10 (defn-memo save-game [] |
| rlm@90 | 11 (->> (activate-menu) |
| rlm@90 | 12 (advance [] [:d]) |
| rlm@90 | 13 (play-moves [[] [] [] [:d] [] [] [] [:d] [] [] [:a]]) |
| rlm@90 | 14 scroll-text)) |
| rlm@90 | 15 |
| rlm@90 | 16 |
| rlm@90 | 17 |
| rlm@90 | 18 |
| rlm@90 | 19 |
| rlm@90 | 20 |