A Tune message.
Tune events have no field.
Creates a Tune event and returns a pointer to the event or NIL if there is no more memory space.
MidiEvPtr Tune ( long date, short port) { MidiEvPtr e; if ( e = MidiNewEv( typeTune ) )/* Allocate a new event. Check not NIL*/ { Date(e) = date; /* These information are common to all */ Port(e) = port; /* kind of events */ } return e; }