From 0ca6f43514c11e30d76618be69fcb995b926d0d5 Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Sun, 21 Feb 2010 05:08:54 +0000 Subject: ported to new template Makefile and debianized it svn path=/trunk/externals/moonlib/; revision=13184 --- gamme-help.pd | 171 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 171 insertions(+) create mode 100644 gamme-help.pd (limited to 'gamme-help.pd') diff --git a/gamme-help.pd b/gamme-help.pd new file mode 100644 index 0000000..8f87eb0 --- /dev/null +++ b/gamme-help.pd @@ -0,0 +1,171 @@ +#N canvas 246 348 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 0 1 0 0 1 0 0 0 0; +#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 0 1 0 0 1 0 0 0 0; +#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 33 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 0 1 0 0 1 0 1 0 0; +#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 1 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; +#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; -- cgit v1.2.1