30 lines
943 B
Ada
30 lines
943 B
Ada
-- 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;
|