add list of known resurrection skill names

This commit is contained in:
Gered 2016-04-05 21:53:30 -04:00
parent 9f27e3c90a
commit 11d59e8fca
2 changed files with 14 additions and 0 deletions

View file

@ -0,0 +1,8 @@
Ancestral Spirit
Defibrillate
Rebirth
Redemption
Reincarnation
Resurrection
Use Soulstone
Revive

View file

@ -10,6 +10,7 @@
(def defined-encounters (get-edn-resource "encounters.edn"))
(def enemy-entity-names (get-text-resource-as-lines "enemy_entity_names.txt"))
(def resurrection-skill-names (get-text-resource-as-lines "resurrection_skill_names.txt"))
(def non-combat-starting-auras (get-text-resource-as-lines "non_combat_starting_auras.txt"))
(def non-combat-starting-skills (get-text-resource-as-lines "non_combat_starting_skills.txt"))
@ -19,6 +20,11 @@
(if-not (string/blank? entity-name)
(contained-in? entity-name enemy-entity-names)))
(s/defn resurrection-skill? :- s/Bool
"returns true if the given skill name is a known resurrection skill"
[skill-name :- s/Str]
(contained-in? skill-name resurrection-skill-names))
(s/defn find-defined-encounter-name :- (s/maybe s/Str)
"returns the name of a defined encounter which includes the given entity in it's
list of encounter entities. returns nil if there is no encounter which includes the