From 2d12d1d81986d1451261b5393615a5af015e1468 Mon Sep 17 00:00:00 2001 From: xolatile Date: Mon, 18 Mar 2024 08:06:11 -0400 Subject: Initial bindings and window example... --- README.md | 22 +++++++++++++++++++++- 1 file changed, 21 insertions(+), 1 deletion(-) (limited to 'README.md') diff --git a/README.md b/README.md index c55ee3c..be82612 100644 --- a/README.md +++ b/README.md @@ -1,3 +1,23 @@ # raylib-ada -Ada bindings for Raylib 5.1 library. \ No newline at end of file +Ada bindings for Raylib 5.1 library. + +```ada +with Raylib; +use Raylib; + +procedure Window is +begin + Open_Window (720, 360, "Heyo Raylib!" & Character'Val (0)); + -- + Main_Loop: loop + exit when Window_Should_Close; + -- + Begin_Drawing; + Clear_Background (Blue); + End_Drawing; + end loop Main_Loop; + -- + Close_Window; +end Window; +``` -- cgit v1.2.3