#N canvas 0 31 520 515 10;
#X text 10 491 (c) Antoine Rousseau 2001;
#X text 85 3 gamme: a musical scale selector.;
#X obj 113 187 gamme 90 40 1 0 0 1 0 0 1 1 1 0 0 1;
#X floatatom 51 244 6 0 0 0 - - -;
#X floatatom 134 71 4 0 0 0 - - -;
#X floatatom 33 78 4 0 0 0 - - -;
#X floatatom 154 244 4 0 0 0 - - -;
#X msg 280 256 set \$1 \$2;
#X obj 280 288 gamme 90 40 1 0 0 1 0 0 1 1 1 0 0 1;
#X msg 401 177 getall;
#X floatatom 322 336 4 0 0 0 - - -;
#X floatatom 282 72 6 0 0 0 - - -;
#X msg 282 138 round \$1 \$2;
#X obj 282 116 pack f f;
#X floatatom 363 71 4 0 200 0 - - -;
#X obj 281 227 print changed;
#X obj 134 119 pack f f;
#X floatatom 190 71 4 0 0 0 - - -;
#X obj 156 99 t b f;
#X msg 134 141 get \$1 \$2;
#X text 126 53 octave;
#X text 188 53 note;
#X text 271 56 semitone;
#X text 344 55 rounding strength;
#X obj 303 93 t b f;
#X text 19 59 semitone;
#X text 152 32 ARPEGE;
#X text 28 39 FILTER;
#X text 324 36 ROUNDING;
#X text 51 263 Result;
#X text 139 261 Number of;
#X text 127 273 selected notes;
#X text 377 238 in the key set.;
#X text 383 225 Last change;
#X text 371 158 get all the key set.;
#N canvas 483 118 375 520 audio 0;
#X obj 4 356 gamme 90 40 1 0 1 1 0 0 1 1 1 1 0 1;
#X obj 28 464 *~;
#X obj 4 419 mtof;
#X obj 4 442 osc~;
#N canvas 394 93 600 400 env 0;
#X obj 19 122 inlet;
#X obj 105 121 inlet;
#X msg 19 143 bang;
#X obj 89 280 line~;
#X obj 114 329 outlet~;
#X obj 114 307 *~;
#X obj 130 280 +~ 1;
#X obj 130 258 *~ 0.6;
#X obj 130 237 osc~ 12;
#X msg 89 228 0 \$1;
#X obj 89 206 200;
#X obj 48 206 0.2;
#X obj 64 121 inlet;
#X text 18 101 trig;
#X text 62 101 vol;
#X text 103 102 sustain;
#X text 133 219 lfo...;
#X msg 48 228 \$1 2;
#X obj 89 183 delay 2;
#X connect 0 0 2 0;
#X connect 1 0 10 1;
#X connect 2 0 11 0;
#X connect 2 0 18 0;
#X connect 3 0 5 0;
#X connect 5 0 4 0;
#X connect 6 0 5 1;
#X connect 7 0 6 0;
#X connect 8 0 7 0;
#X connect 9 0 3 0;
#X connect 10 0 9 0;
#X connect 11 0 17 0;
#X connect 12 0 11 1;
#X connect 17 0 3 0;
#X connect 18 0 10 0;
#X restore 44 441 pd env;
#X floatatom 51 236 5 0 0 0 - - -;
#X obj 17 499 dac~;
#X obj 62 421 pow 4;
#X obj 4 189 metro 180;
#X obj 4 211 i;
#X obj 4 162 tgl 20 0 empty empty play 0 -8 1 10 -262144 -1 -1 0 1
;
#X obj 29 211 + 1;
#X obj 4 286 spigot;
#X obj 49 286 == 0;
#X obj 54 211 mod 16;
#X obj 91 287 spigot;
#X obj 136 287 == 1;
#X msg 91 309 get 4 \$1;
#X obj 233 251 unpack f;
#X obj 188 279 spigot;
#X msg 188 345 round \$1 \$2;
#X obj 188 323 pack f f;
#X obj 233 279 == 2;
#X obj 4 306 + 60;
#X obj 188 301 + 60.05;
#X obj 191 375 hsl 50 10 0 500 0 1 empty empty Sustain -2 -6 1 10 -262144
-1 -1 1700 1;
#X obj 52 165 hsl 50 10 5 500 0 1 empty empty Metro(ms) -2 -6 1 10
-262144 -1 -1 1200 1;
#X obj 318 165 vsl 10 40 0 100 0 1 empty empty Round 0 -8 1 10 -262144
-1 -1 600 1;
#X obj 191 486 hsl 60 15 0 1 0 1 empty empty Volume -2 -6 1 10 -258699
-1 -1 4300 1;
#X obj 149 88 cnv 15 90 47 empty empty filter/arpeg/round 2 8 1 10
-233017 -1 0;
#X obj 149 162 hdl 30 0 1 3 empty empty empty 20 8 0 8 -262144 -1 -1
0;
#X obj 13 328 inlet;
#X connect 0 0 4 0;
#X connect 0 0 2 0;
#X connect 1 0 6 0;
#X connect 1 0 6 1;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 4 0 1 1;
#X connect 5 0 15 0;
#X connect 5 0 12 0;
#X connect 5 0 19 0;
#X connect 7 0 4 1;
#X connect 8 0 9 0;
#X connect 9 0 5 0;
#X connect 9 0 11 0;
#X connect 10 0 8 0;
#X connect 11 0 14 0;
#X connect 12 0 23 0;
#X connect 13 0 12 1;
#X connect 14 0 9 1;
#X connect 15 0 17 0;
#X connect 16 0 15 1;
#X connect 17 0 0 0;
#X connect 18 0 16 0;
#X connect 18 0 22 0;
#X connect 18 0 13 0;
#X connect 19 0 24 0;
#X connect 20 0 0 0;
#X connect 21 0 20 0;
#X connect 22 0 19 1;
#X connect 23 0 0 0;
#X connect 24 0 21 0;
#X connect 25 0 4 2;
#X connect 26 0 8 1;
#X connect 27 0 21 1;
#X connect 28 0 7 0;
#X connect 30 0 18 0;
#X connect 31 0 0 0;
#X coords 0 0 1 1 210 110 1;
#X restore 33 325 pd audio demo;
#N canvas 518 217 494 344 META 0;
#X text 12 25 LICENSE GPL v2;
#X text 12 145 AUTHOR Antoine Rousseau;
#X text 12 165 HELP_PATCH_AUTHORS Antoine Rousseau. "pd meta" information
added by Jonathan Wilkes for Pd version 0.42.;
#X text 12 45 DESCRIPTION a musical scale selector;
#X text 12 65 INLET_0 float get round getall;
#X text 12 85 OUTLET_0 float;
#X text 12 105 OUTLET_1 float;
#X text 12 125 OUTLET_2 list;
#X text 12 5 KEYWORDS control GUI storage MIDI;
#X restore 460 480 pd META;
#X connect 2 0 3 0;
#X connect 2 1 6 0;
#X connect 2 2 7 0;
#X connect 2 2 15 0;
#X connect 4 0 16 0;
#X connect 5 0 2 0;
#X connect 7 0 8 0;
#X connect 7 0 35 0;
#X connect 8 1 10 0;
#X connect 9 0 2 0;
#X connect 11 0 13 0;
#X connect 12 0 2 0;
#X connect 13 0 12 0;
#X connect 14 0 24 0;
#X connect 16 0 19 0;
#X connect 17 0 18 0;
#X connect 18 0 16 0;
#X connect 18 1 16 1;
#X connect 19 0 2 0;
#X connect 24 0 13 0;
#X connect 24 1 13 1;