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 defined-encounters (get-edn-resource "encounters.edn"))
(def enemy-entity-names (get-text-resource-as-lines "enemy_entity_names.txt")) (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-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")) (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) (if-not (string/blank? entity-name)
(contained-in? entity-name enemy-entity-names))) (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) (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 "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 list of encounter entities. returns nil if there is no encounter which includes the