aboutsummaryrefslogtreecommitdiff
path: root/example
diff options
context:
space:
mode:
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