From 3a9c6414b170bf69fc9d7bb4db5e296ba01fcaa3 Mon Sep 17 00:00:00 2001 From: rexim Date: Sat, 9 Mar 2024 00:47:10 +0700 Subject: Implement Bomb placing mode --- raylib.ads | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'raylib.ads') diff --git a/raylib.ads b/raylib.ads index d23c4b2..da8ae67 100644 --- a/raylib.ads +++ b/raylib.ads @@ -66,7 +66,8 @@ package Raylib is KEY_W: constant int := 87; KEY_A: constant int := 65; KEY_D: constant int := 68; - function Is_Key_Pressed(key: int) return int + KEY_SPACE: constant int := 32; + function Is_Key_Pressed(key: int) return C_bool with Import => True, Convention => C, @@ -115,4 +116,9 @@ package Raylib is Import => True, Convention => C, External_Name => "DrawCircleV"; + function Is_Key_Down(Key: int) return C_Bool + with + Import => True, + Convention => C, + External_Name => "IsKeyDown"; end Raylib; -- cgit v1.2.3