The Trunk: Sound-eem.79.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Sound-eem.79.mcz

commits-2
Eliot Miranda uploaded a new version of Sound to project The Trunk:
http://source.squeak.org/trunk/Sound-eem.79.mcz

==================== Summary ====================

Name: Sound-eem.79
Author: eem
Time: 11 May 2021, 8:08:51.274095 pm
UUID: 10321fa9-6db8-4ca9-b3fc-ed5d41db23fa
Ancestors: Sound-mt.78

Somewhat nicer executable comments for listening to sounds in the libraries.

=============== Diff against Sound-mt.78 ===============

Item was changed:
  ----- Method: AbstractSound class>>soundNames (in category 'sound library') -----
  soundNames
 
+ "AbstractSound soundNames asSortedCollection do:
+ [:n |
+ (n padded: #right to: 10 with: $ ) asParagraph displayAt: Sensor cursorPoint - 32.
+ (AbstractSound soundNamed: n) ifNotNil:
+ [:s| s playAndWaitUntilDone. (Delay forMilliseconds: 250) wait]]"
+
  ^ Sounds keys asArray sort
  !

Item was changed:
  ----- Method: SampledSound class>>soundNames (in category 'sound library') -----
  soundNames
  "Answer a list of sound names for the sounds stored in the sound library."
+ "SampledSound soundNames asSortedCollection do:
+ [:n |
+ (n padded: #right to: 10 with: $ ) asParagraph displayAt: Sensor cursorPoint - 32.
+ (SampledSound soundNamed: n) ifNotNil:
+ [:s| s playAndWaitUntilDone. (Delay forMilliseconds: 250) wait]]"
- "| s |
- SampledSound soundNames asSortedCollection do: [:n |
- n asParagraph display.
- s := SampledSound soundNamed: n.
- s ifNotNil: [s playAndWaitUntilDone]]"
 
  ^ SoundLibrary keys asArray
  !