max v2;
#N vpatcher 4 54 850 833;
#P origin 0 -28;
#P newex 147 304 55 196617 metro 100;
#P newex 227 257 30 196617 expr;
#P message 58 310 26 196617 220;
#P number 71 343 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 165 364 51 196617 random 3;
#B color 5;
#P number 136 392 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 165 272 15 0;
#P number 170 459 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 183 412 170 196617 if $i1 < 1 then set 440 else set 550;
#B color 5;
#P message 194 341 49 196617 seed 777;
#P button 409 239 15 0;
#P newex 620 100 33 196617 cycle;
#P newex 602 54 63 196617 count_patch;
#P button 193 169 15 0;
#P message 214 145 102 196617 220 \, 440 \, 660 \, 880;
#P newex 215 92 113 196617 pack 440 440 440 440;
#P user GSwitch 194 582 41 32 1 0;
#P newex 214 192 75 196617 unpack 0 0 0 0;
#P number 361 39 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 311 41 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 265 41 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 215 41 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 445 422 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 643 605 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 517 423 53 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 553 552 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 681 605 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 603 605 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 564 605 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 523 605 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 490 553 93 196617 unpack 0 0 0 0 0 0;
#P newex 410 503 110 196617 pack 1. 10 1. 50 0. 10;
#P number 498 300 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 410 467 15 0;
#P newex 517 380 40 196617 * 0.35;
#P newex 467 380 40 196617 * 0.15;
#P slider 498 169 15 100 10 10;
#P message 6 534 49 196617 seed 777;
#P slider 17 269 15 200 1 10;
#P number 17 499 56 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 35 608 82 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 35 555 69 196617 random 2000;
#B color 5;
#P comment 12 29 134 196620 So far the 'synth' just plays random frequencies within a range from 0 to whatever. Let's try and be more precise about this.;
#P newex 410 290 55 196617 metro 100;
#P flonum 319 600 58 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 319 677 101 196617 *~;
#P newex 410 643 31 196617 line~;
#P message 229 636 32 196617 start;
#P message 196 636 27 196617 stop;
#P newex 319 646 60 196617 cycle~ 440;
#P newex 319 716 30 196617 dac~;
#P comment 251 601 58 196617 Frequency;
#P comment 420 549 53 196617 Amplitude;
#P comment 511 706 149 196622 Numbers and Music;
#P comment 529 253 100 196617 set the value here;
#P comment 516 321 100 196617 display the value;
#P comment 572 384 100 196617 do the maths for the envelope;
#P comment 575 434 100 196617 display the values;
#P comment 627 555 100 196617 unpack does the reverse of pack;
#P comment 530 634 100 196617 this just displays the result of the newly created envelope....;
#P comment 9 183 100 196617 specific frequency values:;
#P connect 22 0 21 0;
#P fasten 17 0 19 0 415 411 375 411 375 542 63 542 63 551 40 551;
#P fasten 23 0 19 0 11 551 52 551 52 551 40 551;
#P connect 19 0 20 0;
#P connect 58 0 57 0;
#P fasten 21 0 19 1 22 525 99 525;
#P connect 56 0 55 0;
#P fasten 54 0 60 0 152 303;
#P connect 51 0 56 0;
#P connect 60 0 56 0;
#P connect 52 0 53 0;
#P connect 56 0 52 0;
#P connect 46 0 47 0;
#P fasten 20 0 44 1 40 637 166 630 166 560 214 560;
#P connect 47 0 43 0;
#P connect 39 0 45 0;
#P connect 53 0 44 2;
#P connect 40 0 45 1;
#P connect 41 0 45 2;
#P connect 42 0 45 3;
#P fasten 44 0 16 0 199 621 309 621 309 589 324 589;
#P connect 16 0 11 0;
#P connect 11 0 15 0;
#P fasten 13 0 10 0 234 715 324 715;
#P fasten 12 0 10 0 201 715 236 715 324 715;
#P connect 15 0 10 0;
#P connect 15 0 10 1;
#P connect 50 0 17 0;
#P connect 17 0 27 0;
#P connect 27 0 29 0;
#P connect 29 0 14 0;
#P connect 14 0 15 1;
#P fasten 38 0 29 1 450 465 435 465;
#P fasten 25 0 38 0 472 409 450 409;
#P fasten 28 0 17 1 503 332 478 332 478 277 460 277;
#P fasten 28 0 25 0 503 353 472 353;
#P fasten 36 0 29 3 522 475 475 475;
#P fasten 29 0 30 0 415 541 495 541;
#P connect 24 0 28 0;
#P fasten 38 0 29 5 450 481 515 481;
#P fasten 28 0 26 0 503 353 522 353;
#P connect 26 0 36 0;
#P fasten 30 0 31 0 495 589 528 589;
#P fasten 30 5 35 0 575 536 558 536;
#P fasten 30 1 32 0 511 589 569 589;
#P fasten 30 2 33 0 527 589 608 589;
#P fasten 30 3 37 0 543 589 648 589;
#P fasten 30 4 34 0 559 589 686 589;
#P pop;