houchl.pd

#N canvas 166 198 1680 980 12;
#N canvas 0 50 450 250 (subpatch) 0;
#X array melody_houchl 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 796 373 graph;
#X floatatom 552 470 5 0 0 0 - - -;
#X floatatom 552 534 5 0 0 0 - - -;
#X floatatom 499 279 5 0 0 0 - - -;
#X obj 431 322 metro 1000;
#X msg 609 358 0;
#X obj 552 391 f;
#X obj 607 390 + 1;
#X obj 552 563 mtof;
#X floatatom 552 602 5 0 0 0 - - -;
#X obj 667 635 line~;
#X floatatom 552 416 5 0 0 0 - - -;
#X msg 726 588 0 50;
#X obj 552 646 osc~ 440;
#X msg 798 549 \; 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_houchl 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 1094 371 graph;
#X msg 796 606 \; 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 552 444 % 40;
#X obj 809 284 loadbang;
#X text 881 283 ROB - need to initialize your volume \; use loadbang
to send a bang at the start of the patch (when it is loaded);
#X obj 553 287 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 552 504 tabread melody2_houchl;
#X msg 667 588 1 60;
#X obj 48 56 inlet~;
#X obj 98 56 inlet;
#X obj 47 780 outlet~;
#X obj 121 777 outlet;
#X obj 64 317 mtof;
#X floatatom 33 364 5 0 0 0 - - -;
#X obj 149 434 osc~;
#X obj 95 626 +~;
#X floatatom 132 642 5 0 0 0 - - -;
#X obj 132 665 dbtorms;
#X obj 208 433 osc~;
#X obj 265 433 osc~;
#X obj 322 433 osc~;
#X obj 294 572 +~;
#X obj 347 568 +~;
#X obj 405 570 +~;
#X obj 322 407 * 3;
#X obj 436 637 keyname;
#X obj 336 662 *~;
#X obj 456 675 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 94 709 *~ 1;
#X obj 408 538 *~ 0.5;
#X obj 265 407 * 1.5;
#X obj 351 539 *~ 0.5;
#X obj 465 539 *~ 0.5;
#X obj 149 245 key;
#X obj 212 519 +~;
#X obj 134 492 osc~, f 5;
#X obj 64 293 / 1.7;
#X floatatom 120 468 5 0 0 0 - - -;
#X floatatom 118 562 5 0 0 0 - - -;
#X obj 292 540 *~ 0.5;
#X obj 106 530 *~ 0.1;
#X obj 224 642 loadbang;
#X obj 149 408 * 2;
#X obj 208 407 * 2.5;
#X obj 542 316 r houchl_tempo;
#X text 538 242 "recieve" houchl_tempo is an empty object so I'll leave
it as "r";
#X text 242 361 2 4 5 and 6 are a little too open. I'm going 1.5 2
2.5 and 3, f 31;
#X text 125 269 ASCII values are a little too high on their own \,
let's take them down a peg. Divide by 1.7, f 47;
#X text 630 713 The question is \, will this work when I'm recording?
Or will it not yet since the recieve object is null?;
#X text 71 591 Here's our fm synthesis.;
#X text 165 342 Additive synthesis here;
#X obj 273 830 throw~ houchl_audio_1;
#X obj 271 774 *~ 1;
#X text 436 831 ROB - disabled for now;
#X obj 64 244 r key_\$0;
#X obj 223 65 list trim;
#X obj 223 111 route key;
#X obj 223 135 unpack f s f;
#X floatatom 223 159 5 0 0 0 - - -;
#X symbolatom 264 160 10 0 0 0 - - -;
#X floatatom 341 160 5 0 0 0 - - -;
#X obj 341 183 s key_\$0;
#X obj 206 36 receive houchl_control;
#X obj 223 87 route houchl;
#X floatatom 64 269 5 0 0 0 - - -;
#X obj 223 182 s keyname_\$0;
#X obj 397 614 r keyname_\$0;
#X floatatom 478 674 5 0 0 0 - - -;
#X text 507 736 4 is BAAAD here...;
#X text 1447 42 Lucas Houchin-Miller;
#X obj 553 699 *~ 1;
#X msg 624 684 1;
#X msg 663 686 0;
#X obj 364 694 line~;
#X msg 390 669 \$1 50;
#X connect 1 0 21 0;
#X connect 2 0 8 0;
#X connect 3 0 4 1;
#X connect 4 0 6 0;
#X connect 5 0 6 1;
#X connect 6 0 7 0;
#X connect 6 0 11 0;
#X connect 7 0 6 1;
#X connect 8 0 9 0;
#X connect 9 0 13 0;
#X connect 10 0 85 1;
#X connect 11 0 17 0;
#X connect 12 0 10 0;
#X connect 13 0 85 0;
#X connect 17 0 1 0;
#X connect 18 0 22 0;
#X connect 21 0 2 0;
#X connect 22 0 10 0;
#X connect 27 0 28 0;
#X connect 27 0 45 0;
#X connect 27 0 39 0;
#X connect 27 0 57 0;
#X connect 27 0 58 0;
#X connect 29 0 49 0;
#X connect 30 0 43 0;
#X connect 31 0 32 0;
#X connect 32 0 43 1;
#X connect 33 0 46 0;
#X connect 34 0 44 0;
#X connect 35 0 47 0;
#X connect 36 0 37 0;
#X connect 37 0 38 0;
#X connect 38 0 41 0;
#X connect 39 0 35 0;
#X connect 41 0 30 1;
#X connect 43 0 25 0;
#X connect 43 0 67 0;
#X connect 44 0 37 1;
#X connect 45 0 34 0;
#X connect 46 0 36 1;
#X connect 47 0 38 1;
#X connect 49 0 54 0;
#X connect 50 0 55 0;
#X connect 51 0 27 0;
#X connect 52 0 50 0;
#X connect 53 0 55 1;
#X connect 54 0 36 0;
#X connect 55 0 49 1;
#X connect 56 0 31 0;
#X connect 57 0 29 0;
#X connect 58 0 33 0;
#X connect 59 0 6 0;
#X connect 59 0 20 0;
#X connect 67 0 66 0;
#X connect 69 0 79 0;
#X connect 70 0 78 0;
#X connect 71 0 72 0;
#X connect 72 0 73 0;
#X connect 72 1 74 0;
#X connect 72 2 75 0;
#X connect 73 0 80 0;
#X connect 75 0 76 0;
#X connect 77 0 70 0;
#X connect 78 0 71 0;
#X connect 79 0 51 0;
#X connect 81 0 42 0;
#X connect 81 0 82 0;
#X connect 81 0 89 0;
#X connect 85 0 25 0;
#X connect 85 0 67 0;
#X connect 86 0 85 1;
#X connect 87 0 85 1;
#X connect 88 0 41 1;
#X connect 89 0 88 0;