aboutsummaryrefslogtreecommitdiff
path: root/example
diff options
context:
space:
mode:
authorxolatile2024-04-23 11:44:25 -0400
committerxolatile2024-04-23 11:44:25 -0400
commit2eafb4d3234dde2e53a099820475fc9ca8e481d4 (patch)
tree1448d9db115129cf436e33a13a5328dda417036b /example
parentb8bcd7014fa1b543e5cf86f0f685efc198d43a75 (diff)
downloadxolatile-raylib-ada-2eafb4d3234dde2e53a099820475fc9ca8e481d4.tar.xz
xolatile-raylib-ada-2eafb4d3234dde2e53a099820475fc9ca8e481d4.tar.zst
Preview example and font...
Diffstat (limited to 'example')
-rw-r--r--example/preview.adb (renamed from example/texture.adb)12
-rw-r--r--example/resource/alagard.pngbin0 -> 49037 bytes
2 files changed, 9 insertions, 3 deletions
diff --git a/example/texture.adb b/example/preview.adb
index c4fa5e2..5836ebe 100644
--- a/example/texture.adb
+++ b/example/preview.adb
@@ -1,18 +1,24 @@
with Raylib;
use Raylib;
-procedure Window is
+procedure Preview is
+
+ Map : Texture := No_Texture;
begin
Open_Window (1280, 720, "Pandemos Empire" & ASCII.NUL);
--
+ Map := Load_Texture ("./example/resource/pandemos.png" & ASCII.NUL);
+ --
Main_Loop: loop
exit when Window_Should_Close;
--
Begin_Drawing;
- Clear_Background;
+ Draw_Texture (Map);
End_Drawing;
end loop Main_Loop;
--
+ Unload_Texture (Map);
+ --
Close_Window;
-end Window;
+end Preview;
diff --git a/example/resource/alagard.png b/example/resource/alagard.png
new file mode 100644
index 0000000..9b31826
--- /dev/null
+++ b/example/resource/alagard.png
Binary files differ