typeTune (code 14)

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;
}