xolatile/xhads
1
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Revised chad data...

Browse Source
This commit is contained in:
Ognjen Milan Robovic 2024-03-13 18:18:07 -04:00
parent 3c52060ba8
commit 4410fb45f1
1 changed files with 14 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
source/chad.ads
View File

@ -13,11 +13,11 @@ package chad is
type information is
record
name : core.short_string;
kind : faction.codex;
attributes : attribute.value_array;
skills : skill.value_array;
resources : resource.value_array;
name : core.short_string;
kind : faction.codex;
bonus_attribute : attribute.codex;
bonus_skill : skill.codex;
bonus_resource : resource.codex;
end record;
type trait_array is array (codex) of information;
@ -30,15 +30,15 @@ package chad is
count : constant natural := codex'pos (codex'last) + 1;
trait : constant trait_array := (
("Ognjen Milan Robovic ", faction.castle, (attribute.power => 2, others => 1), (skill.archery => 6, others => 3), (others => 0)),
("Richard Martin Stallman ", faction.stronghold, (attribute.knowledge => 2, others => 1), (skill.leadership => 6, others => 3), (others => 0)),
("Eric Steven Raymond ", faction.inferno, (attribute.defense => 2, others => 1), (skill.resistance => 6, others => 3), (others => 0)),
("Linus Benedict Torvalds ", faction.tower, (attribute.attack => 2, others => 1), (skill.necromancy => 6, others => 3), (others => 0)),
("Ada Augusta King ", faction.conflux, (attribute.defense => 2, others => 1), (skill.sorcery => 6, others => 3), (others => 0)),
("Marina Ann Hantzis ", faction.necropolis, (attribute.attack => 2, others => 1), (skill.first_aid => 6, others => 3), (others => 0)),
("Kathleen Hylda Britten ", faction.rampart, (attribute.knowledge => 2, others => 1), (skill.mysticism => 6, others => 3), (others => 0)),
("Wouter van Oortmerssen ", faction.fortress, (attribute.power => 2, others => 1), (skill.offense => 6, others => 3), (others => 0)),
("John Warner Backus ", faction.dungeon, (attribute.knowledge => 2, others => 1), (skill.intelligence => 6, others => 3), (others => 0))
("Ognjen Milan Robovic ", faction.castle, attribute.power, skill.archery, resource.gold),
("Richard Martin Stallman ", faction.stronghold, attribute.knowledge, skill.leadership, resource.ore),
("Eric Steven Raymond ", faction.inferno, attribute.defense, skill.resistance, resource.wood),
("Linus Benedict Torvalds ", faction.tower, attribute.attack, skill.necromancy, resource.mercury),
("Ada Augusta King ", faction.conflux, attribute.defense, skill.sorcery, resource.gold),
("Marina Ann Hantzis ", faction.necropolis, attribute.attack, skill.first_aid, resource.gem),
("Kathleen Hylda Britten ", faction.rampart, attribute.knowledge, skill.mysticism, resource.wood),
("Wouter van Oortmerssen ", faction.fortress, attribute.power, skill.offense, resource.ore),
("John Warner Backus ", faction.dungeon, attribute.knowledge, skill.intelligence, resource.crystal)
);
------------------------------------------------------------------------------------------