#N canvas 690 238 529 506 10;
#N canvas 369 136 848 500 get-note-name 0;
#X obj 42 177 select 0 1 2 3 4 5 6 7 8 9 10 11;
#X obj 38 45 inlet;
#X obj 41 68 t f f;
#X obj 44 149 % 12;
#X obj 98 91 / 12;
#X obj 99 112 int;
#X obj 98 133 - 1;
#X msg 72 218 C#;
#X msg 102 218 D;
#X msg 130 218 D#;
#X msg 162 218 E;
#X msg 192 218 F;
#X msg 222 218 F#;
#X msg 252 218 G;
#X msg 282 218 G#;
#X msg 312 218 A;
#X msg 342 218 A#;
#X msg 372 218 B;
#X msg 44 343 set \$1;
#X obj 44 319 makefilename %s%%d;
#X msg 42 218 C;
#X obj 42 293 symbol;
#X obj 44 369 makefilename nadda;
#X obj 37 402 outlet;
#X connect 0 0 20 0;
#X connect 0 1 7 0;
#X connect 0 2 8 0;
#X connect 0 3 9 0;
#X connect 0 4 10 0;
#X connect 0 5 11 0;
#X connect 0 6 12 0;
#X connect 0 7 13 0;
#X connect 0 8 14 0;
#X connect 0 9 15 0;
#X connect 0 10 16 0;
#X connect 0 11 17 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 2 1 3 0;
#X connect 3 0 0 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 22 0;
#X connect 7 0 21 0;
#X connect 8 0 21 0;
#X connect 9 0 21 0;
#X connect 10 0 21 0;
#X connect 11 0 21 0;
#X connect 12 0 21 0;
#X connect 13 0 21 0;
#X connect 14 0 21 0;
#X connect 15 0 21 0;
#X connect 16 0 21 0;
#X connect 17 0 21 0;
#X connect 18 0 22 0;
#X connect 19 0 18 0;
#X connect 20 0 21 0;
#X connect 21 0 19 0;
#X connect 22 0 23 0;
#X restore 91 189 pd get-note-name;
#X obj 252 115 int;
#X obj 231 88 t f f;
#X obj 230 140 -;
#X obj 230 164 * 100;
#X obj 90 345 list append;
#X obj 91 372 list trim;
#X obj 93 59 inlet;
#X obj 91 408 outlet;
#X obj 228 216 int;
#X obj 229 190 + 0.5;
#X obj 92 166 int;
#X obj 92 90 t f f;
#X text 96 18 input MIDI # and output LETTER-OCTAVE cents;
#X obj 229 242 select 0;
#X obj 279 358 makefilename +%dc;
#X obj 330 336 makefilename -%dc;
#X msg 228 266 bang;
#X obj 92 135 + 0.5;
#X obj 347 273 t b f;
#X obj 362 299 -;
#X msg 327 298 100;
#X obj 279 264 moses 50;
#X connect 0 0 5 0;
#X connect 1 0 3 1;
#X connect 2 0 3 0;
#X connect 2 1 1 0;
#X connect 3 0 4 0;
#X connect 4 0 10 0;
#X connect 5 0 6 0;
#X connect 6 0 8 0;
#X connect 7 0 12 0;
#X connect 9 0 14 0;
#X connect 10 0 9 0;
#X connect 11 0 0 0;
#X connect 12 0 18 0;
#X connect 12 1 2 0;
#X connect 14 0 17 0;
#X connect 14 1 22 0;
#X connect 15 0 5 1;
#X connect 16 0 5 1;
#X connect 17 0 5 1;
#X connect 18 0 11 0;
#X connect 19 0 21 0;
#X connect 19 1 20 1;
#X connect 20 0 16 0;
#X connect 21 0 20 0;
#X connect 22 0 15 0;
#X connect 22 1 19 0;