Skip to content

Commit

Permalink
v1
Browse files Browse the repository at this point in the history
  • Loading branch information
bapch authored Apr 30, 2017
1 parent 21e3034 commit e57e186
Show file tree
Hide file tree
Showing 5 changed files with 565 additions and 0 deletions.
19 changes: 19 additions & 0 deletions float_argument.pd
Original file line number Diff line number Diff line change
@@ -0,0 +1,19 @@
#N canvas 591 211 450 300 10;
#X obj 119 28 inlet;
#X obj 119 92 float \$1;
#X obj 119 114 select 0;
#X obj 119 156 float \$2;
#X obj 119 178 select 0;
#X obj 225 241 outlet;
#X text 238 100 from purepd/float_argument;
#X obj 119 50 route bang float symbol;
#X obj 311 243 outlet symbol;
#X connect 0 0 7 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 1 5 0;
#X connect 3 0 4 0;
#X connect 4 1 5 0;
#X connect 7 0 1 0;
#X connect 7 1 5 0;
#X connect 7 2 8 0;
335 changes: 335 additions & 0 deletions main.pd
Original file line number Diff line number Diff line change
@@ -0,0 +1,335 @@
#N canvas 404 128 1174 825 10;
#X obj 744 163 cnv 15 400 450 empty empty page_2 20 12 0 14 -154742
-66577 0;
#X obj 188 163 cnv 15 400 450 empty empty page_1 20 12 0 14 -154742
-66577 0;
#X obj 23 435 osc~;
#X obj 23 491 *~;
#X obj 201 231 * 1024;
#X obj 201 409 * 40;
#X obj 146 468 osc~;
#X obj 145 502 *~;
#X obj 24 589 *~;
#X obj 596 432 osc~;
#X obj 596 499 *~;
#X obj 757 247 * 1024;
#X obj 757 418 * 40;
#X obj 597 585 *~;
#X obj 355 704 *~;
#X obj 392 687 r vol;
#X obj 317 796 throw~ outL;
#X obj 407 796 throw~ outR;
#X obj 98 552 -~;
#X obj 97 437 sig~ 1;
#X obj 669 533 -~;
#X obj 709 464 osc~;
#X obj 708 498 *~;
#X obj 668 433 sig~ 1;
#X obj 359 230 * 1024;
#X obj 915 237 * 1024;
#X obj 387 430 * 40;
#X obj 943 437 * 40;
#X obj 351 310 expr int($f1*100)/100;
#X obj 387 404 expr int($f1*100)/100;
#X obj 380 532 expr int($f1*100)/100;
#X obj 908 320 expr int($f1*100)/100;
#X obj 943 412 expr int($f1*100)/100;
#X obj 936 530 expr int($f1*100)/100;
#X msg 359 252 \; screenLine1 1: freq \$1 hz;
#X msg 351 330 \; screenLine2 2: amp \$1;
#X msg 387 467 \; screenLine3 3: lfo freq \$1;
#X msg 380 558 \; screenLine4 4: lfo amp \$1;
#X msg 915 259 \; screenLine1 1: freq \$1 hz;
#X msg 908 341 \; screenLine2 2: amp \$1;
#X msg 944 460 \; screenLine3 3: lfo freq \$1;
#X msg 936 550 \; screenLine4 4: lfo amp \$1;
#X floatatom 500 227 5 0 0 0 to_synth - -, f 5;
#X floatatom 499 207 5 0 0 0 display_only - -, f 5;
#X floatatom 1058 226 5 0 0 0 to_synth - -, f 5;
#X floatatom 1058 205 5 0 0 0 display_only - -, f 5;
#X obj 958 706 cnv 15 100 60 empty empty page_3 20 12 0 14 -154742
-66577 0;
#N canvas 349 52 1495 992 presets 0;
#X obj 452 99 int;
#X obj 704 103 int;
#X obj 704 81 * 2;
#X floatatom 704 125 5 0 0 0 - - -, f 5;
#X obj 704 146 t f f;
#X obj 705 188 -;
#X obj 705 208 > 0;
#X obj 705 231 change;
#X obj 705 253 sel 1;
#X text 32 42 save/load;
#X text 349 33 (in) preset number;
#X obj 128 105 int;
#X obj 452 77 * 10;
#X obj 128 83 * 2;
#X obj 128 127 sel 0 1;
#X obj 399 270 f;
#X obj 399 300 pack f f;
#X obj 399 322 route 0 1;
#X text 362 371 save;
#X text 741 372 load;
#X floatatom 163 105 5 0 0 0 - - -, f 5;
#X floatatom 489 100 5 0 0 0 - - -, f 5;
#X obj 399 372 t b f f;
#X obj 341 516 list prepend;
#X obj 341 688 s;
#X obj 341 538 list split 1;
#X msg 128 151 symbol save;
#X msg 151 176 symbol load;
#X obj 341 650 list trim;
#X obj 341 624 list;
#X obj 341 578 t b s, f 10;
#X msg 742 82 \; screenLine3 3: L to R => OK;
#X text 585 416 clean;
#X text 445 518 route;
#X text 165 423 get;
#X msg 22 365 \; screenLine4 SAVED to PRESET \$1;
#X msg 665 421 \; screenLine4 PRESET \$1 LOADED;
#X msg 452 121 \; screenLine2 2: preset \$1;
#X msg 128 217 \; screenLine1 1: operation : \$1;
#X msg 207 796 \; o2-lfo-amp 0.898438 \; o2-lfo-freq 0.310547 \; o2-amp
0.72168 \; o2-freq 0.544922 \; o1-amp 0.589844 \; o1-lfo-freq 0.352539
\; o1-lfo-amp 0.855469 \; o1-freq 0.496094 \;;
#X msg 477 796;
#X msg 618 796;
#X msg 757 796;
#X msg 888 796;
#X msg 1028 796;
#X msg 1165 796;
#X msg 1307 796;
#X floatatom 755 60 5 0 0 0 - - -, f 5;
#X text 25 736 Your presets are here. You can have as much presets
as you want. Note that you can only save floats !;
#X obj 197 422 s o-get-params;
#X obj 341 461 r o-params;
#X obj 229 303 r o-save;
#X text 294 303 << RESERVED;
#X text 305 423 << RESERVED;
#X text 415 462 << RESERVED;
#X text 684 299 << RESERVED;
#X obj 617 299 r o-load;
#X text 710 315 you can load a preset or save current parameters to
a preset by sending a integer to o-load or o-save;
#X msg 445 400 \; o-preset-\$1 set \; o-preset-\$1 addsemi;
#X msg 422 490 o-preset-\$1;
#X msg 617 361 \; o-preset-\$1 bang;
#X obj 27 772 r o-preset-0;
#X obj 207 772 r o-preset-1;
#X obj 347 772 r o-preset-2;
#X obj 477 772 r o-preset-3;
#X obj 617 772 r o-preset-4;
#X obj 757 772 r o-preset-5;
#X obj 887 772 r o-preset-6;
#X obj 1026 772 r o-preset-7;
#X obj 1167 772 r o-preset-8;
#X obj 1307 772 r o-preset-9;
#X obj 974 49 cnv 15 450 80 empty empty empty 20 12 0 14 -154742 -66577
0;
#X text 978 54 This is the third page. As the knobs are only useful
on this page and not a part of the synth \, we can use the second outlet
only (no hidden update of the ouput value). Also \, note that these
knobs do not have a unique name \, because it's not useful to save
their state in a preset.;
#X text 632 12 do it ! (turn from left to right);
#X msg 347 796 \; o2-lfo-amp 0 \; o2-lfo-freq 0.804688 \; o2-amp 0
\; o1-amp 0.99707 \; o1-lfo-freq 0.805664 \; o1-lfo-amp 0 \; o2-freq
0.395508 \; o1-freq 0.635742 \;;
#X obj 260 525 print;
#X obj 768 119 loadbang;
#X msg 27 796 \; o2-lfo-amp 0.99707 \; o2-lfo-freq 0.182617 \; o2-amp
0.301758 \; o1-amp 0.818359 \; o1-lfo-freq 0.0556641 \; o1-lfo-amp
0.782227 \; o2-freq 0.848633 \; o1-freq 0.253906 \;;
#X msg 766 145 -1;
#X obj 766 218 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 350 55 o-knob 3 2 0.02;
#X obj 28 61 o-knob 3 1 0.2;
#X obj 639 36 o-knob 3 3 0.02;
#X connect 0 0 37 0;
#X connect 0 0 16 1;
#X connect 0 0 21 0;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
#X connect 3 0 4 0;
#X connect 4 0 5 1;
#X connect 4 1 5 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 6 0 79 0;
#X connect 7 0 8 0;
#X connect 8 0 15 0;
#X connect 11 0 14 0;
#X connect 11 0 15 1;
#X connect 11 0 20 0;
#X connect 12 0 0 0;
#X connect 13 0 11 0;
#X connect 14 0 26 0;
#X connect 14 1 27 0;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 17 0 22 0;
#X connect 17 0 35 0;
#X connect 17 1 60 0;
#X connect 17 1 36 0;
#X connect 22 0 49 0;
#X connect 22 1 59 0;
#X connect 22 2 58 0;
#X connect 23 0 25 0;
#X connect 25 0 30 0;
#X connect 25 1 29 1;
#X connect 26 0 38 0;
#X connect 27 0 38 0;
#X connect 28 0 24 0;
#X connect 29 0 28 0;
#X connect 30 0 29 0;
#X connect 30 1 24 1;
#X connect 50 0 75 0;
#X connect 50 0 23 0;
#X connect 51 0 22 0;
#X connect 56 0 60 0;
#X connect 59 0 23 1;
#X connect 61 0 77 0;
#X connect 62 0 39 0;
#X connect 63 0 74 0;
#X connect 64 0 40 0;
#X connect 65 0 41 0;
#X connect 66 0 42 0;
#X connect 67 0 43 0;
#X connect 68 0 44 0;
#X connect 69 0 45 0;
#X connect 70 0 46 0;
#X connect 76 0 78 0;
#X connect 78 0 5 0;
#X connect 80 1 12 0;
#X connect 81 1 13 0;
#X connect 82 1 31 0;
#X connect 82 1 2 0;
#X connect 82 1 47 0;
#X restore 971 737 pd presets;
#X obj 201 190 o-knob 1 1 0.02 o1-freq;
#X obj 757 190 o-knob 2 1 0.02 o2-freq;
#X obj 201 511 o-knob 1 4 0.02 o1-lfo-amp;
#X obj 201 381 o-knob 1 3 0.02 o1-lfo-freq;
#X obj 201 291 o-knob 1 2 0.02 o1-amp;
#X obj 757 300 o-knob 2 2 0.02 o2-amp;
#X obj 757 390 o-knob 2 3 0.02 o2-lfo-freq;
#X obj 757 510 o-knob 2 4 0.02 o2-lfo-amp;
#X obj 768 706 cnv 15 100 60 empty empty empty 20 12 0 14 -154742 -66577
0;
#N canvas 14 50 430 439 browsing 0;
#X obj 49 50 r aux;
#X obj 49 72 sel 1;
#X msg 49 94 1;
#X obj 49 116 +;
#X obj 88 118 f;
#X floatatom 49 138 5 0 0 0 - - -, f 5;
#X obj 172 23 loadbang;
#X obj 125 119 % 3;
#X msg 202 147 \; screenLine1 : \; screenLine2 : \; screenLine3 : \;
screenLine4 : \;;
#X msg 179 95 0;
#X obj 49 157 t f f f b;
#X obj 69 244 sel 1 2 3;
#X msg 49 367 \; led \$1;
#X msg 108 304 symbol Presets;
#X msg 69 335 \; screenLine5 Page : \$1;
#X msg 69 263 symbol OSC1;
#X msg 89 283 symbol OSC2;
#X obj 89 221 s o-page-selected;
#X obj 179 117 s o-load;
#X text 216 222 << RESERVED;
#X text 243 117 << RESERVED;
#X obj 178 54 delay 500;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 0 5 0;
#X connect 4 0 7 0;
#X connect 5 0 10 0;
#X connect 6 0 2 0;
#X connect 6 0 21 0;
#X connect 7 0 3 1;
#X connect 9 0 18 0;
#X connect 10 0 12 0;
#X connect 10 1 11 0;
#X connect 10 2 17 0;
#X connect 10 3 8 0;
#X connect 11 0 15 0;
#X connect 11 1 16 0;
#X connect 11 2 13 0;
#X connect 13 0 14 0;
#X connect 15 0 14 0;
#X connect 16 0 14 0;
#X connect 21 0 9 0;
#X restore 778 728 pd browsing;
#X obj 188 12 cnv 15 956 150 empty empty no_im_not_hiding 20 20 0 12
-154742 -262144 0;
#X obj 191 15 cnv 15 950 144 empty empty O-knob!_(for_Organelle) 20
20 0 24 -245564 -154742 0;
#X text 690 48 This simple example is a duophonic synth with 2 LFOs.
Use the AUX button to browse through the pages. Click the [pd browsing]
\, [pd presets] and [o-knob] abstractions to understand how they work.
;
#X text 690 121 Contact : patchstorage.com/author/baptiste or baptiste.chatel@gmail.com
;
#X text 224 48 It is a very simple knob/parameter page system and preset
manager for Critter & Guitari's Organelle. Each parameter of each page
is tied to a knob. When you browse through pages \, the knob may not
be in sync with the new corresponding parameter. There are several
ways to get it in sync. Instead of making the parameter jump to the
knob value \, you need to pick it up by dialing the knob to the location
you left it last time. Don't dial too fast \, though !;
#X connect 2 0 3 0;
#X connect 3 0 8 0;
#X connect 4 0 2 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 18 1;
#X connect 8 0 14 0;
#X connect 9 0 10 0;
#X connect 10 0 13 0;
#X connect 11 0 9 0;
#X connect 12 0 21 0;
#X connect 13 0 14 0;
#X connect 14 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 14 1;
#X connect 18 0 8 1;
#X connect 19 0 18 0;
#X connect 20 0 13 1;
#X connect 21 0 22 0;
#X connect 22 0 20 1;
#X connect 23 0 20 0;
#X connect 24 0 34 0;
#X connect 25 0 38 0;
#X connect 26 0 36 0;
#X connect 27 0 40 0;
#X connect 28 0 35 0;
#X connect 29 0 26 0;
#X connect 30 0 37 0;
#X connect 31 0 39 0;
#X connect 32 0 27 0;
#X connect 33 0 41 0;
#X connect 48 0 4 0;
#X connect 48 0 42 0;
#X connect 48 1 24 0;
#X connect 48 1 43 0;
#X connect 49 0 11 0;
#X connect 49 0 44 0;
#X connect 49 1 25 0;
#X connect 49 1 45 0;
#X connect 50 0 7 1;
#X connect 50 1 30 0;
#X connect 51 0 5 0;
#X connect 51 1 29 0;
#X connect 52 0 3 1;
#X connect 52 1 28 0;
#X connect 53 0 10 1;
#X connect 53 1 31 0;
#X connect 54 0 12 0;
#X connect 54 1 32 0;
#X connect 55 0 22 1;
#X connect 55 1 33 0;
Loading

0 comments on commit e57e186

Please sign in to comment.