By the way, does anyone remember the origin of this song? It would be nice to give the example a strong name, and I could perpetuate the composer in a method comment. :-)

________________________________
Von: Squeak-dev <squeak-dev-bounces at lists.squeakfoundation.org> im Auftrag von commits at source.squeak.org <commits at source.squeak.org>
Gesendet: Dienstag, 1. Oktober 2019 20:29:52
An: squeak-dev at lists.squeakfoundation.org
Betreff: [squeak-dev] The Inbox: MorphicExtras-ct.270.mcz

A new version of MorphicExtras was added to project The Inbox:
http://source.squeak.org/inbox/MorphicExtras-ct.270.mcz

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

Name: MorphicExtras-ct.270
Author: ct
Time: 1 October 2019, 8:29:45.819339 pm
UUID: ddef6e73-100a-5e49-bfb6-58a2571d53a1
Ancestors: MorphicExtras-ct.267

Add MIDIScore example

Depends on MorphicExtras-ct.266 and Sound-ct.69.

This commit is part of reconstruction of Objectland (also known as "The Worlds of Squeak"). For more information, see: http://forum.world.st/The-Inbox-MorphicExtras-ct-267-mcz-td5104764.html

=============== Diff against MorphicExtras-ct.267 ===============

Item was added:
+ ----- Method: MIDIScore class>>extraExample (in category '*MorphicExtras-examples') -----
+ extraExample
+        "(ScorePlayerMorph on: MIDIScore extraExample) openInWorld"
+
+        | tracks |
+        tracks := self extraExampleTrackData collect: [:track | (ReferenceStream on:
+                (Base64MimeConverter mimeDecodeToBytes: track readStream)) next].
+        ^ self new
+                tracks: tracks values trackInfo: tracks keys;
+                ticksPerQuarterNote: 96;
+                tempoMap: self extraExampleTempoMap;
+                yourself!

Item was added:
+ ----- Method: MIDIScore class>>extraExampleTempoMap (in category '*MorphicExtras-examples') -----
+ extraExampleTempoMap
+
+        ^ {0->750000 . 26496->769230 . 26592->789473 . 26688->810810 . 26784->833333 . 26880->857142 . 26976->882352 . 27072->909090}
+                collect: [:tempoData | TempoEvent time: tempoData key tempo: tempoData value]!

Item was added:
+ ----- Method: MIDIScore class>>extraExampleTrackData (in category '*MorphicExtras-examples') -----
(excessive size, no diff calculated)


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20191001/2a1931d5/attachment.html>