2024-03-18 08:03:18 -04:00
|
|
|
# raylib-ada
|
|
|
|
|
|
2024-03-18 08:06:11 -04:00
|
|
|
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;
|
|
|
|
|
```
|
