Mercurial > vba-clojure

comparison clojure/com/aurellem/gb/hxc.clj @ 245:a50faba43967

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
forgot to include Bird type with the list of available type names for type advantage data. now hxc-advantage is correct.
author Dylan Holmes <ocsenave@gmail.com>
date Sun, 25 Mar 2012 23:04:01 -0500
parents 27ca947084cf
children 921d2277bb57
comparison
equal deleted inserted replaced
244:27ca947084cf 245:a50faba43967
89 :fighting 89 :fighting
90 :flying 90 :flying
91 :poison 91 :poison
92 :ground 92 :ground
93 :rock 93 :rock
94 :bird
94 :bug 95 :bug
95 :ghost 96 :ghost
96 :A 97 :A
97 :B 98 :B
98 :C 99 :C
113 :dragon 114 :dragon
114 ]) 115 ])
115 116
116 117
117 (def hxc-advantage 118 (def hxc-advantage
119 "The hardcoded type advantages in memory, returned as tuples of [atk-type def-type multiplier]. By default (i.e. if not listed here), the multiplier is 1."
118 (map 120 (map
119 (fn [[atk def mult]] [(get pkmn-types atk (hex atk)) 121 (fn [[atk def mult]] [(get pkmn-types atk (hex atk))
120 (get pkmn-types def (hex def)) 122 (get pkmn-types def (hex def))
121 (/ mult 10)]) 123 (/ mult 10)])
122 (partition 3 124 (partition 3