Sound functions...
This commit is contained in:
parent
30e767bf93
commit
33814ee16e
45
raylib.ads
45
raylib.ads
@ -3777,26 +3777,37 @@ package Raylib is
|
|||||||
Convention => C,
|
Convention => C,
|
||||||
External_Name => "ResumeSound";
|
External_Name => "ResumeSound";
|
||||||
|
|
||||||
--~function bool IsSoundPlaying (Sound sound) with
|
function Is_Sound_Playing (
|
||||||
--~Import => True,
|
Data : Sound := No_Sound
|
||||||
--~Convention => C,
|
) return Logical with
|
||||||
--~External_Name => "";
|
Import => True,
|
||||||
|
Convention => C,
|
||||||
|
External_Name => "IsSoundPlaying";
|
||||||
|
|
||||||
--~procedure SetSoundVolume (Sound sound, float volume) with
|
procedure Set_Sound_Volume (
|
||||||
--~Import => True,
|
Data : Sound := No_Sound;
|
||||||
--~Convention => C,
|
Volume : Float := 0.0
|
||||||
--~External_Name => "";
|
) with
|
||||||
|
Import => True,
|
||||||
|
Convention => C,
|
||||||
|
External_Name => "SetSoundVolume";
|
||||||
|
|
||||||
--~procedure SetSoundPitch (Sound sound, float pitch) with
|
procedure Set_Sound_Pitch (
|
||||||
--~Import => True,
|
Data : Sound := No_Sound;
|
||||||
--~Convention => C,
|
Pitch : Float := 0.0
|
||||||
--~External_Name => "";
|
) with
|
||||||
|
Import => True,
|
||||||
--~procedure SetSoundPan (Sound sound, float pan) with
|
Convention => C,
|
||||||
--~Import => True,
|
External_Name => "SetSoundPitch";
|
||||||
--~Convention => C,
|
|
||||||
--~External_Name => "";
|
|
||||||
|
|
||||||
|
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
|
--~function Wave WaveCopy (Wave wave) with
|
||||||
--~Import => True,
|
--~Import => True,
|
||||||
--~Convention => C,
|
--~Convention => C,
|
||||||
|
Loading…
Reference in New Issue
Block a user