# HG changeset patch # User Robert McIntyre # Date 1332318672 18000 # Node ID 8665160f0f3d3306ace4e23f0ea3122e2b7c4416 # Parent 63ec3db6f6d1c8af40dacf0bafb57320984fbf2e saved corrupted save. diff -r 63ec3db6f6d1 -r 8665160f0f3d clojure/com/aurellem/exp/item_bridge.clj --- a/clojure/com/aurellem/exp/item_bridge.clj Wed Mar 21 03:24:18 2012 -0500 +++ b/clojure/com/aurellem/exp/item_bridge.clj Wed Mar 21 03:31:12 2012 -0500 @@ -114,7 +114,9 @@ state (corrupt-moves))) ([] (corrupt @current-state))) - + +(defn mid-game-corrupt [] + (read-state "corrupt-mid-game")) diff -r 63ec3db6f6d1 -r 8665160f0f3d clojure/com/aurellem/gb/items.clj --- a/clojure/com/aurellem/gb/items.clj Wed Mar 21 03:24:18 2012 -0500 +++ b/clojure/com/aurellem/gb/items.clj Wed Mar 21 03:31:12 2012 -0500 @@ -8,12 +8,14 @@ (def item-list-start 0xD31C) -(defn item-list [^SaveState state] - (subvec - (vec (memory state)) - item-list-start - (+ item-list-start 150))) - +(defn item-list + ([^SaveState state] + (subvec + (vec (memory state)) + item-list-start + (+ item-list-start 255))) + ([] (item-list @current-state))) + (def item-code->item-name (hash-map 0x01 :master-ball @@ -78,7 +80,7 @@ 0x3E :lemonade 0x3F :s.s.ticket 0x40 :gold-teeth - 0x41 :x-attach + 0x41 :x-attack 0x42 :x-defend 0x43 :x-speed 0x44 :x-special diff -r 63ec3db6f6d1 -r 8665160f0f3d save-states/corrupt-mid-game.sav Binary file save-states/corrupt-mid-game.sav has changed