Sound

(require (planet "sound.ss" ("kazzmir" "allegro.plt")))

Function list

load-sound
destroy-sound
play-sound
play-sound-looped
stop-sound


top

procedure: (load-sound filename) :: sound

Create a sound object from a filename. Available extensions for filenames are .wav .voc


top

procedure: (destroy-sound sound) :: void

Destroy a sound object. Sound objects are not garbage collected, you must destroy them yourself.


top

procedure: (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.


top

procedure: (play-sound-looped sound [volume] [pan] [frequency]) :: void

Exactly like play-sound but the sound will loop until stop-sound is called on sound.


top

procedure: (stop-sound sound) :: void

Stops playing sound if it is currently playing. There is no effect if sound is not currently playing.