#N canvas 0 22 827 604 10; #N canvas 0 22 450 300 graph1 0; #X array notelist 32 float 0; #X coords 0 127 31 0 128 128 1; #X restore 529 134 graph; #X msg 251 50 \; notelist 0 66 66 67 69 69 67 66 64 62 62 64 66 66 64 64 57 66 66 67 69 69 67 66 64 62 62 64 66 64 62 62 50; #X obj 192 337 tabread notelist; #X obj 134 224 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 134 266 float 0; #X obj 128 452 line~; #X obj 150 297 + 1; #X msg 134 338 0; #X obj 192 357 mtof; #X obj 192 377 osc~; #X obj 19 87 key; #X obj 19 106 select 32; #X obj 19 125 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X msg 19 142 \; pd dsp \$1; #X obj 145 477 *~; #X obj 133 504 dac~; #X obj 31 12 loadbang; #X msg 128 404 0.5 50; #X obj 134 243 metro 400; #X obj 59 404 delay 200; #X msg 59 424 0 200; #X obj 134 317 select 32; #X obj 128 376 t b; #X text 15 172 This part of the program enables you to turn DSP on and off by typing the space bar (ASCII code 32).; #X text 252 92 The first word is the array name \, the first number is the index (address) at which to start \, and the rest of the numbers are to be placed in the array \, starting at the specified index location. ; #X text 250 362 Count from 0 to 32 Use 0 to 31 as indices to read numbers from the array \, convert those numbers to frequencies for an oscillator \, and at the same time trigger the audio amplitude to go up and down to play a note. (Use 32 to stop the metro and reset the counter.); #X text 315 32 This part of the program fills an array with 32 pitches. ; #X text -109 29 sends a bang automatically when the patch is loaded ; #X connect 2 0 8 0; #X connect 3 0 18 0; #X connect 4 0 6 0; #X connect 4 0 21 0; #X connect 5 0 14 0; #X connect 6 0 4 1; #X connect 7 0 4 1; #X connect 7 0 3 0; #X connect 8 0 9 0; #X connect 9 0 14 1; #X connect 10 0 11 0; #X connect 11 0 12 0; #X connect 12 0 13 0; #X connect 14 0 15 0; #X connect 14 0 15 1; #X connect 16 0 1 0; #X connect 17 0 5 0; #X connect 18 0 4 0; #X connect 19 0 20 0; #X connect 20 0 5 0; #X connect 21 0 7 0; #X connect 21 1 2 0; #X connect 21 1 22 0; #X connect 22 0 19 0; #X connect 22 0 17 0;