from preamble:
"Change Set: MidiEnhancements Date: 1 October 2004 Author: Markus Gaelli Some enhancements for MIDI. Now you can write code like:
|aPort| aPort:= self openOnPortNumber: 0. [aPort useInstrument: 'Woodblock' onChannel: 0. aPort playNoteNamed: 'c4' onChannel: 0. (Delay forMilliseconds: 250) wait. aPort stopNoteNamed: 'c4' onChannel: 0] ensure: [aPort close]"!