[squeak-dev] The Trunk: MorphicExtras-ct.330.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Aug 25 13:58:02 UTC 2022


Christoph Thiede uploaded a new version of MorphicExtras to project The Trunk:
http://source.squeak.org/trunk/MorphicExtras-ct.330.mcz

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

Name: MorphicExtras-ct.330
Author: ct
Time: 25 August 2022, 3:57:58.536239 pm
UUID: 2e1c5775-6f30-154d-b1ba-77d1d443e805
Ancestors: MorphicExtras-ct.329

In the Score Player example, use different instruments as intended by the example track. Adds ScorePlayerMorph>>#atTrack:selectInstrument:.

=============== Diff against MorphicExtras-ct.329 ===============

Item was changed:
  ----- Method: ScorePlayerMorph class>>extraExample (in category '*MorphicExtras-examples') -----
  extraExample
  	"ScorePlayerMorph extraExample openInHand"
  
+ 	| scorePlayerMorph |
+ 	scorePlayerMorph := self on: MIDIScore extraExample.
+ 	#('organ1' 'oboe1' 'brass1' 'oboe1' 'oboe2' 'bass1' 'bassoon1' 'bass1' 'pluckedElecBass' 'bass1')
+ 		withIndexDo: [:name :index |
+ 			scorePlayerMorph atTrack: index selectInstrument: name].
+ 	^ scorePlayerMorph!
- 	^ self on: MIDIScore extraExample!

Item was added:
+ ----- Method: ScorePlayerMorph>>atTrack:selectInstrument: (in category 'controls') -----
+ atTrack: trackIndex selectInstrument: selection
+ 
+ 	^ self atTrack: trackIndex from: (instrumentSelector at: trackIndex) selectInstrument: selection!



More information about the Squeak-dev mailing list