Skip to content
Permalink
Browse files
Welcome to the masheen... initial code commit
  • Loading branch information
hamilr4 committed Jun 7, 2020
1 parent a996855 commit 2ae052cdac3d3a249dddcca172ecdf29bd65bc0b
Show file tree
Hide file tree
Showing 182 changed files with 12,903 additions and 0 deletions.
@@ -0,0 +1,126 @@
#N canvas -1504 13 974 769 12;
#X obj 74 93 bartoa;
#X obj 74 123 deegaj;
#X obj 74 153 johnsz2;
#X obj 74 183 martse;
#X obj 74 213 mucelj;
#X obj 74 243 nik;
#X obj 74 273 novaa;
#X obj 74 303 ortegm3;
#X obj 74 333 persow;
#X obj 74 363 plancs;
#X obj 74 393 quarlm;
#X obj 74 423 rothgj;
#X obj 74 453 schans2;
#X obj 74 483 sheny13;
#X obj 74 513 smithd32;
#X obj 74 543 takakh;
#X obj 74 573 villan2;
#X obj 74 603 zhaox10;
#X obj 74 633 zhuy16;
#X obj 74 663 houchl;
#X text 24 21 [ARTS 2020] SUMMER 2020 "MASHEEN";
#X text 275 70 1 Create a subpatch saved with the filename as your
RCS id;
#X text 275 110 2 In your patch create two inlets and two outlets;
#X text 330 187 e.g.;
#X text 330 257 e.g.;
#X text 275 150 3 Add a "Receive" object named with your RCS ID_tempo
;
#X obj 384 187 receive hamilr4_tempo;
#X obj 384 257 receive hamilr4_control;
#X text 275 220 4 Add a "Receive" object named with your RCS ID_control
;
#X obj 74 63 hamilr4;
#N canvas 0 50 479 747 tempo_sender 0;
#X obj 89 687 s hamilr4_tempo;
#X obj 89 13 inlet;
#X obj 113 657 s houchl_tempo;
#X obj 123 627 s zhuy16_tempo;
#X obj 133 597 s zhaox10_tempo;
#X obj 143 567 s villan2_tempo;
#X obj 153 537 s takakh_tempo;
#X obj 163 507 s smithd32_tempo;
#X obj 173 477 s sheny13_tempo;
#X obj 183 447 s schans2_tempo;
#X obj 193 417 s rothgj_tempo;
#X obj 203 387 s quarlm_tempo;
#X obj 213 357 s plancs_tempo;
#X obj 223 327 s persow_tempo;
#X obj 233 297 s ortegm3_tempo;
#X obj 243 267 s novaa_tempo;
#X obj 253 237 s nik_tempo;
#X obj 263 207 s mucelj_tempo;
#X obj 273 177 s martse_tempo;
#X obj 283 147 s johnsz2_tempo;
#X obj 293 117 s deegaj_tempo;
#X obj 303 87 s bartoa_tempo;
#X connect 1 0 0 0;
#X connect 1 0 2 0;
#X connect 1 0 3 0;
#X connect 1 0 4 0;
#X connect 1 0 5 0;
#X connect 1 0 6 0;
#X connect 1 0 7 0;
#X connect 1 0 8 0;
#X connect 1 0 9 0;
#X connect 1 0 10 0;
#X connect 1 0 11 0;
#X connect 1 0 12 0;
#X connect 1 0 13 0;
#X connect 1 0 14 0;
#X connect 1 0 15 0;
#X connect 1 0 16 0;
#X connect 1 0 17 0;
#X connect 1 0 18 0;
#X connect 1 0 19 0;
#X connect 1 0 20 0;
#X connect 1 0 21 0;
#X restore 277 525 pd tempo_sender;
#X obj 277 466 metro 500;
#X obj 277 496 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 277 431 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X text 275 300 5 Make your patch _do something_ with a metro beat
(coming in from the _tempo receive) and spit out audio from your left
outlet. DO NOT INCLUDE A [DAC~] OBJECT IN YOUR PATCH \, just pass audio
out the outlet for now.;
#X text 275 380 6 Send Rob your patch on Sunday.;
#X obj 166 547 dac~;
#X obj 423 607 osc~ 800;
#X obj 408 651 *~;
#X obj 408 576 vline~;
#X msg 408 527 1 20 \, 0 20 20;
#X text 456 575 translate to audio rate signal;
#X text 486 608 generate 800 hz sine tone;
#X text 438 650 multiply sine tone by amplitude envelope;
#X text 512 524 go to 1 (full volume) in 20 \, then go to zero (no
volume) in 20 ms after waiting 20 ms;
#X floatatom 519 464 5 0 0 0 - - -;
#X obj 577 410 loadbang;
#X obj 376 419 hsl 128 15 200 2000 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 519 436 500;
#X obj 407 680 *~ 0.2;
#X obj 432 705 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 407 726 *~ 1;
#X connect 14 0 36 0;
#X connect 14 0 36 1;
#X connect 31 0 32 0;
#X connect 31 0 40 0;
#X connect 32 0 30 0;
#X connect 33 0 31 0;
#X connect 37 0 38 1;
#X connect 38 0 49 0;
#X connect 39 0 38 0;
#X connect 40 0 39 0;
#X connect 45 0 31 1;
#X connect 46 0 48 0;
#X connect 47 0 45 0;
#X connect 48 0 47 0;
#X connect 49 0 51 0;
#X connect 50 0 51 1;
#X connect 51 0 36 0;
#X connect 51 0 36 1;
@@ -0,0 +1,64 @@
#N canvas 309 80 1371 826 12;
#X obj 72 143 inlet~;
#X obj 292 602 inlet;
#X obj 142 775 outlet;
#X obj 49 779 outlet~;
#X obj 145 275 receive bartoa_tempo;
#X obj 794 1 receive bartoa_control;
#X obj 794 52 list trim;
#X msg 794 73 1 2 3 4 5, f 37;
#X obj 794 31 list prepend set;
#X obj 145 336 f;
#X obj 185 336 + 1;
#X floatatom 145 360 5 0 0 0 - - -;
#N canvas 0 50 450 250 (subpatch) 0;
#X array melody 60 float 3;
#A 0 62 62 74 74 69 69 68 67 65 62 65 67 60 60 74 74 69 69 68 67 65
62 65 67 59 59 74 74 69 69 68 67 65 62 65 67 58 58 74 74 69 69 68 67
65 62 65 67 74 69 0 68 0 67 0 65 0 62 65 67;
#X coords 0 127 60 0 200 140 1 0 0;
#X restore 442 304 graph;
#X obj 145 453 tabread melody;
#X floatatom 145 507 10 0 0 0 - - -;
#X floatatom 145 407 5 0 0 0 - - -;
#X msg 213 310 0;
#X obj 145 530 mtof;
#X floatatom 145 554 5 0 0 0 - - -;
#X obj 145 307 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 379 459 \; melody 0 62 62 74 74 69 69 68 67 65 62 65 67 60 60
74 74 69 69 68 67 65 62 65 67 59 59 74 74 69 69 68 67 65 62 65 67 58
58 74 74 69 69 68 67 65 62 65 67, f 49;
#X obj 145 384 % 48;
#X text 349 589 Perhaps input volume from parent patch?;
#X msg 225 614 0.1;
#X msg 287 634 0;
#X obj 145 629 osc~;
#X obj 145 674 *~;
#X obj 215 715 throw~ bartoa_audio_1;
#X obj 1060 236 loadbang;
#X text 858 192 ROB - added this \, need to set a volume at the loading
of your patch;
#X connect 1 0 26 1;
#X connect 4 0 19 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 8 0 6 0;
#X connect 9 0 10 0;
#X connect 9 0 11 0;
#X connect 10 0 9 1;
#X connect 11 0 21 0;
#X connect 13 0 14 0;
#X connect 14 0 17 0;
#X connect 15 0 13 0;
#X connect 16 0 9 1;
#X connect 17 0 18 0;
#X connect 18 0 25 0;
#X connect 19 0 9 0;
#X connect 21 0 15 0;
#X connect 23 0 26 1;
#X connect 24 0 26 1;
#X connect 25 0 26 0;
#X connect 26 0 3 0;
#X connect 26 0 27 0;
#X connect 28 0 23 0;
@@ -0,0 +1,20 @@
#N canvas 250 30 450 300 12;
#X floatatom 267 137 5 0 0 0 - - -;
#X obj 267 169 expr 60000/$f1;
#X floatatom 267 203 10 0 0 0 - - -;
#X text 311 138 bpm;
#X text 343 203 ms;
#X obj 267 101 inlet;
#X obj 267 236 outlet;
#X text 114 31 Convert BPM to MS for Metro;
#X floatatom 107 120 5 0 0 0 - - -;
#X text 111 100 bpm;
#X floatatom 161 121 10 0 0 0 - - -;
#X text 184 101 ms;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 6 0;
#X connect 2 0 10 0;
#X connect 5 0 8 0;
#X connect 8 0 0 0;
#X coords 0 -1 1 1 140 48 2 100 100;
@@ -0,0 +1,154 @@
#N canvas 267 203 559 552 12;
#X obj 25 33 cnv 15 88 392 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 68 56 vu 15 200 masheen_meter_text empty -1 -8 0 10 -66577 -1
1 0;
#X obj 28 56 vsl 20 200 1 101 1 0 empty empty empty 0 -9 0 10 -262144
-1 -1 12200 1;
#X obj 321 133 *~;
#X obj 339 96 line~;
#X msg 339 72 \$1 20;
#X floatatom 339 50 5 0 0 0 - - -;
#X obj 55 1 inlet~;
#X obj 17 461 outlet~;
#X floatatom 321 221 5 0 0 0 - - -;
#X obj 321 194 env~ 16384 8192;
#X obj 339 1 - 1;
#X obj 339 26 / 100;
#X floatatom 201 221 5 0 0 0 - - -;
#X obj 201 194 env~ 16384 8192;
#X obj 201 249 - 103;
#X obj 321 249 - 103;
#X obj 50 56 vu 15 200 masheen_meter_text empty -1 -8 0 10 -66577 -1
0 0;
#X floatatom 48 287 5 0 0 0 - - -;
#X obj 55 395 tgl 20 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X text 77 352 S;
#X text 77 374 M;
#X text 77 396 R;
#X obj 55 373 tgl 20 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 55 351 tgl 20 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#N canvas 892 187 864 792 mute_solo 1;
#X obj 17 57 inlet~;
#X obj 217 17 inlet;
#X obj 287 17 inlet;
#X text 217 -5 solo;
#X text 287 -5 mute;
#X floatatom 217 111 5 0 0 0 - - -;
#X floatatom 287 111 5 0 0 0 - - -;
#X obj 320 378 outlet;
#X text 389 322 set mute button;
#X text 403 94 If solo is pressed \, override mute;
#X msg 354 350 0;
#X obj 17 456 gate~;
#X msg 352 93 0;
#X obj 286 158 t b f;
#X msg 320 322 set \$1;
#X floatatom 267 220 5 0 0 0 - - -;
#X obj 267 194 -;
#X obj 48 736 outlet~;
#X floatatom 49 428 5 0 0 0 - - -;
#X obj 267 249 expr if($f1 < 0 \, 1 \, 0);
#X obj 336 352 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X floatatom 341 295 5 0 0 0 - - -;
#X obj 269 317 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 267 273 select 1;
#X obj 716 59 s solo_mode;
#X obj 716 37 expr if($f1 == 1 \, 1 \, -1);
#X obj 111 543 v global_solo_count;
#X text 111 474 Check to see if there are any solo'd channels;
#X floatatom 111 615 5 0 0 0 - - -;
#X obj 48 672 gate~;
#X floatatom 141 567 5 0 0 0 - - -;
#X obj 111 493 r solo_mode;
#X obj 111 518 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X text 714 83 Update global count for solo-mode (> 0 we're soloing)
;
#X text 286 684 expr if( $f1 > 0 \, if($f2 > 0 \, 1 \, 0) \, 1);
#X obj 111 591 expr if( $f1 > 0 \, if($f2 > 0 \, 1 \, 0) \, 1);
#X obj 76 562 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 151 615 r init;
#X obj 352 70 r init;
#X obj 194 493 r init;
#X obj 269 495 r solo_all;
#X obj 269 544 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 269 519 pipe 10;
#X connect 0 0 11 0;
#X connect 1 0 5 0;
#X connect 1 0 25 0;
#X connect 2 0 6 0;
#X connect 5 0 16 0;
#X connect 5 0 35 1;
#X connect 6 0 13 0;
#X connect 11 1 29 0;
#X connect 12 0 6 0;
#X connect 12 0 5 0;
#X connect 13 0 5 0;
#X connect 13 1 16 1;
#X connect 14 0 7 0;
#X connect 14 0 20 0;
#X connect 14 0 10 0;
#X connect 15 0 19 0;
#X connect 16 0 15 0;
#X connect 18 0 11 1;
#X connect 19 0 18 0;
#X connect 19 0 23 0;
#X connect 23 0 22 0;
#X connect 23 1 14 0;
#X connect 23 1 21 0;
#X connect 25 0 24 0;
#X connect 26 0 30 0;
#X connect 26 0 35 0;
#X connect 26 0 36 0;
#X connect 28 0 29 1;
#X connect 29 0 17 0;
#X connect 31 0 32 0;
#X connect 32 0 26 0;
#X connect 35 0 28 0;
#X connect 36 0 5 0;
#X connect 37 0 28 0;
#X connect 38 0 12 0;
#X connect 39 0 32 0;
#X connect 40 0 42 0;
#X connect 41 0 26 0;
#X connect 42 0 41 0;
#X restore 165 305 pd mute_solo;
#X obj -61 354 r mute all;
#X obj -61 332 r solo all;
#X obj -61 376 r rec all;
#X obj 32 312 panner;
#X obj 73 461 outlet~;
#X connect 2 0 11 0;
#X connect 3 0 10 0;
#X connect 3 0 25 0;
#X connect 4 0 3 1;
#X connect 5 0 4 0;
#X connect 6 0 5 0;
#X connect 6 0 18 0;
#X connect 7 0 3 0;
#X connect 7 0 14 0;
#X connect 9 0 16 0;
#X connect 10 0 9 0;
#X connect 11 0 12 0;
#X connect 12 0 6 0;
#X connect 13 0 15 0;
#X connect 14 0 13 0;
#X connect 15 0 17 0;
#X connect 16 0 1 0;
#X connect 23 0 25 2;
#X connect 24 0 25 1;
#X connect 25 0 29 0;
#X connect 26 0 23 0;
#X connect 27 0 24 0;
#X connect 28 0 19 0;
#X connect 29 0 8 0;
#X connect 29 1 30 0;
#X coords 0 -1 1 1 88 392 1 25 32;

0 comments on commit 2ae052c

Please sign in to comment.