max v2;
#N vpatcher 366 59 828 383;
#P window setfont Times 10.;
#P comment 231 184 130 1310730 the pitch pattern loops every 2.4 seconds \, and the velocity pattern loops every 15 seconds;
#P comment 215 143 168 1310730 a lookup table containing a pattern of 100 velocities \, to be played in a loop;
#P window setfont "Fixedwidth Serif" 18.;
#N vtable 100 20 74 230 241 20 128;
#T set 0 32 35 38 41 43 46 49 52 55 58 60 63 66 69 72 75 77 80 83 86 89 92 94 97 100 98 96 94 92 90 88 85 83 81 79 77 75 73 71 69 67 65 63 60 58 56 54 52 50 48 51 54 57 60 63 66 69 72 75 78 81 84 82 81 79 78 76 75 73 72 70 69 67 66 64 67 69 72 74 77 79 82 84 87 89 92 94 97 99 102 104 107 109 112 114 117 119 122 124 127;
#P newobj 209 119 64 1441810 table;
#N counter 0 99;
#X flags 0 0;
#P newobj 209 92 141 1441810 counter 0 99;
#N counter 0 15;
#X flags 0 0;
#P newobj 23 92 142 1441810 counter 0 15;
#P window setfont Times 10.;
#P comment 162 264 104 1310730 show pitch and velocity;
#P comment 195 31 236 1310730 look for the moment when the tempo object is turned on \, and reset both counters to their minimum value;
#P comment 29 143 176 1310730 a lookup table containing a pattern of 16 pitches \, to be played in a loop by counter;
#P window setfont "Fixedwidth Serif" 18.;
#P number 209 243 48 18 0 0 0 22 0 0 0 221 221 221 222 222 222 0 0 0;
#P user kslider 14 243 35 1 48 36 19 7 0 128 128 128 128 128 128 255 255 255 0 0 0 0 0 0;
#P newex 23 208 108 1441810 noteout a;
#P newex 23 177 174 1441810 makenote 32 150;
#P newex 188 57 97 1441810 select 1;
#P toggle 23 34 15 0;
#P newex 23 57 108 1441810 metro 150;
#N vtable 16 20 74 230 241 970020 128;
#T set 0 57 64 67 72 55 62 65 71 53 60 64 69 52 59 62 68;
#P newobj 23 119 64 1441810 table;
#P fasten 0 0 6 0 28 173 19 173;
#P connect 2 0 1 0;
#P connect 1 0 11 0;
#P connect 11 0 0 0;
#P connect 0 0 4 0;
#P connect 4 0 5 0;
#P fasten 4 1 5 1 192 204 77 204;
#P fasten 3 0 11 2 193 84 94 84;
#P fasten 13 0 4 1 214 173 110 173;
#P fasten 2 0 3 0 28 53 193 53;
#P fasten 1 0 12 0 28 88 214 88;
#P connect 12 0 13 0;
#P connect 13 0 7 0;
#P fasten 3 0 12 2 193 84 278 84;
#P pop;