|
|
@@ -3777,26 +3777,37 @@ package Raylib is |
|
|
|
Convention => C, |
|
|
|
External_Name => "ResumeSound"; |
|
|
|
|
|
|
|
--~function bool IsSoundPlaying (Sound sound) with |
|
|
|
--~Import => True, |
|
|
|
--~Convention => C, |
|
|
|
--~External_Name => ""; |
|
|
|
|
|
|
|
--~procedure SetSoundVolume (Sound sound, float volume) with |
|
|
|
--~Import => True, |
|
|
|
--~Convention => C, |
|
|
|
--~External_Name => ""; |
|
|
|
function Is_Sound_Playing ( |
|
|
|
Data : Sound := No_Sound |
|
|
|
) return Logical with |
|
|
|
Import => True, |
|
|
|
Convention => C, |
|
|
|
External_Name => "IsSoundPlaying"; |
|
|
|
|
|
|
|
--~procedure SetSoundPitch (Sound sound, float pitch) with |
|
|
|
--~Import => True, |
|
|
|
--~Convention => C, |
|
|
|
--~External_Name => ""; |
|
|
|
procedure Set_Sound_Volume ( |
|
|
|
Data : Sound := No_Sound; |
|
|
|
Volume : Float := 0.0 |
|
|
|
) with |
|
|
|
Import => True, |
|
|
|
Convention => C, |
|
|
|
External_Name => "SetSoundVolume"; |
|
|
|
|
|
|
|
--~procedure SetSoundPan (Sound sound, float pan) with |
|
|
|
--~Import => True, |
|
|
|
--~Convention => C, |
|
|
|
--~External_Name => ""; |
|
|
|
procedure Set_Sound_Pitch ( |
|
|
|
Data : Sound := No_Sound; |
|
|
|
Pitch : Float := 0.0 |
|
|
|
) with |
|
|
|
Import => True, |
|
|
|
Convention => C, |
|
|
|
External_Name => "SetSoundPitch"; |
|
|
|
|
|
|
|
procedure Set_Sound_Pan ( |
|
|
|
Data : Sound := No_Sound; |
|
|
|
Pan : Float := 0.0 |
|
|
|
) with |
|
|
|
Import => True, |
|
|
|
Convention => C, |
|
|
|
External_Name => "SetSoundPan"; |
|
|
|
################################################################ |
|
|
|
--~function Wave WaveCopy (Wave wave) with |
|
|
|
--~Import => True, |
|
|
|
--~Convention => C, |
|
|
|