47 lines
1.0 KiB
Plaintext
47 lines
1.0 KiB
Plaintext
#N canvas 586 402 770 584 12;
|
|
#X msg 205 142 0;
|
|
#X obj 163 142 until;
|
|
#X obj 163 167 f;
|
|
#X obj 163 192 + 1;
|
|
#X obj 195 243 - 1;
|
|
#X obj 195 338 tabread scale;
|
|
#X obj 195 373 +;
|
|
#X obj 195 398 t f f;
|
|
#X obj 177 426 f;
|
|
#X obj 177 451 t f b;
|
|
#X msg 222 451 0;
|
|
#X obj 163 217 t f f;
|
|
#X obj 163 276 sel;
|
|
#X obj 173 114 t b f b f, f 12;
|
|
#X obj 141 53 inlet scale_degree;
|
|
#X obj 126 482 outlet;
|
|
#X obj 141 78 sel 0;
|
|
#X msg 127 169 0;
|
|
#X obj 195 305 expr ($f1 + mode) % scale_length;
|
|
#X text 4 11 TODO clean this bullshit up \, comment it;
|
|
#X connect 0 0 2 1;
|
|
#X connect 1 0 2 0;
|
|
#X connect 2 0 3 0;
|
|
#X connect 3 0 2 1;
|
|
#X connect 3 0 11 0;
|
|
#X connect 4 0 18 0;
|
|
#X connect 5 0 6 0;
|
|
#X connect 6 0 7 0;
|
|
#X connect 7 0 8 1;
|
|
#X connect 7 1 6 1;
|
|
#X connect 8 0 9 0;
|
|
#X connect 9 0 15 0;
|
|
#X connect 9 1 10 0;
|
|
#X connect 10 0 7 0;
|
|
#X connect 11 0 12 0;
|
|
#X connect 11 1 4 0;
|
|
#X connect 12 0 8 0;
|
|
#X connect 13 1 1 0;
|
|
#X connect 13 2 0 0;
|
|
#X connect 13 3 12 1;
|
|
#X connect 14 0 16 0;
|
|
#X connect 16 0 17 0;
|
|
#X connect 16 1 13 0;
|
|
#X connect 17 0 15 0;
|
|
#X connect 18 0 5 0;
|