(require (planet "sound.ss" ("kazzmir" "allegro.plt")))
(load-sound filename) :: sound
Create a sound object from a filename. Available extensions for filenames are .wav .voc
(destroy-sound sound) :: void
Destroy a sound object. Sound objects are not garbage collected, you must destroy them yourself.
(play-sound sound [volume] [pan] [frequency]) :: void
Plays a sound.
sound - sound object
volume - 0 <=
volume <= 255
pan - 0 <=
pan <= 255. Pan determines which speaker the sound will come out of. 0 is left, 255 is right. 128 is in the middle.
frequency - What speed to play the sound at. 1000 is the default, less is slower, and more is faster.
(play-sound-looped sound [volume] [pan] [frequency]) :: void
(stop-sound sound) :: void
sound if it is currently playing. There is no effect if
sound is not currently playing.