-- Copyright (c) 2024 - Ognjen 'xolatile' Milan Robovic -- -- GNU General Public Licence (version 3 or later) with core; package notification is ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ type enumeration is ( none, well_of_strength, well_of_agility, well_of_knowledge ); ------------------------------------------------------------------------------------------ procedure show (index : in enumeration); procedure hide (index : in enumeration); procedure iconflow (icon : in core.sprite; data, x, y : in integer); procedure synchronize; ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ end notification;