xhads/source/ui.ads

45 lines
1.6 KiB
Ada
Raw Normal View History

-- Copyright (c) 2024 - Ognjen 'xolatile' Milan Robovic
--
-- GNU General Public Licence (version 3 or later)
2024-02-15 21:03:09 -05:00
with core;
package ui is
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
type style is (
2024-03-13 14:51:13 -04:00
default, steam
2024-02-15 21:03:09 -05:00
);
------------------------------------------------------------------------------------------
active : style;
2024-02-15 21:03:09 -05:00
------------------------------------------------------------------------------------------
procedure configure;
2024-04-25 09:26:08 -04:00
procedure draw_icon (data : in core.sprite; description : in string; x, y : in integer);
2024-04-27 12:34:16 -04:00
procedure draw_overicon (data : in core.sprite; description : in string; x, y : in integer);
2024-02-15 21:03:09 -05:00
procedure draw_text_box (x, y, width, height : in integer);
procedure draw_frame (description : in string; x, y, width, height : in integer);
2024-02-15 21:03:09 -05:00
2024-02-19 21:52:43 -05:00
procedure draw_title_bar (x, y, width : in integer; title : in string);
procedure draw_scroll_bar (x, y, height : in integer; offset : in integer);
2024-02-16 14:58:54 -05:00
2024-04-27 12:34:16 -04:00
procedure draw_menu (x, y, width, height : in integer);
procedure draw_tiny_menu (x, y, width, height : in integer);
procedure draw_icon_menu (description : in string; x, y, width, height : in integer);
2024-02-15 21:03:09 -05:00
procedure draw_state_box (x, y : in integer);
2024-04-23 16:19:29 -04:00
procedure write (text : in string; x, y : in integer);
2024-02-15 21:03:09 -05:00
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
end ui;