xolatile/xhads
1
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Added new font, spacing still sucks...

Browse Source
This commit is contained in:
Ognjen Milan Robovic 2024-03-14 06:26:50 -04:00
parent 7c3617a518
commit a23e283a36
3 changed files with 9 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
font/pixel.ttf Normal file
View File

Binary file not shown.

2
source/core.ads
View File

@ -86,7 +86,7 @@ package core is
text_box : volatile;
fonts : array (0 .. 3) of font;
fonts : array (0 .. 4) of font;
------------------------------------------------------------------------------------------

12
source/main.adb
View File

@ -29,10 +29,11 @@ begin
core.configure;
ui.configure;
core.fonts (0) := core.load_font ("./font/tenderness.ttf", 22, 2);
core.fonts (0) := core.load_font ("./font/pixel.ttf", 22, 2);
core.fonts (1) := core.load_font ("./font/ferrum.ttf", 22, 2);
core.fonts (2) := core.load_font ("./font/gothic.ttf", 22, 2);
core.fonts (3) := core.load_font ("./font/unitblock.ttf", 22, 2);
core.fonts (4) := core.load_font ("./font/tenderness.ttf", 22, 2);
core.play_sound (core.import_sound (core.c_string ("./song/main_menu.ogg")));
@ -115,10 +116,11 @@ begin
--
ui.draw_text_box (0, core.window_height - 32, core.window_width, 32);
--
core.write ("Heyo world!", 1600, 700 + 0, 16#CC9966#, core.fonts (0));
core.write ("Nyaa world!", 1600, 700 + 32, 16#99CC66#, core.fonts (1));
core.write ("Cyaa world!", 1600, 700 + 64, 16#6699CC#, core.fonts (2));
core.write ("Neon world!", 1600, 700 + 96, 16#66CC99#, core.fonts (3));
core.write ("Heyo world!", 1600, 700 + 0, 16#CCCCCC#, core.fonts (0));
core.write ("Nyaa world!", 1600, 700 + 32, 16#CCCCCC#, core.fonts (1));
core.write ("Cyaa world!", 1600, 700 + 64, 16#CCCCCC#, core.fonts (2));
core.write ("Neon world!", 1600, 700 + 96, 16#CCCCCC#, core.fonts (3));
core.write ("Neon world!", 1600, 700 + 128, 16#CCCCCC#, core.fonts (4));
core.write ("Neon world!", 0, 0, 16#FFFFFF#, core.fonts (0));
end loop gameplay;