123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960 |
- #N canvas 199 63 798 509 16;
- #X declare -path ../lib;
- #X msg 318 275 a b c#/db d e f#/gb g#/ab;
- #X obj 320 200 notes;
- #X floatatom 381 4 5 0 0 0 - - -, f 5;
- #X floatatom 309 4 5 0 0 0 - - -, f 5;
- #X symbolatom 319 62 5 0 0 0 - - -, f 5;
- #X symbolatom 387 63 15 0 0 0 - - -, f 15;
- #X obj 387 34 mode;
- #X obj 319 164 octave;
- #X floatatom 382 124 5 0 0 0 - - -, f 5;
- #X obj 319 235 list-set;
- #X text 486 33 make SECTION obj;
- #X msg 655 83 \; pd dsp 1;
- #X obj 165 133 list-map;
- #X obj 93 234 list-reduce;
- #X msg 162 85 0 2 4;
- #X obj 87 298 notes~;
- #X obj 85 345 *~ 0.3;
- #X obj 93 436 dac~;
- #X text 437 179 harmonic progression;
- #X text 453 209 (a sort of counter?);
- #X obj 172 364 circle-of-fifths;
- #X floatatom 167 328 5 0 0 0 - - -, f 5;
- #X msg 235 333 0;
- #X symbolatom 291 457 10 0 0 0 - - -, f 10;
- #X obj 22 18 declare -path ../lib;
- #X symbolatom 166 433 10 0 0 0 - - -, f 10;
- #X obj 207 168 list-ref;
- #X obj 319 117 scala;
- #X obj 318 35 note;
- #X obj 291 411 note;
- #X obj 171 397 note;
- #X connect 1 0 9 0;
- #X connect 2 0 6 0;
- #X connect 2 0 27 1;
- #X connect 3 0 27 0;
- #X connect 3 0 28 0;
- #X connect 6 0 5 0;
- #X connect 7 0 1 0;
- #X connect 7 0 26 1;
- #X connect 8 0 7 1;
- #X connect 9 0 0 0;
- #X connect 12 0 13 0;
- #X connect 12 1 26 0;
- #X connect 13 0 15 0;
- #X connect 14 0 12 0;
- #X connect 15 0 16 0;
- #X connect 16 0 17 0;
- #X connect 16 0 17 1;
- #X connect 20 0 30 0;
- #X connect 20 1 29 0;
- #X connect 21 0 20 0;
- #X connect 22 0 20 0;
- #X connect 26 0 13 1;
- #X connect 27 0 7 0;
- #X connect 28 0 4 0;
- #X connect 29 0 23 0;
- #X connect 30 0 25 0;
|