Christoph Thiede uploaded a new version of EToys to project The Trunk: http://source.squeak.org/trunk/EToys-ct.456.mcz
==================== Summary ====================
Name: EToys-ct.456 Author: ct Time: 3 January 2022, 11:24:44.399397 pm UUID: 3dc9971f-ab6e-3448-a995-12a039badca5 Ancestors: EToys-ct.455
Complements MorphicExtras-ct.305 (two fixes for MIDI).
=============== Diff against EToys-ct.455 ===============
Item was added: + ----- Method: MIDIPianoKeyboardMorph>>basicMouseDownPitch: (in category 'simple keyboard') ----- + basicMouseDownPitch: midiKey + + midiPort ifNil: [^ super basicMouseDownPitch: midiKey - 1]. + + soundPlaying + ifNil: [midiPort ensureOpen] + ifNotNil: [self turnOffNote]. + self turnOnNote: midiKey + 23.!
Item was added: + ----- Method: MIDIPianoKeyboardMorph>>basicMouseUpPitch: (in category 'simple keyboard') ----- + basicMouseUpPitch: midiKey + + midiPort ifNil: [ + ^ super basicMouseUpPitch: midiKey]. + + soundPlaying ifNotNil: [self turnOffNote].!
Item was removed: - ----- Method: MIDIPianoKeyboardMorph>>mouseDownPitch:event:noteMorph: (in category 'simple keyboard') ----- - mouseDownPitch: midiKey event: event noteMorph: noteMorph - - midiPort ifNil: [^ super mouseDownPitch: midiKey-1 event: event noteMorph: noteMorph]. - noteMorph color: playingKeyColor. - soundPlaying - ifNil: [midiPort ensureOpen] - ifNotNil: [self turnOffNote]. - self turnOnNote: midiKey + 23. - !
Item was removed: - ----- Method: MIDIPianoKeyboardMorph>>mouseUpPitch:event:noteMorph: (in category 'simple keyboard') ----- - mouseUpPitch: midiKey event: event noteMorph: noteMorph - - midiPort ifNil: [ - ^ super mouseUpPitch: midiKey event: event noteMorph: noteMorph]. - - noteMorph color: - ((#(0 1 3 5 6 8 10) includes: midiKey \ 12) - ifTrue: [whiteKeyColor] - ifFalse: [blackKeyColor]). - soundPlaying ifNotNil: [self turnOffNote]. - !
squeak-dev@lists.squeakfoundation.org