Mercurial > vba-clojure

comparison clojure/com/aurellem/gb/pokemon.clj @ 201:53a74450dc8a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
correct grammar lol.
author Robert McIntyre <rlm@mit.edu>
date Fri, 23 Mar 2012 02:44:45 -0500
parents 1e2aa688e6e4
children 1ce54929bc0c
comparison
equal deleted inserted replaced
200:1e2aa688e6e4 201:53a74450dc8a
314 (if (not= (:species info) (:species2 info)) 314 (if (not= (:species info) (:species2 info))
315 (println "\nThis pokemon has a secondary species" 315 (println "\nThis pokemon has a secondary species"
316 (str 316 (str
317 "(" 317 "("
318 (.substring (str (:species2 info)) 1) ")\n") 318 (.substring (str (:species2 info)) 1) ")\n")
319 "that does not match it's primary species.")) 319 "that does not match its primary species."))
320 (if (not= :normal (:status info)) 320 (if (not= :normal (:status info))
321 (println "\nThis pokemon is currently" 321 (println "\nThis pokemon is currently"
322 (.substring (str (:status info) ".") 1))))) 322 (.substring (str (:status info) ".") 1)))))
323 ([poke-num] 323 ([poke-num]
324 (print-pokemon @current-state poke-num))) 324 (print-pokemon @current-state poke-num)))