Mercurial > vba-clojure

comparison clojure/com/aurellem/exp/item_bridge.clj @ 171:d7e2cfecef1d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed compilation problems.
author Robert McIntyre <rlm@mit.edu>
date Wed, 21 Mar 2012 03:20:03 -0500
parents 09caf6a5bbf4
children 8665160f0f3d
comparison
equal deleted inserted replaced
170:09caf6a5bbf4 171:d7e2cfecef1d
111 pokemon list using save corruption" 111 pokemon list using save corruption"
112 ([^SaveState state] 112 ([^SaveState state]
113 (run-moves 113 (run-moves
114 state 114 state
115 (corrupt-moves))) 115 (corrupt-moves)))
116 116 ([] (corrupt @current-state)))
117
118
119
120 (step
121 (second
122 (->>
123 [[] state]
124 (advance [:b] [:a :b :start])
125 (advance [] [:d])
126 (play-moves [[] [] [] [:d] [] [] [] [:d] [] [] [:a]])
127 scroll-text
128 (play-moves
129 ;; this section is copied from speedrun-2942
130 ;; and corrupts the save so that the end-of-list marker
131 ;; for the pokemon roster is destroyed, but the save is still
132 ;; playable.
133 [[] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []
134 [] [] [] [] [] [] [] [] [] [] [:select] [:restart]])
135 (play-moves
136 (first (title)))
137 (advance [] [:start])
138 (advance [] [:a])
139 (advance [:a] [:a :start]))) []))
140 117
141 118
142 119
143 120
144 121