|
|
@@ -18,6 +18,7 @@ package monster is |
|
|
|
type definition is record |
|
|
|
name : access string := new string'("--"); |
|
|
|
attributes : attribute.bonus := (others => 0); |
|
|
|
size : core.vector := (1, 1); |
|
|
|
materials : access material.drops := new material.drops'((material.meat, 1, 1), (material.bone, 1, 1)); |
|
|
|
evoke : effect.information := effect.none; |
|
|
|
end record; |
|
|
@@ -41,12 +42,12 @@ package monster is |
|
|
|
description : constant array (enumeration) of definition := ( |
|
|
|
none => (others => <>), |
|
|
|
-- |
|
|
|
hill_troll => (new string'("Hill Troll"), (3, 3, 3, 6, 6, 6), new material.drops'((material.meat, 3, 6), (material.skull, 1, 1)), effect.none), |
|
|
|
cave_troll => (new string'("Cave Troll"), (3, 3, 3, 6, 6, 6), new material.drops'((material.meat, 3, 6), (material.skull, 1, 1)), effect.none), |
|
|
|
mountain_troll => (new string'("Mountain Troll"), (3, 3, 3, 6, 6, 6), new material.drops'((material.meat, 3, 6), (material.skull, 1, 1)), effect.none), |
|
|
|
swamp_worm => (new string'("Swamp Worm"), (2, 3, 3, 4, 6, 6), new material.drops'((material.meat, 3, 6), (material.bone, 1, 3)), effect.none), |
|
|
|
sand_worm => (new string'("Sand Word"), (2, 3, 3, 4, 6, 6), new material.drops'((material.meat, 3, 6), (material.bone, 1, 3)), effect.none), |
|
|
|
ash_worm => (new string'("Ash Worm"), (2, 3, 3, 4, 6, 6), new material.drops'((material.meat, 3, 6), (material.bone, 1, 3)), effect.none) |
|
|
|
hill_troll => (new string'("Hill Troll"), (3, 3, 3, 6, 6, 6), (2, 2), new material.drops'((material.meat, 3, 6), (material.skull, 1, 1)), effect.none), |
|
|
|
cave_troll => (new string'("Cave Troll"), (3, 3, 3, 6, 6, 6), (2, 2), new material.drops'((material.meat, 3, 6), (material.skull, 1, 1)), effect.none), |
|
|
|
mountain_troll => (new string'("Mountain Troll"), (3, 3, 3, 6, 6, 6), (2, 2), new material.drops'((material.meat, 3, 6), (material.skull, 1, 1)), effect.none), |
|
|
|
swamp_worm => (new string'("Swamp Worm"), (2, 3, 3, 4, 6, 6), (2, 2), new material.drops'((material.meat, 3, 6), (material.bone, 1, 3)), effect.none), |
|
|
|
sand_worm => (new string'("Sand Word"), (2, 3, 3, 4, 6, 6), (2, 2), new material.drops'((material.meat, 3, 6), (material.bone, 1, 3)), effect.none), |
|
|
|
ash_worm => (new string'("Ash Worm"), (2, 3, 3, 4, 6, 6), (2, 2), new material.drops'((material.meat, 3, 6), (material.bone, 1, 3)), effect.none) |
|
|
|
); |
|
|
|
|
|
|
|
game : array (enumeration) of core.sprite; |
|
|
|