Raylib Wrapper Complete

[Lefty]

Hello all,

I have recently finished another wrapper for QB64. This time the source is included. It is a wrapper for Raylib. Raylib is a library for video game programming.

Raylib Wrapper: https://github.com/gAndy50/Qb64Wrappers

Feedback is appericated.

EDIT: Added Example on forum post.

Code: QB64: [Select]

1. 'Raylib Basic Simple Window
2. REM $include: 'raylib.bi'
3.  
4. LET w = 800
5. LET h = 600
6.  
7. CALL InitWindow(w, h, "Simple")
8.  
9. SetTargetFPS (60)
10.  
11. DIM SHARED Col AS rColor
12.  
13. Col.r = 0
14. Col.g = 255
15. Col.b = 0
16. Col.a = 255
17.  
18. DO
19.  
20.     BeginDrawing
21.  
22.     CALL ClearBackground(_RGBA32(Col.r, Col.g, Col.b, Col.a))
23.  
24.     CALL DrawText("Hello World" + CHR$(0), 10, 30, 20, _RGBA32(255, 0, 0, 255))
25.  
26.     IF IsKeyPressed(KEY_LEFT) THEN
27.         CALL DrawText("Left" + CHR$(0), 10, 60, 20, _RGBA32(255, 0, 0, 255))
28.     END IF
29.  
30.    CALL DrawFPS(10, 10)
31.  
32.     EndDrawing
33.  
34. LOOP UNTIL WindowShouldClose
35.  
36. CloseWindow
37.