-- Copyright (c) 2024 - Ognjen 'xolatile' Milan Robovic -- -- GNU General Public Licence (version 3 or later) package effect is ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ type enumeration is ( idle, modify_attribute, modify_skill, modify_resource, modify_material ); ------------------------------------------------------------------------------------------ type information is record kind : enumeration; modifier : integer; amount : integer; permanent : boolean; duration : natural; end record; none : constant information := (idle, 0, 0, false, 0); ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ end effect;