[jitter] 2d sequencers

right, I finally got down to building a proper jitter sequencer for my 
Lemur:
http://www.youtube.com/watch?v=90EV0ovMzj0

This is based around two jit.poke~->jit.repos, as wonderfully 
demonstrated by Andrew Benson.

I was surprised to see how easy it was to use the Lemur to draw directly 
into a matrix, but perhaps even more surprised at how easily the data 
was used as a standard "midi sequence". Here's the bit that takes the 
matrix and spits it out a noteout - it is a quickie, done for testing, 
so replace metro with your favorite flavour of sync.

Cheers,
Andreas.

#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P newex 321 649 40 9109513 noteout;
#P newex 321 622 38 9109513 pack;
#P newex 321 580 38 9109513 unpack;
#P newex 321 559 46 9109513 listfunnel;
#P newex 321 538 90 9109513 vexpr int($f1 * 127);
#P newex 321 601 27 9109513 + 36;
#P newex 390 401 40 9109513 t i b i;
#P newex 321 517 30 9109513 zl reg;
#P newex 341 493 103 9109513 jit.spill @outputmode 1;
#P number 452 437 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P toggle 390 337 15 0;
#P newex 390 356 50 9109513 metro 100;
#N counter 0 15;
#X flags 0 0;
#P newobj 390 379 66 9109513 counter 0 15;
#P message 395 437 55 9109513 offset \$1 0;
#P user jit.pwindow 448 482 39 113 0 1 0 0 1 0;
#P newex 379 462 107 9109513 jit.submatrix @dim 1 16;
#P comment 298 457 100 9109513 matrix in here:->;
#P fasten 10 2 3 0 425 428 400 428;
#P fasten 10 2 7 0 425 428 457 428;
#P fasten 1 0 8 0 384 487 346 487;
#P fasten 1 0 2 0 384 481 454 481;
#P connect 4 0 10 0;
#P connect 5 0 4 0;
#P connect 6 0 5 0;
#P fasten 3 0 1 0 400 455 384 455;
#P connect 14 1 15 1;
#P connect 8 0 9 1;
#P connect 15 0 16 0;
#P connect 11 0 15 0;
#P connect 14 0 11 0;
#P connect 13 0 14 0;
#P connect 12 0 13 0;
#P connect 9 0 12 0;
#P fasten 10 1 9 0 410 428 326 428;
#P window clipboard copycount 17;