// 39.ck : midi (fail-correct)

sinosc s => dac;

MidiIn min;
MidiMsg msg;

// open (see 'chuck --probe')
if( !min.open( 0 ) )
{
    <<<"bad">>>;
    me.exit();
}

// infinite time loop
while( true )
{
    // poll (also see events)
    while( min.recv( msg ) )
    {
        <<<msg.data3>>>;
	if( msg.data1 == 144 ) // note on
	{
            <<<msg.data1>>>;
            std.mtof(msg.data2) => s.freq;
            msg.data3 / 128.0 => s.gain;
	}
    }

    // wait
    5::ms => now;
}