Tuesday Masheen v.0.1 update

8indexcount.pd

@@ -0,0 +1,52 @@
+#N canvas 902 178 839 786 12;
+#X floatatom 94 461 5 0 0 0 - - -;
+#X floatatom 136 459 5 0 0 0 - - -;
+#X floatatom 177 459 5 0 0 0 - - -;
+#X obj 148 161 unpack f f f f f f f f;
+#X floatatom 222 460 5 0 0 0 - - -;
+#X floatatom 270 459 5 0 0 0 - - -;
+#X floatatom 313 460 5 0 0 0 - - -;
+#X floatatom 358 458 5 0 0 0 - - -;
+#X floatatom 411 459 5 0 0 0 - - -;
+#X obj 213 377 select 0 1 2 3 4 5 6 7;
+#X obj 450 253 counter;
+#X floatatom 456 287 5 0 0 0 - - -;
+#X floatatom 479 382 5 0 0 0 - - -;
+#X obj 449 324 % 8;
+#X floatatom 368 553 5 0 0 0 - - -;
+#X obj 186 97 inlet;
+#X text 253 59 Takes a list and BPM. Returns each index of the list
+by rhythm count;
+#X obj 366 610 outlet;
+#X obj 422 165 inlet;
+#X connect 0 0 14 0;
+#X connect 1 0 14 0;
+#X connect 2 0 14 0;
+#X connect 3 0 0 0;
+#X connect 3 1 1 0;
+#X connect 3 2 2 0;
+#X connect 3 3 4 0;
+#X connect 3 4 5 0;
+#X connect 3 5 6 0;
+#X connect 3 6 7 0;
+#X connect 3 7 8 0;
+#X connect 4 0 14 0;
+#X connect 5 0 14 0;
+#X connect 6 0 14 0;
+#X connect 7 0 14 0;
+#X connect 8 0 14 0;
+#X connect 9 0 0 0;
+#X connect 9 1 1 0;
+#X connect 9 2 2 0;
+#X connect 9 3 4 0;
+#X connect 9 4 5 0;
+#X connect 9 5 6 0;
+#X connect 9 6 7 0;
+#X connect 9 7 8 0;
+#X connect 10 0 11 0;
+#X connect 11 0 13 0;
+#X connect 13 0 12 0;
+#X connect 13 0 9 0;
+#X connect 14 0 17 0;
+#X connect 15 0 3 0;
+#X connect 18 0 10 0;

counter.pd

@@ -0,0 +1,17 @@
+#N canvas 1014 294 450 647 12;
+#X obj 151 350 f;
+#X obj 197 354 + 1;
+#X obj 152 286 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X floatatom 149 394 5 0 0 0 - - -;
+#X msg 193 284 0;
+#X obj 149 221 inlet;
+#X obj 144 443 outlet;
+#X text 145 112 takes: signal;
+#X connect 0 0 1 0;
+#X connect 0 0 3 0;
+#X connect 1 0 0 1;
+#X connect 2 0 0 0;
+#X connect 3 0 6 0;
+#X connect 4 0 0 1;
+#X connect 5 0 2 0;

four_count.pd

@@ -0,0 +1,23 @@
+#N canvas 843 418 450 499 12;
+#X obj 145 124 counter;
+#X floatatom 145 160 5 0 0 0 - - -;
+#X floatatom 171 253 5 0 0 0 - - -;
+#X obj 145 206 % 4;
+#X obj 145 294 select 0 1 2 3;
+#X obj 147 77 inlet;
+#X text 128 42 Takes: signal \, metro rate;
+#X obj 140 354 outlet;
+#X obj 197 355 outlet;
+#X obj 247 355 outlet;
+#X obj 304 356 outlet;
+#X obj 362 361 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 3 0 2 0;
+#X connect 3 0 4 0;
+#X connect 4 0 7 0;
+#X connect 4 1 8 0;
+#X connect 4 2 9 0;
+#X connect 4 3 10 0;
+#X connect 4 4 11 0;
+#X connect 5 0 0 0;

houchl.pd

@@ -0,0 +1,59 @@
+#N canvas 603 251 1040 618 12;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array melody 16 float 3;
+#A 0 74 86 86 74 86 74 74 84 74 74 82 74 84 74 77 74;
+#X coords 0 120 16 0 200 140 1 0 0;
+#X restore 281 144 graph;
+#X floatatom 37 241 5 0 0 0 - - -;
+#X floatatom 37 305 5 0 0 0 - - -;
+#X obj 37 67 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1
+;
+#X floatatom 104 65 5 0 0 0 - - -;
+#X obj 37 107 metro 1000;
+#X msg 94 129 0;
+#X obj 37 162 f;
+#X obj 92 161 + 1;
+#X obj 37 334 mtof;
+#X floatatom 37 373 5 0 0 0 - - -;
+#X obj 152 406 line~;
+#X obj 38 470 *~;
+#X floatatom 37 187 5 0 0 0 - - -;
+#X msg 211 359 0 50;
+#X obj 37 417 osc~ 440;
+#X obj 38 26 inlet~;
+#X obj 108 30 inlet;
+#X obj 37 580 outlet~;
+#X obj 111 577 outlet;
+#X msg 152 359 1.7 60;
+#X msg 283 320 \; melody 0 74 86 86 74 86 74 74 84 74 74 82 74 84 74
+77 74 89;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array melody2 40 float 3;
+#A 0 85 78 78 85 78 78 85 78 86 78 85 78 78 85 78 78 85 78 86 78 84
+77 77 84 77 77 84 77 85 77 84 77 77 84 77 77 84 77 85 77;
+#X coords 0 110 40 0 200 140 1 0 0;
+#X restore 579 142 graph;
+#X obj 37 275 tabread melody2;
+#X msg 281 377 \; melody2 0 85 78 78 85 78 78 85 78 86 78 85 78 78
+85 78 78 85 78 86 78 84 77 77 84 77 77 84 77 85 77 84 77 77 84 77 77
+84 77 85 77;
+#X obj 37 215 % 40;
+#X connect 1 0 23 0;
+#X connect 2 0 9 0;
+#X connect 3 0 5 0;
+#X connect 4 0 5 1;
+#X connect 5 0 7 0;
+#X connect 6 0 7 1;
+#X connect 7 0 8 0;
+#X connect 7 0 13 0;
+#X connect 8 0 7 1;
+#X connect 9 0 10 0;
+#X connect 10 0 15 0;
+#X connect 11 0 12 1;
+#X connect 12 0 18 0;
+#X connect 13 0 25 0;
+#X connect 14 0 11 0;
+#X connect 15 0 12 0;
+#X connect 20 0 11 0;
+#X connect 23 0 2 0;
+#X connect 25 0 1 0;

johnsz2.pd

@@ -0,0 +1,85 @@
+#N canvas 2488 66 968 718 12;
+#X obj 57 17 receive johnsz2_tempo;
+#X obj 334 17 receive johnsz2_control;
+#X obj 655 7 inlet;
+#X obj 339 583 outlet;
+#X obj 58 64 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 106 267 f;
+#X floatatom 106 291 5 0 0 0 - - -;
+#X obj 150 267 + 1;
+#X obj 106 317 % 16;
+#X floatatom 106 342 5 0 0 0 - - -;
+#X obj 106 377 tabread melody;
+#X floatatom 106 401 5 0 0 0 - - -;
+#X obj 106 487 osc~;
+#X obj 106 424 mtof;
+#X floatatom 106 448 5 0 0 0 - - -;
+#X obj 224 380 s mycoolbang;
+#X obj 171 97 tabread durations;
+#X floatatom 170 127 5 0 0 0 - - -;
+#X obj 173 47 r mycoolbang;
+#X obj 170 159 * 200;
+#X msg 162 472 0.005 200;
+#X msg 253 470 0 200;
+#X obj 190 505 line~;
+#X obj 110 539 *~;
+#X obj 403 58 list prepend set;
+#X obj 404 93 list trim;
+#X msg 399 126 1 2 3 4 5;
+#X obj 535 9 inlet~;
+#X obj 342 152 unpack f f f f f;
+#X floatatom 399 287 5 0 0 0 - - -;
+#X floatatom 412 267 5 0 0 0 - - -;
+#X floatatom 424 247 5 0 0 0 - - -;
+#X floatatom 438 227 5 0 0 0 - - -;
+#X floatatom 450 207 5 0 0 0 - - -;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array melody 16 float 3;
+#A 0 70 63 0 65 0 0 71 0 70 70 63 0 66 70 0 70;
+#X coords 0 127 16 0 200 140 1 0 0;
+#X restore 440 330 graph;
+#X msg 418 524 \; melody 0 60 62 64 65 67 69 71 72 73 74 75 76 77 78
+79 80;
+#N canvas 0 50 450 250 (subpatch) 0;
+#X array durations 16 float 3;
+#A 0 1 1 1 1 2 2 4 4 1 1 1 1 2 2 4 8;
+#X coords 0 10 16 0 200 140 1 0 0;
+#X restore 681 337 graph;
+#X text 498 489 the semicolon is really a shorthand notation for "send"
+;
+#X msg 486 627 \; durations 0 1 1 1 1 2 2 4 4 1 1 1 1 2 2 4 8;
+#X obj 119 591 outlet~;
+#X obj 96 225 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X msg 497 565 \; melody 0 70 63 0 65 0 0 71 0 70 70 63 0 66 70 0;
+#X connect 0 0 4 0;
+#X connect 1 0 24 0;
+#X connect 1 0 28 0;
+#X connect 4 0 40 0;
+#X connect 5 0 6 0;
+#X connect 5 0 7 0;
+#X connect 6 0 8 0;
+#X connect 7 0 5 1;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 9 0 15 0;
+#X connect 10 0 11 0;
+#X connect 11 0 13 0;
+#X connect 12 0 23 0;
+#X connect 13 0 14 0;
+#X connect 14 0 12 0;
+#X connect 16 0 17 0;
+#X connect 17 0 19 0;
+#X connect 20 0 22 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 1;
+#X connect 23 0 39 0;
+#X connect 24 0 25 0;
+#X connect 25 0 26 0;
+#X connect 28 0 29 0;
+#X connect 28 1 30 0;
+#X connect 28 2 31 0;
+#X connect 28 3 32 0;
+#X connect 28 4 33 0;
+#X connect 40 0 5 0;

martse.pd

@@ -0,0 +1,55 @@
+#N canvas 656 102 506 657 12;
+#X obj 12 420 outlet~;
+#X obj 18 13 inlet~;
+#X obj 70 13 inlet;
+#X obj 85 420 outlet;
+#X obj 221 18 receive martse_tempo;
+#X obj 245 57 receive martse_control;
+#X obj 221 104 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 246 92 list prepend set;
+#X obj 246 116 list trim;
+#X msg 245 149 1 2 3 4 5 6 7;
+#X obj 204 180 unpack f f f f f f f;
+#X floatatom 221 316 5 0 0 0 - - -;
+#X floatatom 245 294 5 0 0 0 - - -;
+#X floatatom 264 273 5 0 0 0 - - -;
+#X floatatom 284 250 5 0 0 0 - - -;
+#X floatatom 313 319 5 0 0 0 - - -;
+#X floatatom 341 296 5 0 0 0 - - -;
+#X floatatom 363 269 5 0 0 0 - - -;
+#X obj 21 193 random 1000;
+#X obj 21 217 + 40;
+#X obj 22 303 osc~;
+#X obj 21 364 *~;
+#X msg 54 330 0;
+#X msg 100 329 0.1;
+#X floatatom 21 262 5 0 0 0 - - -;
+#N canvas 1084 173 528 361 (subpatch) 0;
+#X array array1 20 float 3;
+#A 0 -0.50693 -0.163435 0 0.0637123 0 -0.00276816 -0.00276995 -0.324101
+-0.191136 -0.102493 -0.0969533 -0.0969529 -0.0969533 0 0 0 0 0 0 0
+;
+#X coords 0 1 20 -1 160 140 1 0 0;
+#X restore 166 343 graph;
+#X text 170 495 I wanted to transcribe a song to play \, but I wasn't
+sure how to do it;
+#X connect 4 0 6 0;
+#X connect 5 0 7 0;
+#X connect 6 0 18 0;
+#X connect 7 0 8 0;
+#X connect 8 0 9 0;
+#X connect 10 0 11 0;
+#X connect 10 1 12 0;
+#X connect 10 2 13 0;
+#X connect 10 3 14 0;
+#X connect 10 4 15 0;
+#X connect 10 5 16 0;
+#X connect 10 6 17 0;
+#X connect 18 0 19 0;
+#X connect 19 0 24 0;
+#X connect 20 0 21 0;
+#X connect 21 0 0 0;
+#X connect 22 0 21 1;
+#X connect 23 0 21 1;
+#X connect 24 0 20 0;

ortegm3.pd

@@ -0,0 +1,25 @@
+#N canvas 950 0 958 958 12;
+#X obj 111 21 inlet;
+#X obj 61 345 outlet~;
+#X obj 116 345 outlet;
+#X obj 62 21 inlet~;
+#X obj 61 68 r ortegm3_tempo;
+#X obj 305 68 r ortegm3_control;
+#X obj 61 96 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 61 212 osc~;
+#X obj 61 246 *~;
+#X msg 96 227 0;
+#X msg 130 227 0.5;
+#X obj 61 120 random 700;
+#X obj 61 150 + 240;
+#X floatatom 61 180 5 0 0 0 - - -;
+#X connect 4 0 6 0;
+#X connect 6 0 11 0;
+#X connect 7 0 8 0;
+#X connect 8 0 1 0;
+#X connect 9 0 8 1;
+#X connect 10 0 8 1;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 13 0 7 0;