Karl Ramberg uploaded a new version of Sound to project Etoys: http://source.squeak.org/etoys/Sound-kfr.19.mcz
==================== Summary ====================
Name: Sound-kfr.19 Author: kfr Time: 19 July 2011, 2:30:28 am UUID: 77e55006-0169-884c-b36d-34592e02ab51 Ancestors: Sound-kfr.18
Do not initialize SounPlayer every time sound is played
=============== Diff against Sound-kfr.17 ===============
Item was changed: ----- Method: SoundPlayer class>>initialize (in category 'initialization') ----- initialize "SoundPlayer initialize; shutDown; startUp" "Details: BufferMSecs represents a tradeoff between latency and quality. If BufferMSecs is too low, the sound will not play smoothly, especially during long-running primitives such as large BitBlts. If BufferMSecs is too high, there will be a long time lag between when a sound buffer is submitted to be played and when that sound is actually heard. BufferMSecs is typically in the range 50-200."
SamplingRate := 22050. BufferMSecs := 120. Stereo := true. + Preferences - "Preferences addPreference: #soundReverb categories: #(media) default: true balloonHelp: 'If true, a little echo will be added, making it sound as if it is in a larger space.' projectLocal: true changeInformee: self changeSelector: #reverbChanged.
+ self reverbChanged. - self reverbChanged." !
Item was changed: ----- Method: SoundPlayer class>>startUpWithSound: (in category 'snapshotting') ----- startUpWithSound: aSound "Start up the player process."
+ "SoundPlayer initialize." - SoundPlayer initialize. SoundPlayer startPlayerProcessBufferSize: (BufferMSecs * SamplingRate) // 1000 rate: SamplingRate stereo: Stereo sound: aSound. !