<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=us-ascii">
<meta name="Generator" content="Microsoft Exchange Server">
<!-- converted from text --><style><!-- .EmailQuote { margin-left: 1pt; padding-left: 4pt; border-left: #800000 2px solid; } --></style>
</head>
<body>
<meta content="text/html; charset=UTF-8">
<style type="text/css" style="">
<!--
p
{margin-top:0;
margin-bottom:0}
-->
</style>
<div dir="ltr">
<div id="x_divtagdefaultwrapper" dir="ltr" style="font-size:12pt; color:#000000; font-family:Calibri,Helvetica,sans-serif">
<p>Fun fact: If you use MIDI instead of built-in sounds, there is even a drum (even though it is not listed in the piano roll). :-)</p>
<p><br>
</p>
<p>Best,</p>
<p>Christoph</p>
</div>
<hr tabindex="-1" style="display:inline-block; width:98%">
<div id="x_divRplyFwdMsg" dir="ltr"><font face="Calibri, sans-serif" color="#000000" style="font-size:11pt"><b>Von:</b> Squeak-dev <squeak-dev-bounces@lists.squeakfoundation.org> im Auftrag von commits@source.squeak.org <commits@source.squeak.org><br>
<b>Gesendet:</b> Donnerstag, 25. August 2022 15:58:02<br>
<b>An:</b> squeak-dev@lists.squeakfoundation.org; packages@lists.squeakfoundation.org<br>
<b>Betreff:</b> [squeak-dev] The Trunk: MorphicExtras-ct.330.mcz</font>
<div> </div>
</div>
</div>
<font size="2"><span style="font-size:10pt;">
<div class="PlainText">Christoph Thiede uploaded a new version of MorphicExtras to project The Trunk:<br>
<a href="http://source.squeak.org/trunk/MorphicExtras-ct.330.mcz">http://source.squeak.org/trunk/MorphicExtras-ct.330.mcz</a><br>
<br>
==================== Summary ====================<br>
<br>
Name: MorphicExtras-ct.330<br>
Author: ct<br>
Time: 25 August 2022, 3:57:58.536239 pm<br>
UUID: 2e1c5775-6f30-154d-b1ba-77d1d443e805<br>
Ancestors: MorphicExtras-ct.329<br>
<br>
In the Score Player example, use different instruments as intended by the example track. Adds ScorePlayerMorph>>#atTrack:selectInstrument:.<br>
<br>
=============== Diff against MorphicExtras-ct.329 ===============<br>
<br>
Item was changed:<br>
----- Method: ScorePlayerMorph class>>extraExample (in category '*MorphicExtras-examples') -----<br>
extraExample<br>
"ScorePlayerMorph extraExample openInHand"<br>
<br>
+ | scorePlayerMorph |<br>
+ scorePlayerMorph := self on: MIDIScore extraExample.<br>
+ #('organ1' 'oboe1' 'brass1' 'oboe1' 'oboe2' 'bass1' 'bassoon1' 'bass1' 'pluckedElecBass' 'bass1')<br>
+ withIndexDo: [:name :index |<br>
+ scorePlayerMorph atTrack: index selectInstrument: name].<br>
+ ^ scorePlayerMorph!<br>
- ^ self on: MIDIScore extraExample!<br>
<br>
Item was added:<br>
+ ----- Method: ScorePlayerMorph>>atTrack:selectInstrument: (in category 'controls') -----<br>
+ atTrack: trackIndex selectInstrument: selection<br>
+ <br>
+ ^ self atTrack: trackIndex from: (instrumentSelector at: trackIndex) selectInstrument: selection!<br>
<br>
<br>
</div>
</span></font>
</body>
</html>