vba-clojure: clojure/com/aurellem/gb/moves.clj comparison

comparison clojure/com/aurellem/gb/moves.clj @ 197:659764a2ea40

break for eating!

author	Robert McIntyre <rlm@mit.edu>
date	Fri, 23 Mar 2012 00:14:37 -0500
parents	fd549c8f42ae
children	5055ec9de278

comparison

equal deleted inserted replaced

-:8dd17081829f
+:659764a2ea40
 0xA0   :conversion
 0xA1   :tri-attack
 0xA2   :super-fang
 0xA3   :slash
 0xA4   :substitute
-0xA5   :struggle})
+0xA5   :struggle       })
 (def move-name->move-code
 (zipmap (vals move-code->move-name)
 (keys move-code->move-name)))
 current-pp))))
 ([pokemon-num move-num pp-ups current-pp]
 (give-pp @current-state
 pokemon-num move-num pp-ups current-pp)))
+(def move-name->move-pp
+{
+:absorb        20
+:acid          30
+:acid-armor    40 ;; WTF happens with 3 PP-UPs??!
+:agility       30
+:amnesia       20
+:aurora-beam   20
+:barrage       20
+:barrier       30
+:bide          10
+:bind          20
+:bite          25
+:blizzard       5
+:body-slam     15
+:bone-club     20
+:bonemerang    10
+:bubble        30
+:bubblebeam    20
+:clamp         10
+:comet-punch   15
+:confuse-ray   10
+:confusion     25
+:constrict     35
+:conversion    30
+:counter       20
+:crabhammer    10
+:cut           30
+:defense-curl  40
+:dig           10
+:disable       20
+:dizzy-punch   10
+:double-edge   15
+:double-kick   30
+:double-team   10
+:doubleslap    15
+:dragon-rage   10
+:dream-eater   15
+:drill-peck    20
+:earthquake    10
+:egg-bomb      10
+:ember         25
+:explosion      5
+:fire-blast     5
+:fire-punch    15
+:fire-spin     15
+:fissure        5
+:flamethrower  15
+:flash         20
+:fly           15
+:focus-energy  30
+:fury-attack   20
+:fury-swipes   15
+:glare         30
+:growl         40
+:growth        40
+:guillotine     5
+:gust          35
+:harden        30
+:haze
+:headbutt
+:hi-jump-kick
+:horn-attack
+:horn-drill
+:hydro-pump
+:hyper-beam
+:hyper-fang
+:hypnosis
+:ice-beam
+:ice-punch
+:jump-kick
+:karate-chop
+:kinesis
+:leech-life
+:leech-seed
+:leer
+:lick
+:light-screen
+:lovely-kiss
+:low-kick
+:meditate
+:mega-drain
+:mega-kick
+:mega-punch
+:metronome
+:mimic
+:minimize
+:mirror-move
+:mist
+:night-shade
+:pay-day
+:peck
+:petal-dance
+:pin-missle
+:poison-gas
+:poison-sting
+:poisonpowder
+:pound
+:psybeam
+:psychic
+:psywave
+:quick-attack
+:rage
+:razor-leaf
+:razor-wind
+:recover
+:reflect
+:rest
+:roar
+:rock-slide
+:rock-throw
+:rolling-kick
+:sand-attack
+:scratch
+:screech
+:seismic-toss
+:selfdestruct
+:sharpen
+:sing
+:skull-bash
+:sky-attack
+:slam
+:slash
+:sleep-powder
+:sludge
+:smog
+:smokescreen
+:softboiled
+:solarbeam
+:sonicboom
+:spike-cannon
+:splash
+:spore
+:stomp
+:strength
+:string-shot
+:struggle
+:stun-spore
+:submission
+:substitute
+:super-fang
+:supersonic
+:surf
+:swift
+:swords-dance
+:tackle
+:tail-whip
+:take-down
+:teleport
+:thrash
+:thunder
+:thunder-wave
+:thunderbolt
+:thunderpunch
+:thundershock
+:toxic
+:transform
+:tri-attack
+:twinneedle
+:vicegrip
+:vine-whip
+:water-gun
+:waterfall
+:whirlwind
+:wing-attack
+:withdraw
+:wrap

Mercurial > vba-clojure

comparison clojure/com/aurellem/gb/moves.clj @ 197:659764a2ea40