Update of /cvsroot/pure-data/abstractions/footils/rtc-lib/rtc In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3770
Added Files: 16step-seq-help.pd 16step-seq.pd @.pd BPM2ms.pd ED-rhythm-help.pd ED-rhythm.pd ED-trans-help.pd ED-trans.pd ED2EP-help.pd ED2EP.pd INFROW1024.tab Lround-help.pd Lround.pd QT-PercPlayer.pd RTC-Overview.pd RTC-device.pd RTC-seed.pd RandomSeeder.pd VolAmb-help.pd VolAmb.pd add%.pd alea-rhythm-help.pd alea-rhythm.pd alea.pd anti-bis&osc.pd anti-bis.pd anti-interval-help.pd anti-interval.pd anti-octave&prime-help.pd anti-octave&prime.pd anti-octave-help.pd anti-octave.pd anti-osc-help.pd anti-osc.pd banger16.pd between-lin-help.pd between-lin-urn.pd between-lin.pd between-log-help.pd between-log-urn.pd between-log.pd between-variations-help.pd between.pd block-bang.pd brown-melody-help.pd brown-melody.pd brown-rhythm-help.pd brown-rhythm.pd brownian-help.pd brownian.pd butfirst-help.pd butfirst.pd butlast-help.pd butlast.pd check-octaves-help.pd check-octaves.pd check-row-help.pd check-row.pd choice-rhythm-help.pd choice-rhythm.pd choose-help.pd choose-intervals-help.pd choose-intervals.pd choose.pd collect.pd contrario.pd cos-slider.pd count-bang-help.pd count-bang.pd countdown.pd cp-pan~-help.pd cp-pan~.pd cresc-decresc-help.pd cresc-decresc.pd crossfade~-help.pd crossfade~.pd dB2lin.pd dur-from-ED.pd expr_scale.pd fibonacci.pd first-bang.pd first-help.pd first-shot.pd first.pd frq2note-help.pd frq2note.pd geom-help.pd geom.pd grid-rhythm-help.pd grid-rhythm.pd groove-rhythm.pd group-rhythm-help.pd group-rhythm.pd group-rhythm2-help.pd group-rhythm2.pd groups-help.pd groups.pd inc-dec.pd infinity-row-help.pd infinity-row.pd int-or-float-help.pd int-or-float.pd integ.pd intv2ratio-help.pd intv2ratio.pd inv.pd key-bang.pd key-bang2.pd last-help.pd last.pd lb.pd lin2dB.pd line2-help.pd line2.pd listlen.pd listreg.pd make-ED-scale-help.pd make-ED-scale.pd make-choice-list-help.pd make-choice-list.pd make-scale-help.pd make-scale.pd make-trans-scale-help.pd make-trans-scale.pd markov-harmony-help.pd markov-harmony.pd markov-help.pd markov-rhythm-help.pd markov-rhythm.pd markov.pd matrix12-help.pd metro-dev%-help.pd metro-dev%.pd minus.pd ms2sec-help.pd ms2sec.pd multiple-help.pd multiple.pd neutral-harmony-help.pd neutral-harmony.pd nname-help.pd normalize-row-help.pd normalize-row.pd note2cents-help.pd note2cents.pd note2frq-help.pd note2frq.pd note2pitch-help.pd note2pitch.pd note2st-help.pd note2st.pd nth.pd panning-help.pd pass-bang.pd pass.pd per2pass.pd periodic-help.pd periodic.pd permutate-row-help.pd permutate-row.pd permutate.pd permute-help.pd pitch-from-intervals-help.pd pitch-from-intervals.pd pitch-from-row-help.pd pitch-from-row.pd pitch2note-help.pd pitch2note.pd play-samp~-help.pd play-samp~.pd play.pd play2-help.pd play2.pd random-norep.pd random-ramp-help.pd random-ramp-urn-help.pd random-ramp-urn.pd random-ramp.pd random-row-help.pd random-row.pd ratio-help.pd ratio.pd ratio2intv-help.pd ratio2intv.pd reanimate.pd repchord-rhythm-help.pd repchord-rhythm.pd repeat-ED-help.pd repeat-ED.pd rit-acc-help.pd rit-acc.pd rota-help.pd rota.pd rotate-help.pd round.pd roundto.pd row-modus-help.pd row-modus.pd samp10~-help.pd samp10~.pd scale-changer-help.pd scale-changer.pd scale-rhythm.pd schweller-help.pd schweller.pd scramble-help.pd scramble.pd sel-princ-help.pd sel-princ.pd sequence-help.pd sequence.pd serial-rhythm-help.pd serial-rhythm.pd series-help.pd series.pd set_menu.pd show-pitchclass-help.pd show-pitchclass.pd show.pd smooth-line-help.pd smooth-line.pd sneak-help.pd sneak-random-help.pd sneak-random.pd sneak-rhythm-help.pd sneak-rhythm.pd sneak.pd sqrt-pan~-help.pd sqrt-pan~.pd st2pitch-help.pd st2pitch.pd subtr%.pd super-rhythm-help.pd super-rhythm.pd trans-exp-help.pd trans-exp.pd trans-help.pd trans-lin-help.pd trans-lin.pd trans-log-help.pd trans-log.pd trans.pd transp-pitch-help.pd transp-pitch.pd transpose-row-help.pd transpose-row.pd urne-help.pd urne.pd wave-rhythm-help.pd wave-rhythm.pd xrandom-help.pd xrandom.pd Log Message: added rtc-lib
--- NEW FILE: first-help.pd --- #N canvas 546 193 456 374 10; #X obj 106 208 bng 15 250 50 1 empty empty clear_display 0 -6 0 8 -262144 -1 -1; #X obj 65 207 show; #X msg 65 114 1 2 3 4 5; #X msg 85 140 a b c d e f g h i; #X msg 65 240; #X text 25 277 1994 by Karlheinz Essl; #X obj 65 175 first; #X text 25 61 Outputs first element of the input list.; #X text 25 29 first; #X connect 0 0 1 1; #X connect 1 0 4 0; #X connect 2 0 6 0; #X connect 3 0 6 0; #X connect 6 0 1 0;
--- NEW FILE: set_menu.pd --- #N canvas 50 61 226 222 10; #X obj 48 153 outlet; #X obj 48 36 inlet; #X obj 48 65 t b a; #X obj 78 91 list prepend set; #X obj 78 113 list trim; #X connect 1 0 2 0; #X connect 2 0 0 0; #X connect 2 1 3 0; #X connect 3 0 4 0; #X connect 4 0 0 0;
--- NEW FILE: nname-help.pd --- #N canvas 8 46 726 445 10; #X obj 405 198 umenu 1 64; #X text 24 44 'nname' turns an int in its inlet into a symbol representing the note name of the corresponding MIDI note. Note that nname even works for i > 127! The argument allows you to choose the display mode: ; #X text 24 17 nname; #X msg 499 19 Harmony; #N canvas 184 47 391 221 how-to-customize... 0; #X text 31 43 The appearance of the note names can be customized. For this reason , you have to open the nname-object with ResEdit. Then you click on the STR# icon and select the resource with ID 128 The first 12 strings label the capital note names , the second 12 their lower-case representation.; #X text 31 131 By this it is possible to change the note names e.g. to french or italian conventions: do re mi fa so... with dise/diesis and bmol/bemolle.; #X restore 315 123 pd how-to-customize...; #X text 40 131 2 - displays MIDI note names; #X text 40 117 1 - displays note names C4; #X text 40 102 0 - displays pitch classes; #X text 40 145 3 - displays german note names; #X text 24 166 see also:; #X msg 159 166 showchord; #X text 24 382 1993 by Orm Finnendahl; #X text 91 339 pitch class; #X text 179 339 note names C4; #X text 270 339 MIDI note names; #X text 358 339 german note names; #X obj 179 288 show; #X obj 179 260 nname 1; #X obj 270 288 show; #X obj 270 260 nname 2; #X obj 358 260 nname 3; #X obj 358 288 show; #X msg 36 224 about; #X text 139 226 MIDI key number; #X floatatom 90 224 0 0 0 0 - - -; #X obj 90 260 nname 0; #X obj 90 288 show; #X msg 90 199 60; #X msg 90 166 shownote; #X msg 90 318; #X msg 179 318; #X msg 358 318; #X msg 270 318; #X obj 131 289 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 220 289 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 311 289 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 399 289 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 405 224 0 0 0 0 - - -; #X text 434 226 display mode; #X text 131 24 (external - FAT); #X text 24 396 FAT implementation by Richard Dudas (IRCAM , Paris) ; #X connect 16 0 30 0; #X connect 17 0 16 0; #X connect 18 0 32 0; #X connect 19 0 18 0; #X connect 20 0 21 0; #X connect 21 0 31 0; #X connect 22 0 25 0; #X connect 24 0 25 0; #X connect 24 0 17 0; #X connect 24 0 19 0; #X connect 24 0 20 0; #X connect 25 0 26 0; #X connect 26 0 29 0; #X connect 27 0 24 0; #X connect 33 0 26 1; #X connect 34 0 16 1; #X connect 35 0 18 1; #X connect 36 0 21 1; #X connect 37 0 20 1;
--- NEW FILE: ratio2intv.pd --- #N canvas 63 44 369 190 10; #X obj 35 88 expr log ($f1) * 17.3123; #X obj 35 62 inlet; #X obj 35 121 outlet; #X text 216 86 < 12 / ln (2); #X text 78 141 1994 by Karlheinz Essl; #X connect 0 0 2 0; #X connect 1 0 0 0;
--- NEW FILE: show-pitchclass.pd --- #N canvas 163 349 493 300 10; #X obj 341 190 loadbang; #X obj 19 270 outlet; #X obj 19 32 inlet; #X msg 349 161 H; #X msg 319 161 Bb; #X msg 289 161 A; #X msg 259 161 G#; #X msg 229 161 G; #X msg 199 161 F#; #X msg 169 161 F; #X msg 139 161 E; #X msg 109 161 D#; #X msg 79 161 D; #X msg 49 161 C#; #X obj 19 83 % 12; #X msg 19 161 C; #X obj 19 134 sel 0 1 2 3 4 5 6 7 8 9 10 11; #X text 277 266 2004 by Karlheinz Essl; #X obj 19 224 list prepend set; #X obj 19 248 list trim; #X msg 341 213 set; #X obj 20 204 t a; #X connect 0 0 20 0; #X connect 2 0 14 0; #X connect 3 0 21 0; #X connect 4 0 21 0; #X connect 5 0 21 0; #X connect 6 0 21 0; #X connect 7 0 21 0; #X connect 8 0 21 0; #X connect 9 0 21 0; #X connect 10 0 21 0; #X connect 11 0 21 0; #X connect 12 0 21 0; #X connect 13 0 21 0; #X connect 14 0 16 0; #X connect 15 0 21 0; #X connect 16 0 15 0; #X connect 16 1 13 0; #X connect 16 2 12 0; #X connect 16 3 11 0; #X connect 16 4 10 0; #X connect 16 5 9 0; #X connect 16 6 8 0; #X connect 16 7 7 0; #X connect 16 8 6 0; #X connect 16 9 5 0; #X connect 16 10 4 0; #X connect 16 11 3 0; #X connect 18 0 19 0; #X connect 19 0 1 0; #X connect 20 0 1 0; #X connect 21 0 18 0;
--- NEW FILE: BPM2ms.pd --- #N canvas 38 77 230 184 10; #X obj 36 101 outlet; #X obj 36 46 inlet; #X text 60 102 1998 by Karlheinz Essl; #X obj 36 73 expr 60000/$f1; #X connect 1 0 3 0; #X connect 3 0 0 0;
--- NEW FILE: ED2EP.pd --- #N canvas 401 150 440 497 10; #X obj 113 364 outlet; #X obj 229 41 inlet; #X obj 113 39 inlet; #X text 180 441 1997-2004 by Karlheinz Essl; #X obj 136 110 list-drip; #X obj 136 166 +; #X obj 164 166 f; #X obj 206 110 f $1; #X obj 136 296 list prepend; #X obj 233 296 t a; #X obj 113 66 t b a b b; #X obj 113 321 list; #X text 196 169 accumulate with every element; #X connect 1 0 7 1; #X connect 2 0 10 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 5 0 8 0; #X connect 6 0 5 1; #X connect 7 0 6 0; #X connect 8 0 9 0; #X connect 8 0 11 1; #X connect 9 0 8 1; #X connect 10 0 11 0; #X connect 10 1 4 0; #X connect 10 2 8 1; #X connect 10 3 7 0; #X connect 11 0 0 0;
--- NEW FILE: trans-log.pd --- #N canvas 388 59 694 561 10; #X obj 25 63 inlet; #X obj 96 44 loadbang; #X floatatom 161 270 0 0 0 0 - - -; #X text 226 264 q; #X obj 138 190 sel 0; #X msg 138 212 1; #X obj 215 190 sel 0; #X msg 215 212 1; #X msg 293 212 1; #X obj 293 190 sel 0; #X obj 25 325 * 1; #X obj 25 363 outlet; #X obj 193 63 inlet; #X obj 273 63 inlet; #X obj 138 165 f $1; #X obj 215 165 f $2; #X obj 293 165 f $3; #X obj 335 63 inlet; #X text 107 365 1993/94 by Karlheinz Essl; #X obj 96 70 delay 2; #X obj 25 294 expr pow($f2 , $f1); #X obj 138 239 expr pow($f2/$f1 , 1/$f3); #X obj 96 103 t b b b; #X obj 335 84 t b a; #X obj 259 94 t b a; #X connect 0 0 20 0; #X connect 1 0 19 0; #X connect 4 0 5 0; #X connect 4 1 10 1; #X connect 4 1 21 0; #X connect 5 0 10 1; #X connect 5 0 21 0; #X connect 6 0 7 0; #X connect 6 1 21 1; #X connect 7 0 21 1; #X connect 8 0 21 2; #X connect 9 0 8 0; #X connect 9 1 21 2; #X connect 10 0 11 0; #X connect 12 0 14 0; #X connect 13 0 24 0; #X connect 14 0 4 0; #X connect 15 0 6 0; #X connect 16 0 9 0; #X connect 17 0 23 0; #X connect 19 0 22 0; #X connect 20 0 10 0; #X connect 21 0 2 0; #X connect 21 0 20 1; #X connect 22 0 14 0; #X connect 22 1 15 0; #X connect 22 2 16 0; #X connect 23 0 21 0; #X connect 23 1 16 0; #X connect 24 0 21 0; #X connect 24 1 15 0;
--- NEW FILE: serial-rhythm.pd --- #N canvas 421 161 477 486 10; #X obj 239 187 - 1; #X obj 28 389 outlet; #X text 133 243 ED; #X obj 28 334 metro 500; #X obj 28 26 inlet; #X obj 126 29 inlet; #X obj 166 29 inlet; #X obj 209 27 inlet; #X obj 86 206 xrandom; #X obj 86 74 sel 1; #X text 55 421 1993-2004 by Karlheinz Essl; #X text 55 406 vs. 3.1; #X obj 149 390 outlet; #X obj 260 389 outlet; #X obj 209 134 int $3; #X obj 86 270 trans-log $1 $2 $3; #X obj 86 299 t a a; #X obj 209 160 t a a; #X obj 86 98 t a a; #X obj 86 238 t a a; #X obj 28 364 t b b; #X obj 28 48 t a a; #X connect 0 0 15 3; #X connect 3 0 20 0; #X connect 4 0 21 0; #X connect 5 0 15 1; #X connect 6 0 15 2; #X connect 7 0 14 0; #X connect 8 0 19 0; #X connect 9 0 18 0; #X connect 14 0 17 0; #X connect 15 0 16 0; #X connect 16 0 3 1; #X connect 16 1 13 0; #X connect 17 0 8 1; #X connect 17 1 0 0; #X connect 18 0 8 0; #X connect 18 1 14 0; #X connect 19 0 15 0; #X connect 19 1 12 0; #X connect 20 0 1 0; #X connect 20 1 8 0; #X connect 21 0 3 0; #X connect 21 1 9 0;
--- NEW FILE: choose-intervals.pd --- #N canvas 468 28 516 540 10; #X obj 317 28 loadbang; #N canvas 63 44 220 263 intv1 0; #X obj 33 191 outlet; #N canvas 575 224 277 339 plus-minus 0; #X obj 33 37 inlet; #X obj 33 182 outlet; #X msg 75 153 -1; #X msg 33 153 1; #X obj 33 63 random 2; #X obj 33 85 change; #X obj 33 112 select 1 0; #X connect 0 0 4 0; #X connect 2 0 1 0; #X connect 3 0 1 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 3 0; #X connect 6 1 2 0; #X restore 63 139 pd plus-minus; #X obj 33 163 * 1; #X obj 91 56 loadbang; #X msg 91 83 1 2 5; #X obj 33 108 permutate; #X obj 33 33 inlet; #X obj 33 84 t a a; #X connect 1 0 2 1; #X connect 2 0 0 0; #X connect 3 0 4 0; #X connect 4 0 5 1; #X connect 5 0 2 0; #X connect 6 0 7 0; #X connect 7 0 5 0; #X connect 7 1 1 0; #X restore 145 367 pd intv1; #N canvas 63 44 184 234 sel 0; #X obj 35 120 outlet; #X obj 35 65 > 1; #X obj 35 40 inlet; #X connect 1 0 0 0; #X connect 2 0 1 0; #X restore 203 133 pd sel; #X obj 331 243 sel 1; #N canvas 63 44 226 274 select-supply 0; #X obj 49 205 outlet; #X msg 120 161 1 2 4 5 6; #X msg 49 161 1 2 3 4 5; #X obj 49 117 route 0 1; #X obj 49 84 random 2; #X obj 49 50 inlet; #X connect 1 0 0 0; #X connect 2 0 0 0; #X connect 3 0 2 0; #X connect 3 1 1 0; #X connect 4 0 3 0; #X connect 5 0 4 0; #X restore 208 216 pd select-supply; #N canvas 43 55 564 407 minusifier 0; #X obj 55 35 inlet; #X obj 193 63 make-choice-list 6 6 0 1; #X obj 134 268 inlet; #X obj 55 333 outlet; #X obj 344 165 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 293 165 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 190 165 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 241 165 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 139 165 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 88 165 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 55 237 pack 0 0 0 0 0 0; #N canvas 38 77 558 434 proc 0; #X obj 81 67 inlet; #X obj 176 67 inlet; #X obj 73 293 outlet; #X obj 81 186 == 1; #X obj 81 213 select 1; #X obj 81 247 int; #X obj 132 256 int; #X obj 132 234 b; #X obj 80 268 * -1; #X obj 81 119 t b a a; #X obj 81 162 int; #X connect 0 0 9 0; #X connect 1 0 10 1; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 4 1 7 0; #X connect 5 0 8 0; #X connect 7 0 6 0; #X connect 8 0 2 0; #X connect 9 0 10 0; #X connect 9 1 5 1; #X connect 9 2 6 1; #X connect 10 0 3 0; #X restore 317 191 pd proc; #N canvas 38 77 668 502 proc 0; #X obj 81 67 inlet; #X obj 176 67 inlet; #X obj 88 274 outlet; #X obj 84 170 == 1; #X obj 84 197 select 1; #X obj 84 231 int; #X obj 135 240 int; #X obj 135 218 b; #X obj 83 252 * -1; #X obj 84 103 t b a a; #X obj 84 146 int; #X connect 0 0 9 0; #X connect 1 0 10 1; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 4 1 7 0; #X connect 5 0 8 0; #X connect 7 0 6 0; #X connect 8 0 2 0; #X connect 9 0 10 0; #X connect 9 1 5 1; #X connect 9 2 6 1; #X connect 10 0 3 0; #X restore 266 191 pd proc; #N canvas 38 77 665 479 proc 0; #X obj 81 67 inlet; #X obj 176 67 inlet; #X obj 74 319 outlet; #X obj 81 187 == 1; #X obj 81 214 select 1; #X obj 81 248 int; #X obj 132 257 int; #X obj 132 235 b; #X obj 80 269 * -1; #X obj 81 120 t b a a; #X obj 81 163 int; #X connect 0 0 9 0; #X connect 1 0 10 1; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 4 1 7 0; #X connect 5 0 8 0; #X connect 7 0 6 0; #X connect 8 0 2 0; #X connect 9 0 10 0; #X connect 9 1 5 1; #X connect 9 2 6 1; #X connect 10 0 3 0; #X restore 215 191 pd proc; #N canvas 38 77 624 457 proc 0; #X obj 81 67 inlet; #X obj 176 67 inlet; #X obj 75 270 outlet; #X obj 76 163 == 1; #X obj 76 190 select 1; #X obj 76 224 int; #X obj 127 233 int; #X obj 127 211 b; #X obj 75 245 * -1; #X obj 76 96 t b a a; #X obj 76 139 int; #X connect 0 0 9 0; #X connect 1 0 10 1; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 4 1 7 0; #X connect 5 0 8 0; #X connect 7 0 6 0; #X connect 8 0 2 0; #X connect 9 0 10 0; #X connect 9 1 5 1; #X connect 9 2 6 1; #X connect 10 0 3 0; #X restore 164 191 pd proc; #N canvas 38 77 594 410 proc 0; #X obj 81 67 inlet; #X obj 176 67 inlet; #X obj 79 294 outlet; #X obj 81 186 == 1; #X obj 81 213 select 1; #X obj 81 247 int; #X obj 132 256 int; #X obj 132 234 b; #X obj 80 268 * -1; #X obj 81 119 t b a a; #X obj 81 162 int; #X connect 0 0 9 0; #X connect 1 0 10 1; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 4 1 7 0; #X connect 5 0 8 0; #X connect 7 0 6 0; #X connect 8 0 2 0; #X connect 9 0 10 0; #X connect 9 1 5 1; #X connect 9 2 6 1; #X connect 10 0 3 0; #X restore 112 191 pd proc; #N canvas 38 77 519 353 proc 0; #X obj 81 32 inlet; #X obj 177 32 inlet; #X obj 80 259 outlet; #X obj 81 135 == 1; #X obj 81 162 select 1; #X obj 81 196 int; #X obj 132 205 int; #X obj 132 183 b; #X obj 80 217 * -1; #X obj 81 68 t b a a; #X obj 81 111 int; #X connect 0 0 9 0; #X connect 1 0 10 1; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 4 1 7 0; #X connect 5 0 8 0; #X connect 6 0 2 0; #X connect 7 0 6 0; #X connect 8 0 2 0; #X connect 9 0 10 0; #X connect 9 1 5 1; #X connect 9 2 6 1; #X connect 10 0 3 0; #X restore 55 190 pd proc; #X obj 55 143 unpack 0 0 0 0 0 0; #X obj 193 91 unpack 0 0 0 0 0 0; #X obj 55 296 list split 1; #X obj 55 62 t a b; #X connect 0 0 20 0; #X connect 1 0 18 0; #X connect 2 0 19 1; #X connect 4 0 11 1; #X connect 5 0 12 1; #X connect 6 0 14 1; #X connect 7 0 13 1; #X connect 8 0 15 1; #X connect 9 0 16 1; #X connect 10 0 19 0; #X connect 11 0 10 5; #X connect 12 0 10 4; #X connect 13 0 10 3; #X connect 14 0 10 2; #X connect 15 0 10 1; #X connect 16 0 10 0; #X connect 17 0 16 0; #X connect 17 1 15 0; #X connect 17 2 14 0; #X connect 17 3 13 0; #X connect 17 4 12 0; #X connect 17 5 11 0; #X connect 18 0 9 0; #X connect 18 1 8 0; #X connect 18 2 6 0; #X connect 18 3 7 0; #X connect 18 4 5 0; #X connect 18 5 4 0; #X connect 19 0 3 0; #X connect 20 0 17 0; #X connect 20 1 1 0; #X restore 208 338 pd minusifier; #X obj 208 245 scramble; #X obj 331 213 int; #X obj 145 34 inlet; #X obj 272 27 inlet; #X obj 208 405 outlet; #X obj 324 417 outlet; #X text 201 451 1994-99 by Karlheinz Essl; #X text 224 427 vs. 1.1; #X obj 272 61 int $1; #X obj 208 367 check-octaves; #X obj 208 300 list split 1; #N canvas 0 0 450 300 gate_2 0; #X obj 118 56 inlet; #X obj 124 128 list prepend 0; #X obj 201 53 inlet; #X obj 122 181 outlet; #X obj 205 186 outlet; #X obj 125 154 route 0 1; #X connect 0 0 1 0; #X connect 1 0 5 0; #X connect 2 0 1 1; #X connect 5 0 3 0; #X connect 5 1 4 0; #X restore 145 160 pd gate_2; #X obj 203 186 t a a; #X obj 272 83 t a a; #X obj 361 266 t a a; #X obj 294 388 t b b; #X connect 0 0 14 0; #X connect 1 0 10 0; #X connect 2 0 17 1; #X connect 3 1 20 0; #X connect 4 0 6 0; #X connect 5 0 15 0; #X connect 6 0 16 0; #X connect 7 0 3 0; #X connect 8 0 17 0; #X connect 9 0 14 0; #X connect 14 0 19 0; #X connect 15 0 10 0; #X connect 15 1 21 0; #X connect 16 0 5 0; #X connect 17 0 1 0; #X connect 17 1 18 0; #X connect 18 0 4 0; #X connect 18 1 7 0; #X connect 19 0 2 0; #X connect 19 1 7 1; #X connect 20 0 16 1; #X connect 20 1 5 1; #X connect 21 0 6 0; #X connect 21 1 11 0;
--- NEW FILE: subtr%.pd --- #N canvas 141 72 368 247 10; #X obj 249 30 inlet; #X obj 49 164 outlet; #X obj 49 68 t f b; #X obj 49 30 inlet; #X obj 198 98 float $1; #X obj 49 130 expr $f1 - $f2*$f1/100; #X text 123 185 1993-99 by Karlheinz Essl; #X connect 0 0 4 1; #X connect 2 0 5 0; #X connect 2 1 4 0; #X connect 3 0 2 0; #X connect 4 0 5 1; #X connect 5 0 1 0;
--- NEW FILE: note2st.pd --- #N canvas 568 238 251 363 10; #X obj 105 33 inlet; #X obj 36 33 inlet; #X obj 36 297 outlet; #X obj 36 183 - 0; #X obj 94 298 outlet; #X text 36 321 1994 by Karlheinz Essl; #X obj 36 86 - $1; #X obj 80 156 f; #X obj 105 61 t a b; #X obj 135 97 0; #X obj 36 208 t a a; #X obj 94 244 mod 12; #X obj 36 113 t a a b; #X connect 0 0 8 0; #X connect 1 0 6 0; #X connect 3 0 10 0; #X connect 6 0 12 0; #X connect 7 0 3 1; #X connect 8 0 6 1; #X connect 8 1 9 0; #X connect 9 0 7 1; #X connect 10 0 2 0; #X connect 10 1 11 0; #X connect 11 0 4 0; #X connect 12 0 3 0; #X connect 12 1 7 1; #X connect 12 2 7 0;
--- NEW FILE: 16step-seq-help.pd --- #N canvas 3 48 945 436 10; #X obj 88 99 loadbang; #N canvas 74 64 687 422 another 0; #X obj 245 332 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 366 332 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 388 332 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 408 332 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 309 332 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 345 332 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 288 332 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 266 332 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; [...1514 lines suppressed...] #X connect 2 9 11 0; #X connect 2 10 12 0; #X connect 2 11 14 0; #X connect 2 12 13 0; #X connect 2 13 17 0; #X connect 2 14 16 0; #X connect 2 15 15 0; #X connect 19 0 22 1; #X connect 20 0 22 0; #X connect 22 0 2 0; #X connect 22 0 27 1; #X connect 23 0 21 0; #X connect 24 0 27 0; #X connect 25 0 27 2; #X connect 27 0 23 0; #X connect 27 1 26 0; #X connect 40 0 41 0; #X connect 41 0 39 0; #X connect 41 0 39 1; #X connect 42 0 41 1;
--- NEW FILE: anti-octave.pd --- #N canvas 489 359 430 293 10; #X obj 30 197 outlet; #X obj 88 197 outlet; #X obj 30 47 inlet; #X text 104 129 check for octaves; #X text 104 72 check for repeated notes; #X text 59 219 1993 by Karlheinz Essl; #X obj 30 99 t a a; #N canvas 0 0 637 374 check1 0; #X obj 144 113 int; #X obj 117 112 int; #X obj 117 155 !=; #X obj 118 177 select 1 0; #X obj 118 210 int; #X obj 117 76 t a b a a; #X obj 149 212 int; #X text 283 133 if ($i1!=$i2) then $i1 else out2 $i1; #X obj 117 47 inlet; #X obj 203 44 inlet; #X obj 120 244 outlet; #X obj 174 245 outlet; #X connect 0 0 2 1; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 3 0 4 0; #X connect 3 1 6 0; #X connect 4 0 10 0; #X connect 5 0 1 0; #X connect 5 1 0 0; #X connect 5 2 4 1; #X connect 5 3 6 1; #X connect 6 0 11 0; #X connect 8 0 5 0; #X connect 9 0 0 1; #X restore 30 76 pd check1; #N canvas 0 0 637 374 check2 0; #X obj 144 113 int; #X obj 117 112 int; #X obj 117 270 int; #X obj 117 76 t a b a a; #X obj 117 47 inlet; #X obj 203 44 inlet; #X obj 117 305 outlet; #X obj 173 305 outlet; #X text 259 123 if ($i1-$i2)%12==0 then out2 bang else $i1; #X obj 117 155 -; #X obj 117 190 % 12; #X obj 117 214 == 0; #X obj 173 281 bang; #X obj 117 237 select 0 1; #X connect 0 0 9 1; #X connect 1 0 9 0; #X connect 2 0 6 0; #X connect 3 0 1 0; #X connect 3 1 0 0; #X connect 3 2 2 1; #X connect 4 0 3 0; #X connect 5 0 0 1; #X connect 9 0 10 0; #X connect 10 0 11 0; #X connect 11 0 13 0; #X connect 12 0 7 0; #X connect 13 0 2 0; #X connect 13 1 12 0; #X restore 30 130 pd check2; #X obj 30 153 t a a; #X connect 2 0 7 0; #X connect 6 0 8 0; #X connect 6 1 7 1; #X connect 7 0 6 0; #X connect 7 1 0 0; #X connect 8 0 9 0; #X connect 8 1 1 0; #X connect 9 0 0 0; #X connect 9 1 8 1;
--- NEW FILE: urne-help.pd --- #N canvas 196 159 823 609 10; #X msg 81 156 bang; #X obj 104 275 print urne; #X obj 125 251 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 155 158 seed 10; #X msg 157 181 clear; #X floatatom 139 231 5 0 0 0 - - -; #X text 78 41 generates random numbers without repetition; #X text 37 23 urne: Unique Random Generator; #X text 352 177 bang: output next random number without repetitions. ; #X text 351 200 clear: put all numbers back into urn.; #X text 351 224 seed NUM: seed random number generator; #X text 331 157 Inlet 0:; #X text 332 258 Inlet 1:; #X text 335 319 Outlet 0:; #X text 361 338 random number; #X text 337 371 Outlet 1:; #X text 373 279 int - set range of random numbers and reset the urn. ; #X text 333 125 Arguments: int - range of random numbers in urn (optional) ; #X text 83 68 Clone of the Max object [urn]. Stops when all values have been chosen and bangs right outlet. Send "clear" message to make it start over.; #X msg 83 371 bang; #N canvas 0 0 450 300 display 0; #X obj 46 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 63 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 80 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 ; #X obj 97 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 114 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 156 135 list append 0; #X obj 46 134 list append 1; #N canvas 0 0 450 300 count 0; #X obj 158 193 + 1; #X obj 122 158 until; #X obj 122 194 f; #X obj 122 101 inlet; #X msg 167 157 0; #X obj 122 120 t a b; #X obj 122 224 outlet; #X connect 0 0 2 1; #X connect 1 0 2 0; #X connect 2 0 0 0; #X connect 2 0 6 0; #X connect 3 0 5 0; #X connect 4 0 2 1; #X connect 5 0 1 0; #X connect 5 1 4 0; #X restore 156 90 pd count; #X obj 46 160 route 0 1 2 3 4 5 6 7 8 9; #X obj 131 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 148 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 165 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 182 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 199 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 46 36 inlet; #X obj 156 37 inlet; #X connect 5 0 8 0; #X connect 6 0 8 0; #X connect 7 0 5 0; #X connect 8 0 0 0; #X connect 8 1 1 0; #X connect 8 2 2 0; #X connect 8 3 3 0; #X connect 8 4 4 0; #X connect 8 5 9 0; #X connect 8 6 10 0; #X connect 8 7 11 0; #X connect 8 8 12 0; #X connect 8 9 13 0; #X connect 14 0 6 0; #X connect 15 0 7 0; #X coords 0 -1 1 1 180 40 1 40 170; #X restore 83 519 pd display; #X text 363 389 bang , when an empty urn receives a bang into first inlet.; #X msg 101 395 clear , bang; #X obj 127 448 t b b; #X obj 127 468 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 256 493 f 10; #X floatatom 150 425 5 0 0 0 - - -; #N canvas 0 0 450 300 display 0; #X obj 46 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 63 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 80 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 97 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 114 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 156 135 list append 0; #X obj 46 134 list append 1; #N canvas 0 0 450 300 count 0; #X obj 158 193 + 1; #X obj 122 158 until; #X obj 122 194 f; #X obj 122 101 inlet; #X msg 167 157 0; #X obj 122 120 t a b; #X obj 122 224 outlet; #X connect 0 0 2 1; #X connect 1 0 2 0; #X connect 2 0 0 0; #X connect 2 0 6 0; #X connect 3 0 5 0; #X connect 4 0 2 1; #X connect 5 0 1 0; #X connect 5 1 4 0; #X restore 156 90 pd count; #X obj 46 160 route 0 1 2 3 4 5 6 7 8 9; #X obj 131 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 148 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 165 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 182 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 199 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 46 36 inlet; #X obj 156 37 inlet; #X connect 5 0 8 0; #X connect 6 0 8 0; #X connect 7 0 5 0; #X connect 8 0 0 0; #X connect 8 1 1 0; #X connect 8 2 2 0; #X connect 8 3 3 0; #X connect 8 4 4 0; #X connect 8 5 9 0; #X connect 8 6 10 0; #X connect 8 7 11 0; #X connect 8 8 12 0; #X connect 8 9 13 0; #X connect 14 0 6 0; #X connect 15 0 7 0; #X coords 0 -1 1 1 180 40 1 40 170; #X restore 81 300 pd display; #X obj 254 273 f 10; #X obj 254 247 b; #X text 365 425 Use the second outlet to make the urn refill automatically if it gets empty as show in the second example with a combined "clear , bang" message.; #X obj 100 492 print urne_auto; #X obj 83 425 urne 10; #X obj 81 230 urne 10; #X connect 0 0 33 0; #X connect 3 0 33 0; #X connect 4 0 29 0; #X connect 4 0 33 0; #X connect 5 0 28 0; #X connect 5 0 33 1; #X connect 19 0 32 0; #X connect 22 0 32 0; #X connect 23 0 22 0; #X connect 23 0 24 0; #X connect 23 1 25 0; #X connect 25 0 20 1; #X connect 26 0 25 0; #X connect 26 0 32 1; #X connect 28 0 27 1; #X connect 29 0 28 0; #X connect 32 0 20 0; #X connect 32 0 31 0; #X connect 32 1 23 0; #X connect 33 0 1 0; #X connect 33 0 27 0; #X connect 33 1 2 0;
--- NEW FILE: note2st-help.pd --- #N canvas 1 48 472 396 10; #X msg 260 22 Harmony; #X msg 80 113 st2pitch; #X text 14 113 see also:; #X text 14 67 Outputs the intervals of an incoming stream of notes. The argument resp. the number sent to the right inlet determines the reference note.; #X text 14 40 note2st; #X floatatom 41 157 4 0 0 1 note - -; #X floatatom 41 185 4 0 0 1 key-number - -; #X floatatom 186 157 4 0 0 1 reference-note - -; #X floatatom 186 185 4 0 0 0 - - -; #X floatatom 186 247 0 0 0 1 interval_modulo_12 - -; #X floatatom 41 247 0 0 0 1 interval - -; #X text 14 297 1994 by Karlheinz Essl; #X obj 41 218 note2st 60; #X connect 5 0 6 0; #X connect 6 0 12 0; #X connect 7 0 8 0; #X connect 8 0 12 1; #X connect 12 0 10 0; #X connect 12 1 9 0;
--- NEW FILE: dB2lin.pd --- #N canvas 318 193 231 152 10; #X obj 30 99 outlet; #X obj 30 35 inlet; #X text 53 100 1993 by Gerhard Eckel ; #X obj 30 66 expr pow(10 , ($f1/20)); #X connect 1 0 3 0; #X connect 3 0 0 0;
--- NEW FILE: RandomSeeder.pd --- #N canvas 50 61 393 349 10; #X obj 44 284 outlet; #X obj 44 54 inlet; #X obj 44 137 date; #X msg 44 107 date; #X msg 99 107 time; #X floatatom 188 195 0 0 0 0 - - -; #X floatatom 44 195 0 0 0 0 - - -; #X obj 44 168 sum; #X obj 44 81 t b b; #X obj 44 223 +; #X floatatom 44 255 0 0 0 0 - - -; #X text 77 256 random seed; #X text 70 287 by Karlheinz Essl; #X obj 188 167 list-accum; #X connect 1 0 8 0; #X connect 2 0 7 0; #X connect 2 1 13 0; #X connect 3 0 2 0; #X connect 4 0 2 0; #X connect 5 0 9 1; #X connect 6 0 9 0; #X connect 7 0 6 0; #X connect 8 0 3 0; #X connect 8 1 4 0; #X connect 9 0 10 0; #X connect 10 0 0 0; #X connect 13 0 5 0;
--- NEW FILE: ED-rhythm.pd --- #N canvas 485 348 490 395 10; #X obj 73 102 t b b; #X obj 38 206 first-bang; #X obj 73 68 sel 1; #X obj 73 40 inlet; #X obj 219 264 delay; #X msg 120 68 stop; #X obj 298 41 inlet; #X obj 258 41 inlet; #X obj 377 347 outlet; #X obj 298 326 outlet; #X obj 258 346 outlet; #X obj 38 346 outlet; #X text 46 347 1995-2004 by Karlheinz Essl; #X obj 219 185 sel-princ $1; #X obj 189 306 t b b; #X obj 219 216 t b a a; #X obj 189 143 t b b; #X connect 0 0 16 0; #X connect 0 1 1 1; #X connect 1 0 11 0; #X connect 2 0 0 0; #X connect 2 1 5 0; #X connect 3 0 2 0; #X connect 4 0 14 0; #X connect 5 0 4 0; #X connect 6 0 13 2; #X connect 7 0 13 1; #X connect 13 0 15 0; #X connect 13 1 10 0; #X connect 13 2 9 0; #X connect 14 0 16 0; #X connect 14 1 11 0; #X connect 15 0 4 0; #X connect 15 1 4 1; #X connect 15 2 8 0; #X connect 16 0 1 0; #X connect 16 1 13 0;
--- NEW FILE: intv2ratio.pd --- #N canvas 175 138 363 172 10; #X obj 25 45 inlet; #X obj 25 75 expr exp($f1* 0.0577622650467); #X text 252 71 < ln(2) / 12; #X obj 25 109 outlet; #X text 100 129 1994 by Karlheinz Essl; #X connect 0 0 1 0; #X connect 1 0 3 0;
--- NEW FILE: choose.pd --- #N canvas 416 57 348 341 10; #X obj 65 62 inlet; #X obj 65 97 t b f; #X obj 196 62 inlet; #X obj 65 217 outlet; #X obj 65 127 list; #X text 93 251 1996 by Karlheinz Essl; #X obj 65 186 list split; #X obj 65 159 scramble; #X connect 0 0 1 0; #X connect 1 0 4 0; #X connect 1 1 6 1; #X connect 2 0 4 1; #X connect 4 0 7 0; #X connect 6 0 3 0; #X connect 7 0 6 0;
--- NEW FILE: markov-harmony-help.pd --- #N canvas 1 48 504 398 10; #X msg 55 301; #X text 24 38 An sequence of intervals that is generated by a one-dimensional markov chain. The transition probabilities of the intervals have to be sent to the right-most inlet following the conventions of the "prob"-object. The desired start interval <int> must be sent to the middle inlet. A bang in the left inlet outputs one chosen interval.; #X text 24 16 markov-harmony; #X msg 388 23 Harmony; #X text 26 132 see also:; #X msg 91 132 prob; #X msg 133 132 markov-rhythm; #X obj 55 246 markov-harmony; #N canvas 321 334 351 198 table-of-thirds 0; #X obj 158 30 loadbang; #X msg 29 110 3 -4 1; #X msg 29 85 3 4 1; #X msg 89 110 4 -3 1; #X msg 89 85 4 3 1; #X obj 133 142 outlet; #X msg 165 85 -3 4 1; #X msg 164 110 -3 -4 1; #X msg 231 111 -4 -3 1; #X msg 231 86 -4 3 1; #X connect 0 0 2 0; #X connect 0 0 1 0; #X connect 0 0 4 0; #X connect 0 0 3 0; #X connect 0 0 7 0; #X connect 0 0 6 0; #X connect 0 0 9 0; #X connect 0 0 8 0; #X connect 1 0 5 0; #X connect 2 0 5 0; #X connect 3 0 5 0; #X connect 4 0 5 0; #X connect 6 0 5 0; #X connect 7 0 5 0; #X connect 8 0 5 0; #X connect 9 0 5 0; #X restore 222 209 pd table-of-thirds; #X floatatom 151 205 4 0 0 2 start_interval - -; #X text 308 273 Flashes when there are no transitions possible ("I am stuck!"); #X floatatom 181 279 4 0 0 3 chosen_interval - -; #X text 91 301 pitch class; #N canvas 268 187 323 175 play-it 0; #X obj 43 102 show-pitchclass; #X obj 43 36 inlet; #X obj 43 67 + 60; #X obj 43 132 outlet; #X obj 156 102 play2 127 500 0 1; #X obj 270 42 inlet; #X obj 279 74 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X connect 0 0 3 0; #X connect 1 0 2 0; #X connect 2 0 0 0; #X connect 2 0 4 0; #X connect 5 0 4 3; #X connect 6 0 4 3; #X restore 55 276 pd play-it; #X obj 283 274 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 55 223 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 55 198 metro 200; #X text 24 343 1994 by Karlheinz Essl; #X obj 55 166 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X floatatom 113 169 4 0 0 2 speed - -; #X connect 7 0 13 0; #X connect 7 1 11 0; #X connect 7 2 14 0; #X connect 8 0 7 2; #X connect 9 0 7 1; #X connect 13 0 0 0; #X connect 15 0 7 0; #X connect 16 0 15 0; #X connect 18 0 16 0; #X connect 19 0 16 1;
--- NEW FILE: between-lin.pd --- #N canvas 296 99 394 336 10; #X msg 60 116 seed $1; #X obj 60 49 r RTC-rs; #X obj 126 248 outlet; #X obj 275 182 - 1; #X obj 173 177 inlet; #X obj 219 177 inlet; #X obj 275 46 inlet; #X obj 126 46 inlet; #X obj 189 245 outlet; #X text 180 250 1994-98 by Karlheinz Essl; #X text 180 264 vs 1.2; #X obj 126 151 random $3; #X obj 275 121 int $3; #X obj 126 209 trans-lin $1 $2; #X obj 126 83 t b b; #X obj 126 176 t a a; #X connect 0 0 11 0; #X connect 1 0 0 0; #X connect 3 0 13 3; #X connect 4 0 13 1; #X connect 5 0 13 2; #X connect 6 0 12 0; #X connect 7 0 14 0; #X connect 11 0 15 0; #X connect 12 0 3 0; #X connect 12 0 11 1; #X connect 13 0 2 0; #X connect 14 0 11 0; #X connect 14 1 12 0; #X connect 15 0 13 0; #X connect 15 1 8 0;
--- NEW FILE: anti-osc.pd --- #N canvas 435 142 467 360 10; #X obj 167 267 outlet; #X obj 107 266 outlet; #X obj 107 57 inlet; #X obj 218 176 int; #X obj 216 150 t a b; #X obj 107 110 int; #X obj 107 132 ==; #X obj 107 160 select 0 1; #X obj 107 214 t a a; #X obj 107 86 t a a; #X obj 107 195 int; #X connect 2 0 9 0; #X connect 3 0 6 1; #X connect 4 0 3 1; #X connect 4 1 3 0; #X connect 5 0 6 0; #X connect 6 0 7 0; #X connect 7 0 10 0; #X connect 7 1 0 0; #X connect 8 0 1 0; #X connect 8 1 4 0; #X connect 9 0 5 0; #X connect 9 1 10 1; #X connect 10 0 8 0;
--- NEW FILE: roundto.pd --- #N canvas 434 167 270 224 10; #X text 56 173 1992 by Gerhard Eckel ; #X obj 26 75 t f b; #X obj 26 43 inlet; #X obj 26 172 outlet; #X obj 26 140 expr int($f1/$f2)*$f2; #X obj 191 47 inlet; #X obj 168 108 f $1; #X connect 1 0 4 0; #X connect 1 1 6 0; #X connect 2 0 1 0; #X connect 4 0 3 0; #X connect 5 0 6 1; #X connect 6 0 4 1;
--- NEW FILE: cresc-decresc.pd --- #N canvas 393 171 621 451 10; #X obj 70 333 int; #X obj 70 367 outlet; #X obj 139 130 first-bang; #X obj 70 60 inlet; #X obj 309 368 outlet; #X obj 309 214 delay 30; #X text 90 405 vs. 1.1: 1993-95 by Karlheinz Essl; #X obj 330 60 inlet; #X obj 280 61 inlet; #X obj 176 61 inlet; #X obj 139 277 line 1 20; #X obj 139 189 int $1; #X obj 280 110 int $2; #X obj 330 112 int $3; #X msg 139 251 $1 , $2 $3; #X obj 330 136 t a a; #X obj 139 231 pack 0 0 0; #X obj 382 59 loadbang; #X text 320 231 reopen first-bang after transition; #X text 68 34 trigger; #X text 178 40 start; #X text 285 39 end; #X text 327 40 duration; #X floatatom 378 167 5 0 0 0 - - -; #X obj 70 86 t a a; #X obj 139 157 t b b; #X connect 0 0 1 0; #X connect 2 0 25 0; #X connect 3 0 24 0; #X connect 5 0 2 1; #X connect 5 0 4 0; #X connect 7 0 13 0; #X connect 8 0 12 0; #X connect 9 0 11 1; #X connect 10 0 0 1; #X connect 11 0 16 0; #X connect 12 0 16 1; #X connect 13 0 15 0; #X connect 14 0 10 0; #X connect 15 0 16 2; #X connect 15 1 5 1; #X connect 15 1 23 0; #X connect 16 0 14 0; #X connect 17 0 13 0; #X connect 17 0 12 0; #X connect 24 0 0 0; #X connect 24 1 2 0; #X connect 25 0 11 0; #X connect 25 1 5 0;
--- NEW FILE: anti-osc-help.pd --- #N canvas 4 48 531 439 10; #X msg 155 136 anti-bis&osc; #X msg 93 136 anti-bis; #X floatatom 53 285 0 0 0 0 - - -; #X obj 53 252 anti-osc; #X obj 53 185 metro 250; #X obj 53 161 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 53 218 random 3; #X msg 211 22 Chance; #X obj 104 283 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 127 283 flashes when an oscillation would have occured; #N canvas 63 44 210 190 play-it 0; #X obj 38 84 + 60; #X obj 38 118 play 127 150; #X obj 46 62 inlet; #X connect 0 0 1 0; #X connect 2 0 0 0; #X restore 53 316 pd play-it; #X text 25 347 1992 by IRCAM; #X text 25 136 see also:; #X text 25 65 Filters out an integer which has occured the penultimate time. Right output sends a bang when this occurs. Does not filter out immediate repetition as it is done by"anti-bis".; #X text 25 33 anti-osc; #X msg 123 219 1 , 2 , 3 , 3 , 2 , 3; #X floatatom 368 214 0 0 0 0 - - -; #X obj 368 181 anti-osc; #X obj 419 212 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 368 240 print; #X msg 368 157 1 , 2 , 3 , 3 , 2 , 3; #X connect 2 0 10 0; #X connect 3 0 2 0; #X connect 3 1 6 0; #X connect 3 1 8 0; #X connect 4 0 6 0; #X connect 5 0 4 0; #X connect 6 0 3 0; #X connect 15 0 3 0; #X connect 16 0 19 0; #X connect 17 0 16 0; #X connect 17 1 18 0; #X connect 20 0 17 0;
--- NEW FILE: fibonacci.pd --- #N canvas 392 165 423 453 10; #X obj 207 34 loadbang; #X obj 113 334 outlet; #X obj 113 69 inlet; #X obj 183 137 inlet; #X obj 133 174 inlet; #X obj 113 131 int; #X obj 113 260 +; #X obj 113 205 int $1; #X obj 183 171 int $1; #X obj 207 69 t b b; #X obj 113 154 t a a; #X obj 113 97 b; #X obj 183 198 t a b; #X obj 187 229 int; #X connect 0 0 9 0; #X connect 2 0 11 0; #X connect 3 0 8 0; #X connect 4 0 7 0; #X connect 5 0 10 0; #X connect 6 0 5 1; #X connect 6 0 1 0; #X connect 7 0 6 0; #X connect 8 0 12 0; #X connect 9 0 7 0; #X connect 9 1 8 0; #X connect 10 0 7 0; #X connect 10 1 8 0; #X connect 11 0 5 0; #X connect 12 0 13 1; #X connect 12 1 13 0; #X connect 13 0 6 1;
--- NEW FILE: groups-help.pd --- #N canvas 466 67 574 515 10; #X obj 174 141 loadbang; #X floatatom 175 264 0 0 0 3 chosen_group_size - -; #X msg 175 196 1 2 3 4; #X obj 46 190 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 46 291 collect; #X msg 46 344; #X obj 90 272 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X floatatom 176 299 0 0 0 3 choosen_index_of_supply - -; #X text 267 170 supply; #X text 248 195 group list; #X text 195 426 vs. 2.1: seedable by the RTC-seed; #X text 195 404 1994-98 by Karlheinz Essl after G.M. Koenig; #X text 38 24 groups; #X text 47 49 Chooses elements from a supply (int list) sent to the middle inlet and repeats them according to values chosen from a group list (rightmost inlet). The values from the two parameter lists are chosen by random (using the selection principle "series"); #X msg 174 171 0 1 2 3 4 5; #X obj 46 228 groups; #X connect 0 0 14 0; #X connect 0 0 2 0; #X connect 2 0 15 2; #X connect 3 0 15 0; #X connect 4 0 5 0; #X connect 6 0 4 1; #X connect 14 0 15 1; #X connect 15 0 4 0; #X connect 15 1 7 0; #X connect 15 2 1 0;
--- NEW FILE: sel-princ.pd --- #N canvas 63 44 338 388 10; #X obj 227 258 rota; #X obj 61 302 outlet; #X obj 61 258 alea; #X obj 161 258 sequence; #X obj 61 89 t b b; #X obj 61 60 inlet; #X obj 119 61 inlet; #X obj 238 60 inlet; #X text 85 341 1993-97 by K@rlheinz Essl; #X text 85 327 vs.4; #X obj 148 299 outlet; #X obj 212 302 outlet; #X obj 119 139 int $1; #N canvas 712 460 407 355 gate_4 0; #X obj 52 263 outlet; #X obj 73 243 outlet; #X obj 95 222 outlet; #X obj 116 199 outlet; #X obj 52 163 route 1 2 3 4; #X obj 52 75 inlet; #X obj 152 75 inlet; #X obj 52 133 list prepend $1; #X connect 4 0 0 0; #X connect 4 1 1 0; #X connect 4 2 2 0; #X connect 4 3 3 0; #X connect 5 0 7 0; #X connect 6 0 7 1; #X connect 7 0 4 0; #X restore 61 169 pd gate_4; #X obj 111 258 series; #X connect 0 0 1 0; #X connect 0 1 10 0; #X connect 2 0 1 0; #X connect 2 1 10 0; #X connect 3 0 1 0; #X connect 3 1 11 0; #X connect 4 0 13 0; #X connect 4 1 12 0; #X connect 5 0 4 0; #X connect 6 0 12 0; #X connect 7 0 2 1; #X connect 7 0 3 1; #X connect 7 0 0 1; #X connect 7 0 14 1; #X connect 12 0 13 1; #X connect 13 0 2 0; #X connect 13 1 14 0; #X connect 13 2 3 0; #X connect 13 3 0 0; #X connect 14 0 1 0; #X connect 14 1 11 0; #X connect 14 2 10 0;
--- NEW FILE: trans-log-help.pd --- #N canvas 256 342 682 390 10; #X floatatom 134 196 5 0 0 0 - - -; #X obj 134 166 trans-log 500 2000 12; #X text 61 31 Int in left inlet outputs the nth member of a logarithmical transition between a start value and an end value in n steps , whereas "steps" is the number of row elements (between start and end value) minus one.; #X floatatom 276 137 0 0 0 2 steps - -; #X floatatom 181 137 0 0 0 2 start - -; #X floatatom 228 137 0 0 0 2 end - -; #X floatatom 134 137 0 0 0 2 index - -; #X connect 1 0 0 0; #X connect 3 0 1 3; #X connect 4 0 1 1; #X connect 5 0 1 2; #X connect 6 0 1 0;
--- NEW FILE: 16step-seq.pd --- #N canvas 379 262 807 386 10; #X obj 631 70 sel 1; #X obj 673 124 * 4; #X obj 161 312 outlet; #X obj 117 342 outlet; #X obj 673 70 inlet; #X obj 117 24 inlet; #X obj 147 80 inlet; #X obj 417 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 446 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 503 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 474 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 589 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 618 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 561 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 532 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 302 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 331 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 388 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 359 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 244 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 273 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 216 136 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 187 137 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 187 106 unpack 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; #X obj 673 106 int $1; #N canvas 254 475 361 306 core 0; #X obj 168 250 outlet; #X obj 117 105 metro 500; #X obj 117 79 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 117 54 inlet; #X obj 175 30 inlet; #X obj 117 135 f; #X obj 143 136 + 1; #X obj 170 136 mod 16; #X obj 117 188 tabread $0-seq; #N canvas 0 0 450 300 BPM2ms 0; #X obj 36 101 outlet; #X obj 36 46 inlet; #X text 60 102 1998 by Karlheinz Essl; #X obj 36 73 expr 60000/$f1; #X connect 1 0 3 0; #X connect 3 0 0 0; #X restore 175 53 pd BPM2ms; #X obj 239 250 outlet; #X obj 239 174 select 15; #X obj 117 157 t a a; #X obj 117 210 select 0; #X obj 168 230 b; #X connect 1 0 5 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 9 0; #X connect 5 0 6 0; #X connect 5 0 12 0; #X connect 6 0 7 0; #X connect 7 0 5 1; #X connect 8 0 13 0; #X connect 9 0 1 1; #X connect 11 0 10 0; #X connect 12 0 8 0; #X connect 12 1 11 0; #X connect 13 1 14 0; #X connect 14 0 0 0; #X restore 117 286 pd core; #X obj 187 165 pack 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; #X obj 147 222 list prepend 0; #X obj 256 190 table $0-seq 16; #X obj 147 251 s $0-seq; #X obj 117 52 t a a; #X text 361 318 1998 by Karlheinz Essel , Pd version 2006 by Frank Barknecht; #X text 676 147 BPM; #X obj 187 78 spigot; #X obj 237 83 tgl 15 0 empty empty show_pattern 0 -6 0 8 -262144 -1 -1 0 1; #X connect 0 0 24 0; #X connect 1 0 25 1; #X connect 4 0 24 0; #X connect 5 0 30 0; #X connect 6 0 33 0; #X connect 6 0 27 0; #X connect 7 0 26 8; #X connect 8 0 26 9; #X connect 9 0 26 11; #X connect 10 0 26 10; #X connect 11 0 26 14; #X connect 12 0 26 15; #X connect 13 0 26 13; #X connect 14 0 26 12; #X connect 15 0 26 4; #X connect 16 0 26 5; #X connect 17 0 26 7; #X connect 18 0 26 6; #X connect 19 0 26 2; #X connect 20 0 26 3; #X connect 21 0 26 1; #X connect 22 0 26 0; #X connect 23 0 22 0; #X connect 23 1 21 0; #X connect 23 2 19 0; #X connect 23 3 20 0; #X connect 23 4 15 0; #X connect 23 5 16 0; #X connect 23 6 18 0; #X connect 23 7 17 0; #X connect 23 8 7 0; #X connect 23 9 8 0; #X connect 23 10 10 0; #X connect 23 11 9 0; #X connect 23 12 14 0; #X connect 23 13 13 0; #X connect 23 14 11 0; #X connect 23 15 12 0; #X connect 24 0 1 0; #X connect 25 0 3 0; #X connect 25 1 2 0; #X connect 27 0 29 0; #X connect 30 0 25 0; #X connect 30 1 0 0; #X connect 33 0 23 0; #X connect 34 0 33 1;
--- NEW FILE: repchord-rhythm.pd --- #N canvas 264 96 793 561 10; #N canvas 63 44 500 330 init 0; #X obj 68 130 outlet; #X obj 68 96 sel 1; #X obj 68 69 inlet; #X connect 1 0 0 0; #X connect 2 0 1 0; #X restore 122 117 pd init; #N canvas 133 167 843 484 rhythm 0; #X obj 120 107 pass 50; #X obj 120 135 between-log-urn 75 1500 12; #X text 152 162 ED; #X obj 62 309 metro 500; #X floatatom 308 107 0 0 0 0 - - -; #X floatatom 245 107 0 0 0 0 - - -; #X floatatom 183 107 0 0 0 0 - - -; #X obj 538 54 inlet; #X obj 477 54 inlet; #X obj 308 54 inlet; #X obj 245 54 inlet; #X obj 183 54 inlet; #X obj 62 359 outlet; #X obj 62 54 inlet; #X obj 390 54 inlet; #X obj 86 144 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 565 371 outlet; #X text 316 331 % pass; #X text 336 291 periodicity; #X obj 308 313 per2pass; #X obj 423 183 - 1; #X text 321 199 index; #X obj 278 366 outlet; #X obj 453 370 outlet; #X obj 472 129 outlet; #X obj 172 176 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 423 212 t a a; #X obj 308 259 expr_scale 0 11 0.8 0; #X obj 477 209 t b a; #X obj 538 207 t b a; #X obj 278 201 t a a; #X obj 62 332 t b b; #X obj 120 182 t a a; #X connect 0 0 1 0; #X connect 1 0 32 0; #X connect 1 1 30 0; #X connect 3 0 31 0; #X connect 4 0 1 3; #X connect 4 0 20 0; #X connect 5 0 1 2; #X connect 6 0 1 1; #X connect 7 0 29 0; #X connect 8 0 28 0; #X connect 9 0 4 0; #X connect 10 0 5 0; #X connect 11 0 6 0; #X connect 13 0 3 0; #X connect 14 0 24 0; #X connect 15 0 3 0; #X connect 19 0 0 1; #X connect 20 0 26 0; #X connect 25 0 1 0; #X connect 26 0 27 2; #X connect 26 1 23 0; #X connect 27 0 19 0; #X connect 28 0 1 0; #X connect 28 1 27 3; #X connect 29 0 1 0; #X connect 29 1 27 4; #X connect 30 0 22 0; #X connect 30 1 27 0; #X connect 31 0 12 0; #X connect 31 1 0 0; #X connect 32 0 3 1; #X connect 32 1 16 0; #X restore 92 278 pd rhythm; #N canvas 63 44 333 326 chord-size 0; #X obj 41 265 outlet; #X text 88 203 chord size; #X text 160 127 max. chord size; #X obj 113 151 + 1; #X obj 113 44 inlet; #X obj 223 42 inlet; #X obj 177 43 inlet; #X obj 41 44 inlet; #X obj 41 177 between 1 5; #X obj 89 265 outlet; #X obj 139 265 outlet; #X obj 113 97 expr_scale 0 11 1 5; #X obj 41 204 t a a; #X obj 41 231 until; #X obj 41 68 t a a; #X connect 3 0 8 2; #X connect 4 0 11 0; #X connect 5 0 11 3; #X connect 6 0 11 2; #X connect 7 0 14 0; #X connect 8 0 12 0; #X connect 11 0 3 0; #X connect 12 0 13 0; #X connect 12 1 9 0; #X connect 13 0 0 0; #X connect 14 0 8 0; #X connect 14 1 10 0; #X restore 92 322 pd chord-size; #X obj 92 351 outlet; #X obj 273 351 outlet; #X obj 203 350 outlet; #X obj 147 350 outlet; #X obj 92 54 inlet; #X obj 332 351 outlet; #X obj 609 52 inlet; #X obj 436 52 inlet; #X obj 350 52 inlet; #X obj 264 52 inlet; #X obj 523 52 inlet; #X obj 178 53 inlet; #X text 72 393 1996 by Karlheinz Essl; #X obj 609 209 f $6; #X obj 523 209 f $5; #X obj 436 208 i $4; #X obj 350 209 i $3; #X obj 264 209 i $2; #X obj 178 209 i $1; #X obj 122 146 t b b b b b b; #X obj 92 74 t a a; #X connect 0 0 22 0; #X connect 1 0 2 0; #X connect 1 1 2 1; #X connect 1 1 8 0; #X connect 1 2 2 2; #X connect 1 3 2 3; #X connect 1 4 4 0; #X connect 2 0 3 0; #X connect 2 1 6 0; #X connect 2 2 5 0; #X connect 7 0 23 0; #X connect 9 0 16 0; #X connect 10 0 18 0; #X connect 11 0 19 0; #X connect 12 0 20 0; #X connect 13 0 17 0; #X connect 14 0 21 0; #X connect 16 0 1 6; #X connect 17 0 1 5; #X connect 18 0 1 4; #X connect 19 0 1 3; #X connect 20 0 1 2; #X connect 21 0 1 1; #X connect 22 0 21 0; #X connect 22 1 20 0; #X connect 22 2 19 0; #X connect 22 3 18 0; #X connect 22 4 17 0; #X connect 22 5 16 0; #X connect 23 0 1 0; #X connect 23 1 0 0;
--- NEW FILE: crossfade~.pd --- #N canvas 335 262 445 402 10; #X obj 183 233 pack 0 50; #X obj 166 295 *~; #X obj 72 231 pack 0 50; #X obj 55 293 *~; #X obj 183 259 line~; #X obj 72 256 line~; #X obj 248 86 / 127; #X obj 248 133 expr cos($f1) ; sin($f1); #X obj 248 108 * 1.5708; #X text 317 108 *~ M_PI/2; #X obj 55 24 inlet~; #X obj 165 24 inlet~; #X obj 56 362 outlet~; #X obj 248 23 inlet; #X obj 292 22 loadbang; #X obj 292 47 f $1; #X connect 0 0 4 0; #X connect 1 0 12 0; #X connect 2 0 5 0; #X connect 3 0 12 0; #X connect 4 0 1 1; #X connect 5 0 3 1; #X connect 6 0 8 0; #X connect 7 0 2 0; #X connect 7 1 0 0; #X connect 8 0 7 0; #X connect 10 0 3 0; #X connect 11 0 1 0; #X connect 13 0 6 0; #X connect 14 0 15 0; #X connect 15 0 6 0;
--- NEW FILE: sneak-rhythm.pd --- #N canvas 136 171 499 489 10; #X obj 40 29 inlet; #X obj 235 176 inlet; #X obj 202 152 inlet; #X obj 139 301 outlet; #X obj 40 352 outlet; #X obj 40 310 metro 300; #X obj 199 302 outlet; #X obj 341 172 - 1; #X obj 311 26 inlet; #X obj 249 83 sel 1; #X text 99 50 this numbox prohibits numbers < 2!; #X text 157 359 1994 by Karlheinz Essl; #X obj 341 142 int $3; #X obj 169 230 trans-log $1 $2; #X obj 139 146 t a a; #X obj 139 114 sneak-random $3; #X obj 40 56 t a a; #X obj 40 330 t b b; #X obj 169 254 t a a; #X obj 311 84 t a a; #X connect 0 0 16 0; #X connect 1 0 13 2; #X connect 2 0 13 1; #X connect 5 0 17 0; #X connect 7 0 13 3; #X connect 8 0 19 0; #X connect 9 0 12 0; #X connect 12 0 7 0; #X connect 13 0 18 0; #X connect 14 0 3 0; #X connect 14 1 13 0; #X connect 15 0 14 0; #X connect 16 0 5 0; #X connect 16 1 9 0; #X connect 17 0 4 0; #X connect 17 1 15 0; #X connect 18 0 5 1; #X connect 18 1 6 0; #X connect 19 0 15 1; #X connect 19 1 12 0;
--- NEW FILE: random-ramp-help.pd --- #N canvas 112 128 736 547 10; #X text 15 29 random-ramp; #X text 118 13 Generates randomly fluctuating envelope shapes of a given dynamic scale (defined by a min and a max velocity and a certain number of values) within a time scale (defined by a min and a max ramp time and a certain number of values). A rhythm bang set to the left inlet outputs a velocity value. A stop message sent to the same inlet will stop the whole process.; #X text 380 282 randomly chosen ramp time; #X floatatom 339 283 5 0 0 1 - - -; #X text 263 310 randomly chosen velocity destination; #X floatatom 229 310 4 0 0 1 - - -; #X floatatom 265 218 4 0 0 2 nr._of_values - -; #X floatatom 432 164 0 0 0 2 min_ramp_time - -; #X floatatom 432 197 0 0 0 2 max_ramp_time - -; #X floatatom 265 190 4 0 0 2 max_velocity - -; #X floatatom 265 160 4 0 0 2 min_veloc. - -; #X obj 120 141 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 120 250 random-ramp 10 127 5 250 2000 12; #X obj 120 351 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144 -1 -1 0 1; #X text 262 127 dynamic scale - - -; #X text 427 127 ramp durations - - -; #X floatatom 120 286 4 0 0 1 velocity - -; #X text 501 468 1994 by Karlheinz Essl; #X obj 39 189 sel 0; #X msg 39 215 stop; #N canvas 380 246 505 336 musical 0; #X floatatom 140 224 0 0 0 0 - - -; #X floatatom 44 224 0 0 0 0 - - -; #X obj 44 140 brown-rhythm 50 1000 12 0.2; #X obj 44 188 brown-melody 21 104 0.25; #X msg 251 140 stop; #X obj 251 112 sel 0; #X obj 44 66 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X text 20 33 This is a very simple musical example for using the random-ramp object:; #X text 74 66 start stop; #X obj 44 252 play2 127 500 1 1; #X text 20 294 1994 by Karlheinz Essl; #X text 89 227 note; #X text 185 227 velocity; #X obj 221 188 random-ramp 10 127 5 250 2000 12; #X obj 44 162 t a a; #X connect 0 0 9 1; #X connect 1 0 9 0; #X connect 2 0 14 0; #X connect 3 0 1 0; #X connect 4 0 13 0; #X connect 5 0 4 0; #X connect 6 0 2 0; #X connect 6 0 5 0; #X connect 13 0 0 0; #X connect 14 0 3 0; #X connect 14 1 13 0; #X restore 438 355 pd musical; #X text 153 141 start stop; #X obj 120 189 metro 150; #X obj 112 351 vsl 8 128 0 127 0 0 empty empty min_vel -30 -8 0 8 -262144 -1 -1 0 1; #X obj 135 351 vsl 8 128 0 127 0 0 empty empty max_vel 0 -8 0 8 -262144 -1 -1 0 1; #X floatatom 432 230 4 0 0 2 nr._of_values - -; #X connect 6 0 12 3; #X connect 7 0 12 4; #X connect 8 0 12 5; #X connect 9 0 12 2; #X connect 9 0 24 0; #X connect 10 0 12 1; #X connect 10 0 23 0; #X connect 11 0 18 0; #X connect 11 0 22 0; #X connect 12 0 16 0; #X connect 12 1 5 0; #X connect 12 2 3 0; #X connect 16 0 13 0; #X connect 18 0 19 0; #X connect 19 0 12 0; #X connect 22 0 12 0; #X connect 25 0 12 6;
--- NEW FILE: make-ED-scale.pd --- #N canvas 410 48 567 524 10; #X obj 144 73 inlet; #X obj 144 420 outlet; #X obj 323 75 inlet; #X obj 280 215 inlet; #X obj 225 215 inlet; #X obj 353 234 - 1; #X text 122 453 1994-2003 by Karlheinz Essl; #X obj 166 272 trans-log $1 $2 $3; #X obj 353 133 int $3; #N canvas 0 0 450 300 count-to 0; #X obj 109 73 inlet; #X obj 196 74 inlet; #X obj 109 136 until; #X obj 109 168 f 0; #X obj 140 168 + 1; #X obj 109 102 t a b; #X obj 109 191 outlet; #X msg 196 117 0; #X connect 0 0 5 0; #X connect 1 0 7 0; #X connect 2 0 3 0; #X connect 3 0 4 0; #X connect 3 0 6 0; #X connect 4 0 3 1; #X connect 5 0 2 0; #X connect 7 0 3 1; #X restore 166 193 pd count-to; #X obj 166 140 int $3; #X obj 323 106 t a a; #X obj 366 105 loadbang; #X obj 166 365 list prepend; #X obj 258 365 t a; #X obj 144 392 list; #X obj 144 101 t b b b b; #X connect 0 0 16 0; #X connect 2 0 11 0; #X connect 3 0 7 2; #X connect 4 0 7 1; #X connect 5 0 7 3; #X connect 7 0 13 0; #X connect 8 0 5 0; #X connect 9 0 7 0; #X connect 10 0 9 0; #X connect 11 0 10 1; #X connect 11 1 8 0; #X connect 12 0 8 0; #X connect 13 0 14 0; #X connect 13 0 15 1; #X connect 14 0 13 1; #X connect 15 0 1 0; #X connect 16 0 15 0; #X connect 16 1 10 0; #X connect 16 2 13 1; #X connect 16 3 9 1;
--- NEW FILE: group-rhythm.pd --- #N canvas 145 129 575 520 10; #X obj 109 49 inlet; #X obj 419 69 inlet; #X obj 237 56 inlet; #X obj 271 74 inlet; #X obj 315 64 inlet; #X obj 235 412 outlet; #X text 127 269 index; #X obj 109 354 metro 500; #X obj 419 270 per2pass; #X obj 375 341 pass 33; #X obj 109 412 outlet; #X obj 175 244 random; #X obj 152 303 outlet; #X obj 212 103 sel 1; #X obj 131 147 sel 1; #X obj 348 240 - 1; #X text 108 468 vs. 2; #X text 108 451 1993-94 by Karlheinz Essl; #X obj 419 240 float $4; #X obj 212 193 int $3; #X obj 205 302 trans-log $1 $2; #X obj 175 267 t a a; #X obj 205 323 t a a; #X obj 109 376 t b b; #X obj 109 78 t a a a; #X obj 212 218 t a a; #X obj 212 126 t a a; #X connect 0 0 24 0; #X connect 1 0 18 0; #X connect 2 0 20 1; #X connect 3 0 20 2; #X connect 4 0 19 0; #X connect 7 0 23 0; #X connect 8 0 9 1; #X connect 9 0 11 0; #X connect 11 0 21 0; #X connect 13 0 26 0; #X connect 14 0 19 0; #X connect 15 0 20 3; #X connect 18 0 8 0; #X connect 19 0 25 0; #X connect 20 0 22 0; #X connect 21 0 12 0; #X connect 21 1 20 0; #X connect 22 0 7 1; #X connect 22 1 5 0; #X connect 23 0 10 0; #X connect 23 1 9 0; #X connect 24 0 7 0; #X connect 24 1 14 0; #X connect 24 2 13 0; #X connect 25 0 11 1; #X connect 25 1 15 0; #X connect 26 0 19 0; #X connect 26 1 18 0;
--- NEW FILE: xrandom-help.pd --- #N canvas 0 48 659 477 10; #X text 258 322 object; #X text 19 322 vs. 2.2: seedable by the; #X msg 193 322 RTC-seed; #X text 20 132 see also:; #X text 20 59 Outputs random numbers <int> that are never repeated unless all numbers have been generated (series-principle). The random numbers are produced within an interval between 0 and a given maximum (minus one) which can be the argument of the function or being sent to the right inlet.; #X text 20 28 xrandom; #X floatatom 53 265 4 0 0 0 - - -; #X obj 53 206 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 53 234 xrandom 4; #X text 19 306 1994-98 by Karlheinz Essl; #X msg 86 132 random; #X msg 310 23 Chance; #X msg 86 154 periodic; #X msg 148 132 random-norep; #X msg 148 154 sneak-random; #X floatatom 111 206 4 0 0 0 - - -; #X text 147 206 maximum range of random numbers (must be bigger than 1); #X text 139 267 flashes when all numbers have been generated; #X obj 111 265 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 140 41 vs. 2.2; #X connect 7 0 8 0; #X connect 8 0 6 0; #X connect 8 1 18 0; #X connect 15 0 8 1;
--- NEW FILE: ratio2intv-help.pd --- #N canvas 305 48 457 293 10; #X floatatom 55 130 4 0 0 1 ratio - -; #X obj 55 161 ratio2intv; #X text 20 237 1994 by Karlheinz Essl; #X text 15 13 ratio2intv; #X floatatom 55 196 4 0 0 1 interval - -; #X msg 88 92 intv2ratio; #X text 20 92 see also:; #X text 19 48 Converts a ratio into an interval (int = tempered or float = any mirco- interval).; #X msg 198 23 Harmony; #X connect 0 0 1 0; #X connect 1 0 4 0;
--- NEW FILE: grid-rhythm-help.pd --- #N canvas 240 163 567 482 10; #X text 155 141 selection principle; #X msg 306 12 Rhythm-Generators; #X obj 66 268 grid-rhythm 125 10 3; #X obj 66 212 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 1 1; #X text 337 225 multiple list; #X obj 277 197 loadbang; #X msg 277 224 3 1 1 1; #X floatatom 133 226 4 0 0 2 dev% - -; #X floatatom 99 226 4 0 0 2 grid - -; #X floatatom 201 298 4 0 0 1 ED - -; #X text 21 43 Outputs a rhythm determined by multiples of a given rhythmic grid , which is the first argument. The second is the deviation from this grid (in %) , the third the desired selections principle (after Gottfried Michael Koenig: 1 = alea , 2 = series , 3 = sequence). A list of multiples of the rhythmical grid has to be sent into the rightmost inlet first.; #X text 21 11 grid-rhythm; #X obj 66 335 QT-PercPlayer; #X text 18 384 1993-2001 by Karlheinz Essl; #X floatatom 167 226 4 0 0 1 sel-princ - -; #N canvas 556 269 497 418 sel_princ 0; #X msg 231 228 1 alea; #X msg 231 247 2 series; #X msg 231 267 3 sequence; #X msg 231 289 4 rota; #X obj 231 318 list split 1; #X obj 231 373 outlet; #X obj 112 61 loadbang; #X obj 112 192 select 1 2 3 4; #X obj 112 171 + 1; #X obj 112 123 hradio 15 1 0 4 empty empty empty 0 -6 0 8 -262144 -1 -1 1; #X msg 112 82 2; #X symbolatom 108 143 10 0 0 0 - - -; #X connect 0 0 4 0; #X connect 1 0 4 0; #X connect 2 0 4 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 4 1 11 0; #X connect 6 0 10 0; #X connect 7 0 0 0; #X connect 7 1 1 0; #X connect 7 2 2 0; #X connect 7 3 3 0; #X connect 8 0 7 0; #X connect 9 0 8 0; #X connect 10 0 9 0; #X coords 0 -1 1 1 90 65 1 100 100; #X restore 168 159 pd sel_princ; #X msg 277 251 2 2 1 2 2 2 1; #X msg 66 301 60; #X connect 2 0 17 0; #X connect 2 1 9 0; #X connect 3 0 2 0; #X connect 5 0 6 0; #X connect 6 0 2 4; #X connect 7 0 2 2; #X connect 8 0 2 1; #X connect 14 0 2 3; #X connect 15 0 14 0; #X connect 16 0 2 4; #X connect 17 0 12 0;
--- NEW FILE: serial-rhythm-help.pd --- #N canvas 443 269 500 398 10; #X floatatom 129 223 4 0 0 3 row_index - -; #X floatatom 214 225 4 0 0 3 ED - -; #X floatatom 100 171 4 0 0 2 min_ED - -; #X floatatom 157 170 4 0 0 2 max_ED - -; #X floatatom 214 171 4 0 0 2 steps - -; #X msg 84 118 alea-rhythm; #X msg 170 118 brown-rhythm; #X msg 269 118 sneak-rhythm; #X text 19 69 Serial permutation (i.e. with repetition check) of entry delays (ED) from a geometrical row defined by a min. ED , a max. ED and a certain number of ED-values.; #X text 19 36 serial-rhythm; #X text 19 118 see also:; #X obj 44 155 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 0 1; #X obj 44 196 serial-rhythm 100 1000 12; #X msg 44 227 60; #X text 194 50 vs. 3.1; #X msg 236 23 Rhythm-Generators; #X obj 44 255 QT-PercPlayer; #X text 25 338 1993-2004 by Karlheinz Essl; #X connect 2 0 12 1; #X connect 3 0 12 2; #X connect 4 0 12 3; #X connect 11 0 12 0; #X connect 12 0 13 0; #X connect 12 1 0 0; #X connect 12 2 1 0; #X connect 13 0 16 0;
--- NEW FILE: collect.pd --- #N canvas 663 237 419 281 10; #X obj 195 37 inlet; #X obj 41 37 inlet; #X obj 41 144 outlet; #X msg 195 74 set; #X text 143 140 1993-2004 by Karlheinz Essl; #X text 143 160 vs. 1.1; #X obj 41 99 list trim; #X obj 41 74 list prepend add2; #X connect 0 0 3 0; #X connect 1 0 7 0; #X connect 3 0 2 0; #X connect 6 0 2 0; #X connect 7 0 6 0;
--- NEW FILE: check-octaves-help.pd --- #N canvas 3 48 568 389 10; #X text 24 33 check-octaves; #X text 24 65 Checks whether an interval list sums up to an octave and outputs the list only when it does not contain any hidden octaves.. ; #X msg 90 109 anti-octave; #X msg 174 109 anti-octave′ #X text 25 110 see also:; #X obj 49 190 check-octaves; #X msg 49 151 -4 -5 -3; #X msg 156 151 1 2 6 -4; #X msg 118 151 3 5; #X text 221 147 interval list to be checked; #X obj 49 220 show; #X msg 49 260 1 2 6 -4; #X text 116 254 outputs the interval list when the sum is not an octave ; #X text 24 298 1993 by Karlheinz Essl; #X msg 285 24 Harmony; #X obj 83 222 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X text 176 190 bangs when sum is an octave; #X obj 153 190 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X connect 5 0 10 0; #X connect 5 1 17 0; #X connect 6 0 5 0; #X connect 7 0 5 0; #X connect 8 0 5 0; #X connect 10 0 11 0; #X connect 15 0 10 1;
--- NEW FILE: random-ramp.pd --- #N canvas 549 327 580 382 10; #X obj 39 41 inlet; #N canvas 43 143 716 227 choose-parameters 0; #X obj 54 30 inlet; #X obj 216 30 inlet; #X obj 135 30 inlet; #X obj 298 30 inlet; #X obj 653 30 inlet; #X obj 561 30 inlet; #X obj 470 30 inlet; #X obj 54 186 outlet; #X obj 379 186 outlet; #X obj 54 133 between-lin $1 $2 $3; #X obj 379 133 between-log $4 $5 $6; #X obj 54 59 t b b; #X connect 0 0 11 0; #X connect 1 0 9 2; #X connect 2 0 9 1; #X connect 3 0 9 3; #X connect 4 0 10 3; #X connect 5 0 10 2; #X connect 6 0 10 1; #X connect 9 0 7 0; #X connect 10 0 8 0; #X connect 11 0 9 0; #X connect 11 1 10 0; #X restore 163 157 pd choose-parameters; #X obj 248 24 inlet; #X obj 300 24 inlet; #X obj 453 24 inlet; #X obj 505 24 inlet; #X obj 402 24 inlet; #X obj 351 24 inlet; #X obj 39 266 int; #X obj 39 323 outlet; #X obj 342 276 outlet; #X msg 89 192 stop; #X obj 289 276 outlet; #X obj 39 129 route bang stop; #X obj 142 25 first-bang; #X text 241 323 1994 by Karlheinz Essl; #X obj 214 127 i $1; #X obj 265 127 i $2; #X obj 316 127 i $3; #X obj 368 127 i $4; #X obj 419 127 i $5; #X obj 470 127 i $6; #X obj 39 295 change; #X obj 163 298 line; #X obj 163 244 pack 0 0; #X obj 163 267 t a b; #X obj 298 183 t a a a; #X obj 209 269 del 30; #X obj 163 199 t a a; #X obj 142 59 t b b b b b b b; #X obj 39 161 t a a; #X connect 0 0 13 0; #X connect 1 0 28 0; #X connect 1 1 26 0; #X connect 2 0 16 0; #X connect 3 0 17 0; #X connect 4 0 20 0; #X connect 5 0 21 0; #X connect 6 0 19 0; #X connect 7 0 18 0; #X connect 8 0 22 0; #X connect 11 0 23 0; #X connect 11 0 27 0; #X connect 13 0 30 0; #X connect 13 1 11 0; #X connect 13 1 14 1; #X connect 14 0 29 0; #X connect 16 0 1 1; #X connect 17 0 1 2; #X connect 18 0 1 3; #X connect 19 0 1 4; #X connect 20 0 1 5; #X connect 21 0 1 6; #X connect 22 0 9 0; #X connect 23 0 8 1; #X connect 24 0 25 0; #X connect 25 0 23 0; #X connect 25 1 27 0; #X connect 26 0 24 1; #X connect 26 1 27 1; #X connect 26 2 10 0; #X connect 27 0 1 0; #X connect 28 0 24 0; #X connect 28 1 12 0; #X connect 29 0 1 0; #X connect 29 1 16 0; #X connect 29 2 17 0; #X connect 29 3 18 0; #X connect 29 4 19 0; #X connect 29 5 20 0; #X connect 29 6 21 0; #X connect 30 0 8 0; #X connect 30 1 14 0;
--- NEW FILE: ED-trans.pd --- #N canvas 253 37 496 592 10; #X msg 33 297 stop; #X obj 250 33 inlet; #X obj 105 474 metro 500; #X obj 33 35 inlet; #X obj 189 34 inlet; #X obj 243 246 int; #X obj 98 309 int 1; #X obj 116 358 delay 500; #X obj 116 388 int 0; #X obj 227 512 int; #X obj 227 539 outlet; #X obj 105 531 outlet; #X text 274 487 1993-97 by Karlheinz Essl; #X text 279 501 vs. 1.2; #X obj 213 169 int $2; #X obj 152 167 int $1; #X obj 213 200 t a b; #X obj 243 270 t a a; #X obj 213 296 line 0 25; #X obj 98 93 t b b b b a; #X obj 213 378 t a a; #X obj 105 498 t b b; #X obj 33 61 route stop; #X connect 0 0 2 0; #X connect 1 0 14 1; #X connect 2 0 21 0; #X connect 3 0 22 0; #X connect 4 0 15 1; #X connect 5 0 17 0; #X connect 6 0 2 0; #X connect 7 0 8 0; #X connect 8 0 2 0; #X connect 9 0 10 0; #X connect 14 0 16 0; #X connect 15 0 18 0; #X connect 16 0 18 0; #X connect 16 1 5 0; #X connect 17 0 7 1; #X connect 17 1 18 1; #X connect 18 0 20 0; #X connect 19 0 6 0; #X connect 19 1 7 0; #X connect 19 2 14 0; #X connect 19 3 15 0; #X connect 19 4 5 1; #X connect 20 0 2 1; #X connect 20 1 9 1; #X connect 21 0 11 0; #X connect 21 1 9 0; #X connect 22 0 0 0; #X connect 22 1 19 0;
--- NEW FILE: choose-intervals-help.pd --- #N canvas 3 48 619 394 10; #X obj 95 241 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X text 29 312 1993-99 by Karlheinz Essl; #X msg 293 23 Harmony; #X text 28 138 see also:; #X text 28 66 Chooses a supply between one to five different intervals. This set fullfills certain requirements: the sum of the chosen intervals will never be an octave , any pairs of intervals of that supply will never be an octave and there will never occur diminished chords from these intervals.; #X text 28 34 choose-intervals; #X text 201 232 flashes when the sum of the chosen intervals would have been an octave; #X obj 176 240 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 176 176 4 0 0 0 - - -; #X obj 55 176 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 55 274 5 -4 -2 -5; #X obj 55 240 show; #X obj 55 205 choose-intervals 1; #N canvas 231 94 569 441 musical-example 0; #X obj 49 59 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 ; #X text 84 66 start / stop; #X obj 49 285 pitch2note; #X floatatom 49 320 0 0 0 0 - - -; #X text 274 253 register; #X floatatom 243 252 0 0 0 0 - - -; #X obj 243 216 brownian 2 9 0.25; #X floatatom 357 185 0 0 0 0 - - -; #X text 391 182 brown factor; #X msg 173 102 3; #X text 279 132 chosen intervals; #X msg 246 153 -6 -1 -4; #X obj 219 29 loadbang; #X obj 219 58 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 240 54 new interval selection; #X text 367 76 number of intervals; #X floatatom 340 74 0 0 0 0 - - -; #X obj 49 100 metro 250; #X obj 246 133 show; #X text 60 117 rhythm bangs; #X obj 49 351 play2 127 500 0 1; #X text 96 321 note; #X obj 49 132 t b b; #X obj 219 100 choose-intervals 3; #N canvas 0 0 738 528 sel-princ 0; #X msg 184 218 1 alea; #X msg 184 237 2 series; #X msg 184 257 3 sequence; #X msg 184 279 4 rota; #X obj 184 308 list split 1; #X symbolatom 107 142 10 0 0 0 - - -; #X obj 107 127 hradio 15 1 0 4 empty empty sel-princ 0 -6 0 8 -262144 -1 -1 2; #X obj 185 335 outlet; #X obj 194 129 + 1; #X obj 141 160 select 1 2 3 4; #X obj 244 66 inlet; #X obj 238 95 - 1; #X connect 0 0 4 0; #X connect 1 0 4 0; #X connect 2 0 4 0; #X connect 3 0 4 0; #X connect 4 0 7 0; #X connect 4 1 5 0; #X connect 6 0 8 0; #X connect 8 0 9 0; #X connect 9 0 0 0; #X connect 9 1 1 0; #X connect 9 2 2 0; #X connect 9 3 3 0; #X connect 10 0 11 0; #X connect 11 0 6 0; #X coords 0 -1 1 1 85 60 1 100 100; #X restore 123 140 pd sel-princ; #X obj 49 216 pitch-from-intervals 3; #X connect 0 0 17 0; #X connect 2 0 3 0; #X connect 3 0 20 0; #X connect 5 0 2 1; #X connect 6 0 5 0; #X connect 7 0 6 3; #X connect 9 0 24 0; #X connect 12 0 13 0; #X connect 13 0 9 0; #X connect 13 0 23 0; #X connect 16 0 23 1; #X connect 17 0 22 0; #X connect 18 0 11 0; #X connect 22 0 25 0; #X connect 22 1 6 0; #X connect 23 0 18 0; #X connect 23 0 25 2; #X connect 24 0 25 1; #X connect 25 0 2 0; #X restore 94 135 pd musical-example; #X text 215 174 number of intervals to be chosen; #X text 248 46 vs. 1.1; #X text 76 177 generate!; #X text 230 135 << click; #X connect 0 0 11 1; #X connect 8 0 12 1; #X connect 9 0 12 0; #X connect 11 0 10 0; #X connect 12 0 11 0; #X connect 12 1 7 0;
--- NEW FILE: group-rhythm2-help.pd --- #N canvas 283 203 492 445 10; #X text 297 220 group list; #X text 50 52 Another implementation of a group-rhythm. A material list of ED-values is sent to the middle inlet , a list of desired group sizes is sent to the right-most inlet. A randomly chosen ED-value from the ED-material list will be repeated according to a randomly chosen group size from group-list.; #X obj 60 270 group-rhythm2; #X msg 60 303 60; #X obj 60 231 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 ; #X text 50 125 see also:; #X msg 115 125 group-rhythm; #X msg 180 238 100 200 400 800; #X obj 180 162 loadbang; #X msg 300 238 8 5 3 2; #X floatatom 103 301 0 0 0 3 ED - -; #X floatatom 146 302 4 0 0 3 group_size - -; #X text 50 21 group-rhythm2; #X text 89 230 start stop; #X obj 60 352 QT-PercPlayer; #X text 57 396 1994 by Karlheinz Essl; #X text 177 220 ED material; #X obj 180 183 t b b; #X connect 2 0 3 0; #X connect 2 1 10 0; #X connect 2 2 11 0; #X connect 3 0 14 0; #X connect 4 0 2 0; #X connect 7 0 2 1; #X connect 8 0 17 0; #X connect 9 0 2 2; #X connect 17 0 7 0; #X connect 17 1 9 0;
--- NEW FILE: rit-acc-help.pd --- #N canvas 287 195 458 387 10; #X text 26 25 rit-acc; #X text 24 306 1993 by Karlheinz Essl; #X msg 295 23 Rhythm; #X text 27 125 see also:; #X msg 89 124 ED-trans; #X msg 63 234 60; #X obj 63 162 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 0 1; #X msg 154 124 sneak-rhythm; #X obj 63 265 QT-PercPlayer; #X floatatom 156 232 8 0 0 3 ED - -; #X floatatom 176 179 4 0 0 2 slope - -; #X floatatom 109 179 4 0 0 2 start_ED - -; #X obj 63 201 rit-acc 50 1.1; #X text 26 57 Generates a ritardando or an accelerando , depending on the slope parameter. If it is < 1 , the tempo becomes faster (until about 1 msec , then it stops) when it is > 1 , the speed slows down. ; #X connect 5 0 8 0; #X connect 6 0 12 0; #X connect 10 0 12 2; #X connect 11 0 12 1; #X connect 12 0 5 0; #X connect 12 1 9 0;
--- NEW FILE: butfirst.pd --- #N canvas 50 61 213 198 10; #X obj 80 118 outlet; #X obj 41 58 inlet; #X obj 41 88 list split 1; #X connect 1 0 2 0; #X connect 2 1 0 0;
--- NEW FILE: key-bang.pd --- #N canvas 50 61 251 167 10; #X obj 79 46 inlet; #X obj 34 103 outlet; #X text 59 107 1997 by Karlheinz Essl; #X obj 34 45 key; #X obj 34 76 sel $1; #X connect 0 0 4 1; #X connect 3 0 4 0; #X connect 4 0 1 0;
--- NEW FILE: sqrt-pan~-help.pd --- #N canvas 436 240 483 397 10; #X obj 43 196 *~ 0.3; #X obj 44 166 noise~; #X obj 43 264 ezdac~ 0; #X floatatom 101 196 5 0 0 0 - - -; #X obj 101 166 / 127; #X text 23 80 See also:; #X msg 89 79 cp-pan~; #X obj 43 226 sqrt-pan~; #X text 23 51 Square root panner; #X text 23 21 sqrt-pan~; #X msg 260 21 Envelopes; #X msg 264 316 Overview; #X obj 104 142 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 6200 1; #X text 104 123 L < < < M > > > R; #X text 197 166 controller value; #X text 22 328 2004 by Karlheinz Essl; #X connect 0 0 7 0; #X connect 1 0 0 0; #X connect 3 0 7 1; #X connect 4 0 3 0; #X connect 7 0 2 0; #X connect 7 1 2 1; #X connect 12 0 4 0;
--- NEW FILE: make-ED-scale-help.pd --- #N canvas 462 248 524 410 10; #X floatatom 171 146 4 0 0 2 max_ED - -; #X floatatom 117 145 4 0 0 2 min_ED - -; #X obj 104 207 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X obj 63 206 show; #X text 14 28 make-ED-scale; #X text 14 61 Generates a geometrical scale of entry delays (ED) between a min. ED and a max. ED with a certain number of elements.; #X text 14 96 see also:; #X msg 88 98 make-scale; #X floatatom 226 145 4 0 0 2 number_of_elements - -; #X msg 63 237; #X msg 170 98 make-trans-scale; #X msg 286 98 make-choice-list; #X msg 341 23 Lists; #X msg 284 23 Rhythm; #X obj 63 141 bng 15 250 50 0 empty empty go! 0 -6 0 8 -262144 -1 -1 ; #X text 16 279 1994-2003 by Karlheinz Essl; #X text 223 39 vs. 1.1; #X text 16 294 vs. 1.1: now also works with floats; #X text 16 236 scale:; #X obj 63 175 make-ED-scale 250 1000 6; #X connect 0 0 19 2; #X connect 1 0 19 1; #X connect 2 0 3 1; #X connect 3 0 9 0; #X connect 8 0 19 3; #X connect 14 0 19 0; #X connect 19 0 3 0;
--- NEW FILE: repchord-rhythm-help.pd --- #N canvas 346 75 903 677 10; #X text 101 193 periodicity of min.ED/max.ED <float between 0 and 1>: determines the probability of repetition of a chosen entry delay whereas 0 means "no repetition" ("aperiodic") and 1 means "permanent repetition" ("periodic").; #X text 101 118 min.ED , max.ED , (number of) ED-values <ints>: parameters for generating a geometrical row of entry delays which serves as a material list.; #X text 101 162 max.chord size <int> of longest entry delay value (the shortest is always 1); #X text 77 52 Generates a rhythm which repetition rate and chord size are depending on the index of the chosen ED. The following parameters allow you to model a lot of different musical situations:; #X text 85 193 -; #X text 85 162 -; #X text 86 118 -; #X text 70 20 repchord-rhythm; #X text 81 257 see also:; #X msg 146 258 super-rhythm; #X obj 126 300 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 1 1; #X text 403 299 periodicity of min.ED; #X text 563 297 periodicity of max.ED; #X floatatom 562 325 4 0 0 0 - - -; #X floatatom 407 322 4 0 0 0 - - -; #X floatatom 290 327 4 0 0 2 max_chord_size - -; #X floatatom 249 314 4 0 0 2 ED-values - -; #X floatatom 208 327 4 0 0 2 max_ED - -; #X floatatom 167 317 4 0 0 2 min_ED - -; #X obj 126 452 brown-melody 36 84 0.25; #X text 237 257 - the most powerful and general rhythm generator; #X floatatom 187 407 4 0 0 3 chord_size - -; #X obj 249 402 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 311 407 5 0 0 3 ED - -; #X floatatom 373 407 4 0 0 3 ED_index - -; #X msg 384 19 Rhythm-Generators; #X text 76 553 1993-96 by Karlheinz Essl; #X obj 126 499 play2 127 500 1 1; #X text 76 571 vs. 2: new implementation , rightmost outlet added , bug fixes , surpresses repetitions of already used EDs; #X obj 126 366 repchord-rhythm 50 2000 12 6 0.8 0.2; #X connect 10 0 29 0; #X connect 13 0 29 6; #X connect 14 0 29 5; #X connect 15 0 29 4; #X connect 16 0 29 3; #X connect 17 0 29 2; #X connect 18 0 29 1; #X connect 19 0 27 0; #X connect 29 0 19 0; #X connect 29 1 21 0; #X connect 29 2 22 0; #X connect 29 3 23 0; #X connect 29 4 24 0;
--- NEW FILE: metro-dev%.pd --- #N canvas 131 149 421 355 10; #N canvas 298 92 349 267 boundaries 0; #X obj 123 166 expr $i1 + ($i2/200. * $i1); #X obj 48 138 expr $i1 - ($i2/200. * $i1); #X obj 218 50 inlet; #X obj 48 50 inlet; #X obj 123 201 outlet; #X obj 48 201 outlet; #X obj 218 76 t b b a a; #X obj 48 80 t a a; #X connect 0 0 4 0; #X connect 1 0 5 0; #X connect 2 0 6 0; #X connect 3 0 7 0; #X connect 6 0 1 0; #X connect 6 1 0 0; #X connect 6 2 1 1; #X connect 6 3 0 1; #X connect 7 0 1 0; #X connect 7 1 0 0; #X restore 219 124 pd boundaries; #X obj 148 189 between 450 550; #X obj 75 251 metro 1000; #X text 307 145 max.; #X text 186 145 min.; #X text 195 220 ED; #X obj 75 306 outlet; #X obj 290 40 inlet; #X obj 219 40 inlet; #X obj 75 40 inlet; #X obj 178 251 outlet; #X text 140 311 1993 by Karlheinz Essl; #X obj 290 96 int $2; #X obj 219 97 int $1; #X obj 148 219 t a a; #X obj 148 66 t b b b; #X obj 75 280 t b b; #X obj 148 39 loadbang; #X connect 0 0 1 1; #X connect 0 1 1 2; #X connect 1 0 14 0; #X connect 2 0 16 0; #X connect 7 0 12 0; #X connect 8 0 13 0; #X connect 9 0 2 0; #X connect 12 0 0 1; #X connect 13 0 0 0; #X connect 14 0 2 1; #X connect 14 1 10 0; #X connect 15 0 1 0; #X connect 15 1 13 0; #X connect 15 2 12 0; #X connect 16 0 6 0; #X connect 16 1 15 0; #X connect 17 0 15 0;
--- NEW FILE: pitch-from-intervals.pd --- #N canvas 360 176 286 239 10; #X obj 31 124 st2pitch; #X obj 31 149 outlet; #X obj 110 149 outlet; #X obj 125 52 inlet; #X obj 219 52 inlet; #X obj 31 52 inlet; #X text 30 186 1993 by Karlheinz Essl; #X obj 31 81 sel-princ $1; #X obj 31 101 t a a; #X connect 0 0 1 0; #X connect 3 0 7 1; #X connect 4 0 7 2; #X connect 5 0 7 0; #X connect 7 0 8 0; #X connect 8 0 0 0; #X connect 8 1 2 0;
--- NEW FILE: periodic.pd --- #N canvas 63 44 501 317 10; #X obj 30 48 r RTC-rs; #X floatatom 30 98 0 0 0 0 - - -; #X msg 30 118 seed $1; #X obj 103 118 first-bang; #X obj 136 77 t b b b; #X obj 136 46 inlet; #X obj 276 41 inlet; #X text 389 77 reset; #X obj 235 46 inlet; #X obj 179 118 pass 50; #X text 188 229 1995-98 by Karlheinz Essl; #X obj 158 229 outlet; #X obj 158 195 int; #X text 188 243 vs. 1.1; #X obj 179 157 random $1; #X obj 276 91 per2pass $2; #X obj 276 61 t a b; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 2 0 14 0; #X connect 3 0 14 0; #X connect 4 0 3 0; #X connect 4 1 12 0; #X connect 4 2 9 0; #X connect 5 0 4 0; #X connect 6 0 16 0; #X connect 8 0 14 1; #X connect 9 0 14 0; #X connect 12 0 11 0; #X connect 14 0 12 1; #X connect 15 0 9 1; #X connect 16 0 15 0; #X connect 16 1 3 1;
--- NEW FILE: neutral-harmony.pd --- #N canvas 320 85 721 471 10; #X obj 260 388 outlet; #X obj 384 123 inlet; #X obj 356 270 int; #X text 138 269 given interval; #X obj 260 268 int; #X obj 260 326 st2pitch; #X text 395 270 complimentary interval; #X obj 414 202 contrario 11; #X obj 260 196 sel 1; #X obj 260 80 inlet; #X text 76 41 alternatively switching between given and complimentary interval; #X text 293 416 1993 by Karlheinz Essl; #X obj 384 149 int $1; #X obj 384 172 t a a; #X obj 356 237 b; #X obj 260 166 f 0; #X obj 289 166 + 1; #X obj 316 166 mod 2; #X obj 260 111 t b b; #X connect 1 0 12 0; #X connect 2 0 5 0; #X connect 4 0 5 0; #X connect 5 0 0 0; #X connect 7 0 2 1; #X connect 8 0 4 0; #X connect 8 1 14 0; #X connect 9 0 18 0; #X connect 12 0 13 0; #X connect 13 0 4 1; #X connect 13 1 7 0; #X connect 14 0 2 0; #X connect 15 0 16 0; #X connect 15 0 8 0; #X connect 16 0 17 0; #X connect 17 0 15 1; #X connect 18 0 15 0; #X connect 18 1 12 0;
--- NEW FILE: frq2note.pd --- #N canvas 63 44 395 226 10; #X obj 49 64 inlet; #X obj 49 135 outlet; #X obj 49 102 ftom; #X connect 0 0 2 0; #X connect 2 0 1 0;
--- NEW FILE: between-lin-help.pd --- #N canvas 0 0 575 364 10; #X floatatom 97 163 5 0 0 0 - - -; #X msg 97 105 bang; #X text 84 34 Bang (or any input) in left inlet outputs a random number of a linear scale between min and max with a certain number of elements. ; #X floatatom 143 110 5 0 0 2 min - -; #X floatatom 190 111 5 0 0 2 max - -; #X floatatom 238 113 5 0 0 2 steps - -; #X obj 97 136 between-lin 0 90 10; #X obj 175 247 between-variations-help; #X text 100 248 Also see:; #X connect 1 0 6 0; #X connect 3 0 6 1; #X connect 4 0 6 2; #X connect 5 0 6 3; #X connect 6 0 0 0;
--- NEW FILE: note2frq.pd --- #N canvas 50 61 361 228 10; #X obj 51 81 inlet; #X obj 51 144 outlet; #X obj 51 113 mtof; #X connect 0 0 2 0; #X connect 2 0 1 0;
--- NEW FILE: listreg.pd --- #N canvas 0 0 450 300 10; #X obj 108 95 inlet; #X obj 108 219 outlet; #X obj 108 133 route bang; #X obj 108 187 list; #X obj 108 158 b; #X obj 216 131 inlet; #X connect 0 0 2 0; #X connect 2 0 4 0; #X connect 2 1 3 1; #X connect 3 0 1 0; #X connect 4 0 3 0; #X connect 5 0 3 1;
--- NEW FILE: INFROW1024.tab --- 0 1 -1 2 1 0 -2 3 -1 2 0 1 2 -1 -3 4 1 0 -2 3 0 1 -1 2 -2 3 1 0 3 -2 -4 5 -1 2 0 1 2 -1 -3 4 0 1 -1 2 1 0 -2 3 2 -1 -3 4 -1 2 0 1 -3 4 2 -1 4 -3 -5 6 1 0 -2 3 0 1 -1 2 -2 3 1 0 3 -2 -4 5 0 1 -1 2 1 0 -2 3 -1 2 0 1 2 -1 -3 4 -2 3 1 0 3 -2 -4 5 1 0 -2 3 0 1 -1 2 3 -2 -4 5 -2 -9 1 0 -4 5 3 -2 5 -4 -6 7 -1 2 0 1 2 -1 -3 4 0 1 -1 2 1 0 -2 3 2 -1 -3 4 -1 2 0 1 -3 4 2 -1 4 -3 -5 6 0 1 -1 2 1 0 -2 3 -1 2 0 1 2 -1 -3 4 1 0 -2 3 0 1 -1 2 -2 3 1 0 3 -2 -4 5 2 -1 -3 4 -1 2 0 1 -3 4 2 -1 4 -3 -5 6 -1 2 0 1 2 -1 -3 4 0 1 -1 2 1 0 -2 3 -3 4 2 -1 4 -3 -5 6 2 -1 -3 4 -1 2 0 1 4 -3 -5 6 -3 4 2 -1 -5 6 4 -3 6 -5 -7 8 1 0 -2 3 0 1 -1 2 -2 3 1 0 3 -2 -4 5 0 1 -1 2 1 0 -2 3 -1 2 0 1 2 -1 -3 4 -2 3 1 0 3 -2 -4 5 1 0 -2 3 0 1 -1 2 3 -2 -4 5 -2 3 1 0 -4 5 3 -2 5 -4 -6 7 0 1 -1 2 1 0 -2 3 -1 2 0 1 2 -1 -3 4 1 0 -2 3 0 1 -1 2 -2 3 1 0 3 -2 -4 5 -1 2 0 1 2 -1 -3 4 0 1 -1 2 1 0 -2 3 2 -1 -3 4 -1 2 0 1 -3 4 2 -1 4 -3 -5 6 -2 3 1 0 3 -2 -4 5 1 0 -2 3 0 1 -1 2 3 -2 -4 5 -2 3 1 0 -4 5 3 -2 5 -4 -6 7 1 0 -2 3 0 1 -1 2 -2 3 1 0 3 -2 -4 5 0 1 -1 2 1 0 -2 3 -1 2 0 1 2 -1 -3 4 3 -2 -4 5 -2 3 1 0 -4 5 3 -2 5 -4 -6 7 -2 3 1 0 3 -2 -4 5 1 0 -2 3 0 1 -1 2 -4 5 3 -2 5 -4 -6 7 3 -2 -4 5 -2 3 1 0 5 -4 -6 7 -4 5 3 -2 -6 7 5 -4 7 -6 -8 9 -1 2 0 1 2 -1 -3 4 0 1 -1 2 1 0 -2 3 2 -1 -3 4 -1 2 0 1 -3 4 2 -1 4 -3 -5 6 0 1 -1 2 1 0 -2 3 -1 2 0 1 2 -1 -3 4 1 0 -2 3 0 1 -1 2 -2 3 1 0 3 -2 -4 5 2 -1 -3 4 -1 2 0 1 -3 4 2 -1 4 -3 -5 6 -1 2 0 1 2 -1 -3 4 0 1 -1 2 1 0 -2 3 -3 4 2 -1 4 -3 -5 6 2 -1 -3 4 -1 2 0 1 4 -3 -5 6 -3 4 2 -1 -5 6 4 -3 6 -5 -7 8 0 1 -1 2 1 0 -2 3 -1 2 0 1 2 -1 -3 4 1 0 -2 3 0 1 -1 2 -2 3 1 0 3 -2 -4 5 -1 2 0 1 2 -1 -3 4 0 1 -1 2 1 0 -2 3 2 -1 -3 4 -1 2 0 1 -3 4 2 -1 4 -3 -5 6 1 0 -2 3 0 1 -1 2 -2 3 1 0 3 -2 -4 5 0 1 -1 2 1 0 -2 3 -1 2 0 1 2 -1 -3 4 -2 3 1 0 3 -2 -4 5 1 0 -2 3 0 1 -1 2 3 -2 -4 5 -2 3 1 0 -4 5 3 -2 5 -4 -6 7 2 -1 -3 4 -1 2 0 1 -3 4 2 -1 4 -3 -5 6 -1 2 0 1 2 -1 -3 4 0 1 -1 2 1 0 -2 3 -3 4 2 -1 4 -3 -5 6 2 -1 -3 4 -1 2 0 1 4 -3 -5 6 -3 4 2 -1 -5 6 4 -3 6 -5 -7 8 -1 2 0 1 2 -1 -3 4 0 1 -1 2 1 0 -2 3 2 -1 -3 4 -1 2 0 1 -3 4 2 -1 4 -3 -5 6 0 1 -1 2 1 0 -2 3 -1 2 0 1 2 -1 -3 4 1 0 -2 3 0 1 -1 2 -2 3 1 0 3 -2 -4 5 -3 4 2 -1 4 -3 -5 6 2 -1 -3 4 -1 2 0 1 4 -3 -5 6 -3 4 2 -1 -5 6 4 -3 6 -5 -7 8 2 -1 -3 4 -1 2 0 1 -3 4 2 -1 4 -3 -5 6 -1 2 0 1 2 -1 -3 4 0 1 -1 2 1 0 -2 3 4 -3 -5 6 -3 4 2 -1 -5 6 4 -3 6 -5 -7 8 -3 4 2 -1 4 -3 -5 6 2 -1 -3 4 -1 2 0 1 -5 6 4 -3 6 -5 -7 8 4 -3 -5 6 -3 4 2 -1 6 -5 -7 8 -5 6 4 -3 -7 8 6 -5 8 -7 -9 10
--- NEW FILE: VolAmb-help.pd --- #N canvas 359 149 522 324 10; #X msg 258 24 Envelopes; #X obj 78 153 VolAmb; #X floatatom 78 123 0 0 0 0 - - -; #X floatatom 78 186 0 0 0 0 - - -; #X text 76 206 dyn.min; #X floatatom 163 186 0 0 0 0 - - -; #X text 163 206 dyn.max; #X obj 81 98 hsl 128 15 0 127 0 0 empty empty controller -2 -6 0 8 -262144 -1 -1 3100 1; #X text 16 23 VolAmb; #X text 16 52 Controls the ambitus between minimum and maximum dynamic by a single controller.; #X text 18 242 © 1997 by Karlheinz Essl; #X connect 1 0 3 0; #X connect 1 1 5 0; #X connect 2 0 1 0; #X connect 7 0 2 0;
--- NEW FILE: samp10~.pd --- #N canvas 63 44 384 463 10; #X obj 45 57 inlet; #X obj 138 112 f 0; #X obj 169 113 + 1; #X obj 202 112 mod 10; #X obj 45 141 list prepend 0; #X obj 45 87 t a b; #X obj 45 165 route 0 1 2 3 4 5 6 7 8 9; #X obj 66 367 outlet~; #X obj 196 293 play-samp~; #X obj 214 321 play-samp~; #X obj 148 210 play-samp~; #X obj 164 240 play-samp~; #X obj 180 265 play-samp~; #X obj 133 321 play-samp~; #X obj 99 264 play-samp~; #X obj 115 293 play-samp~; #X obj 83 240 play-samp~; #X obj 66 211 play-samp~; #X connect 0 0 5 0; #X connect 1 0 2 0; #X connect 1 0 4 1; #X connect 2 0 3 0; #X connect 3 0 1 1; #X connect 4 0 6 0; #X connect 5 0 4 0; #X connect 5 1 1 0; #X connect 6 0 17 0; #X connect 6 1 16 0; #X connect 6 2 14 0; #X connect 6 3 15 0; #X connect 6 4 13 0; #X connect 6 5 10 0; #X connect 6 6 11 0; #X connect 6 7 12 0; #X connect 6 8 8 0; #X connect 6 9 9 0; #X connect 8 0 7 0; #X connect 9 0 7 0; #X connect 10 0 7 0; #X connect 11 0 7 0; #X connect 12 0 7 0; #X connect 13 0 7 0; #X connect 14 0 7 0; #X connect 15 0 7 0; #X connect 16 0 7 0; #X connect 17 0 7 0;
--- NEW FILE: schweller.pd --- #N canvas 320 110 751 394 10; #X obj 70 274 int; #X obj 70 35 inlet; #X obj 135 148 first-bang; #X obj 200 38 inlet; #X obj 285 37 inlet; #X obj 379 36 inlet; #X obj 70 310 outlet; #N canvas 115 16 707 620 velo 0; #X obj 323 378 outlet; #X obj 374 61 inlet; #X text 381 37 relation cresc/descresc; #N canvas 31 98 298 254 sharing 0; #X obj 38 188 outlet; #X obj 38 153 * 0.5; #X obj 38 40 inlet; #X obj 38 66 t f f; #X obj 98 153 * 0.5; #X obj 188 114 contrario 1; #X obj 158 40 inlet; #X obj 98 188 outlet; #X obj 158 83 t a a; #X connect 1 0 0 0; #X connect 2 0 3 0; #X connect 3 0 1 0; #X connect 3 1 4 0; #X connect 4 0 7 0; #X connect 5 0 4 1; #X connect 6 0 8 0; #X connect 8 0 1 1; #X connect 8 1 5 0; #X restore 309 143 pd sharing; #X text 306 39 duration; #X obj 309 61 inlet; #X obj 39 61 inlet; #X obj 180 60 inlet; #X text 127 34 start; #X obj 134 60 inlet; #X obj 154 481 outlet; #X text 182 33 end; #X floatatom 374 215 5 0 0 0 - - -; #X floatatom 309 216 5 0 0 0 - - -; #X obj 309 108 t a a; #X obj 323 268 del; #X obj 154 238 pack 0 0 0 0; #X obj 118 200 f; #X obj 39 92 t b b; #X obj 154 418 line; #X obj 197 332 del; #X msg 154 284 $1 , $2 $3; #X obj 154 260 t a b a; #X obj 197 356 list; #X msg 197 384 $1 $4; #X connect 1 0 3 1; #X connect 3 0 13 0; #X connect 3 0 16 2; #X connect 3 0 20 1; #X connect 3 1 12 0; #X connect 3 1 16 3; #X connect 5 0 14 0; #X connect 6 0 18 0; #X connect 7 0 16 1; #X connect 9 0 17 1; #X connect 14 0 3 0; #X connect 14 1 15 1; #X connect 15 0 0 0; #X connect 16 0 22 0; #X connect 17 0 16 0; #X connect 18 0 17 0; #X connect 18 1 15 0; #X connect 19 0 10 0; #X connect 20 0 23 0; #X connect 21 0 19 0; #X connect 22 0 21 0; #X connect 22 1 20 0; #X connect 22 2 23 1; #X connect 23 0 24 0; #X connect 24 0 19 0; #X restore 135 237 pd velo; #X text 325 290 vs. 3.0: 1993-96 by Karlheinz Essl; #X obj 463 36 inlet; #X obj 230 322 outlet; #X obj 230 171 int $1; #X obj 315 171 int $2; #X obj 409 172 int $3; #X obj 493 172 float $4; #X obj 200 272 t b a; #X obj 200 63 t b a; #X obj 285 65 t b a; #X obj 379 62 t b a; #X obj 463 60 t b a; #X obj 70 62 t b b; #X obj 525 83 loadbang; #X text 324 317 Pd: 2006 Frank Barknecht; #X connect 0 0 6 0; #X connect 1 0 20 0; #X connect 2 0 7 0; #X connect 3 0 16 0; #X connect 4 0 17 0; #X connect 5 0 18 0; #X connect 7 0 0 1; #X connect 7 1 15 0; #X connect 9 0 19 0; #X connect 11 0 7 1; #X connect 12 0 7 2; #X connect 13 0 7 3; #X connect 14 0 7 4; #X connect 15 0 2 1; #X connect 15 1 10 0; #X connect 16 0 2 1; #X connect 16 1 11 0; #X connect 17 0 2 1; #X connect 17 1 12 0; #X connect 18 0 2 1; #X connect 18 1 13 0; #X connect 19 0 2 1; #X connect 19 1 14 0; #X connect 20 0 0 0; #X connect 20 1 2 0; #X connect 21 0 14 0; #X connect 21 0 13 0; #X connect 21 0 12 0; #X connect 21 0 11 0;
--- NEW FILE: line2-help.pd --- #N canvas 351 161 559 394 10; #X obj 161 289 timer; #X obj 191 263 b; #X floatatom 161 316 5 0 0 0 - - -; #X obj 161 148 t b b; #X msg 161 118 bang; #X text 43 58 line2; #X floatatom 109 260 5 0 0 0 - - -; #X obj 161 217 line2; #X msg 161 174 1 , 200 5239; #X text 58 84 line which sends a bang to its 2nd outlet , when finished. Like "Line" in Max.; #X connect 0 0 2 0; #X connect 1 0 0 1; #X connect 3 0 8 0; #X connect 3 1 0 0; #X connect 4 0 3 0; #X connect 7 0 6 0; #X connect 7 1 1 0; #X connect 8 0 7 0;
--- NEW FILE: markov-help.pd --- #N canvas 340 94 619 459 10; #X text 17 38 markov; #X text 84 20 Interface built around the prob-object of David Zicarelli. A table of transition probabilities (cf. prob.help) is sent to the right-most inlet and the start value into the middle. A bang into the left inlet outputs an element chosen from a one-dimensional markov matrix.; #X msg 297 174 clear; #X msg 255 174 dump; #X obj 150 245 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 35 168 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 102 160 4 0 0 2 start_value - -; #N canvas 231 56 462 467 markov-matrix 0; #X msg 131 148 5 4 1; #X msg 131 173 4 3 1; #X msg 131 205 3 2 1; #X msg 131 237 2 1 1; #X msg 192 237 1 2 1; #X msg 192 205 2 3 1; #X msg 192 173 3 4 1; #X msg 192 148 4 5 1; #X obj 37 332 outlet; #X msg 131 267 1 0 1; #X msg 192 267 0 1 1; #X obj 50 53 inlet; #X obj 50 86 t b b b b b b b b b b; #X connect 0 0 8 0; #X connect 1 0 8 0; #X connect 2 0 8 0; #X connect 3 0 8 0; #X connect 4 0 8 0; #X connect 5 0 8 0; #X connect 6 0 8 0; #X connect 7 0 8 0; #X connect 9 0 8 0; #X connect 10 0 8 0; #X connect 11 0 12 0; #X connect 12 0 9 0; #X connect 12 1 3 0; #X connect 12 2 2 0; #X connect 12 3 1 0; #X connect 12 4 0 0; #X connect 12 5 10 0; #X connect 12 6 4 0; #X connect 12 7 5 0; #X connect 12 8 6 0; #X connect 12 9 7 0; #X restore 250 154 pd markov-matrix; #X obj 250 123 loadbang; #X obj 35 243 collect; #X obj 91 243 bng 15 250 50 1 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 35 271; #X text 171 245 bang , when there is no transition possible ("I am stuck!"); #X text 389 406 1994 by Karlheinz Essl; #X msg 315 122 bang; #X obj 35 210 markov 5; #X connect 2 0 15 2; #X connect 3 0 15 2; #X connect 5 0 15 0; #X connect 6 0 15 1; #X connect 7 0 15 2; #X connect 8 0 7 0; #X connect 9 0 11 0; #X connect 10 0 9 1; #X connect 14 0 7 0; #X connect 15 0 9 0; #X connect 15 1 4 0;
--- NEW FILE: trans-help.pd --- #N canvas 242 65 640 495 10; #X text 20 69 Int in left inlet outputs the nth member of a transition between a start value <int , float> and an end value <int , float> in n steps <int> , whereas "steps" is the number of row elements (between start and end value) minus one. The mode of transition is determined by the int sent to the rightmost inlet:; #X text 20 38 trans; #X text 54 186 2 = exponential; #X text 54 172 1 = linear; #X text 54 158 0 = logarithmical; #X text 21 220 see also:; #X msg 293 219 geom; #X msg 88 219 trans-lin; #X msg 220 219 trans-exp; #X msg 151 219 trans-log; #X text 21 385 1995 by Karlheinz Essl; #X floatatom 45 348 0 0 0 0 - - -; #X obj 45 307 trans 500 2000 12 0; #X text 183 257 end.value; #X text 111 257 start.value; #X text 250 257 steps; #X floatatom 45 278 0 0 0 0 - - -; #X text 41 257 row index; #X floatatom 183 278 0 0 0 0 - - -; #X floatatom 114 278 0 0 0 0 - - -; #X floatatom 251 278 0 0 0 0 - - -; #X msg 355 33 Toolbox; #X msg 326 385 RTC-Overview; #X text 110 349 nth member of transition row; #X text 160 153 }; #X text 190 174 transition functions; #N canvas 0 0 738 528 trans-type 0; #X obj 107 393 list split 1; #X symbolatom 107 142 14 0 0 0 - - -; #X obj 107 127 hradio 15 1 0 3 empty empty transition 0 -6 0 8 -262144 -1 -1 2; #X obj 107 419 outlet; #X obj 244 66 inlet; #X obj 107 247 select 0 1 2; #X msg 107 304 0 logarithmical; #X msg 235 303 1 linear; #X msg 317 306 2 exponential; #X connect 0 0 3 0; #X connect 0 1 1 0; #X connect 2 0 5 0; #X connect 4 0 2 0; #X connect 5 0 6 0; #X connect 5 1 7 0; #X connect 5 2 8 0; #X connect 6 0 0 0; #X connect 7 0 0 0; #X connect 8 0 0 0; #X coords 0 -1 1 1 125 60 1 100 100; #X restore 320 250 pd trans-type; #X connect 12 0 11 0; #X connect 16 0 12 0; #X connect 18 0 12 2; #X connect 19 0 12 1; #X connect 20 0 12 3; #X connect 26 0 12 4;
--- NEW FILE: rota-help.pd --- #N canvas 428 278 641 354 10; #X obj 164 188 rota; #X msg 164 130 bang; #X floatatom 194 214 5 0 0 0 - - -; #X msg 204 130 a b c d e f; #X obj 292 151 b; #X msg 292 130 restart; #X text 97 76 On every bang into first inlet cycle up and down through the list sent into the second inlet. Third inlet resets.; #X text 249 214 Outlet 2: current index (zero-based); #X obj 164 238 print ROTA; #X text 162 260 Outlet 1: current list element.; #X connect 0 0 8 0; #X connect 0 1 2 0; #X connect 1 0 0 0; #X connect 3 0 0 1; #X connect 4 0 0 2; #X connect 5 0 4 0;
--- NEW FILE: rit-acc.pd --- #N canvas 631 255 425 444 10; #X obj 182 369 outlet; #X obj 94 39 inlet; #X obj 94 111 sel 1; #X obj 337 39 inlet; #X obj 241 39 inlet; #X obj 94 160 count-bang; #X obj 94 215 geom 50 1.1; #X obj 31 368 outlet; #X text 232 376 1993 by Karlheinz Essl; #X obj 286 152 float $2; #X obj 190 152 float $1; #X obj 94 69 t f b b; #X obj 31 347 t b b; #X obj 138 257 t b a a; #X msg 31 246 stop; #X obj 124 134 t b b; #X obj 31 318 del 500; #X obj 94 235 moses 1; #X text 160 236 don't try faster that 1 msec!; #X connect 1 0 11 0; #X connect 2 0 5 0; #X connect 2 1 15 0; #X connect 3 0 9 1; #X connect 4 0 10 1; #X connect 5 0 6 0; #X connect 6 0 17 0; #X connect 9 0 6 2; #X connect 10 0 6 1; #X connect 11 0 2 0; #X connect 11 1 10 0; #X connect 11 2 9 0; #X connect 12 0 7 0; #X connect 12 1 5 0; #X connect 13 0 16 0; #X connect 13 1 16 1; #X connect 13 2 0 0; #X connect 14 0 16 0; #X connect 15 0 14 0; #X connect 15 1 5 1; #X connect 16 0 12 0; #X connect 17 1 13 0;
--- NEW FILE: infinity-row-help.pd --- #N canvas 680 138 537 524 10; #X msg 336 24 Harmony; #X text 221 275 row index; #X floatatom 188 275 0 0 0 0 - - -; #X obj 430 202 bng 15 250 50 0 empty empty reset 0 -6 0 8 -262144 -1 -1; #X floatatom 262 207 4 0 0 2 interval_projection - -; #X text 21 477 1996 by Karlheinz Essl; #X floatatom 92 218 4 0 0 2 start-note - -; #X floatatom 60 273 0 0 0 0 - - -; #X text 91 274 note; #X obj 60 421 play2 127 200 1 1; #X floatatom 98 396 0 0 0 0 - - -; #N canvas 296 111 503 419 dynamic 0; #X obj 148 273 outlet; #X text 44 31 Every 4th note will be played mf; #X text 44 47 Every 16th note will be played f; #X text 44 62 The rest is played p; #X text 64 81 >>> reflecting the "fractal" structure of the row; #X obj 62 118 inlet; #N canvas 287 70 450 300 every_16th 0; #X obj 96 117 expr $i1 % 16 == 0; #X obj 96 91 t a a; #X obj 96 250 outlet; #X obj 96 62 inlet; #X obj 160 60 inlet; #X obj 96 196 int 127; #X obj 96 142 select 1 0; #X obj 171 197 int; #X obj 171 247 outlet; #X connect 0 0 6 0; #X connect 1 0 0 0; #X connect 1 1 7 1; #X connect 3 0 1 0; #X connect 4 0 5 1; #X connect 5 0 2 0; #X connect 6 0 5 0; #X connect 6 1 7 0; #X connect 7 0 8 0; #X restore 62 184 pd every_16th; #N canvas 287 70 450 300 every_4th 0; #X obj 96 230 outlet; #X obj 96 62 inlet; #X obj 185 62 inlet; #X obj 96 116 expr $i1 % 4 == 0; #X obj 146 62 inlet; #X obj 96 142 select 1 0; #X obj 147 186 int 30; #X obj 96 186 int 70; #X connect 1 0 3 0; #X connect 2 0 6 1; #X connect 3 0 5 0; #X connect 4 0 7 1; #X connect 5 0 7 0; #X connect 5 1 6 0; #X connect 6 0 0 0; #X connect 7 0 0 0; #X restore 148 242 pd every_4th; #X msg 187 217 70; #X text 215 218 mf; #X text 271 217 p; #X msg 245 219 30; #X msg 148 161 127; #X text 185 161 forte; #X connect 5 0 6 0; #X connect 6 0 0 0; #X connect 6 1 7 0; #X connect 7 0 0 0; #X connect 8 0 7 1; #X connect 11 0 7 2; #X connect 12 0 6 1; #X restore 98 369 pd dynamic; #X text 12 93 NB: The fourth , sixteenth , sixtyfourth etc. note of the row is identical!; #X text 12 29 infinity-row; #X text 143 397 velocity; #X obj 60 175 metro 150; #X floatatom 158 145 4 0 0 2 speed - -; #X obj 60 143 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 1 1; #X obj 60 218 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 179 207 hradio 15 1 0 3 empty empty mode 0 -6 0 8 -262144 -1 -1 0; #X obj 60 244 infinity-row 70 0 1; #X text 12 47 Found by Per Noergaard (1959) , further variants by Peter Richter (1996) - also see: http://www.pernoergaard.dk; #X text 242 475 TODO Pd: The Richter variants; #X connect 2 0 11 0; #X connect 3 0 20 4; #X connect 4 0 20 3; #X connect 6 0 20 1; #X connect 7 0 9 0; #X connect 10 0 9 1; #X connect 11 0 10 0; #X connect 15 0 18 0; #X connect 16 0 15 1; #X connect 17 0 15 0; #X connect 18 0 20 0; #X connect 19 0 20 2; #X connect 20 0 7 0; #X connect 20 1 2 0;
--- NEW FILE: st2pitch.pd --- #N canvas 38 44 444 457 10; #X obj 38 53 inlet; #X text 97 230 < converts floats to ints; #X obj 38 304 outlet; #X obj 143 309 outlet; #X obj 139 54 inlet; #X text 35 355 vs. 2; #X text 35 335 1993-94 by Karlheinz Essl; #X obj 38 210 + $1; #X obj 139 79 t b a; #X obj 38 230 int; #X obj 38 254 t a a; #X obj 38 277 mod 12; #X obj 66 144 f 0; #X obj 38 144 +; #X msg 54 114 0; #X connect 0 0 13 0; #X connect 4 0 8 0; #X connect 7 0 9 0; #X connect 8 0 14 0; #X connect 8 1 7 1; #X connect 9 0 10 0; #X connect 10 0 11 0; #X connect 10 1 3 0; #X connect 11 0 2 0; #X connect 12 0 13 1; #X connect 13 0 12 0; #X connect 13 0 7 0; #X connect 14 0 13 1;
--- NEW FILE: xrandom.pd --- #N canvas 63 156 387 297 10; #X msg 21 100 seed $1; #X obj 21 31 r RTC-rs; #X obj 243 174 outlet; #X msg 195 92 clear; #X obj 195 56 t b f; #X obj 86 174 outlet; #X obj 195 31 inlet; #X obj 86 31 inlet; #X msg 102 77 clear , bang; #X obj 86 136 urne $1; #X connect 0 0 9 0; #X connect 1 0 0 0; #X connect 3 0 9 0; #X connect 4 0 3 0; #X connect 4 1 9 1; #X connect 6 0 4 0; #X connect 7 0 9 0; #X connect 8 0 9 0; #X connect 9 0 5 0; #X connect 9 1 2 0; #X connect 9 1 8 0;
--- NEW FILE: nth.pd --- #N canvas 0 0 450 300 10; #X obj 113 155 list-idx; #X obj 113 129 list; #X obj 113 101 t b a; #X obj 113 80 inlet; #X obj 157 79 inlet; #X obj 113 178 outlet; #X connect 0 0 5 0; #X connect 1 0 0 0; #X connect 2 0 1 0; #X connect 2 1 0 1; #X connect 3 0 2 0; #X connect 4 0 1 1;
--- NEW FILE: schweller-help.pd --- #N canvas 308 99 592 520 10; #X text 29 36 schweller; #X msg 350 18 Envelopes; #X text 29 478 vs. 3: new inlet added (fraction factor); #X floatatom 369 263 4 0 0 2 fraction_factor - -; #X obj 53 203 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 1 1; #X text 29 464 1993-96 by Karlheinz Essl; #X floatatom 314 243 4 0 0 2 duration - -; #X floatatom 256 223 4 0 0 2 middle_velocity - -; #X floatatom 190 203 4 0 0 2 start/end_velocity - -; #X msg 45 345 60; #X floatatom 83 351 0 0 0 1 velocity - -; #X msg 75 203 0; #X text 168 50 vs. 3; #X obj 53 266 t b b; #X text 29 68 Generates a transition between a start velocity , a middle velocity and an end velocity (which the same as start velocity). By this you can create crescendo-decrescendo resp. decrescendo-crescendo envelopes ("hairpins" - in german: "Schweller"). A fraction factor (float between 0 and 1) send in the rightmost inlet determines the proportion between crescendo and decrescendo part.; #X obj 45 398 play2 127 90 0 1; #X obj 53 239 metro 100; #X obj 83 316 schweller 15 127 3000 0.25; #X connect 3 0 17 4; #X connect 4 0 16 0; #X connect 6 0 17 3; #X connect 7 0 17 2; #X connect 8 0 17 1; #X connect 9 0 15 0; #X connect 10 0 15 1; #X connect 11 0 4 0; #X connect 13 0 9 0; #X connect 13 1 17 0; #X connect 16 0 13 0; #X connect 17 0 10 0; #X connect 17 1 11 0;
--- NEW FILE: note2frq-help.pd --- #N canvas 1 48 501 340 10; #X floatatom 36 242 4 0 0 0 - - -; #X floatatom 176 143 4 0 0 0 - - -; #X obj 176 170 / 100; #X msg 102 87 frq2note; #X text 30 23 note2frq; #X text 30 55 Converts a note (= MIDI key number or MIDI cents) into frequency.; #X text 36 88 see also:; #X text 32 278 1994-98 by Karlheinz Essl; #X floatatom 36 114 4 0 0 0 - - -; #X obj 36 212 note2frq; #X floatatom 36 145 4 0 0 0 - - -; #X text 102 244 frequency; #X text 72 113 MIDI key number; #X text 72 144 note name; #X msg 404 29 Harmony; #X text 208 142 MIDI cents; #X text 32 292 vs. 1.1; #X connect 1 0 2 0; #X connect 2 0 9 0; #X connect 8 0 10 0; #X connect 9 0 0 0; #X connect 10 0 9 0;
--- NEW FILE: series-help.pd --- #N canvas 358 313 516 413 10; #X msg 110 102 a b c d; #X msg 73 66 bang; #X obj 73 166 series; #X obj 73 282 print Random_Element; #X obj 91 240 print Refill_Urn; #X msg 134 149 1 2 3 4 5 6 7 8; #X obj 97 223 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 110 199 print Current_Index; #X text 256 199 zero-based!; #X msg 129 128 list x y z; #X connect 0 0 2 1; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 2 1 4 0; #X connect 2 1 6 0; #X connect 2 2 7 0; #X connect 5 0 2 1; #X connect 9 0 2 1;
--- NEW FILE: pitch-from-row-help.pd --- #N canvas 1 48 782 562 10; #X text 28 22 pitch-from-row; #X text 28 54 Generates pitch classes from a material row according to the row form (prime , retrograd , inversion or retro-inversion) and the start note of the row.; #X text 241 390 normalized row modus; #X text 416 362 flashes when end of row is reached; #X msg 234 405 0 7 4 2 5 3 10 1 6 11 8 9; #X floatatom 340 226 4 0 0 2 modus - -; #X text 74 251 rhythm bangs; #X obj 50 293 pitch-from-row; #X msg 195 248; #X obj 50 259 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 50 224 metro 250; #X obj 50 186 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X text 479 239 start note; #X text 28 105 see also:; #X msg 91 105 pitch-from-row-mod; #X msg 444 44 Dodecaphonics; #X msg 474 23 Harmony; #X obj 275 364 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X obj 394 364 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 234 362 show; #X msg 50 405; #N canvas 74 114 324 201 play-it 0; #X obj 151 106 play2 127 500 1 1; #X obj 43 141 outlet; #X obj 43 106 show-pitchclass; #X obj 43 39 inlet; #X obj 43 68 + 60; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 4 0 2 0; #X connect 4 0 0 0; #X restore 50 372 pd play-it; #X text 79 406 pitch class name; #X text 83 193 start/stop; #X obj 173 190 random-row; #X obj 195 218 show; #X text 196 165 Generates new row by random; #X obj 173 164 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 173 139 loadbang; #X text 430 459 1994-97 by Karlheinz Essl; #X obj 441 225 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144 -1 -1 0 1; #X obj 438 244 int; #X obj 234 219 bng 15 250 50 0 empty empty clear 0 -6 0 8 -262144 -1 -1; #X connect 5 0 7 2; #X connect 7 0 21 0; #X connect 7 1 19 0; #X connect 7 2 18 0; #X connect 9 0 7 0; #X connect 10 0 9 0; #X connect 11 0 10 0; #X connect 17 0 19 1; #X connect 19 0 4 0; #X connect 21 0 20 0; #X connect 24 0 25 0; #X connect 24 0 7 1; #X connect 25 0 8 0; #X connect 27 0 24 0; #X connect 28 0 27 0; #X connect 30 0 31 0; #X connect 31 0 7 3; #X connect 32 0 25 1;
--- NEW FILE: sequence-help.pd --- #N canvas 584 415 450 300 10; #X obj 111 125 sequence; #X msg 162 99 a b c d; #X msg 111 95 bang; #X obj 162 148 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X symbolatom 111 168 10 0 0 0 - - -; #X msg 228 99 x y z; #X connect 0 0 4 0; #X connect 0 1 3 0; #X connect 1 0 0 1; #X connect 2 0 0 0; #X connect 5 0 0 1;
--- NEW FILE: geom-help.pd --- #N canvas 1 48 570 353 10; #X text 86 25 Int in left(*) inlet outputs the nth member of a geometrical row. The other parameters are reference value <int , float> and the proportional factor q <float>.; #X floatatom 98 197 5 0 0 1 nth_element_of_geometrical_row - -; #X floatatom 98 114 4 0 0 2 row_index_n - -; #X floatatom 191 114 4 0 0 2 value - -; #X floatatom 258 114 4 0 0 2 proportional_factor_q - -; #X obj 98 163 geom 20 1.25; #X text 101 268 1993 by Karlheinz Essl; #X text 25 35 geom; #N canvas 0 0 445 125 (*) 0; #X text 21 28 (*) older docs mentioned the "right" inlet here , but of course it's the leftmost inlet.; #X restore 321 268 pd (*); #X connect 2 0 5 0; #X connect 3 0 5 1; #X connect 4 0 5 2; #X connect 5 0 1 0;
--- NEW FILE: samp10~-help.pd --- #N canvas 219 146 650 427 10; #X text 226 170 reversed , attenuated; #X text 209 149 transposed , attenuated; #X text 24 295 1999-2003 by Karlheinz Essl; #X text 24 29 samp10~; #X obj 48 196 samp10~; #X text 151 127 original pitch , original gain; #X text 24 61 Allows a polyphony of up to 10 samples at the same time. ; #X text 168 42 vs. 1.1; #X text 24 309 vs. 1.1: voice allocation bug fixed; #X obj 48 227 ezdac~; #X obj 332 253 openpanel; #X obj 332 300 soundfiler; #X obj 332 226 bng 20 250 50 0 empty empty open-sample 0 -6 0 8 -262144 -1 -1; #X obj 331 328 table samp10; #X msg 48 129 1 samp10 1; #X msg 63 151 0.5 samp10 0.5; #X msg 83 172 -1 samp10 1; #X msg 332 274 read -resize $1 samp10; #X connect 4 0 9 0; #X connect 4 0 9 1; #X connect 10 0 17 0; #X connect 12 0 10 0; #X connect 14 0 4 0; #X connect 15 0 4 0; #X connect 16 0 4 0; #X connect 17 0 11 0;
--- NEW FILE: transpose-row-help.pd --- #N canvas 0 48 664 376 10; #X text 21 50 Transposes a list of notes or pitch classes (containing up to 64 elements) a certain interval which can be positive or negative. The output appears as pitch classes (ints between 0 and 11).; #X text 23 107 NB: The input must not be a dodecaphonic row!; #X text 375 151 }; #X text 301 135 list of pitch classes or notes; #X text 49 271 result: as pitch classes; #X obj 38 235 show; #X msg 38 287 7 9 11 1 3 5 4 2 0 10 8 6; #X obj 38 204 transpose-row; #X floatatom 38 176 4 0 0 2 transposition_interval - -; #X obj 79 237 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X text 21 322 1994-95 by Karlheinz Essl; #X msg 213 179 0 14 7 -3 23; #X msg 213 156 1 3 5 7 9 11 10 8 6 4 2 0; #X obj 213 134 loadbang; #X msg 403 24 Dodecaphonics; #X text 21 337 vs.2: now works with lists containing up to 64 elements. ; #X text 239 31 vs. 2; #X text 21 19 transpose-row; #X connect 5 0 6 0; #X connect 7 0 5 0; #X connect 8 0 7 0; #X connect 9 0 5 1; #X connect 11 0 7 1; #X connect 12 0 7 1; #X connect 13 0 12 0;
--- NEW FILE: RTC-seed.pd --- #N canvas 63 44 169 167 10; #X obj 26 100 s RTC-rs; #X obj 26 47 inlet; #X floatatom 26 75 5 0 0 0 - - -; #X connect 1 0 2 0; #X connect 2 0 0 0;
--- NEW FILE: Lround-help.pd --- #N canvas 1 48 788 342 10; #X text 24 31 Lround; #X text 26 64 Rounds off numbers.; #X obj 521 124 Lround -1; #X obj 521 161 prepend set; #X msg 521 196 40; #X text 418 25 Floats in list are rounded off; #X text 323 55 Float is rounded off; #X floatatom 263 84 0 0 0 0 - - -; #X floatatom 238 54 0 0 0 0 - - -; #X msg 213 26 1 2 3.6 4.4 7.5 8.5 19.1117; #X obj 336 124 Lround 3; #X msg 336 196 39; #X obj 336 161 prepend set; #X text 335 228 Positive Arg sets number of decimal places.; #X text 519 213 Negative Arg rounds to power of 10; #X text 196 211 Arg of 0 converts all outputs to float.; #X obj 200 124 Lround 0; #X msg 200 196 39; #X obj 200 161 prepend set; #X obj 63 161 prepend set; #X msg 63 196 39; #X obj 63 124 Lround; #X text 56 229 With no arg , output is rounded to int.; #X text 9 277 Peter Elsea 1995; #X text 9 295 University of California , Santa Cruz; #X connect 2 0 3 0; #X connect 3 0 4 0; #X connect 7 0 21 0; #X connect 7 0 16 0; #X connect 7 0 10 0; #X connect 7 0 2 0; #X connect 8 0 21 0; #X connect 8 0 16 0; #X connect 8 0 10 0; #X connect 8 0 2 0; #X connect 9 0 21 0; #X connect 9 0 16 0; #X connect 9 0 10 0; #X connect 9 0 2 0; #X connect 10 0 12 0; #X connect 12 0 11 0; #X connect 16 0 18 0; #X connect 18 0 17 0; #X connect 19 0 20 0; #X connect 21 0 19 0;
--- NEW FILE: scramble-help.pd --- #N canvas 250 127 580 435 10; #X obj 168 200 bng 15 250 50 1 empty empty clear_display 0 -6 0 8 -262144 -1 -1; #X msg 204 127 1.66 2.73 0.45 -6; #X msg 126 127 1 2 3 4 5; #X msg 126 229; #X obj 76 120 bng 15 250 50 0 empty empty reshuffle 0 -6 0 8 -262144 -1 -1; #X obj 126 171 scramble; #X obj 126 199 show; #X text 52 303 Clone of the Max external by James McCartney (1992) ; #X text 26 42 scramble; #X text 100 30 scrambles the order of a list of numbers. bang in left inlet triggers a new random output of the last list sent to the inlet. List in inlet gets scrambled and sent out the outlet. (Uses [urn] external.) ; #X connect 0 0 6 1; #X connect 1 0 5 0; #X connect 2 0 5 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 3 0;
--- NEW FILE: dur-from-ED.pd --- #N canvas 63 44 253 246 10; #X obj 97 31 inlet; #X obj 50 164 outlet; #X obj 50 103 int; #X obj 50 132 * 1; #X obj 148 31 inlet; #X text 75 166 1993 by Karlheinz Essl; #X obj 97 103 float $1; #X obj 50 74 t a a; #X obj 50 31 inlet; #X connect 0 0 2 1; #X connect 2 0 3 0; #X connect 3 0 1 0; #X connect 4 0 6 1; #X connect 6 0 3 1; #X connect 7 0 2 0; #X connect 7 1 6 0; #X connect 8 0 7 0;
--- NEW FILE: alea.pd --- #N canvas 29 73 368 383 10; #X obj 114 167 random; #X obj 114 80 inlet; #X obj 114 264 outlet; #X obj 188 267 outlet; #X obj 205 80 inlet; #X obj 151 129 list-len; #X obj 114 193 t a a; #N canvas 415 244 450 300 nth 0; #X obj 113 155 list-idx; #X obj 113 129 list; #X obj 113 101 t b a; #X obj 113 80 inlet; #X obj 157 79 inlet; #X obj 113 178 outlet; #X connect 0 0 5 0; #X connect 1 0 0 0; #X connect 2 0 1 0; #X connect 2 1 0 1; #X connect 3 0 2 0; #X connect 4 0 1 1; #X restore 114 230 pd nth; #X msg 43 126 seed $1; #X obj 43 80 r RTC-rs; #X text 83 309 1993-98 by Karlheinz Essel; #X text 78 287 vs 1.1; #X connect 0 0 6 0; #X connect 1 0 0 0; #X connect 4 0 5 0; #X connect 4 0 7 1; #X connect 5 0 0 1; #X connect 6 0 7 0; #X connect 6 1 3 0; #X connect 7 0 2 0; #X connect 8 0 0 0; #X connect 9 0 8 0;
--- NEW FILE: anti-octave&prime-help.pd --- #N canvas 279 83 603 489 10; #X text 16 116 see also:; #X text 16 65 Filters out octaves and primes (i.e. tone repetitions) between two consecutive notes and outputs a bang from right outlet whenever this would have occured.; #X text 16 33 anti-octave′ #X obj 44 299 anti-octave′ #X msg 160 116 anti-interval; #X msg 78 138 check-octaves; #X msg 78 116 anti-octave; #X text 255 386 1993 by Karlheinz Essl; #X msg 324 23 Harmony; #X floatatom 44 341 4 0 0 1 note_name - -; #X obj 44 373 play2 127 500 0 1; #X text 206 300 Flashes when an octave or prime would have occured ; #X obj 178 300 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 44 232 pipe 500; #X obj 44 253 t a b; #X obj 44 189 list split 1; #X obj 60 211 list; #X floatatom 44 276 5 0 0 0 - - -; #X msg 44 166 40 50 62 59 59 75; #X connect 3 0 9 0; #X connect 3 1 12 0; #X connect 9 0 10 0; #X connect 13 0 14 0; #X connect 14 0 17 0; #X connect 14 1 16 0; #X connect 15 0 13 0; #X connect 15 1 16 1; #X connect 16 0 15 0; #X connect 17 0 3 0; #X connect 18 0 15 0;
--- NEW FILE: permutate.pd --- #N canvas 282 229 238 273 10; #X text 120 210 vs. 1.1; #X obj 38 56 inlet; #X obj 38 125 random-norep 1; #X obj 38 225 outlet; #X obj 131 56 inlet; #X text 95 229 1993-98 by Karlheinz Essl; #X obj 131 90 list-len; #X obj 38 95 b; #X obj 38 167 list; #X obj 38 189 list-idx; #X obj 38 146 t b a; #X connect 1 0 7 0; #X connect 2 0 10 0; #X connect 4 0 6 0; #X connect 4 0 8 1; #X connect 6 0 2 1; #X connect 7 0 2 0; #X connect 8 0 9 0; #X connect 9 0 3 0; #X connect 10 0 8 0; #X connect 10 1 9 1;
--- NEW FILE: anti-interval-help.pd --- #N canvas 3 48 661 573 10; #X text 37 48 anti-interval; #X text 37 79 Filters out a certain interval (which is the argument of this function) of a stream of notes and outputs a bang from right outlet whenever this interval would have occured.; #X msg 231 169 anti-octave; #X msg 106 169 anti-octave′ #X text 36 170 see also:; #X text 42 503 1995 by Karlheinz Essl; #X obj 66 453 play2 127 500 0 1; #X floatatom 173 302 4 0 0 1 forbidden_interval - -; #X obj 66 328 anti-interval -1; #X obj 66 392 anti-interval 3; #X obj 189 395 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 187 329 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 37 128 NB: the forbidden interval also concerns all its octave transpositions!; #X floatatom 166 365 4 0 0 1 forbidden_interval - -; #X text 205 328 flashes , when forbidden intervall would have occured ; #X floatatom 66 308 5 0 0 0 - - -; #X obj 66 266 pipe 500; #X obj 66 287 t a b; #X obj 66 223 list split 1; #X obj 82 245 list; #X floatatom 77 351 5 0 0 0 - - -; #X msg 66 200 40 50 60 59 75; #X connect 7 0 8 1; #X connect 8 0 9 0; #X connect 8 0 20 0; #X connect 8 1 11 0; #X connect 9 0 6 0; #X connect 9 1 10 0; #X connect 13 0 9 1; #X connect 15 0 8 0; #X connect 16 0 17 0; #X connect 17 0 15 0; #X connect 17 1 19 0; #X connect 18 0 16 0; #X connect 18 1 19 1; #X connect 19 0 18 0; #X connect 21 0 18 0;
--- NEW FILE: markov-rhythm-help.pd --- #N canvas 99 88 600 512 10; #X text 354 207 ED material; #X text 60 49 Entry delays of a given rhythmic material sent to the rightmost inlet are chosen according to a markov matrix sent the third inlet. An integer sent to the second inlet determines the start index of the rhythmic material.; #X text 60 17 markov-rhythm; #X obj 97 296 markov-rhythm 5; #X msg 97 325 60; #X obj 97 258 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 1 1; #X floatatom 197 322 4 0 0 3 ED - -; #X floatatom 147 322 4 0 0 3 index - -; #X floatatom 130 274 4 0 0 2 start_index - -; #X msg 163 185 clear; #X obj 371 228 make-ED-scale 100 1000 6; #X obj 247 162 loadbang; #X msg 313 18 Rhythm-Generators; #X text 60 114 see also:; #X msg 125 114 prob; #X msg 167 114 markov-harmony; #X obj 97 355 QT-PercPlayer; #X text 69 407 1994 by Karlheinz Essl; #X msg 163 158 dump; #X text 243 207 markov matrix; #N canvas 585 245 462 467 gamble-table 0; #X msg 131 148 5 4 1; #X msg 131 173 4 3 1; #X msg 131 205 3 2 1; #X msg 131 237 2 1 1; #X msg 192 237 1 2 1; #X msg 192 205 2 3 1; #X msg 192 173 3 4 1; #X msg 192 148 4 5 1; #X obj 191 355 outlet; #X msg 131 267 1 0 1; #X msg 192 267 0 1 1; #X obj 50 53 inlet; #X msg 249 267 0 0 5; #X msg 249 205 2 2 3; #X msg 249 173 3 3 2; #X msg 249 148 4 4 1; #X msg 249 237 1 1 4; #X text 303 151 repetitions; #X obj 50 86 t b b b b b b b b b b b b b b b; #X connect 0 0 8 0; #X connect 1 0 8 0; #X connect 2 0 8 0; #X connect 3 0 8 0; #X connect 4 0 8 0; #X connect 5 0 8 0; #X connect 6 0 8 0; #X connect 7 0 8 0; #X connect 9 0 8 0; #X connect 10 0 8 0; #X connect 11 0 18 0; #X connect 12 0 8 0; #X connect 13 0 8 0; #X connect 14 0 8 0; #X connect 15 0 8 0; #X connect 16 0 8 0; #X connect 18 0 9 0; #X connect 18 1 3 0; #X connect 18 2 2 0; #X connect 18 3 1 0; #X connect 18 4 0 0; #X connect 18 5 10 0; #X connect 18 6 4 0; #X connect 18 7 5 0; #X connect 18 8 6 0; #X connect 18 9 7 0; #X connect 18 10 12 0; #X connect 18 11 16 0; #X connect 18 12 13 0; #X connect 18 13 14 0; #X connect 18 14 15 0; #X restore 247 231 pd gamble-table; #X obj 247 185 t b b; #X msg 247 142 bang; #X connect 3 0 4 0; #X connect 3 1 7 0; #X connect 3 2 6 0; #X connect 4 0 16 0; #X connect 5 0 3 0; #X connect 8 0 3 1; #X connect 9 0 3 2; #X connect 10 0 3 3; #X connect 11 0 21 0; #X connect 18 0 3 2; #X connect 20 0 3 2; #X connect 21 0 20 0; #X connect 21 1 10 0; #X connect 22 0 21 0;
--- NEW FILE: smooth-line.pd --- #N canvas 366 287 335 349 10; #X obj 134 35 inlet; #X obj 76 34 inlet; #X text 23 205 1999-2003 by Karlheinz Essl; #X obj 76 177 outlet; #X obj 76 147 line 0; #X obj 76 115 pack 0 $1; #X obj 76 61 route float; #X text 24 224 Pd: 2006 Frank Barknecht; #X connect 0 0 5 1; #X connect 1 0 6 0; #X connect 4 0 3 0; #X connect 5 0 4 0; #X connect 6 0 5 0; #X connect 6 1 4 0;
--- NEW FILE: int-or-float-help.pd --- #N canvas 189 177 593 402 10; #N canvas 375 365 667 396 integer-mode 0; #X obj 60 130 int-or-float; #X floatatom 60 61 5 0 0 0 - - -; #X floatatom 60 156 5 0 0 0 - - -; #X obj 60 84 * 0.1; #X floatatom 60 109 5 0 0 0 - - -; #X text 38 33 no args , nothing in second inlet; #X floatatom 314 63 5 0 0 0 - - -; #X floatatom 314 158 5 0 0 0 - - -; #X obj 314 86 * 0.1; #X floatatom 314 111 5 0 0 0 - - -; #X text 314 33 "i" or "int" as arg; #X obj 314 132 int-or-float i; #X floatatom 458 65 5 0 0 0 - - -; #X floatatom 458 160 5 0 0 0 - - -; #X obj 458 88 * 0.1; #X floatatom 458 113 5 0 0 0 - - -; #X obj 458 134 int-or-float int; #X obj 66 300 int-or-float; #X floatatom 66 231 5 0 0 0 - - -; #X floatatom 66 326 5 0 0 0 - - -; #X obj 66 254 * 0.1; #X floatatom 66 279 5 0 0 0 - - -; #X text 44 203 no args , whole number in second inlet; #X msg 145 273 10; #X obj 145 253 loadbang; #X text 21 10 INTEGER MODE; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 3 0 4 0; #X connect 4 0 0 0; #X connect 6 0 8 0; #X connect 8 0 9 0; #X connect 9 0 11 0; #X connect 11 0 7 0; #X connect 12 0 14 0; #X connect 14 0 15 0; #X connect 15 0 16 0; #X connect 16 0 13 0; #X connect 17 0 19 0; #X connect 18 0 20 0; #X connect 20 0 21 0; #X connect 21 0 17 0; #X connect 23 0 17 1; #X connect 24 0 23 0; #X restore 69 198 pd integer-mode; #N canvas 375 365 743 459 float-mode 0; #X obj 60 130 int-or-float; #X floatatom 60 61 5 0 0 0 - - -; #X floatatom 60 156 5 0 0 0 - - -; #X obj 60 84 * 0.1; #X floatatom 60 109 5 0 0 0 - - -; #X floatatom 430 64 5 0 0 0 - - -; #X floatatom 430 159 5 0 0 0 - - -; #X obj 430 87 * 0.1; #X floatatom 430 112 5 0 0 0 - - -; #X floatatom 574 66 5 0 0 0 - - -; #X floatatom 574 161 5 0 0 0 - - -; #X obj 574 89 * 0.1; #X floatatom 574 114 5 0 0 0 - - -; #X msg 139 107 0.1; #X obj 139 83 loadbang; #X text 28 10 FLOAT MODE; #X text 38 33 no args , but non-whole number in second inlet.; #X text 430 34 "f" or "float" as argument:; #X obj 430 133 int-or-float f; #X obj 574 135 int-or-float float; #X text 53 233 IMPORTANT: Arguments override what was sent into second inlet. This next use case will run in *integer mode*:; #X floatatom 66 288 5 0 0 0 - - -; #X floatatom 66 383 5 0 0 0 - - -; #X obj 66 311 * 0.1; #X floatatom 66 336 5 0 0 0 - - -; #X msg 173 336 0.1; #X obj 173 311 loadbang; #X obj 66 357 int-or-float int; #X text 194 361 "int"-arg is stronger!; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 3 0 4 0; #X connect 4 0 0 0; #X connect 5 0 7 0; #X connect 7 0 8 0; #X connect 8 0 18 0; #X connect 9 0 11 0; #X connect 11 0 12 0; #X connect 12 0 19 0; #X connect 13 0 0 1; #X connect 14 0 13 0; #X connect 18 0 6 0; #X connect 19 0 10 0; #X connect 21 0 23 0; #X connect 23 0 24 0; #X connect 24 0 27 0; #X connect 25 0 27 1; #X connect 26 0 25 0; #X connect 27 0 22 0; #X restore 68 231 pd float-mode; #X text 65 118 This abstraction converts incoming numbers to integer values depending on its argument or numbers sent into its rightmost inlet. It can operate in two modes: int or float.; #X obj 69 51 int-or-float; #X text 185 50 Arguments: "i" , "int" , "f" , "float" (optional) ; #X text 185 72 All in- and outlets accept or send numbers.; #X text 15 14 int-or-float: Optionally convert numbers to int.; #X text 66 272 int-or-float is mainly useful when converting Max patches to Pd. Max handles floating point numbers differently from integer values , but in Pd everything is a float , so we need to explicitly tell Pd , if we want a conversion to integer or not.; #X text 188 199 Default mode is int.;
--- NEW FILE: repeat-ED-help.pd --- #N canvas 329 227 604 477 10; #X msg 269 28 Rhythm; #X msg 56 135 stop; #X obj 225 200 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 97 200 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 97 226 60; #X obj 97 170 repeat-ED 300; #X text 44 118 number of rhythm bangs; #X floatatom 225 135 4 0 0 2 speed - -; #X floatatom 97 135 0 0 0 0 - - -; #X text 52 66 Int in left inlet sends out a certain number of rhythm bangs with an entry delay (ED) given in right inlet.; #X text 197 47 vs.2; #X text 52 33 repeat-ED; #X obj 97 255 QT-PercPlayer; #X text 251 195 bang when finished; #X text 100 352 1993-95 by Karlheinz Essl; #X connect 1 0 5 0; #X connect 3 0 4 0; #X connect 4 0 12 0; #X connect 5 0 3 0; #X connect 5 1 2 0; #X connect 7 0 5 1; #X connect 8 0 5 0;
--- NEW FILE: VolAmb.pd --- #N canvas 63 44 211 237 10; #X obj 45 42 inlet; #X obj 93 151 outlet; #X obj 45 150 outlet; #X obj 45 120 Table; #C restore; #X floatatom 45 70 0 0 0 0 - - -; #X obj 93 120 Table; #C restore; #X connect 0 0 4 0; #X connect 3 0 2 0; #X connect 4 0 3 0; #X connect 4 0 5 0; #X connect 5 0 1 0;
--- NEW FILE: rotate-help.pd --- #N canvas 1 48 575 411 10; #X text 128 229 clear display; #X obj 108 228 bng 15 250 50 1 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 66 227 show; #X text 113 42 (external - OSX); #X text 21 30 rotate; #X text 22 57 Cyclically rotate a list.; #X text 200 207 int in right inlet sets rotation; #X msg 85 131 a b c d e; #X msg 101 150 2 4 6 8 10; #X text 200 175 bang in left inlet retriggers output; #X text 200 191 list in left inlet gets rotated; #X msg 66 111 1 2 3 4 5 6 7 8 9 10; #X obj 46 164 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 66 255; #X floatatom 110 175 0 0 0 0 - - -; #X text 21 286 by James McCartney; #X text 21 299 OSX implementation by Richard Dudas (2003); #X text 21 78 See also:; #X msg 85 77 rota; #X obj 66 199 list-rot 2; #X text 49 347 fbar: [rotate] is a Gem-object , use [list-rot] instead. ; #X connect 1 0 2 1; #X connect 2 0 13 0; #X connect 7 0 19 0; #X connect 8 0 19 0; #X connect 11 0 19 0; #X connect 12 0 19 0; #X connect 14 0 19 1; #X connect 19 0 2 0;
--- NEW FILE: group-rhythm2.pd --- #N canvas 251 172 334 330 10; #X obj 45 25 inlet; #X obj 103 127 groups; #X obj 121 29 inlet; #X obj 140 48 inlet; #X obj 45 191 metro 250; #X obj 133 197 outlet; #X obj 45 239 outlet; #X obj 186 198 outlet; #X text 69 266 1994 by Karlheinz Essl; #X obj 103 157 t a a; #X obj 45 216 t b b; #X msg 60 101 bang; #X obj 103 81 select 1; #X obj 45 48 t a a; #X connect 0 0 13 0; #X connect 1 0 9 0; #X connect 1 2 7 0; #X connect 2 0 1 1; #X connect 3 0 1 2; #X connect 4 0 10 0; #X connect 9 0 4 1; #X connect 9 1 5 0; #X connect 10 0 6 0; #X connect 10 1 1 0; #X connect 11 0 1 0; #X connect 12 0 1 0; #X connect 13 0 4 0; #X connect 13 1 12 0;
--- NEW FILE: trans-lin-help.pd --- #N canvas 343 243 618 404 10; #X floatatom 349 146 0 0 0 2 steps - -; #X floatatom 212 146 0 0 0 2 start - -; #X floatatom 280 146 0 0 0 2 end - -; #X floatatom 143 146 0 0 0 2 index - -; #X floatatom 143 216 0 0 0 0 - - -; #X text 137 44 linear transition -------- Int in left inlet outputs the nth member of a linear transition between a start value and an end value in n steps , whereas "steps" is the number of row elements (between start and end value) minus one.; #X obj 282 294 expr_scale 0 12 500 2000; #X obj 143 175 trans-lin 500 2000 12; #X floatatom 252 249 5 0 0 2 index - -; #X floatatom 282 321 5 0 0 0 - - -; #X floatatom 363 262 0 0 0 2 steps - -; #X floatatom 404 262 0 0 0 2 start - -; #X floatatom 445 261 0 0 0 2 end - -; #X text 262 220 equivalent to "expr_scale" used like this:; #X obj 99 271 ==; #X obj 99 291 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 ; #X obj 252 270 t a a; #X connect 0 0 7 3; #X connect 1 0 7 1; #X connect 2 0 7 2; #X connect 3 0 7 0; #X connect 6 0 9 0; #X connect 6 0 14 1; #X connect 7 0 4 0; #X connect 7 0 14 0; #X connect 8 0 16 0; #X connect 10 0 6 2; #X connect 11 0 6 3; #X connect 12 0 6 4; #X connect 14 0 15 0; #X connect 16 0 7 0; #X connect 16 1 6 0;
--- NEW FILE: random-row-help.pd --- #N canvas 1 48 521 295 10; #X obj 51 109 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 51 144 random-row; #X text 25 246 1994 by Karlheinz Essl; #X text 25 70 Generates a twelve-tone row by random. The elements of the row range from 0 to 11; #X text 25 39 random-row; #X obj 51 177 show; #X msg 51 208; #X obj 93 177 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X msg 198 22 Dodecaphonics; #X text 84 114 Click to generate a random row; #X connect 0 0 1 0; #X connect 1 0 5 0; #X connect 5 0 6 0; #X connect 7 0 5 1;
--- NEW FILE: pitch-from-intervals-help.pd --- #N canvas 0 48 696 472 10; #X text 43 68 Generates pitch classes (i.e. notes without register information) by selecting intervals from a given supply sent to the rightmost inlet. The selection principle (after Gottfried Michael Koenig) sent to the middle inlet determines how the intervals are chosen.; #X text 43 36 pitch-from-intervals; #X msg 328 35 Harmony; #X obj 41 299 pitch-from-intervals 3; #X obj 41 273 bng 15 50 50 0 empty empty rhythm_bangs 0 -6 0 8 -262144 -1 -1; #X obj 41 206 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 1 1; #X msg 297 293 1 -4 -2; #X obj 264 168 loadbang; #X obj 297 272 show; #X text 285 201 change interval list; #X obj 264 243 choose-intervals 3; #X obj 264 207 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 385 218 4 0 0 1 length_of_interval_list - -; #X text 336 273 randomly selected interval supply; #X msg 152 185 3; #X text 284 362 1993 by Karlheinz Essl; #X msg 41 354; #X text 71 355 pitch class; #X floatatom 190 323 4 0 0 1 chosen_interval - -; #N canvas 616 354 455 230 play-it 0; #X obj 59 33 inlet; #X obj 59 62 + 60; #X text 101 56 map into middle octave; #X obj 59 99 show-pitchclass; #X obj 59 131 outlet; #X obj 169 99 play2 127 500 1 1; #X connect 0 0 1 0; #X connect 1 0 3 0; #X connect 1 0 5 0; #X connect 3 0 4 0; #X restore 41 327 pd play-it; #X obj 41 243 metro 250; #X floatatom 99 220 5 0 0 0 - - -; #N canvas 0 0 738 528 sel-princ 0; #X msg 184 218 1 alea; #X msg 184 237 2 series; #X msg 184 257 3 sequence; #X msg 184 279 4 rota; #X obj 184 308 list split 1; #X symbolatom 107 142 10 0 0 0 - - -; #X obj 107 127 hradio 15 1 0 4 empty empty sel-princ 0 -6 0 8 -262144 -1 -1 1; #X obj 185 335 outlet; #X obj 194 129 + 1; #X obj 141 160 select 1 2 3 4; #X obj 244 66 inlet; #X obj 238 95 - 1; #X connect 0 0 4 0; #X connect 1 0 4 0; #X connect 2 0 4 0; #X connect 3 0 4 0; #X connect 4 0 7 0; #X connect 4 1 5 0; #X connect 6 0 8 0; #X connect 8 0 9 0; #X connect 9 0 0 0; #X connect 9 1 1 0; #X connect 9 2 2 0; #X connect 9 3 3 0; #X connect 10 0 11 0; #X connect 11 0 6 0; #X coords 0 -1 1 1 85 60 1 100 100; #X restore 152 205 pd sel-princ; #X connect 3 0 19 0; #X connect 3 1 18 0; #X connect 4 0 3 0; #X connect 5 0 20 0; #X connect 7 0 14 0; #X connect 7 0 11 0; #X connect 8 0 6 0; #X connect 10 0 8 0; #X connect 10 0 3 2; #X connect 11 0 10 0; #X connect 12 0 10 1; #X connect 14 0 22 0; #X connect 19 0 16 0; #X connect 20 0 4 0; #X connect 21 0 20 1; #X connect 22 0 3 1;
--- NEW FILE: random-norep.pd --- #N canvas 23 65 716 390 10; #X msg 43 139 seed $1; #X obj 43 72 r RTC-rs; #X obj 221 69 loadbang; #X obj 173 69 inlet; #X obj 109 69 inlet; #X obj 109 196 expr ($i1 + $i2 + 1) % ($i3 + 1); #X obj 109 172 random 4; #X obj 109 250 outlet; #X obj 173 124 - 1; #X obj 173 97 int $1; #X obj 109 221 t a a; #X obj 173 145 t a a; #X text 267 110 (Current_RNum + Previous_RNum + 1) modulo (range + 1); #X text 374 153 Algorithm from Michael Gold; #X text 300 270 vs 1.1; #X connect 0 0 6 0; #X connect 1 0 0 0; #X connect 2 0 9 0; #X connect 3 0 9 0; #X connect 4 0 6 0; #X connect 5 0 10 0; #X connect 6 0 5 0; #X connect 8 0 11 0; #X connect 9 0 8 0; #X connect 10 0 7 0; #X connect 10 1 5 1; #X connect 11 0 6 1; #X connect 11 1 5 2;
--- NEW FILE: transpose-row.pd --- #N canvas 628 218 418 366 10; #X obj 48 313 outlet; #X obj 49 52 inlet; #X obj 94 51 inlet; #X text 120 313 vs. 2: 1994-95 by Karlheinz Essl; #X obj 48 281 list; #X obj 71 228 list prepend; #X obj 167 229 t a; #X obj 71 166 list-drip; #N canvas 0 0 448 464 transpose 0; #X obj 134 158 +; #X obj 134 186 mod 12; #X obj 134 253 mod 12; #X obj 134 213 + 12; #X obj 134 116 inlet; #X obj 180 114 inlet; #X obj 134 280 outlet; #X connect 0 0 1 0; #X connect 1 0 3 0; #X connect 2 0 6 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 5 0 0 1; #X restore 71 199 pd transpose; #X obj 71 127 list; #X obj 49 74 t b b a b; #X connect 1 0 10 0; #X connect 2 0 9 1; #X connect 4 0 0 0; #X connect 5 0 4 1; #X connect 5 0 6 0; #X connect 6 0 5 1; #X connect 7 0 8 0; #X connect 8 0 5 0; #X connect 9 0 7 0; #X connect 10 0 4 0; #X connect 10 1 9 0; #X connect 10 2 8 1; #X connect 10 3 5 1;
--- NEW FILE: count-bang-help.pd --- #N canvas 3 48 563 356 10; #X floatatom 75 177 0 0 0 0 - - -; #X obj 75 142 count-bang; #X obj 75 103 bng 15 250 50 0 empty empty bangs_to_count 0 -6 0 8 -262144 -1 -1; #X obj 140 118 bng 15 250 50 0 empty empty reset 0 -6 0 8 -262144 -1 -1; #X text 112 179 number of received bangs; #X text 35 24 count-bang; #X text 99 249 1993 by Karlheinz Essl; #X text 63 47 Counts the number of received bangs. (bang-accumulator) ; #X connect 1 0 0 0; #X connect 2 0 1 0; #X connect 3 0 1 1;
--- NEW FILE: RTC-Overview.pd --- #N canvas 207 113 449 332 10; #X text 173 198 DSP objects for MSP; #X text 173 55 list operations; #X text 173 34 random and chance operations; #X text 173 13 basic low-level functions; #X text 173 106 pitch-related functions; #X text 173 149 dynamics , ramps , etc.; #X text 173 128 time-based functions; #X text 19 238 Real Time Composition Library vs. 4.1 for wMAX; #X text 19 252 (c) 1993-2006 by Karlheinz Essl <www.essl.at>; #X obj 33 13 rtc-help/Toolbox; #X obj 33 34 rtc-help/Chance; #X obj 33 55 rtc-help/Lists; #X obj 33 105 rtc-help/Harmony; #X obj 33 125 rtc-help/Rhythm; #X obj 33 146 rtc-help/Envelopes; #X obj 33 197 rtc-help/MSP-RTC; #X text 15 78 ___________________________________________________; #X text 15 172 ___________________________________________________ ;
--- NEW FILE: make-scale-help.pd --- #N canvas 347 116 463 385 10; #X obj 76 230 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X obj 35 229 show; #X text 15 97 see also:; #X text 15 61 Generates an integer list with a certain number of ints starting from a given value.; #X msg 87 99 make-ED-scale; #X msg 251 23 Lists; #X msg 85 123 make-choice-list; #X msg 189 99 make-trans-scale; #X text 194 229 1993 by Karlheinz Essl; #X text 47 261 scale; #X floatatom 147 170 4 0 0 2 start_int - -; #X floatatom 35 170 4 0 0 2 number_of_ints - -; #X msg 35 280; #X text 15 29 make-scale; #X obj 35 200 make-scale 1; #X connect 0 0 1 1; #X connect 1 0 12 0; #X connect 10 0 14 1; #X connect 11 0 14 0; #X connect 14 0 1 0;
--- NEW FILE: repeat-ED.pd --- #N canvas 423 319 355 378 10; #X text 166 338 1993-95 by Karlheinz Essl; #X text 167 323 vs. 2; #X obj 155 118 count-bang; #X msg 36 113 0; #X obj 230 46 inlet; #X obj 105 46 inlet; #X obj 260 287 outlet; #X obj 155 172 sel 1; #X obj 155 204 int 0; #X obj 105 204 int 1; #X obj 105 332 outlet; #X obj 105 272 metro 500; #X obj 36 80 sel stop; #X obj 230 111 int $1; #X obj 105 79 t b f b b; #X obj 155 232 t a a a; #X obj 105 308 t b b; #X connect 2 0 7 0; #X connect 3 0 11 0; #X connect 4 0 13 0; #X connect 5 0 12 0; #X connect 5 0 14 0; #X connect 7 0 8 0; #X connect 8 0 15 0; #X connect 9 0 11 0; #X connect 11 0 16 0; #X connect 12 0 3 0; #X connect 13 0 11 1; #X connect 14 0 9 0; #X connect 14 1 7 1; #X connect 14 2 2 1; #X connect 14 3 13 0; #X connect 15 0 11 0; #X connect 15 1 6 0; #X connect 15 2 2 1; #X connect 16 0 10 0; #X connect 16 1 2 0;
--- NEW FILE: reanimate.pd --- #N canvas 273 116 279 272 10; #X obj 42 72 route bang; #X obj 42 44 inlet; #X text 106 232 1997 by Karlheinz Essl; #X obj 42 204 outlet; #X obj 107 205 outlet; #X msg 107 136 stop; #X obj 158 42 inlet; #X obj 107 177 delay $1; #X obj 107 106 b; #X obj 42 105 t b b b; #X connect 0 0 9 0; #X connect 0 1 8 0; #X connect 1 0 0 0; #X connect 5 0 7 0; #X connect 6 0 7 1; #X connect 7 0 4 0; #X connect 8 0 5 0; #X connect 9 0 3 0; #X connect 9 1 7 0; #X connect 9 2 5 0;
--- NEW FILE: listlen.pd --- #N canvas 0 0 329 261 10; #X obj 91 79 inlet; #X obj 91 141 outlet; #X obj 91 109 list-len; #X connect 0 0 2 0; #X connect 2 0 1 0;
--- NEW FILE: transp-pitch-help.pd --- #N canvas 3 48 493 333 10; #X msg 259 27 Harmony; #X text 235 114 transposition interval; #X floatatom 116 114 4 0 0 0 - - -; #X obj 116 143 transp-pitch; #X floatatom 195 114 4 0 0 0 - - -; #X obj 116 172 show-pitchclass; #X msg 116 201; #X text 150 202 transposed pitch class; #X text 43 245 1994 by Karlheinz Essl; #X text 30 112 pitch class; #X text 27 72 Transposes pitch classes by a certain interval.; #X text 27 40 transp-pitch; #X connect 2 0 3 0; #X connect 3 0 5 0; #X connect 4 0 3 1; #X connect 5 0 6 0;
--- NEW FILE: check-octaves.pd --- #N canvas 577 276 292 338 10; #X obj 108 276 outlet; #X obj 48 275 outlet; #X obj 46 161 sel 0; #X obj 46 29 inlet; #X text 48 316 1993 by Karlheinz Essl; #X obj 46 95 list-accum; #X obj 46 121 mod 12; #X obj 48 240 list; #X obj 46 58 t a a; #X obj 48 215 b; #X connect 2 0 0 0; #X connect 2 1 9 0; #X connect 3 0 8 0; #X connect 5 0 6 0; #X connect 6 0 2 0; #X connect 7 0 1 0; #X connect 8 0 5 0; #X connect 8 1 7 1; #X connect 9 0 7 0;
--- NEW FILE: check-row.pd --- #N canvas 205 43 245 241 10; #X obj 46 46 inlet; #N canvas 392 183 418 355 length-check 0; #X obj 40 51 inlet; #X text 85 49 checks if list length is 12; #X obj 40 291 outlet; #X obj 91 291 outlet; #X msg 149 232 wrong length (must be 12); #X obj 40 70 t a a; #X obj 40 183 list; #X obj 40 90 list-len; #X obj 149 259 print :check-row; #X obj 40 132 == 12; #X obj 40 158 select 1; #X obj 91 180 b; #X connect 0 0 5 0; #X connect 4 0 8 0; #X connect 5 0 7 0; #X connect 5 1 6 1; #X connect 6 0 2 0; #X connect 7 0 9 0; #X connect 9 0 10 0; #X connect 10 0 6 0; #X connect 10 1 11 0; #X connect 11 0 4 0; #X connect 11 0 3 0; #X restore 46 81 pd length-check; #N canvas 63 44 499 419 tone-check 0; #X obj 102 340 outlet; #X obj 51 341 outlet; #X obj 51 43 inlet; #X obj 51 88 normalize-row; #X obj 51 116 sum; #X msg 162 305 does not contain all 12 pitch classes!; #X obj 51 204 list; #X obj 51 66 t a a; #X obj 51 147 == 66; #X obj 51 176 select 1; #X obj 102 202 b; #X obj 162 342 print :check-row; #X connect 2 0 7 0; #X connect 3 0 4 0; #X connect 4 0 8 0; #X connect 5 0 11 0; #X connect 6 0 1 0; #X connect 7 0 3 0; #X connect 7 1 6 1; #X connect 8 0 9 0; #X connect 9 0 6 0; #X connect 9 1 10 0; #X connect 10 0 5 0; #X connect 10 0 0 0; #X restore 46 121 pd tone-check; #X obj 46 160 outlet; #X obj 146 165 outlet; #X text 45 185 1994 by Karlheinz Essl; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 1 1 4 0; #X connect 2 0 3 0; #X connect 2 1 4 0;
--- NEW FILE: matrix12-help.pd --- #N canvas 3 50 614 373 10; #N canvas 25 81 678 400 original_help-file 0; #X obj 236 189 matrix12; #X floatatom 424 281 0 0 0 0 - - -; #X floatatom 369 281 0 0 0 0 - - -; #X floatatom 398 281 0 0 0 0 - - -; #X floatatom 341 281 0 0 0 0 - - -; #X floatatom 454 281 0 0 0 0 - - -; #X floatatom 484 281 0 0 0 0 - - -; #X floatatom 176 281 0 0 0 0 - - -; #X floatatom 204 281 0 0 0 0 - - -; #X floatatom 233 281 0 0 0 0 - - -; #X floatatom 259 281 0 0 0 0 - - -; #X floatatom 286 281 0 0 0 0 - - -; #X floatatom 316 281 0 0 0 0 - - -; #X obj 236 233 unpack 0 0 0 0 0 0 0 0 0 0 0 0; #N canvas 96 63 421 311 storit 0; #X floatatom 0 116 0 0 0 0 - - -; #X obj 23 44 iter; #X obj 30 141 buddy; #X obj 33 169 pack; #X obj 59 89 counter; #X obj 21 23 inlet; #X obj 273 47 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 219 62 metro; #X floatatom 216 133 0 0 0 0 - - -; #X floatatom 261 147 0 0 0 0 - - -; #X obj 233 218 noteout; #X obj 221 155 + 50; #X floatatom 315 145 0 0 0 0 - - -; #X obj 224 188 makenote; #X obj 233 31 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X floatatom 331 196 0 0 0 0 - - -; #X obj 111 129 Table; #X obj 314 25 inlet; #X obj 343 24 inlet; #X obj 366 25 inlet; #X obj 215 99 counter; #X floatatom 261 24 0 0 0 0 - - -; #X obj 176 21 inlet; #X obj 388 29 inlet; #X obj 135 26 listlen; #X obj 110 37 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 85 65 0 0 0 0 - - -; #X obj 159 72 - 1; #X floatatom 159 50 0 0 0 0 - - -; #X floatatom 268 70 0 0 0 0 - - -; #X obj 391 88 inlet; #X connect 0 0 2 0; #X connect 1 0 2 1; #X connect 1 0 4 0; #X connect 2 0 3 0; #X connect 2 1 3 1; #X connect 3 0 16 0; #X connect 4 0 0 0; #X connect 5 0 1 0; #X connect 5 0 25 0; #X connect 5 0 24 0; #X connect 6 0 29 0; #X connect 7 0 20 0; #X connect 9 0 11 1; #X connect 11 0 13 0; #X connect 12 0 13 1; #X connect 13 0 10 0; #X connect 13 1 10 1; #X connect 14 0 7 0; #X connect 14 0 6 0; #X connect 15 0 10 2; #X connect 16 0 11 0; #X connect 17 0 21 0; #X connect 18 0 12 0; #X connect 19 0 15 0; #X connect 20 0 16 0; #X connect 20 0 8 0; #X connect 21 0 7 1; #X connect 21 0 13 2; #X connect 22 0 14 0; #X connect 23 0 10 0; #X connect 24 0 28 0; #X connect 25 0 26 0; #X connect 26 0 4 2; #X connect 27 0 20 4; #X connect 28 0 27 0; #X connect 29 0 20 3; #X connect 30 0 9 0; #X restore 54 241 pd storit; #X msg 283 150 0 1 3 4 6 4; #X msg 281 130 3 5 7 9; #X msg 281 110 4 5 11 0 2 7 6 3 10 9 1 8; #X obj 61 69 omsinfo; #X text 283 80 Some rows! Input to object as list; #X text 181 92 Bang here to output selected row as list; #X text 438 56 Select row of matrix to output:; #X floatatom 438 86 0 0 0 0 - - -; #X text 438 171 Check for inversion (no check = prime form); #X obj 438 211 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 438 150 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X text 438 109 Check for retro (no check = prime form); #X obj 230 131 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 29 109 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 53 133 0 0 0 0 - - -; #X text 54 111 at speed (ms.); #X text 101 131 and vel.; #X floatatom 99 151 0 0 0 0 - - -; #X text 150 57 Serial Matrix Object Help; #X obj 63 50 loadbang; #X text 29 81 Bang to play (and stop playing) selected row; #X text 29 167 with pitch offset:; #X floatatom 65 183 0 0 0 0 - - -; #X text 139 153 into midi channel; #X floatatom 139 169 0 0 0 0 - - -; #X obj 139 202 umenu 1 64 199 0; #X text 139 187 and selected device; #X text 31 282 Note : matrix origin at 0 ->; #X text 194 298 This Help file requires the listlen object by James McCartney! (Thanks , Jim!); #X connect 13 0 7 0; #X connect 13 1 8 0; #X connect 13 2 9 0; #X connect 13 3 10 0; #X connect 13 4 11 0; #X connect 13 5 12 0; #X connect 13 6 4 0; #X connect 13 7 2 0; #X connect 13 8 3 0; #X connect 13 9 1 0; #X connect 13 10 5 0; #X connect 13 11 6 0; #X connect 15 0 0 0; #X connect 16 0 0 0; #X connect 17 0 0 0; #X connect 18 0 40 0; #X connect 27 0 0 0; #X connect 28 0 14 1; #X connect 29 0 14 2; #X connect 32 0 14 3; #X connect 34 0 29 0; #X connect 34 0 18 0; #X connect 34 0 32 0; #X connect 34 0 39 0; #X connect 34 0 27 0; #X connect 34 0 17 0; #X connect 37 0 14 6; #X connect 39 0 14 4; #X connect 40 0 14 5; #X restore 307 66 pd original_help-file; #X obj 49 121 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 49 143 random-row; #X obj 414 190 umenu 1 64 189 1; #X obj 269 190 umenu 1 64 189 1; #X obj 179 254 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 136 286 9 8 5 7 6 2 11 1 3 0 4 10; #X obj 136 254 show; #X obj 136 221 matrix12; #X msg 136 144 4 5 11 0 2 7 6 3 10 9 1 8; #X floatatom 163 172 4 0 0 1 row_index - -; #X text 324 142 input row; #X text 25 39 matrix12; #X text 371 287 Note : matrix origin at 0!; #X text 25 68 Serial Matrix Object by Charlie Baker; #X text 200 255 clear display; #X text 69 122 generate random row; #X obj 163 192 t b a; #X connect 1 0 2 0; #X connect 2 0 8 0; #X connect 3 0 8 3; #X connect 4 0 8 2; #X connect 5 0 7 1; #X connect 7 0 6 0; #X connect 8 0 7 0; #X connect 9 0 8 0; #X connect 10 0 17 0; #X connect 17 0 8 0; #X connect 17 1 8 1;
--- NEW FILE: make-trans-scale.pd --- #N canvas 0 0 525 474 10; #X obj 20 39 inlet; #X obj 20 80 t b b b b b f; #X obj 20 395 outlet; #X obj 253 43 inlet; #X obj 164 269 inlet; #X obj 109 269 inlet; #X obj 219 269 - 1; #X text 136 433 1995 by Karlheinz Essl; #X obj 54 140 int $3; #X obj 20 367 list; #X obj 54 344 list prepend; #X obj 144 344 t a; #X obj 54 165 t a a; #X obj 54 205 until; #X obj 54 237 f; #X obj 89 237 + 1; #X msg 100 206 0; #X obj 54 309 trans $1 $2 $3 $4; #X connect 0 0 1 0; #X connect 1 0 9 0; #X connect 1 2 8 0; #X connect 1 3 10 1; #X connect 1 4 16 0; #X connect 1 5 17 4; #X connect 3 0 8 0; #X connect 4 0 17 2; #X connect 5 0 17 1; #X connect 6 0 17 3; #X connect 8 0 12 0; #X connect 9 0 2 0; #X connect 10 0 9 1; #X connect 10 0 11 0; #X connect 11 0 10 1; #X connect 12 0 13 0; #X connect 12 1 6 0; #X connect 13 0 14 0; #X connect 14 0 15 0; #X connect 14 0 17 0; #X connect 15 0 14 1; #X connect 16 0 14 1; #X connect 17 0 10 0;
--- NEW FILE: cos-slider.pd --- #N canvas 63 44 284 223 10; #X obj 31 125 outlet; #X obj 31 44 inlet; #X obj 31 68 expr cos($f1/127.*3.14159); #X obj 31 98 expr_scale 1 -1 0 127; #X text 33 160 1998 by Karlheinz Essl; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 3 0 0 0;
--- NEW FILE: choice-rhythm.pd --- #N canvas 63 44 516 465 10; #X obj 257 55 inlet; #X obj 298 54 inlet; #X obj 214 54 inlet; #X obj 174 54 inlet; #X obj 69 54 inlet; #X obj 446 54 inlet; #X text 401 200 list length; #X obj 458 414 outlet; #X text 178 414 1993 by Karlheinz Essl; #X obj 69 138 t f b; #X obj 164 415 outlet; #X obj 69 414 outlet; #X obj 69 381 metro 1000; #X text 181 349 ED; #X obj 257 108 - 1; #X obj 82 85 sel 1; #X text 173 223 chosen list index ; #X obj 134 191 random 6; #X obj 210 175 t l l l; #X obj 348 418 outlet; #X obj 257 81 int $3; #X obj 210 148 make-choice-list 1 $4 0 $3; #X obj 318 240 t a a; #X obj 357 87 t a a; #X obj 134 312 trans-log $1 $2 $3; #X obj 134 338 t a a; #N canvas 477 288 450 300 nth 0; #X obj 113 155 list-idx; #X obj 113 129 list; #X obj 113 101 t b a; #X obj 113 80 inlet; #X obj 157 79 inlet; #X obj 113 178 outlet; #X connect 0 0 5 0; #X connect 1 0 0 0; #X connect 2 0 1 0; #X connect 2 1 0 1; #X connect 3 0 2 0; #X connect 4 0 1 1; #X restore 134 246 pd nth; #X obj 318 217 list-len; #X obj 446 84 b; #X connect 0 0 20 0; #X connect 1 0 21 2; #X connect 2 0 24 2; #X connect 3 0 24 1; #X connect 4 0 9 0; #X connect 4 0 15 0; #X connect 5 0 28 0; #X connect 9 0 12 0; #X connect 9 1 17 0; #X connect 12 0 11 0; #X connect 12 0 17 0; #X connect 14 0 23 0; #X connect 15 0 20 0; #X connect 17 0 26 0; #X connect 18 0 7 0; #X connect 18 1 27 0; #X connect 18 2 26 1; #X connect 20 0 14 0; #X connect 21 0 18 0; #X connect 22 0 17 1; #X connect 22 1 19 0; #X connect 23 0 24 3; #X connect 23 1 21 4; #X connect 24 0 25 0; #X connect 25 0 12 1; #X connect 25 1 10 0; #X connect 26 0 24 0; #X connect 27 0 22 0; #X connect 28 0 21 0;
--- NEW FILE: count-bang.pd --- #N canvas 228 124 259 270 10; #X obj 30 44 inlet; #X obj 91 44 inlet; #X obj 30 187 outlet; #X msg 91 78 0; #X obj 30 122 +; #X msg 30 78 1; #X obj 59 122 f; #X connect 0 0 5 0; #X connect 1 0 3 0; #X connect 3 0 6 0; #X connect 4 0 6 0; #X connect 4 0 2 0; #X connect 5 0 4 0; #X connect 6 0 4 1;
--- NEW FILE: scale-changer-help.pd --- #N canvas 1 48 871 545 10; #X text 196 136 change harmony; #X msg 278 330 1 0 1 1 0 1 0 1 1 0 1 0; #X msg 283 284 0 2 3 5 7 8 10; #X text 287 307 active/inactive pitch classes; #X text 288 263 current pitch classes; #X msg 379 25 Harmony; #X text 53 159 select rhythm; #N canvas 63 44 340 273 register 0; #X floatatom 131 141 0 0 0 0 - - -; #X obj 38 207 outlet; #X obj 38 171 brownian 3 8 0.3; #X text 179 142 brown factor; #X msg 131 107 0.3; #X msg 163 107 0; #X msg 194 107 1; #X obj 131 76 sel 0 1; #X obj 131 46 inlet; #X obj 38 46 inlet; #X connect 0 0 2 3; #X connect 2 0 1 0; #X connect 4 0 0 0; #X connect 5 0 0 0; #X connect 6 0 0 0; #X connect 7 0 4 0; #X connect 7 1 5 0; #X connect 7 2 6 0; #X connect 8 0 7 0; #X connect 9 0 2 0; #X restore 143 312 pd register; #X floatatom 143 340 0 0 0 0 - - -; #X obj 75 394 pitch2note 4; #X text 482 134 < open to construct a specific start scale.; #X obj 171 136 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 278 203 show; #X obj 75 263 permutate; #X obj 171 173 scale-changer; #X obj 75 234 bng 15 50 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #N canvas 101 87 506 367 rhythm 0; #N canvas 203 143 578 209 chords 0; #X obj 23 95 repchord-rhythm 100 1000 12 6 0.8 0.2; #X obj 23 37 inlet; #X obj 23 131 outlet; #X floatatom 458 68 0 0 0 0 - - -; #X floatatom 385 68 0 0 0 0 - - -; #X floatatom 313 68 0 0 0 0 - - -; #X floatatom 240 68 0 0 0 0 - - -; #X floatatom 168 68 0 0 0 0 - - -; #X floatatom 95 68 0 0 0 0 - - -; #X obj 23 68 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X text 95 52 min.ED; #X text 168 52 max.ED; #X text 239 52 ED-values; #X text 451 39 periodicity of max.ED; #X text 379 39 periodicity of min.ED; #X text 306 39 max. chord size; #X connect 0 0 2 0; #X connect 1 0 9 0; #X connect 3 0 0 6; #X connect 4 0 0 5; #X connect 5 0 0 4; #X connect 6 0 0 3; #X connect 7 0 0 2; #X connect 8 0 0 1; #X connect 9 0 0 0; #X restore 265 136 pd chords; #X obj 151 108 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #N canvas 106 198 524 257 rubato 0; #X obj 35 150 outlet; #X text 406 150 chosen ED; #X text 234 150 row index; #X floatatom 196 150 0 0 0 0 - - -; #X floatatom 358 150 0 0 0 0 - - -; #X obj 35 53 inlet; #X obj 35 87 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X floatatom 275 91 0 0 0 0 - - -; #X floatatom 355 91 0 0 0 0 - - -; #X floatatom 195 91 0 0 0 0 - - -; #X floatatom 115 91 0 0 0 0 - - -; #X text 194 76 max. ED; #X text 115 76 min. ED; #X text 355 76 brownian factor; #X text 275 76 ED-values; #X text 325 201 max. ED; #X text 193 201 min. ED; #X obj 196 180 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144 -1 -1 0 1; #X obj 35 116 brown-rhythm 75 1000 24 0.07; #X connect 3 0 17 0; #X connect 5 0 6 0; #X connect 6 0 18 0; #X connect 7 0 18 3; #X connect 8 0 18 4; #X connect 9 0 18 2; #X connect 10 0 18 1; #X connect 18 0 0 0; #X connect 18 1 3 0; #X connect 18 2 4 0; #X restore 151 136 pd rubato; #X obj 38 108 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #N canvas 63 44 278 222 pulsation 0; #X obj 39 53 inlet; #X text 158 86 speed; #X obj 39 147 outlet; #X obj 39 112 metro 250; #X floatatom 109 85 0 0 0 0 - - -; #X obj 39 85 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X connect 0 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 38 136 pd pulsation; #X obj 38 178 outlet; #X obj 38 42 inlet; #X obj 265 108 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 135 88 unpack 0 0 0; #X msg 145 23 1 0 0; #X msg 146 64 0 0 1; #X msg 146 43 0 1 0; #X msg 195 65 0 0 0; #X obj 38 70 select 1 2 3; #X connect 0 0 5 0; #X connect 1 0 2 0; #X connect 2 0 5 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 6 0 13 0; #X connect 7 0 0 0; #X connect 8 0 3 0; #X connect 8 1 1 0; #X connect 8 2 7 0; #X connect 9 0 8 0; #X connect 10 0 8 0; #X connect 11 0 8 0; #X connect 12 0 8 0; #X connect 13 0 9 0; #X connect 13 1 11 0; #X connect 13 2 10 0; #X connect 13 3 12 0; #X restore 75 205 pd rhythm; #N canvas 63 44 363 294 start-scale 0; #X obj 44 36 inlet; #X obj 44 63 sel 0 1 2 3 4 5; #X msg 44 96 0 1 0 1 0 0 1 0 1 0 1 0; #X msg 60 117 1 0 1 0 1 1 0 1 0 1 0 1; #X msg 76 140 1 0 1 1 0 1 0 1 1 0 1 0; #X msg 94 162 1 1 1 1 1 1 1 1 1 1 1 1; #X obj 246 36 inlet; #X msg 109 189 1 0 1 1 0 1 1 0 1 1 0 1; #X obj 44 232 outlet; #X msg 124 213 1 0 0 1 1 0 0 1 1 0 0 1; #X msg 179 59 0; #X obj 179 36 loadbang; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 1 2 4 0; #X connect 1 3 5 0; #X connect 1 4 7 0; #X connect 1 5 9 0; #X connect 2 0 8 0; #X connect 3 0 8 0; #X connect 4 0 8 0; #X connect 5 0 8 0; #X connect 6 0 8 0; #X connect 7 0 8 0; #X connect 9 0 8 0; #X connect 10 0 1 0; #X connect 11 0 10 0; #X restore 341 143 pd start-scale; #X obj 171 211 show; #N canvas 396 226 538 308 construct-scale 0; #X msg 410 153 0; #X msg 410 103 clear; #X obj 79 231 outlet; #X obj 79 200 pack 0 0 0 0 0 0 0 0 0 0 0 0; #X obj 249 170 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 79 170 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 100 170 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 121 170 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 142 170 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 185 170 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 206 170 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 227 170 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 312 170 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 291 170 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 164 170 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 270 170 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X text 52 25 Type in the desired scale...; #X text 134 117 pitch class; #X obj 49 116 t b a; #X floatatom 49 97 5 0 0 0 - - -; #X text 397 84 clear scale; #X obj 79 141 sel 0 1 2 3 4 5 6 7 8 9 10 11; #X obj 49 74 hradio 15 1 0 12 empty empty empty 0 -6 0 8 -262144 -1 -1 7; #X connect 0 0 5 0; #X connect 0 0 6 0; #X connect 0 0 7 0; #X connect 0 0 8 0; #X connect 0 0 14 0; #X connect 0 0 9 0; #X connect 0 0 10 0; #X connect 0 0 11 0; #X connect 0 0 4 0; #X connect 0 0 15 0; #X connect 0 0 13 0; #X connect 0 0 12 0; #X connect 1 0 0 0; #X connect 3 0 2 0; #X connect 4 0 3 8; #X connect 5 0 3 0; #X connect 6 0 3 1; #X connect 7 0 3 2; #X connect 8 0 3 3; #X connect 9 0 3 5; #X connect 10 0 3 6; #X connect 11 0 3 7; #X connect 12 0 3 11; #X connect 13 0 3 10; #X connect 14 0 3 4; #X connect 15 0 3 9; #X connect 18 0 3 0; #X connect 18 1 21 0; #X connect 19 0 18 0; #X connect 21 0 5 0; #X connect 21 1 6 0; #X connect 21 2 7 0; #X connect 21 3 8 0; #X connect 21 4 14 0; #X connect 21 5 9 0; #X connect 21 6 10 0; #X connect 21 7 11 0; #X connect 21 8 4 0; #X connect 21 9 15 0; #X connect 21 11 13 0; #X connect 21 12 12 0; #X connect 22 0 19 0; #X restore 466 116 pd construct-scale; #X text 19 53 Changes one single pitch of a given scale whenever you send a bang to the left inlet. A start scale must be sent to the right inlet frist - note its special format: a list of size 12 consisting only of 0 and 1 where 1 means an active pitch class and 0 a inactive one.; #X text 18 24 scale-changer; #X text 15 477 1996 by Karlheinz Essl; #X obj 75 179 hradio 15 1 0 4 empty empty empty 0 -6 0 8 -262144 -1 -1 0; #X obj 341 124 hradio 15 1 0 6 empty empty select_start_scale 0 -6 0 8 -262144 -1 -1 2; #X obj 215 292 hradio 15 1 0 3 empty empty empty 0 -6 0 8 -262144 -1 -1 0; #X obj 75 434 play2 127 500 1 1; #X obj 75 286 t a a; #X floatatom 183 403 5 0 0 0 - - -; #X obj 143 365 + 0; #X floatatom 173 367 5 0 0 1 octave - -; #X connect 7 0 8 0; #X connect 8 0 29 0; #X connect 9 0 26 0; #X connect 11 0 14 0; #X connect 12 0 1 0; #X connect 13 0 27 0; #X connect 14 0 18 0; #X connect 14 0 13 1; #X connect 14 1 12 0; #X connect 15 0 13 0; #X connect 16 0 15 0; #X connect 17 0 14 1; #X connect 18 0 2 0; #X connect 19 0 17 1; #X connect 23 0 16 0; #X connect 24 0 17 0; #X connect 25 0 7 1; #X connect 27 0 9 0; #X connect 27 1 7 0; #X connect 28 0 26 2; #X connect 29 0 9 1; #X connect 30 0 29 1;
--- NEW FILE: play-samp~-help.pd --- #N canvas 424 240 594 423 10; #X text 205 201 reversed , attenuated; #X obj 125 226 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X text 212 178 transposed , attenuated; #X msg 365 23 MSP-RTC; #X text 24 325 1999 by Karlheinz Essl; #X text 24 56 Plays one sample. The object requires a list sent to its input with the following elements: transposition factor (float between -N and N) - buffer name - gain factor (float between 0 an 1). If 1 is sent to the right input , the sample would loop until a 0 is sent.; #X text 24 29 play-samp~; #X text 154 156 original pitch , original gain; #X text 148 229 loop on/off; #X text 25 127 NB: a negative transposition factor plays back the sample backwards; #X obj 48 226 play-samp~; #X obj 266 283 openpanel; #X obj 265 358 table play-samp; #X msg 266 304 read -resize $1 play-samp; #X obj 266 330 soundfiler; #X msg 48 159 1 play-samp 1; #X msg 63 181 2.5 play-samp 0.25; #X obj 266 256 bng 20 250 50 0 empty empty open-sample 0 -6 0 8 -262144 -1 -1; #X obj 48 257 ezdac~; #X msg 83 202 -1 play-samp 0.8; #X connect 1 0 10 1; #X connect 10 0 18 0; #X connect 10 0 18 1; #X connect 11 0 13 0; #X connect 13 0 14 0; #X connect 15 0 10 0; #X connect 16 0 10 0; #X connect 17 0 11 0; #X connect 19 0 10 0;
--- NEW FILE: cp-pan~.pd --- #N canvas 0 0 450 300 10; #X text 264 126 0=left , 1=right; #X text 260 108 Arg. 1: Panning; #X obj 117 110 expr cos($f1) ; sin($f1); #X text 181 86 * ~M_PI/2; #X obj 117 85 * 1.5708; #X obj 39 172 *~ 0.7; #X obj 120 172 *~ 0.7; #X text 257 142 (not used currently); #X obj 117 60 inlet; #X obj 38 62 inlet~; #X obj 39 203 outlet~; #X obj 120 203 outlet~; #X connect 2 0 5 1; #X connect 2 1 6 1; #X connect 4 0 2 0; #X connect 5 0 10 0; #X connect 6 0 11 0; #X connect 8 0 4 0; #X connect 9 0 5 0; #X connect 9 0 6 0;
--- NEW FILE: play2.pd --- #N canvas 212 148 843 390 10; #X obj 304 309 r MIDI-channel; #X obj 245 28 inlet; #X obj 358 28 inlet; #X obj 301 28 inlet; #X obj 457 31 loadbang; #X obj 410 30 inlet; #X obj 523 33 inlet; #X obj 410 56 int $4; #X obj 245 109 list prepend 0; #X obj 245 130 route 0 1; #X obj 245 73 makenote $1 $2; #X obj 430 287 dac~; #X obj 430 221 list prepend 1; #X obj 430 189 pack 0 0; #X text 597 191 1992-2000 by Karlheinz Essl; #X text 598 209 vs 3.2; #X obj 245 309 noteout; #X obj 523 62 route float; #X obj 59 71 hsl 64 15 0 1 0 0 empty empty volume 20 6 0 8 -262144 -1 -1 6300 1; #X obj 352 110 * 1; #X obj 430 262 fluid~; #X msg 148 152 load $1; #X obj 148 127 openpanel; #X obj 132 71 bng 15 250 50 0 empty empty load_sf2 20 6 0 8 -262144 -1 -1; #X connect 0 0 16 2; #X connect 1 0 10 0; #X connect 2 0 10 2; #X connect 3 0 10 1; #X connect 4 0 7 0; #X connect 5 0 7 0; #X connect 6 0 17 0; #X connect 7 0 8 1; #X connect 8 0 9 0; #X connect 9 0 16 0; #X connect 9 1 13 0; #X connect 10 0 8 0; #X connect 10 1 19 0; #X connect 12 0 20 0; #X connect 13 0 12 0; #X connect 17 0 12 1; #X connect 17 0 16 2; #X connect 17 1 20 0; #X connect 18 0 19 1; #X connect 19 0 16 1; #X connect 19 0 13 1; #X connect 20 0 11 0; #X connect 20 1 11 1; #X connect 21 0 20 0; #X connect 22 0 21 0; #X connect 23 0 22 0; #X coords 0 -1 1 1 160 40 1 50 50;
--- NEW FILE: note2pitch-help.pd --- #N canvas 3 48 305 389 10; #X msg 196 24 Harmony; #X text 103 182 key number; #X floatatom 48 154 0 0 0 0 - - -; #X obj 48 210 note2pitch; #X floatatom 48 182 0 0 0 0 - - -; #X text 103 154 note; #X msg 81 110 pitch2note; #X text 16 110 see also:; #X text 16 62 Outputs the pitch class <integer> (i.e. a note without register information) of a note (i.e. key number) <int>.; #X text 16 30 note2pitch; #X text 16 338 1994 by Karlheinz Essl; #X msg 48 299 D#; #X obj 48 270 show-pitchclass; #X floatatom 48 241 0 0 0 0 - - -; #X text 75 300 pitch class name ; #X text 103 242 pitch class; #X connect 2 0 4 0; #X connect 3 0 13 0; #X connect 4 0 3 0; #X connect 12 0 11 0; #X connect 13 0 12 0;
--- NEW FILE: alea-rhythm.pd --- #N canvas 336 53 360 292 10; #X obj 103 81 sel 1; #X obj 45 40 inlet; #X obj 148 40 inlet; #X obj 238 40 inlet; #X obj 193 40 inlet; #X obj 45 171 metro 500; #X obj 45 217 outlet; #X obj 290 210 outlet; #X obj 238 210 outlet; #X text 44 248 1993-95 by Karlheinz Essl; #X text 44 233 vs. 3; #X obj 103 132 t a a; #X obj 45 64 t a a; #X obj 45 196 t b b; #X obj 103 105 between-log $1 $2 $3; #X connect 0 0 14 0; #X connect 1 0 12 0; #X connect 2 0 14 1; #X connect 3 0 14 3; #X connect 4 0 14 2; #X connect 5 0 13 0; #X connect 11 0 5 1; #X connect 11 1 7 0; #X connect 12 0 5 0; #X connect 12 1 0 0; #X connect 13 0 6 0; #X connect 13 1 14 0; #X connect 14 0 11 0; #X connect 14 1 8 0;
--- NEW FILE: brown-rhythm-help.pd --- #N canvas 259 278 711 510 10; #X text 65 76 Generates a brownian-movement-like rhythm of a geometrical row of entry delays (ED) between a minimum and a maximum entry delay and a certain number of ED-values. The brownian factor determines the distance between two succeding rhythmical values. A factor of 0 produces a periodic rhythm , wheras a factor of 1 will output random values of the given range.; #X floatatom 409 340 8 0 0 3 chosen_ED - -; #X floatatom 248 340 4 0 0 3 row_index - -; #X obj 87 268 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 1 1; #X floatatom 167 274 4 0 0 2 min_ED - -; #X floatatom 247 274 4 0 0 2 max_ED - -; #X floatatom 407 274 4 0 0 2 brownian_factor - -; #X floatatom 327 274 4 0 0 2 ED-values - -; #X msg 223 218 serial-rhythm; #X msg 134 218 alea-rhythm; #X text 68 219 see also:; #X msg 322 218 sneak-rhythm; #X obj 540 274 vsl 15 128 0 12 0 0 empty empty empty 0 -8 0 8 -262144 -1 -1 10583 1; #X text 561 256 display; #X text 567 275 max. ED; #X text 567 377 min. ED; #X obj 540 213 lb 12; #X text 187 55 vs. 2; #X text 51 55 brown-rhythm; #X text 69 426 1993-94 by Karlheinz Essl; #X obj 87 307 brown-rhythm 100 1000 12 0.25; #X obj 129 351 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 540 238 range 0 $1; #X obj 87 376 QT-PercPlayer; #X msg 87 340 60; #X connect 2 0 12 0; #X connect 3 0 20 0; #X connect 4 0 20 1; #X connect 5 0 20 2; #X connect 6 0 20 4; #X connect 7 0 20 3; #X connect 7 0 22 0; #X connect 16 0 22 0; #X connect 20 0 24 0; #X connect 20 0 21 0; #X connect 20 1 2 0; #X connect 20 2 1 0; #X connect 22 0 12 0; #X connect 24 0 23 0;
--- NEW FILE: transp-pitch.pd --- #N canvas 50 61 213 250 10; #X text 31 198 1994 by Karlheinz Essl; #X obj 35 160 outlet; #X obj 111 48 inlet; #X obj 35 96 + 0; #X obj 35 51 inlet; #X obj 35 135 mod 12; #X connect 2 0 3 1; #X connect 3 0 5 0; #X connect 4 0 3 0; #X connect 5 0 1 0;
--- NEW FILE: sneak-random-help.pd --- #N canvas 275 331 568 424 10; #X obj 58 147 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 438 251 RTC-seed; #X text 259 251 vs. 1.1: seedable by the; #X text 510 251 object; #X text 20 30 sneak-random; #X text 20 62 Outputs random number between 0 and n-1 whereas two consecutive numbers are always neighbours.; #X obj 221 147 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144 -1 -1 10583 1; #X obj 58 177 sneak-random 7; #X text 259 236 1994-98 by Karlheinz Essl; #X floatatom 58 209 0 0 0 0 - - -; #X text 20 96 see also:; #X msg 93 96 random; #X msg 149 96 random-norep; #X msg 243 96 xrandom; #X msg 296 22 Chance; #X text 211 128 display; #X floatatom 151 151 4 0 0 1 n - -; #N canvas 63 44 196 196 disp 0; #X obj 29 124 outlet; #X obj 96 38 inlet; #X obj 96 67 - 1; #X obj 29 53 inlet; #X obj 29 90 expr_scale 0 6 0 127; #X connect 1 0 2 0; #X connect 2 0 4 2; #X connect 3 0 4 0; #X connect 4 0 0 0; #X restore 19 114 pd disp; #X text 208 43 vs. 1.1; #X obj 58 291 collect; #X obj 114 290 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X msg 58 311; #X connect 0 0 7 0; #X connect 7 0 9 0; #X connect 9 0 17 0; #X connect 9 0 19 0; #X connect 16 0 17 1; #X connect 16 0 7 1; #X connect 17 0 6 0; #X connect 19 0 21 0; #X connect 20 0 19 1;
--- NEW FILE: alea-rhythm-help.pd --- #N canvas 148 74 522 350 10; #X msg 173 107 brown-rhythm; #X msg 76 107 serial-rhythm; #X text 10 107 see also:; #X msg 48 222 60; #X floatatom 290 222 4 0 0 3 ED - -; #X text 10 62 Sends out rhythm bangs at random times from a geometrical time row defined by a a min. and max. entry delay (ED) and a certain number of ED-values.; #X msg 271 107 sneak-rhythm; #X floatatom 169 222 4 0 0 3 row_index - -; #X text 10 30 alea-rhythm; #X text 183 43 vs. 3; #X obj 48 250 QT-PercPlayer; #X text 10 300 1993-95 by Karlheinz Essl; #X obj 48 193 alea-rhythm 100 1000 12; #X floatatom 100 167 4 0 0 2 min_ED - -; #X floatatom 152 167 4 0 0 2 max_ED - -; #X floatatom 204 167 4 0 0 2 ED-values - -; #X obj 48 149 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 1 1; #X connect 3 0 10 0; #X connect 12 0 3 0; #X connect 12 1 7 0; #X connect 12 2 4 0; #X connect 13 0 12 1; #X connect 14 0 12 2; #X connect 15 0 12 3; #X connect 16 0 12 0;
--- NEW FILE: last.pd --- #N canvas 50 61 246 246 10; #X obj 81 168 outlet; #X obj 49 28 inlet; #X obj 114 115 - 1; #X obj 114 85 list-len; #X obj 49 50 t a a; #X obj 49 140 list split; #X connect 1 0 4 0; #X connect 2 0 5 1; #X connect 3 0 2 0; #X connect 4 0 5 0; #X connect 4 1 3 0; #X connect 5 1 0 0;
--- NEW FILE: cp-pan~-help.pd --- #N canvas 185 195 580 429 10; #X obj 44 166 noise~; #X obj 43 264 ezdac~ 0; #X floatatom 99 196 5 0 0 0 - - -; #X obj 99 166 / 127; #X text 23 80 See also:; #X msg 89 79 sqrt-pan~; #X obj 43 226 cp-pan~; #X text 23 51 Constant power panner; #X text 23 21 cp-pan~; #X msg 260 21 Envelopes; #X msg 264 316 Overview; #X obj 102 141 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; #X text 105 123 L < < < M > > > R; #X text 188 159 controller value; #X text 20 334 2004 by Chris Dobrian; #X obj 43 196 *~ 0.3; #X connect 0 0 15 0; #X connect 2 0 6 1; #X connect 3 0 2 0; #X connect 6 0 1 0; #X connect 6 1 1 1; #X connect 11 0 3 0; #X connect 15 0 6 0;
--- NEW FILE: markov-rhythm.pd --- #N canvas 63 44 361 374 10; #X obj 56 51 inlet; #X obj 124 229 outlet; #X text 173 166 chosen index; #X text 173 240 chosen ED; #X obj 236 266 outlet; #X obj 56 270 metro 1000; #X obj 56 314 outlet; #X obj 153 52 inlet; #X obj 182 75 inlet; #X obj 243 52 inlet; #X text 101 337 1994 by Karlheinz Essl; #X obj 124 128 markov $1; #X obj 206 234 t a a; #X obj 56 292 t b b; #X obj 124 160 t a a; #X msg 76 95 bang; #N canvas 0 0 450 300 nth 0; #X obj 113 155 list-idx; #X obj 113 129 list; #X obj 113 101 t b a; #X obj 113 80 inlet; #X obj 157 79 inlet; #X obj 113 178 outlet; #X connect 0 0 5 0; #X connect 1 0 0 0; #X connect 2 0 1 0; #X connect 2 1 0 1; #X connect 3 0 2 0; #X connect 4 0 1 1; #X restore 206 199 pd nth; #X connect 0 0 5 0; #X connect 5 0 13 0; #X connect 7 0 11 1; #X connect 8 0 11 2; #X connect 9 0 16 1; #X connect 11 0 14 0; #X connect 12 0 5 1; #X connect 12 1 4 0; #X connect 13 0 6 0; #X connect 13 1 11 0; #X connect 14 0 1 0; #X connect 14 1 16 0; #X connect 15 0 11 0; #X connect 16 0 12 0;
--- NEW FILE: anti-octave&prime.pd --- #N canvas 63 44 331 270 10; #X obj 34 136 outlet; #X obj 34 62 inlet; #X obj 92 136 outlet; #X text 34 194 1993 by Karlheinz Essl; #X text 108 86 check for octaves; #N canvas 517 208 637 374 check2 0; #X obj 144 113 int; #X obj 117 112 int; #X obj 117 270 int; #X obj 117 76 t a b a a; #X obj 117 47 inlet; #X obj 203 44 inlet; #X obj 117 305 outlet; #X obj 173 305 outlet; #X text 259 123 if ($i1-$i2)%12==0 then out2 bang else $i1; #X obj 117 155 -; #X obj 117 190 % 12; #X obj 117 214 == 0; #X obj 173 281 bang; #X obj 117 237 select 0 1; #X connect 0 0 9 1; #X connect 1 0 9 0; #X connect 2 0 6 0; #X connect 3 0 1 0; #X connect 3 1 0 0; #X connect 3 2 2 1; #X connect 4 0 3 0; #X connect 5 0 0 1; #X connect 9 0 10 0; #X connect 10 0 11 0; #X connect 11 0 13 0; #X connect 12 0 7 0; #X connect 13 0 2 0; #X connect 13 1 12 0; #X restore 34 87 pd check2; #X obj 34 110 t a a; #X connect 1 0 5 0; #X connect 5 0 6 0; #X connect 5 1 2 0; #X connect 6 0 0 0; #X connect 6 1 5 1;
--- NEW FILE: lin2dB.pd --- #N canvas 430 275 240 143 10; #X obj 34 34 inlet; #X obj 34 89 outlet; #X text 60 91 1992 by Gerhard Eckel ; #X obj 34 61 expr 20*log10($f1); #X connect 0 0 3 0; #X connect 3 0 1 0;
--- NEW FILE: inc-dec.pd --- #N canvas 228 124 313 345 10; #X obj 53 56 inlet; #X obj 96 56 inlet; #X obj 155 56 inlet; #X obj 53 267 outlet; #X obj 53 231 + 0; #X obj 53 118 int 1; #X obj 96 118 int -1; #X obj 185 116 int 0; #X obj 53 154 + 1; #X obj 215 57 loadbang; #X text 84 268 1994 by Karlheinz Essl; #X obj 155 84 t a b; #X obj 53 185 int; #X obj 53 86 b; #X obj 96 82 b; #X connect 0 0 13 0; #X connect 1 0 14 0; #X connect 2 0 11 0; #X connect 4 0 3 0; #X connect 5 0 8 0; #X connect 6 0 8 0; #X connect 7 0 8 1; #X connect 8 0 12 0; #X connect 9 0 7 0; #X connect 11 0 4 1; #X connect 11 1 7 0; #X connect 12 0 8 1; #X connect 12 0 4 0; #X connect 13 0 5 0; #X connect 14 0 6 0;
--- NEW FILE: pass-bang.pd --- #N canvas 63 44 330 265 10; #X obj 30 46 inlet; #X obj 30 174 sel 1; #X obj 30 210 outlet; #X obj 120 25 inlet; #X obj 120 118 - 1; #X text 159 113 Leave it! Filters out ints < 1; #X text 58 213 vs. 1.1: 1994-95 by Karlheinz Essl; #X obj 30 145 == $1; #X obj 120 46 t a b; #X obj 30 104 f 0; #X obj 59 104 + 1; #X msg 46 78 0; #X connect 0 0 9 0; #X connect 1 0 2 0; #X connect 1 0 11 0; #X connect 3 0 8 0; #X connect 4 0 7 1; #X connect 7 0 1 0; #X connect 8 0 4 0; #X connect 8 1 11 0; #X connect 9 0 10 0; #X connect 9 0 7 0; #X connect 10 0 9 1; #X connect 11 0 9 1;
--- NEW FILE: show-pitchclass-help.pd --- #N canvas 3 48 400 230 10; #X text 86 139 pitch; #X msg 40 139 1A; #X obj 40 106 show-pitchclass; #X text 20 178 2004 by Karlheinz Essl; #X text 20 23 show-pitchclass; #X text 20 55 Shows the pitch class of a MIDI note number.; #X msg 280 23 Harmony; #X floatatom 40 80 0 0 0 0 - - -; #X text 86 81 MIDI note number; #X connect 2 0 1 0; #X connect 7 0 2 0;
--- NEW FILE: infinity-row.pd --- #N canvas 99 53 582 454 10; #X text 367 34 reset counter; #X msg 81 68 0; #X obj 54 38 inlet; #X text 129 147 index; #X obj 84 153 outlet; #X obj 112 195 inlet; #X obj 324 37 inlet; #X obj 77 350 inlet; #X obj 54 402 outlet; #X obj 215 280 inlet; #N canvas 63 44 692 333 tables 0; #X obj 60 209 outlet; #X obj 153 55 inlet; #X obj 60 53 inlet; #X msg 367 128 read $1; #X obj 367 101 openpanel; #X msg 367 75 bang; #X obj 367 155 s $0-infrow; #X obj 457 156 table $0-infrow 1024; #X obj 60 169 tabread $0-infrow; #X msg 462 117 read INFROW1024.tab; #X obj 462 92 loadbang; #X obj 60 104 list prepend 0; #X obj 60 128 route 0 1 2; #X text 112 150 add three more tables here!; #X connect 1 0 11 1; #X connect 2 0 11 0; #X connect 3 0 6 0; #X connect 4 0 3 0; #X connect 5 0 4 0; #X connect 8 0 0 0; #X connect 9 0 6 0; #X connect 10 0 9 0; #X connect 11 0 12 0; #X connect 12 0 8 0; #X restore 54 249 pd tables; #X obj 153 196 loadbang; #X obj 54 314 * $3; #X obj 54 373 + $1; #X obj 112 222 int $2; #X obj 54 101 f 0; #X obj 84 101 + 1; #X obj 54 66 b; #X obj 54 128 t a a; #X obj 117 102 mod 1024; #X text 122 349 1996: Implementation by K@rlheinz Essl and Peter Richter , after Per Noergaard; #X connect 1 0 15 1; #X connect 2 0 17 0; #X connect 5 0 14 0; #X connect 6 0 1 0; #X connect 7 0 13 1; #X connect 9 0 12 1; #X connect 10 0 12 0; #X connect 11 0 14 0; #X connect 12 0 13 0; #X connect 13 0 8 0; #X connect 14 0 10 1; #X connect 15 0 16 0; #X connect 15 0 18 0; #X connect 16 0 19 0; #X connect 17 0 15 0; #X connect 18 0 10 0; #X connect 18 1 4 0; #X connect 19 0 15 1;
--- NEW FILE: countdown.pd --- #N canvas 430 211 283 344 10; #X obj 30 279 outlet; #X obj 78 39 inlet; #X obj 59 245 outlet; #X msg 78 112 1; #X obj 78 67 t b f; #X msg 103 112 0; #X obj 111 244 sel 0; #X obj 160 167 + 1; #X obj 59 209 inc-dec; #X obj 78 166 metro 1000; #X text 60 283 © 1997 by Karlheinz Essl; #X connect 1 0 4 0; #X connect 3 0 9 0; #X connect 4 0 3 0; #X connect 4 1 7 0; #X connect 5 0 9 0; #X connect 6 0 0 0; #X connect 6 0 5 0; #X connect 7 0 8 2; #X connect 8 0 2 0; #X connect 8 0 6 0; #X connect 9 0 8 1;
--- NEW FILE: ED-trans-help.pd --- #N canvas 3 48 446 404 10; #X msg 26 217 stop; #X text 20 114 vs. 1.2: a stop message sent to the right inlet immediately stops the whole process.; #X msg 363 23 Rhythm; #X msg 85 147 rit-acc; #X text 20 149 see also:; #X text 21 58 Generates a transition between two entry delays (ED) within a certain time span producing either a ritardando or an accelerando. A number (= time in ms) sent to the leftmost inlet starts the process. ; #X text 21 26 ED-trans; #X msg 116 278 60; #X obj 116 245 ED-trans 75 300; #X floatatom 116 190 4 0 0 2 transition_time - -; #X msg 65 217 5000; #X floatatom 216 224 4 0 0 2 end_ED - -; #X floatatom 166 210 4 0 0 2 start_ED - -; #X floatatom 216 271 4 0 0 1 ED - -; #X obj 116 311 QT-PercPlayer; #X text 20 356 1993-97 by Karlheinz Essl; #X text 153 40 vs. 1.2; #X connect 0 0 8 0; #X connect 7 0 14 0; #X connect 8 0 7 0; #X connect 8 1 13 0; #X connect 9 0 8 0; #X connect 10 0 8 0; #X connect 11 0 8 2; #X connect 12 0 8 1;
--- NEW FILE: brown-melody-help.pd --- #N canvas 301 56 621 460 10; #X text 35 62 Generates a brownian-mouvement-like melody within a given ambitus. The distance between two notes is determined by the brownian factor <0-1>. When this factor is 1 , each note of the given range can be choosen. When the rate is O , the same note will be always repeated. The right outlet shows the chosen interval.; #X text 35 31 brown-melody; #X msg 475 52 Harmony; #X obj 68 298 brown-melody 24 108 0.1; #X floatatom 240 264 4 0 0 2 highest_note - -; #X floatatom 153 264 4 0 0 2 lowest_note - -; #X floatatom 332 262 4 0 0 2 brown_factor - -; #X obj 68 230 metro 200; #X obj 68 194 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 ; #X floatatom 68 335 4 0 0 1 note - -; #X floatatom 224 329 4 0 0 1 interval - -; #X text 330 381 1993 by Karlheinz Essl; #X obj 68 263 bng 15 250 50 0 empty empty rhythm_bangs 0 -6 0 8 -262144 -1 -1; #X text 330 395 vs.2: right outlet shows interval; #X text 35 152 see also:; #X msg 100 152 brownian; #X text 240 41 (vs. 2); #X floatatom 126 202 5 50 2000 2 speed - -; #X obj 68 388 play2 127 500 0 1; #X connect 3 0 9 0; #X connect 3 1 10 0; #X connect 4 0 3 2; #X connect 5 0 3 1; #X connect 6 0 3 3; #X connect 7 0 12 0; #X connect 8 0 7 0; #X connect 9 0 18 0; #X connect 12 0 3 0; #X connect 17 0 7 1;
--- NEW FILE: brownian.pd --- #N canvas 194 51 575 529 10; #X obj 36 167 r RTC-rs; #X msg 36 193 seed $1; #X obj 413 159 * 65000; #X obj 101 227 drunk 65000; #X obj 101 27 inlet; #X obj 101 255 / 65000; #X obj 318 27 inlet; #X obj 225 27 inlet; #X obj 413 27 inlet; #X obj 101 356 * 1; #X obj 101 452 outlet; #X obj 101 384 + $1; #X obj 413 106 f $3; #X text 378 454 1993-98 by Gerhard Eckel; #X text 379 472 vs. 1.1; #X obj 101 418 int-or-float $4; #X obj 201 383 f $1; #X obj 201 348 loadbang; #X obj 236 383 f $2; #X obj 426 78 loadbang; #X obj 101 73 t b b; #X obj 255 233 expr $f2 - $f1; #X obj 318 130 t b f; #X obj 225 108 f $1; #X obj 318 106 f $2; #X obj 225 133 t f f; #X obj 239 50 loadbang; #X obj 239 74 t b b; #X connect 0 0 1 0; #X connect 1 0 3 0; #X connect 2 0 3 2; #X connect 3 0 5 0; #X connect 4 0 20 0; #X connect 5 0 9 0; #X connect 6 0 24 0; #X connect 7 0 23 0; #X connect 8 0 12 0; #X connect 9 0 11 0; #X connect 11 0 15 0; #X connect 12 0 2 0; #X connect 15 0 10 0; #X connect 16 0 15 1; #X connect 17 0 16 0; #X connect 17 0 18 0; #X connect 18 0 15 1; #X connect 19 0 12 0; #X connect 20 0 3 0; #X connect 21 0 9 1; #X connect 22 0 21 0; #X connect 22 1 21 1; #X connect 23 0 25 0; #X connect 24 0 22 0; #X connect 25 0 11 1; #X connect 25 1 21 0; #X connect 26 0 27 0; #X connect 27 0 23 0; #X connect 27 1 24 0;
--- NEW FILE: intv2ratio-help.pd --- #N canvas 3 48 373 313 10; #X floatatom 55 128 4 0 0 1 interval - -; #X obj 55 158 intv2ratio; #X text 20 234 1994 by Karlheinz Essl; #X text 20 58 Converts an interval (int = tempered or float = any mirco-interval) into a ratio.; #X text 20 26 intv2ratio; #X floatatom 55 194 4 0 0 1 ratoi - -; #X text 130 195 ratio; #X msg 86 90 ratio2intv; #X text 20 90 see also:; #X msg 195 23 Harmony; #X connect 0 0 1 0; #X connect 1 0 5 0;
--- NEW FILE: choice-rhythm-help.pd --- #N canvas 120 110 867 429 10; #X text 53 26 choice-rhythm; #X text 51 132 see also:; #X msg 120 133 alea; #X text 50 362 1993 by Karlheinz Essl; #X obj 562 134 loadbang; #X obj 94 186 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 1 1; #X obj 592 245 bng 15 250 50 0 empty empty clear 0 -6 0 8 -262144 -1 -1; #X msg 569 305 1 9 8; #X obj 569 266 show; #X floatatom 216 262 0 0 0 3 length_of_chosen_list - -; #X floatatom 155 264 5 0 0 3 ED - -; #X obj 94 227 choice-rhythm 100 1000 12 6; #X floatatom 175 172 4 0 0 2 min_ED - -; #X floatatom 226 172 4 0 0 2 max_ED - -; #X msg 94 266 60; #X floatatom 348 172 4 0 0 2 max_list_size - -; #X floatatom 278 172 4 0 0 2 ED-values - -; #X obj 562 190 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 94 305 QT-PercPlayer; #X text 522 323 list of chosen indices; #X obj 562 152 t b b; #X text 447 188 make new choice:; #X text 53 58 First a supply of rhythmical values (ED = entry delays) is generated. Whenever a bang is sent to the rightmost inlet , a choice of the indices from this supply is made which serves as a choice list for a random ("alea") selection of EDs.; #X connect 4 0 20 0; #X connect 5 0 11 0; #X connect 6 0 8 1; #X connect 8 0 7 0; #X connect 11 0 14 0; #X connect 11 1 10 0; #X connect 11 2 9 0; #X connect 11 3 8 0; #X connect 12 0 11 1; #X connect 13 0 11 2; #X connect 14 0 18 0; #X connect 15 0 11 4; #X connect 16 0 11 3; #X connect 17 0 11 5; #X connect 20 0 17 0; #X connect 20 1 6 0;
--- NEW FILE: ED-rhythm-help.pd --- #N canvas 137 65 669 548 10; #X obj 89 328 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 89 256 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 1 1; #X text 43 29 ED-rhythm; #X text 40 146 see also:; #X obj 438 210 loadbang; #X msg 438 237 500 166 166 166 250 250; #X msg 107 145 alea-rhythm; #X msg 289 145 brown-rhythm; #X msg 193 145 serial-rhythm; #X msg 388 145 sneak-rhythm; #X obj 159 329 bng 15 250 50 0 empty empty supply_exhausted 0 26 0 8 -262144 -1 -1; #X floatatom 266 332 4 0 0 3 ED - -; #X floatatom 113 329 4 0 0 3 index - -; #X msg 438 266 600 400 200; #X text 532 268 ED lists; #X text 237 414 1995-2004 by Karlheinz Essl; #X text 188 41 vs. 1.2; #X obj 89 294 ED-rhythm 3; #X obj 89 398 QT-PercPlayer; #X text 43 63 Creates a rhythm by selecting entry delays supplied by a list of entry delays which has to be sent to the rightmost inlet. The selection is achieved by one of the possible selection mechanisms alea (=1) , series (=2) , sequence (=3) and rota ==4) which is the argument of this function.; #X floatatom 158 270 5 0 0 0 - - -; #X msg 89 365 70; #X text 121 182 selection principle (1-4); #N canvas 556 269 497 418 sel_princ 0; #X msg 231 228 1 alea; #X msg 231 247 2 series; #X msg 231 267 3 sequence; #X msg 231 289 4 rota; #X obj 231 318 list split 1; #X obj 231 373 outlet; #X obj 112 61 loadbang; #X obj 112 192 select 1 2 3 4; #X obj 112 171 + 1; #X obj 112 123 hradio 15 1 0 4 empty empty empty 0 -6 0 8 -262144 -1 -1 1; #X msg 112 82 2; #X symbolatom 108 143 10 0 0 0 - - -; #X connect 0 0 4 0; #X connect 1 0 4 0; #X connect 2 0 4 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 4 1 11 0; #X connect 6 0 10 0; #X connect 7 0 0 0; #X connect 7 1 1 0; #X connect 7 2 2 0; #X connect 7 3 3 0; #X connect 8 0 7 0; #X connect 9 0 8 0; #X connect 10 0 9 0; #X coords 0 -1 1 1 90 65 1 100 100; #X restore 159 203 pd sel_princ; #X connect 0 0 21 0; #X connect 1 0 17 0; #X connect 4 0 5 0; #X connect 5 0 17 2; #X connect 13 0 17 2; #X connect 17 0 0 0; #X connect 17 1 12 0; #X connect 17 2 10 0; #X connect 17 3 11 0; #X connect 21 0 18 0; #X connect 23 0 17 1; #X connect 23 0 20 0;
--- NEW FILE: normalize-row.pd --- #N canvas 265 103 230 218 10; #X obj 38 166 outlet; #X obj 38 19 inlet; #X obj 38 134 transpose-row; #X text 38 190 1994 by Karlheinz Essl; #X obj 38 81 list split 1; #X obj 38 110 * -1; #X obj 38 54 t a a; #X connect 1 0 6 0; #X connect 2 0 0 0; #X connect 4 0 5 0; #X connect 5 0 2 0; #X connect 6 0 4 0; #X connect 6 1 2 1;
--- NEW FILE: markov.pd --- #N canvas 0 0 531 456 10; #X obj 226 326 outlet; #X obj 105 326 outlet; #N canvas 390 143 364 293 switcher 0; #X obj 71 84 inlet; #X obj 115 84 inlet; #X obj 72 245 outlet; #X obj 123 247 outlet; #X obj 71 118 b; #X msg 115 114 0; #X obj 72 180 select 0; #X obj 72 144 f 0; #X msg 102 145 1; #X obj 72 209 t b b; #X obj 123 211 b; #X connect 0 0 4 0; #X connect 1 0 5 0; #X connect 4 0 7 0; #X connect 5 0 7 1; #X connect 6 0 9 0; #X connect 6 1 10 0; #X connect 7 0 6 0; #X connect 8 0 7 1; #X connect 9 0 2 0; #X connect 9 1 8 0; #X connect 10 0 3 0; #X restore 105 190 pd switcher; #X obj 177 262 prob; #X obj 105 97 inlet; #X obj 177 97 inlet; #X obj 295 99 inlet; #X obj 105 234 int $1; #X obj 105 258 t a a; #X obj 177 124 t b a a; #X obj 295 129 t b a; #X connect 2 0 7 0; #X connect 2 1 3 0; #X connect 3 0 1 0; #X connect 3 1 0 0; #X connect 4 0 2 0; #X connect 5 0 9 0; #X connect 6 0 10 0; #X connect 7 0 8 0; #X connect 8 0 1 0; #X connect 8 1 3 0; #X connect 9 0 2 1; #X connect 9 1 7 1; #X connect 9 2 3 0; #X connect 10 0 2 1; #X connect 10 1 3 0;
--- NEW FILE: random-ramp-urn.pd --- #N canvas 549 327 580 382 10; #X obj 39 41 inlet; #N canvas 260 206 902 384 choose-parameters 0; #X obj 54 30 inlet; #X obj 216 30 inlet; #X obj 135 30 inlet; #X obj 298 30 inlet; #X obj 653 30 inlet; #X obj 561 30 inlet; #X obj 470 30 inlet; #X obj 54 186 outlet; #X obj 379 186 outlet; #X obj 54 59 t b b; #X obj 379 156 anti-bis; #X obj 54 133 between-lin-urn $1 $2 $3; #X obj 379 133 between-log-urn $4 $5 $6; #X obj 447 156 b; #X obj 54 161 anti-bis; #X obj 122 161 b; #X connect 0 0 9 0; #X connect 1 0 11 2; #X connect 2 0 11 1; #X connect 3 0 11 3; #X connect 4 0 12 3; #X connect 5 0 12 2; #X connect 6 0 12 1; #X connect 9 0 11 0; #X connect 9 1 12 0; #X connect 10 0 8 0; #X connect 10 1 13 0; #X connect 11 0 14 0; #X connect 12 0 10 0; #X connect 13 0 12 0; #X connect 14 0 7 0; #X connect 14 1 15 0; #X connect 15 0 11 0; #X restore 163 157 pd choose-parameters; #X obj 248 24 inlet; #X obj 300 24 inlet; #X obj 453 24 inlet; #X obj 505 24 inlet; #X obj 402 24 inlet; #X obj 351 24 inlet; #X obj 39 266 int; #X obj 39 323 outlet; #X obj 342 276 outlet; #X msg 89 192 stop; #X obj 289 276 outlet; #X obj 39 129 route bang stop; #X obj 142 25 first-bang; #X text 241 323 1994 by Karlheinz Essl; #X obj 214 127 i $1; #X obj 265 127 i $2; #X obj 316 127 i $3; #X obj 368 127 i $4; #X obj 419 127 i $5; #X obj 470 127 i $6; #X obj 39 295 change; #X obj 163 298 line; #X obj 163 244 pack 0 0; #X obj 163 267 t a b; #X obj 298 183 t a a a; #X obj 209 269 del 30; #X obj 163 199 t a a; #X obj 142 59 t b b b b b b b; #X obj 39 161 t a a; #X connect 0 0 13 0; #X connect 1 0 28 0; #X connect 1 1 26 0; #X connect 2 0 16 0; #X connect 3 0 17 0; #X connect 4 0 20 0; #X connect 5 0 21 0; #X connect 6 0 19 0; #X connect 7 0 18 0; #X connect 8 0 22 0; #X connect 11 0 23 0; #X connect 11 0 27 0; #X connect 13 0 30 0; #X connect 13 1 11 0; #X connect 13 1 14 1; #X connect 14 0 29 0; #X connect 16 0 1 1; #X connect 17 0 1 2; #X connect 18 0 1 3; #X connect 19 0 1 4; #X connect 20 0 1 5; #X connect 21 0 1 6; #X connect 22 0 9 0; #X connect 23 0 8 1; #X connect 24 0 25 0; #X connect 25 0 23 0; #X connect 25 1 27 0; #X connect 26 0 24 1; #X connect 26 1 27 1; #X connect 26 2 10 0; #X connect 27 0 1 0; #X connect 28 0 24 0; #X connect 28 1 12 0; #X connect 29 0 1 0; #X connect 29 1 16 0; #X connect 29 2 17 0; #X connect 29 3 18 0; #X connect 29 4 19 0; #X connect 29 5 20 0; #X connect 29 6 21 0; #X connect 30 0 8 0; #X connect 30 1 14 0;
--- NEW FILE: rota.pd --- #N canvas 416 100 450 412 10; #X msg 256 81 0; #X obj 63 54 inlet; #X obj 256 55 inlet; #X obj 63 350 outlet; #X obj 204 353 outlet; #X obj 177 54 inlet; #X text 91 293 1996 by Karlheinz Essl; #X obj 177 88 list-len; #X obj 63 144 b; #N canvas 0 0 626 422 updown-counter 0; #X obj 163 233 f 0; #X obj 197 234 + 1; #X obj 237 235 mod 1; #X floatatom 341 151 5 0 0 0 - - -; #X obj 163 256 t a a; #X obj 280 193 t a a a; #X obj 243 259 select; #X obj 299 260 select 0; #X obj 302 232 - 1; #X msg 213 189 -1; #X msg 241 189 1; #X obj 163 121 inlet; #X obj 205 122 inlet; #X obj 280 122 inlet; #X msg 205 145 0; #X obj 163 160 b; #X text 164 99 bng; #X text 204 102 reset; #X text 282 101 modmax; #X obj 163 290 outlet; #X connect 0 0 4 0; #X connect 1 0 2 0; #X connect 2 0 0 1; #X connect 3 0 5 0; #X connect 4 0 1 0; #X connect 4 0 19 0; #X connect 4 1 6 0; #X connect 5 0 2 1; #X connect 5 1 8 0; #X connect 6 0 9 0; #X connect 6 1 7 0; #X connect 7 0 10 0; #X connect 8 0 6 1; #X connect 9 0 1 1; #X connect 10 0 1 1; #X connect 11 0 15 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 0 1; #X connect 15 0 0 0; #X restore 63 177 pd updown-counter; #X obj 63 318 list-idx; #X obj 63 292 list; #X obj 63 209 t b a a; #X connect 0 0 9 1; #X connect 1 0 8 0; #X connect 2 0 0 0; #X connect 5 0 7 0; #X connect 5 0 11 1; #X connect 7 0 9 2; #X connect 8 0 9 0; #X connect 9 0 12 0; #X connect 10 0 3 0; #X connect 11 0 10 0; #X connect 12 0 11 0; #X connect 12 1 10 1; #X connect 12 2 4 0;
--- NEW FILE: anti-bis.pd --- #N canvas 0 0 450 300 10; #X obj 202 140 ==; #X obj 202 106 t a a a; #X obj 202 163 select 0 1; #X obj 264 195 outlet; #X obj 203 83 inlet; #X obj 206 233 outlet; #X obj 201 199 f; #X connect 0 0 2 0; #X connect 1 0 0 1; #X connect 1 1 0 0; #X connect 1 2 6 1; #X connect 2 0 6 0; #X connect 2 1 3 0; #X connect 4 0 1 0; #X connect 6 0 5 0;
--- NEW FILE: ms2sec.pd --- (This appears to be a binary file; contents omitted.)
--- NEW FILE: pitch2note-help.pd --- #N canvas 3 48 502 424 10; #X msg 230 24 Harmony; #X floatatom 45 220 4 0 0 1 key_number - -; #X obj 45 250 play2 127 500 1 1; #X text 38 334 vs. 1.1: argument added; #X msg 86 94 note2pitch; #X text 21 94 see also:; #X obj 45 162 pitch2note 4; #X floatatom 45 196 4 0 0 1 note - -; #X floatatom 45 135 4 0 0 2 pitch_class - -; #X floatatom 140 134 4 0 0 2 register - -; #X text 38 318 1993-96 by Karlheinz Essl; #X text 21 30 pitch2note; #X text 21 62 Combines pitch class and register into a note (i.e. MIDI key number).; #X connect 1 0 2 0; #X connect 6 0 7 0; #X connect 7 0 1 0; #X connect 8 0 6 0; #X connect 9 0 6 1;
--- NEW FILE: permutate-row-help.pd --- #N canvas 0 48 633 373 10; #X obj 124 153 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 28 25 permutate-row; #X text 294 127 row of Anton Webern , op. 28; #X msg 210 153 10 9 0 11 3 4 1 2 6 5 8 7; #X text 38 264 1994 by Karlheinz Essl; #X obj 124 210 print permutate-row; #X obj 210 123 loadbang; #X text 275 213 Watch the MAX-window!; #X text 27 43 Permutates a given row using its own structure as a permutation program.; #X text 28 72 NB: The given row must be a twelve-note-row which smallest index is 0; #X text 45 135 make new permutation!; #X msg 385 23 Dodecaphonics; #X obj 124 178 permutate-row; #X connect 0 0 12 0; #X connect 3 0 12 1; #X connect 6 0 3 0; #X connect 12 0 5 0;
--- NEW FILE: metro-dev%-help.pd --- #N canvas 349 428 467 379 10; #X text 19 14 metro-dev%; #X obj 44 146 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 1 1; #X msg 44 241 60; #X obj 44 205 metro-dev% 500 15; #X text 24 327 1993 by Karlheinz Essl; #X text 21 111 see also:; #X msg 88 111 metro; #X obj 44 275 QT-PercPlayer; #X floatatom 158 180 4 0 0 2 deviation(%) - -; #X floatatom 101 163 4 0 0 2 basic_speed - -; #X text 131 147; #X floatatom 158 241 4 0 0 1 ED - -; #X text 19 46 Introduces irregularities to an equal pulsation by deviating from a given pulsation speed ("in galit" , "rubato" , human feeling). ; #X connect 1 0 3 0; #X connect 2 0 7 0; #X connect 3 0 2 0; #X connect 3 1 11 0; #X connect 8 0 3 2; #X connect 9 0 3 1;
--- NEW FILE: note2cents-help.pd --- #N canvas 1 48 418 297 10; #X text 19 28 note2cents; #X text 19 59 Shows how many cents a microtonal note <float> is deviating from a tempered one.; #X text 19 249 1994 by Karlheinz Essl; #X floatatom 44 111 0 0 0 0 - - -; #X obj 44 142 note2cents; #X text 90 112 MIDI note number <float>; #X floatatom 44 176 0 0 0 0 - - -; #X floatatom 270 175 0 0 0 0 - - -; #X text 319 176 cents; #X floatatom 44 206 0 0 0 0 - - -; #X text 94 207 MIDI note name; #X text 94 177 MIDI note number <int>; #X msg 305 23 Harmony; #X connect 3 0 4 0; #X connect 4 0 6 0; #X connect 4 1 7 0; #X connect 6 0 9 0;
--- NEW FILE: show.pd --- #N canvas 50 61 240 179 10; #X obj 41 39 inlet; #X obj 186 36 inlet; #X obj 41 124 outlet; #X msg 186 76 set; #X obj 41 59 list prepend set; #X obj 41 83 list trim; #X connect 0 0 4 0; #X connect 1 0 3 0; #X connect 3 0 2 0; #X connect 4 0 5 0; #X connect 5 0 2 0;
--- NEW FILE: trans-lin.pd --- #N canvas 21 111 840 557 10; #X obj 106 69 inlet; #X obj 216 69 inlet; #X obj 289 69 inlet; #X obj 383 69 inlet; #X obj 147 69 loadbang; #X obj 147 95 delay 2; #X text 133 433 1993/94 by Karlheinz Essl; #X obj 106 400 expr $f1*$f3 + $f2; #X obj 216 369 expr ($f2-$f1)/$i3; #X obj 216 338 f $1; #X obj 310 338 f $2; #X obj 289 277 t b f; #X obj 428 260 i $3; #X obj 383 260 t b f; #X obj 413 341 i; #X obj 413 289 sel 0; #X msg 413 312 1; #X obj 106 432 outlet; #X obj 147 130 t b b b; #X obj 216 276 t f b b; #X connect 0 0 7 0; #X connect 1 0 19 0; #X connect 2 0 11 0; #X connect 3 0 13 0; #X connect 4 0 5 0; #X connect 5 0 18 0; #X connect 7 0 17 0; #X connect 8 0 7 2; #X connect 9 0 7 1; #X connect 9 0 8 0; #X connect 10 0 8 1; #X connect 11 0 9 0; #X connect 11 1 10 0; #X connect 12 0 15 0; #X connect 13 0 9 0; #X connect 13 1 15 0; #X connect 14 0 8 2; #X connect 15 0 16 0; #X connect 15 1 14 0; #X connect 16 0 14 0; #X connect 18 0 9 0; #X connect 18 1 10 0; #X connect 18 2 12 0; #X connect 19 0 9 0; #X connect 19 1 10 0; #X connect 19 2 14 0;
--- NEW FILE: frq2note-help.pd --- #N canvas 3 48 519 404 10; #X floatatom 36 122 0 0 0 0 - - -; #X msg 85 76 note2frq; #X msg 406 29 Harmony; #X text 19 77 see also:; #X text 19 56 Converts frequency into a note (= MIDI key number).; #X text 19 24 frq2note; #X obj 36 151 frq2note; #X text 84 218 MIDI note number; #X text 84 250 note name; #X floatatom 36 249 4 0 0 0 - - -; #X text 248 219 + Cents; #X floatatom 200 218 4 0 0 0 - - -; #X floatatom 36 217 4 0 0 0 - - -; #X obj 36 183 note2cents; #X text 16 352 1994 by Gerhard Eckel & Karlheinz Essl; #X text 99 123 frequency; #X floatatom 132 177 5 0 0 0 - - -; #X connect 0 0 6 0; #X connect 6 0 13 0; #X connect 6 0 16 0; #X connect 12 0 9 0; #X connect 13 0 12 0; #X connect 13 1 11 0;
--- NEW FILE: between.pd --- #N canvas 479 57 596 543 10; #X msg 49 88 seed $1; #X obj 49 41 r RTC-rs; #X obj 119 373 outlet; #X obj 330 41 inlet; #X obj 255 41 inlet; #X obj 119 41 inlet; #X obj 119 105 random 65536; #X obj 119 291 * 1; #X obj 119 138 / 65536; #X obj 119 324 + $1; #X obj 314 209 f $1; #X obj 407 208 f $2; #X obj 410 136 loadbang; #X obj 314 239 expr $f2 - $f1; #X obj 255 70 t a a; #X obj 119 69 b; #X obj 330 70 t b a; #X obj 410 160 t b b b; #X obj 219 316 f $1; #X obj 256 316 f $2; #X obj 219 293 loadbang; #X obj 119 346 int-or-float $3; #X text 190 397 1992 by Gerhard Eckel; #X text 189 420 vs 1.1; #X connect 0 0 6 0; #X connect 1 0 0 0; #X connect 3 0 16 0; #X connect 4 0 14 0; #X connect 5 0 15 0; #X connect 6 0 8 0; #X connect 7 0 9 0; #X connect 8 0 7 0; #X connect 9 0 21 0; #X connect 10 0 13 0; #X connect 11 0 13 1; #X connect 12 0 17 0; #X connect 13 0 7 1; #X connect 14 0 9 1; #X connect 14 1 10 0; #X connect 15 0 6 0; #X connect 16 0 10 0; #X connect 16 1 11 0; #X connect 17 0 10 0; #X connect 17 1 11 0; #X connect 18 0 21 1; #X connect 19 0 21 1; #X connect 20 0 18 0; #X connect 20 0 19 0; #X connect 21 0 2 0;
--- NEW FILE: @.pd --- #N canvas 308 131 301 286 10; #X obj 39 162 * 1; #X obj 39 218 outlet; #X obj 39 131 / 127; #X obj 39 67 t f b; #X obj 39 41 inlet; #X obj 95 105 f $2; #X obj 95 131 - $1; #X obj 39 189 + $1; #X text 109 207 1992-96 by Gerhard Eckel; #X text 109 226 vs 1.1; #X connect 0 0 7 0; #X connect 2 0 0 0; #X connect 3 0 2 0; #X connect 3 1 5 0; #X connect 4 0 3 0; #X connect 5 0 6 0; #X connect 6 0 0 1; #X connect 7 0 1 0;
--- NEW FILE: brown-melody.pd --- #N canvas 537 406 270 268 10; #X obj 50 193 outlet; #X obj 123 194 outlet; #X obj 123 166 note2st; #X obj 164 39 inlet; #X obj 126 39 inlet; #X obj 88 39 inlet; #X obj 50 39 inlet; #X obj 50 101 anti-octave; #X text 48 220 1993 by Karlheinz Essl; #X text 50 234 vs. 2; #X obj 50 66 brownian $1 $2 $3; #X obj 50 126 t a a; #X connect 2 0 1 0; #X connect 3 0 10 3; #X connect 4 0 10 2; #X connect 5 0 10 1; #X connect 6 0 10 0; #X connect 7 0 11 0; #X connect 7 1 10 0; #X connect 10 0 7 0; #X connect 11 0 0 0; #X connect 11 1 2 0;
--- NEW FILE: st2pitch-help.pd --- #N canvas 229 99 425 453 10; #X msg 316 24 Harmony; #X text 128 31 vs. 2; #X obj 155 312 play2 127 500 1 1; #X text 8 394 vs.2: newly added second outlet shows the note (i.e. pitch class with register); #X text 64 344 pitch class; #X msg 30 343; #X text 8 378 1993-94 by Karlheinz Essl; #X obj 30 312 show-pitchclass; #X obj 155 246 bng 15 250 50 0 empty empty reset 0 -6 0 8 -262144 -1 -1; #X floatatom 155 219 4 0 0 1 key_number - -; #X floatatom 155 198 4 0 0 1 start_note - -; #X obj 30 251 st2pitch 60; #X floatatom 30 283 4 0 0 1 pitch_class - -; #X floatatom 30 215 4 0 0 1 interval - -; #X obj 30 179 between -6 6; #X obj 30 141 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 155 283 4 0 0 1 note - -; #X text 10 114 see also:; #X msg 76 114 note2st; #X text 10 17 st2pitch; #X text 10 50 Accumulates incoming intervals and outputs pitch classes (i.e. notes without register information) at the left outlet resp. notes (= MIDI note numbers) at the right outlet.; #X connect 7 0 5 0; #X connect 8 0 11 1; #X connect 9 0 11 1; #X connect 10 0 9 0; #X connect 11 0 12 0; #X connect 11 1 16 0; #X connect 12 0 7 0; #X connect 13 0 11 0; #X connect 14 0 13 0; #X connect 15 0 14 0; #X connect 16 0 2 0;
--- NEW FILE: key-bang2.pd --- #N canvas 50 61 261 188 10; #X obj 71 46 inlet; #X obj 34 132 outlet; #X text 59 135 1997-98 by Karlheinz Essl; #X obj 34 46 key; #X obj 34 76 sel $1; #X obj 34 103 i $2; #X connect 0 0 4 1; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 1 0;
--- NEW FILE: butfirst-help.pd --- #N canvas 546 193 456 374 10; #X obj 106 208 bng 15 250 50 1 empty empty clear_display 0 -6 0 8 -262144 -1 -1; #X obj 65 207 show; #X msg 65 114 1 2 3 4 5; #X msg 85 140 a b c d e f g h i; #X msg 65 240; #X text 25 277 1994 by Karlheinz Essl; #X obj 65 175 butfirst; #X text 25 61 Outputs the input list without its first element.; #X text 25 29 butfirst; #X connect 0 0 1 1; #X connect 1 0 4 0; #X connect 2 0 6 0; #X connect 3 0 6 0; #X connect 6 0 1 0;
--- NEW FILE: pass.pd --- #N canvas 246 109 289 278 10; #X obj 35 53 r RTC-rs; #X msg 35 95 seed $1; #X obj 104 112 random 100; #X obj 104 182 sel 1; #X obj 104 226 outlet; #X obj 104 53 inlet; #X obj 209 53 inlet; #X text 137 245 vs. 1.1; #X obj 104 135 < $1; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 2 0 8 0; #X connect 3 0 4 0; #X connect 5 0 2 0; #X connect 6 0 8 1; #X connect 8 0 3 0;
--- NEW FILE: minus.pd --- #N canvas 240 363 201 216 10; #X obj 56 34 inlet; #X obj 56 121 outlet; #X obj 56 91 * -1; #X obj 56 66 int; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0;
--- NEW FILE: note2pitch.pd --- #N canvas 50 61 269 231 10; #X obj 45 57 inlet; #X obj 45 153 outlet; #X text 41 180 1994 by Karlheinz Essl; #X obj 45 121 mod 12; #X obj 45 92 int; #X connect 0 0 4 0; #X connect 3 0 1 0; #X connect 4 0 3 0;
--- NEW FILE: check-row-help.pd --- #N canvas 0 48 636 395 10; #X msg 38 129 60 61 62 63 64 65 66 67 68 69 70 72; #X msg 69 156 1 3 4 7 6 2 8 9 10 12 11 5; #X msg 273 158 3 2 5; #X obj 69 191 check-row; #X text 242 283 1994 by Karlheinz Essl; #X text 21 33 check-row; #X text 23 65 Outputs the input <row> if it is a proper twelve-tone row ; otherwise a bang is sent out of the right outlet.; #X obj 69 272 show; #X msg 69 312; #X text 152 212 Flashes when input is not a twelve tone row; #X obj 110 273 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X obj 127 214 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 281 22 Dodecaphonics; #X text 289 129 Watch the console-window for error messages!; #X connect 0 0 3 0; #X connect 1 0 3 0; #X connect 2 0 3 0; #X connect 3 0 7 0; #X connect 3 1 11 0; #X connect 7 0 8 0; #X connect 10 0 7 1;
--- NEW FILE: normalize-row-help.pd --- #N canvas 0 48 639 407 10; #X text 19 33 normalize-row; #X text 19 65 Normalization of a twelve-tone row - the pitch classes are transposed in a way that the new row always starts with 0 (i.e. pitch class c).; #X obj 123 196 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X obj 41 153 random-row; #X obj 81 195 show; #X msg 276 23 Dedecaphonics; #X text 203 210 random row; #X msg 81 226; #X text 19 372 1994 by Karlheinz Essl; #X text 170 286 "normalized" row always starting with 0 (i.e. pitch class c).; #X obj 41 261 normalize-row; #X obj 41 294 show; #X msg 41 322; #X obj 83 295 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X obj 41 119 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 74 124 Generates a twelve-tone row at random; #X connect 2 0 4 1; #X connect 3 0 10 0; #X connect 3 0 4 0; #X connect 4 0 7 0; #X connect 10 0 11 0; #X connect 11 0 12 0; #X connect 13 0 11 1; #X connect 14 0 3 0;
--- NEW FILE: sequence.pd --- #N canvas 451 340 460 352 10; #X text 36 294 vs.2; #X text 36 308 1993/94 by Karlheinz Essl; #X obj 39 260 outlet; #X obj 180 258 outlet; #X obj 39 38 inlet; #X obj 173 37 inlet; #X obj 217 91 list-len; #X obj 39 139 f 0; #X obj 70 138 + 1; #X obj 99 138 mod 1; #X msg 55 109 0; #X obj 173 63 t b a a; #X obj 180 216 select; #X obj 217 193 - 1; #X obj 39 171 t a a; #N canvas 0 0 450 300 nth 0; #X obj 113 155 list-idx; #X obj 113 129 list; #X obj 113 101 t b a; #X obj 113 80 inlet; #X obj 157 79 inlet; #X obj 113 178 outlet; #X connect 0 0 5 0; #X connect 1 0 0 0; #X connect 2 0 1 0; #X connect 2 1 0 1; #X connect 3 0 2 0; #X connect 4 0 1 1; #X restore 39 215 pd nth; #X text 149 139 modulo-count up to list length; #X text 246 261 bang on last element; #X text 52 237 lookup element; #X connect 4 0 7 0; #X connect 5 0 11 0; #X connect 6 0 9 1; #X connect 6 0 13 0; #X connect 7 0 8 0; #X connect 7 0 14 0; #X connect 8 0 9 0; #X connect 9 0 7 1; #X connect 10 0 7 1; #X connect 11 0 10 0; #X connect 11 1 15 1; #X connect 11 2 6 0; #X connect 12 0 3 0; #X connect 13 0 12 1; #X connect 14 0 15 0; #X connect 14 1 12 0; #X connect 15 0 2 0;
--- NEW FILE: series.pd --- #N canvas 378 174 345 360 10; #X obj 35 213 outlet; #X obj 35 20 inlet; #X obj 79 207 outlet; #X obj 72 50 inlet; #X obj 127 207 outlet; #X obj 79 76 list-len; #X obj 35 128 t a a; #N canvas 0 0 450 300 nth 0; #X obj 113 155 list-idx; #X obj 113 129 list; #X obj 113 101 t b a; #X obj 113 80 inlet; #X obj 157 79 inlet; #X obj 113 178 outlet; #X connect 0 0 5 0; #X connect 1 0 0 0; #X connect 2 0 1 0; #X connect 2 1 0 1; #X connect 3 0 2 0; #X connect 4 0 1 1; #X restore 35 174 pd nth; #X text 39 263 vs. 3; #X text 44 286 1993-95 by Karlheinz Essl; #X obj 35 108 xrandom; #X connect 1 0 10 0; #X connect 3 0 5 0; #X connect 3 0 7 1; #X connect 5 0 10 1; #X connect 6 0 7 0; #X connect 6 1 4 0; #X connect 7 0 0 0; #X connect 10 0 6 0; #X connect 10 1 2 0;
--- NEW FILE: scale-changer.pd --- #N canvas 275 118 643 450 10; #X obj 92 85 random 12; #N canvas 358 118 519 418 input-check 0; #X obj 80 254 outlet; #X obj 80 26 inlet; #X obj 80 79 listlen; #X obj 80 140 sel 1; #X msg 140 228 size of input list must be 12!; #X obj 80 55 t a a; #X obj 80 228 list; #X obj 80 193 b; #X obj 80 110 == 12; #X obj 140 255 print :scale-changer; #X connect 1 0 5 0; #X connect 2 0 8 0; #X connect 3 0 7 0; #X connect 3 1 4 0; #X connect 4 0 9 0; #X connect 5 0 2 0; #X connect 5 1 6 1; #X connect 6 0 0 0; #X connect 7 0 6 0; #X connect 8 0 3 0; #X restore 251 62 pd input-check; #X obj 92 31 inlet; #X obj 251 34 inlet; #X obj 92 276 multiple; #X obj 289 276 outlet; #X msg 92 245 0 1 2 3 4 5 6 7 8 9 10 11; #X text 151 374 1996 by Karlheinz Essl; #X obj 92 373 outlet; #N canvas 63 44 225 285 check-listlen 0; #X obj 123 227 outlet; #X obj 64 230 outlet; #X obj 64 172 sel 1; #X obj 64 118 > 1; #X obj 64 58 t l l; #X obj 64 33 inlet; #X obj 64 206 list; #X obj 64 89 list-len; #X obj 123 203 b; #X connect 2 0 6 0; #X connect 2 1 8 0; #X connect 3 0 2 0; #X connect 4 0 7 0; #X connect 4 1 6 1; #X connect 5 0 4 0; #X connect 6 0 1 0; #X connect 7 0 3 0; #X connect 8 0 0 0; #X restore 92 309 pd check-listlen; #X text 226 305 pitch class lists with less then two members are not allowed!; #X obj 92 344 list-round; #X obj 92 58 b; #X obj 358 206 table $0-scale 12; #X obj 280 140 s $0-scale; #X obj 280 112 list prepend 0; #N canvas 0 0 428 352 flip 0; #X obj 73 115 tabread $0-scale; #X obj 73 141 select 0 1; #X obj 51 59 inlet; #X obj 73 172 1; #X obj 105 171 0; #X obj 73 238 tabwrite $0-scale; #X obj 51 89 t b a a; #X obj 51 268 outlet; #X text 154 169 flips one bit in a table; #X connect 0 0 1 0; #X connect 1 0 3 0; #X connect 1 1 4 0; #X connect 2 0 6 0; #X connect 3 0 5 0; #X connect 4 0 5 0; #X connect 6 0 7 0; #X connect 6 1 0 0; #X connect 6 2 5 1; #X restore 92 118 pd flip; #N canvas 0 0 497 396 dump-table 0; #X obj 86 35 inlet; #X obj 109 111 until; #X obj 109 137 f 0; #X obj 139 138 + 1; #X obj 154 112 0; #X obj 109 90 12; #X obj 86 66 t b b b b; #X obj 109 184 list prepend; #X obj 202 185 t a; #X obj 86 220 list; #X obj 86 250 outlet; #X obj 109 161 tabread $0-scale; #X text 153 224 == tabdump $0-scale; #X connect 0 0 6 0; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 2 0 11 0; #X connect 3 0 2 1; #X connect 4 0 2 1; #X connect 5 0 1 0; #X connect 6 0 9 0; #X connect 6 1 5 0; #X connect 6 2 4 0; #X connect 6 3 7 1; #X connect 7 0 8 0; #X connect 7 0 9 1; #X connect 8 0 7 1; #X connect 9 0 10 0; #X connect 11 0 7 0; #X restore 92 144 pd dump-table; #X obj 92 167 t b a a; #X obj 251 92 t a a; #X text 153 392 Pd: 2006 Frank Barknecht; #X connect 0 0 16 0; #X connect 1 0 19 0; #X connect 2 0 12 0; #X connect 3 0 1 0; #X connect 4 0 9 0; #X connect 6 0 4 0; #X connect 9 0 11 0; #X connect 9 1 12 0; #X connect 11 0 8 0; #X connect 12 0 0 0; #X connect 15 0 14 0; #X connect 16 0 17 0; #X connect 17 0 18 0; #X connect 18 0 6 0; #X connect 18 1 4 1; #X connect 18 2 5 0; #X connect 19 0 18 0; #X connect 19 1 15 0;
--- NEW FILE: trans.pd --- #N canvas 63 44 500 330 10; #X obj 41 50 inlet; #X obj 41 272 outlet; #X obj 288 110 inlet; #X obj 238 110 inlet; #X obj 186 110 inlet; #X obj 369 46 inlet; #X obj 41 77 t f b; #X text 85 272 © 1995 by Karlheinz Essl; #X obj 99 108 int $4; #N canvas 712 445 407 355 gate_3 0; #X obj 52 263 outlet; #X obj 76 243 outlet; #X obj 100 222 outlet; #X obj 52 75 inlet; #X obj 152 75 inlet; #X obj 52 133 list prepend $1; #X obj 52 163 route 0 1 2; #X connect 3 0 5 0; #X connect 4 0 5 1; #X connect 5 0 6 0; #X connect 6 0 0 0; #X connect 6 1 1 0; #X connect 6 2 2 0; #X restore 41 175 pd gate_3; #X obj 319 231 trans-exp $1 $2 $3; #X obj 180 229 trans-lin $1 $2 $3; #X obj 41 229 trans-log $1 $2 $3; #X connect 0 0 6 0; #X connect 2 0 10 3; #X connect 2 0 11 3; #X connect 2 0 12 3; #X connect 3 0 10 2; #X connect 3 0 11 2; #X connect 3 0 12 2; #X connect 4 0 10 1; #X connect 4 0 11 1; #X connect 4 0 12 1; #X connect 5 0 8 0; #X connect 6 0 9 0; #X connect 6 1 8 0; #X connect 8 0 9 1; #X connect 9 0 12 0; #X connect 9 1 11 0; #X connect 9 2 10 0; #X connect 10 0 1 0; #X connect 11 0 1 0; #X connect 12 0 1 0;
--- NEW FILE: make-trans-scale-help.pd --- #N canvas 271 85 685 496 10; #X obj 106 345 bng 15 250 50 0 empty empty clear 0 -6 0 8 -262144 -1 -1; #X obj 65 345 show; #X text 14 28 make-trans-scale; #X text 14 59 Generates a transition scale between a start and an end value with a certain number of elements. The typ of transition is determined by the int sent to the leftmost inlet which also triggers the calculation. ; #X floatatom 345 261 4 0 0 2 number_of_elements - -; #X floatatom 276 260 4 0 0 2 end - -; #X floatatom 202 260 4 0 0 2 start - -; #X text 24 376 scale; #X msg 269 180 make-ED-scale; #X text 15 182 see also:; #X msg 78 180 make-scale; #X msg 158 180 make-choice-list; #X msg 65 376 2 1.88775 1.7818 1.68179 1.5874 1.49831 1.41421 1.33484 1.25992 1.18921 1.12246 1.05946 1; #X text 368 328 1995 by Karlheinz Essl; #X text 165 120 }; #X text 196 138 transition; #X text 60 121 0 = logarithmical; #X text 60 135 1 = linear; #X text 60 150 2 = exponential; #X msg 344 24 Lists; #N canvas 0 0 738 528 trans-type 0; #X obj 107 393 list split 1; #X symbolatom 107 142 14 0 0 0 - - -; #X obj 107 127 hradio 15 1 0 3 empty empty transition 0 -6 0 8 -262144 -1 -1 0; #X obj 107 419 outlet; #X obj 244 66 inlet; #X obj 107 247 select 0 1 2; #X msg 107 304 0 logarithmical; #X msg 235 303 1 linear; #X msg 317 306 2 exponential; #X connect 0 0 3 0; #X connect 0 1 1 0; #X connect 2 0 5 0; #X connect 4 0 2 0; #X connect 5 0 6 0; #X connect 5 1 7 0; #X connect 5 2 8 0; #X connect 6 0 0 0; #X connect 7 0 0 0; #X connect 8 0 0 0; #X coords 0 -1 1 1 125 60 1 100 100; #X restore 65 213 pd trans-type; #X obj 65 314 make-trans-scale 2 1 13; #X connect 0 0 1 1; #X connect 1 0 12 0; #X connect 4 0 21 3; #X connect 5 0 21 2; #X connect 6 0 21 1; #X connect 20 0 21 0; #X connect 21 0 1 0;
--- NEW FILE: sqrt-pan~.pd --- #N canvas 0 0 450 300 10; #X obj 57 51 inlet~; #X obj 126 96 expr sqrt(1-$f1) ; sqrt($f1); #X obj 126 192 outlet~; #X obj 57 192 outlet~; #X obj 58 159 *~ 0.7; #X obj 125 163 *~ 0.7; #X obj 126 51 inlet; #X connect 0 0 4 0; #X connect 0 0 5 0; #X connect 1 0 4 1; #X connect 1 1 5 1; #X connect 4 0 3 0; #X connect 5 0 2 0; #X connect 6 0 1 0;
--- NEW FILE: permutate-row.pd --- #N canvas 508 283 398 412 10; #X text 236 110 1994 by Karlheinz Essl; #X obj 165 277 outlet; #X obj 144 38 inlet; #X obj 86 39 inlet; #X obj 144 66 t a a a; #X obj 86 166 t b b; #X obj 144 192 t a a; #X obj 165 247 list; #X obj 86 223 list; #N canvas 0 0 450 300 nth 0; #X obj 113 155 list-idx; #X obj 113 129 list; #X obj 113 101 t b a; #X obj 113 80 inlet; #X obj 157 79 inlet; #X obj 113 178 outlet; #X connect 0 0 5 0; #X connect 1 0 0 0; #X connect 2 0 1 0; #X connect 2 1 0 1; #X connect 3 0 2 0; #X connect 4 0 1 1; #X restore 144 160 pd nth; #X connect 2 0 4 0; #X connect 3 0 5 0; #X connect 4 0 9 0; #X connect 4 1 9 1; #X connect 4 2 7 1; #X connect 5 0 8 0; #X connect 5 1 7 0; #X connect 6 0 8 1; #X connect 6 1 7 1; #X connect 7 0 1 0; #X connect 8 0 9 0; #X connect 9 0 6 0;
--- NEW FILE: neutral-harmony-help.pd --- #N canvas 0 48 469 413 10; #X msg 43 327 Bb; #X obj 43 140 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 ; #X obj 43 177 metro 250; #X obj 43 241 neutral-harmony 6; #X text 19 74 Building an interval row by alternating a given interval (e.g. 3) with its compliment (e.g. 8). Outputs pitch classes (i.e. notes without any register informations).; #X obj 43 209 bng 15 50 50 0 empty empty rhythm_bangs 0 -6 0 8 -262144 -1 -1; #X floatatom 157 212 4 0 0 1 interval - -; #X floatatom 168 327 0 0 0 0 - - -; #X text 198 329 interval; #X text 75 329 pitch class; #N canvas 674 72 418 195 play-it 0; #X obj 33 100 show-pitchclass; #X obj 33 67 + 60; #X obj 33 40 inlet; #X obj 143 100 note2st; #X text 58 40 map into middle octave; #X obj 33 130 outlet; #X obj 143 130 outlet; #X obj 206 100 play2 127 200 1 1; #X connect 0 0 5 0; #X connect 1 0 0 0; #X connect 1 0 3 0; #X connect 1 0 7 0; #X connect 2 0 1 0; #X connect 3 0 6 0; #X restore 43 293 pd play-it; #X text 19 367 1993 by Karlheinz Essl; #X msg 285 29 Harmony; #X text 19 41 neutral-harmony; #X connect 1 0 2 0; #X connect 2 0 5 0; #X connect 3 0 10 0; #X connect 5 0 3 0; #X connect 6 0 3 1; #X connect 10 0 0 0; #X connect 10 1 7 0;
--- NEW FILE: groups.pd --- #N canvas 83 96 493 493 10; #N canvas 101 330 221 248 values 0; #X obj 91 39 inlet; #X obj 44 39 inlet; #X obj 44 129 series; #X obj 44 166 outlet; #X obj 99 166 outlet; #X obj 91 68 t b a; #X connect 0 0 5 0; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 2 2 4 0; #X connect 5 0 2 0; #X connect 5 1 2 1; #X restore 104 343 pd values; #N canvas 490 186 215 222 multiples 0; #X obj 48 155 outlet; #X obj 100 30 inlet; #X obj 48 30 inlet; #X obj 100 59 t b a; #X obj 48 116 series; #X connect 1 0 3 0; #X connect 2 0 4 0; #X connect 3 0 4 0; #X connect 3 1 4 1; #X connect 4 0 0 0; #X restore 134 213 pd multiples; #X obj 104 181 count-bang; #X obj 104 268 sel 0; #X obj 56 418 outlet; #X obj 162 313 inlet; #X obj 26 45 inlet; #X obj 311 47 inlet; #X obj 26 86 t b b; #X obj 240 371 outlet; #X obj 162 371 outlet; #X obj 311 79 t b a; #X obj 311 244 t b b; #X obj 104 300 t b b; #X obj 134 242 t a a; #X obj 56 386 list; #X connect 0 0 15 1; #X connect 0 1 10 0; #X connect 1 0 14 0; #X connect 2 0 3 0; #X connect 3 0 13 0; #X connect 5 0 0 1; #X connect 6 0 8 0; #X connect 7 0 11 0; #X connect 8 0 2 0; #X connect 8 1 15 0; #X connect 11 0 12 0; #X connect 11 1 1 1; #X connect 12 0 1 0; #X connect 12 1 2 1; #X connect 13 0 0 0; #X connect 13 1 12 0; #X connect 14 0 3 1; #X connect 14 1 9 0; #X connect 15 0 4 0;
--- NEW FILE: trans-exp-help.pd --- #N canvas 404 99 819 627 10; #X text 43 390 2004 OSX port by Peter Elsea (UCSC); #X msg 218 139 trans; #X msg 264 139 geom; #X msg 149 139 trans-log; #X msg 83 139 trans-lin; #X text 20 139 see also:; #X text 43 376 1995/96 by Peter Elsea (UCSC); #X text 17 21 trans-exp; #X text 108 264 nth member of a exponential transition row; #X floatatom 44 268 0 0 0 0 - - -; #X text 188 169 end.value; #X text 108 168 start.value; #X text 256 169 steps; #X floatatom 44 188 0 0 0 0 - - -; #X text 40 167 row index; #X floatatom 181 188 0 0 0 0 - - -; #X floatatom 113 188 0 0 0 0 - - -; #X floatatom 250 188 0 0 0 0 - - -; #X text 29 53 Int in left inlet outputs the nth member of a exponential transition between a start value <int , float> and an end value <int , float> in n steps <int> , whereas "steps" is the number of row elements (between start and end value) minus one.; #N canvas 0 0 450 300 graph2 0; #X array $0-exp 12 float 0; #X coords 0 2000 11 500 200 140 1; #X restore 505 199 graph; #X msg 562 113 const 500; #X obj 562 144 s $0-exp; #X obj 562 86 loadbang; #X obj 44 307 tabwrite $0-exp; #X obj 44 207 t a a; #X obj 312 237 trans-log 500 2000 12; #X floatatom 310 192 0 0 0 0 - - -; #X obj 310 211 t a a; #X obj 44 228 trans-exp 500 2000 12; #X connect 9 0 23 0; #X connect 13 0 24 0; #X connect 15 0 28 2; #X connect 16 0 28 1; #X connect 17 0 28 3; #X connect 20 0 21 0; #X connect 22 0 20 0; #X connect 24 0 28 0; #X connect 24 1 23 1; #X connect 25 0 9 0; #X connect 26 0 27 0; #X connect 27 0 25 0; #X connect 27 1 23 1; #X connect 28 0 9 0;
--- NEW FILE: sneak.pd --- #N canvas 396 245 332 338 10; #X obj 49 127 sneak-random; #X obj 49 40 inlet; #X obj 49 239 outlet; #X obj 79 208 outlet; #X obj 49 174 nth; #X obj 128 37 inlet; #X text 79 293 1994-98 by Karlheinz Essl; #X text 139 267 vs. 1.1; #X obj 128 95 list-len; #X obj 49 149 t a a; #X obj 128 64 t a a; #X connect 0 0 9 0; #X connect 1 0 0 0; #X connect 4 0 2 0; #X connect 5 0 10 0; #X connect 8 0 0 1; #X connect 9 0 4 0; #X connect 9 1 3 0; #X connect 10 0 8 0; #X connect 10 1 4 1;
--- NEW FILE: multiple.pd --- #N canvas 193 46 425 405 10; #X obj 210 30 inlet; #X obj 63 19 inlet; #N canvas 50 61 578 240 check-listlen 0; #X msg 304 157 both lists must have the same length!; #X obj 304 50 inlet; #X obj 118 205 outlet; #X obj 108 50 inlet; #X obj 112 103 t a a; #X obj 116 179 int; #X obj 112 126 ==; #X obj 111 151 select 1 0; #X obj 304 188 print :multiple; #X obj 304 85 list-len; #X obj 113 77 list-len; #X connect 0 0 8 0; #X connect 1 0 9 0; #X connect 3 0 10 0; #X connect 4 0 6 0; #X connect 4 1 5 1; #X connect 5 0 2 0; #X connect 6 0 7 0; #X connect 7 0 5 0; #X connect 7 1 0 0; #X connect 9 0 6 1; #X connect 10 0 4 0; #X restore 89 87 pd check-listlen; #X obj 59 355 outlet; #X obj 178 189 sequence; #X obj 89 189 sequence; #X obj 89 255 int; #X obj 89 157 t b b; #X text 116 351 1994 by Karlheinz Essl; #X obj 89 297 list prepend; #X obj 186 297 t a; #X obj 63 320 list; #X obj 339 192 b; #X obj 63 45 t b a a b; #X obj 89 120 until; #X obj 89 222 until; #X obj 210 58 t a a b; #X connect 0 0 16 0; #X connect 1 0 13 0; #X connect 2 0 14 0; #X connect 4 0 6 1; #X connect 5 0 15 0; #X connect 6 0 9 0; #X connect 7 0 5 0; #X connect 7 1 4 0; #X connect 9 0 11 1; #X connect 9 0 10 0; #X connect 10 0 9 1; #X connect 11 0 3 0; #X connect 12 0 9 1; #X connect 13 0 11 0; #X connect 13 1 2 0; #X connect 13 2 4 1; #X connect 13 3 12 0; #X connect 14 0 7 0; #X connect 15 0 6 0; #X connect 16 0 2 1; #X connect 16 1 5 1; #X connect 16 2 12 0;
--- NEW FILE: permute-help.pd --- #N canvas 1 48 789 443 10; #X text 95 242 clear display; #X obj 75 241 bng 15 250 50 1 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 34 240 show; #X text 11 23 permute; #X text 11 56 Returns the nth permutation of a list.; #X text 11 73 See also:; #X text 11 315 OSX implementation by Richard Dudas (2003); #X text 11 301 by James McCartney; #X msg 46 147 orange green purple mildred; #X msg 78 167 0 1 2 3 4 5 6 7; #X obj 14 158 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 98 208 Optional list argument to set the default list.; #X floatatom 34 117 0 0 0 0 - - -; #X msg 34 272; #X obj 34 207 permute; #X text 238 232 list in right inlet is stored; #X text 238 263 bang in left inlet retriggers the last permutation ; #X text 238 248 int in left inlet triggers a permutation of the stored list; #X text 252 143 permute generates an indexed series of permutations of a list. The permutations repeat after the factorial of the list size. Note that the largest list for which a 32-bit number can enumerate all the permutations has 12 elements.; #X text 78 118 index; #X msg 74 72 permutate; #X text 126 36 (external - OSX); #X connect 1 0 2 1; #X connect 2 0 13 0; #X connect 8 0 14 1; #X connect 9 0 14 1; #X connect 10 0 14 0; #X connect 12 0 14 0; #X connect 14 0 2 0;
--- NEW FILE: butlast-help.pd --- #N canvas 3 48 473 349 10; #X obj 106 208 bng 15 250 50 1 empty empty clear_display 0 -6 0 8 -262144 -1 -1; #X obj 65 207 show; #X obj 65 175 butlast; #X msg 65 114 1 2 3 4 5; #X msg 85 140 a b c d e f g h i; #X msg 65 240; #X text 25 277 1994 by Karlheinz Essl; #X text 25 29 butlast; #X text 25 61 Outputs the input list without its last element.; #X connect 0 0 1 1; #X connect 1 0 5 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 2 0;
--- NEW FILE: inv.pd --- #N canvas 63 44 194 215 10; #X obj 48 66 inlet; #X obj 48 100 expr 1/$f1; #X obj 48 135 outlet; #X connect 0 0 1 0; #X connect 1 0 2 0;
--- NEW FILE: play-samp~.pd --- #N canvas 192 80 584 531 10; #X obj 463 47 inlet; #X obj 169 74 unpack f s f; #X obj 169 48 inlet; #X obj 208 420 outlet~; #X obj 208 315 tabread4~; #X obj 208 174 list prepend set; #X obj 208 200 list trim; #X text 223 49 IN: transposition tablename gain; #X obj 119 284 vline~; #N canvas 238 24 737 582 trigger-sample 1; #X text 90 155 Wait for the; #X text 88 169 cutoff to finish; #X text 71 446 set the upper line~ to start; #X text 70 465 at the first sample and go; #X text 69 486 forever (until the next trigger); #X obj 212 211 t b b; #X obj 298 499 s $0-phase; #X obj 212 315 s $0-cutoff; #X obj 212 53 inlet; #X obj 242 136 s $0-cutoff; #X text 87 118 cut the sound off; #X obj 212 266 f; #X obj 389 57 inlet; #X obj 212 77 t b b; #X text 394 37 gain; #X obj 315 57 inlet; #X text 314 35 transpos; #X obj 298 454 * 1e+07; #X obj 299 435 f 1; #X msg 298 478 1 , 4.41e+08 $1; #X obj 463 466 r $0-arraysize; #X obj 345 303 moses 0; #X obj 406 534 s $0-phase; #X obj 406 467 * 1e+07; #X obj 407 448 f 1; #X obj 406 490 pack 0 0; #X msg 406 513 $2 , -4.41e+08 $1; #X obj 423 426 abs; #X obj 315 78 t a a; #X obj 299 307 < 0; #X obj 299 331 select 0 1; #X obj 299 285 f; #X obj 345 273 pow -1; #X msg 242 107 0 2; #X obj 212 164 delay 2; #X connect 5 0 11 0; #X connect 5 1 31 0; #X connect 8 0 13 0; #X connect 11 0 7 0; #X connect 12 0 11 1; #X connect 13 0 34 0; #X connect 13 1 33 0; #X connect 15 0 28 0; #X connect 17 0 19 0; #X connect 18 0 17 0; #X connect 19 0 6 0; #X connect 20 0 25 1; #X connect 21 0 27 0; #X connect 21 1 18 1; #X connect 23 0 25 0; #X connect 24 0 23 0; #X connect 25 0 26 0; #X connect 26 0 22 0; #X connect 27 0 24 1; #X connect 28 0 31 1; #X connect 28 1 32 0; #X connect 29 0 30 0; #X connect 30 0 18 0; #X connect 30 1 24 0; #X connect 31 0 29 0; #X connect 32 0 21 0; #X connect 33 0 9 0; #X connect 34 0 5 0; #X restore 53 192 pd trigger-sample; #X obj 224 348 r $0-cutoff; #X obj 208 390 *~; #X obj 224 368 vline~; #X obj 119 250 r $0-phase; #X obj 238 269 arraysize; #X obj 208 229 t a b a; #X obj 238 291 s $0-arraysize; #X obj 463 71 s $0-loop; #X obj 133 110 t a b a; #N canvas 0 0 433 475 loops 0; #X obj 89 174 spigot 0; #X obj 207 246 r $0-arraysize; #X obj 89 324 delay; #X obj 132 323 t b; #X obj 140 150 r $0-loop; #X obj 89 64 inlet; #X obj 89 352 outlet; #X obj 155 173 select 0; #X msg 155 195 stop; #X floatatom 188 318 8 0 0 0 - - -; #X obj 207 268 / 44.1; #X obj 159 290 *; #X obj 89 113 pow -1; #X obj 89 89 abs; #X obj 89 138 t b a; #X connect 0 0 2 0; #X connect 1 0 10 0; #X connect 2 0 3 0; #X connect 2 0 6 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 4 0 7 0; #X connect 5 0 13 0; #X connect 7 0 8 0; #X connect 8 0 2 0; #X connect 10 0 11 1; #X connect 11 0 2 1; #X connect 11 0 9 0; #X connect 12 0 14 0; #X connect 13 0 12 0; #X connect 14 0 0 0; #X connect 14 1 11 0; #X restore 26 145 pd loops; #X connect 0 0 17 0; #X connect 1 0 18 0; #X connect 1 1 5 0; #X connect 1 2 9 2; #X connect 2 0 1 0; #X connect 4 0 11 0; #X connect 5 0 6 0; #X connect 6 0 15 0; #X connect 8 0 4 0; #X connect 10 0 12 0; #X connect 11 0 3 0; #X connect 12 0 11 1; #X connect 13 0 8 0; #X connect 14 0 16 0; #X connect 15 0 4 0; #X connect 15 1 14 0; #X connect 15 2 14 0; #X connect 18 0 19 0; #X connect 18 1 9 0; #X connect 18 2 9 1; #X connect 19 0 9 0;
--- NEW FILE: grid-rhythm.pd --- #N canvas 481 254 403 329 10; #X obj 174 49 inlet; #X obj 272 48 inlet; #X obj 213 49 inlet; #X obj 44 48 inlet; #X obj 44 260 outlet; #X obj 174 260 outlet; #X obj 132 48 inlet; #X obj 109 158 int; #X obj 65 91 sel 1; #X text 199 290 1993 by Karlheinz Essl; #X obj 174 187 int $2; #X obj 109 187 * $1; #X obj 109 91 sel-princ $3; #X obj 65 113 t b b; #X obj 44 224 metro-dev% 500 10; #X connect 0 0 10 0; #X connect 1 0 12 2; #X connect 2 0 12 1; #X connect 3 0 8 0; #X connect 3 0 14 0; #X connect 6 0 11 1; #X connect 7 0 11 0; #X connect 8 0 13 0; #X connect 10 0 14 2; #X connect 11 0 14 1; #X connect 12 0 7 0; #X connect 13 0 7 0; #X connect 13 1 10 0; #X connect 14 0 4 0; #X connect 14 0 12 0; #X connect 14 1 5 0;
--- NEW FILE: make-choice-list-help.pd --- #N canvas 238 208 765 518 10; #X msg 122 68 bang; #X obj 122 245 print; #X obj 196 214 list-len; #X floatatom 196 252 5 0 0 0 - - -; #X floatatom 166 114 5 0 20 2 min-length - -; #X floatatom 319 131 5 0 10 2 value-min - -; #X floatatom 388 132 5 0 10 2 value-max - -; #X floatatom 240 114 5 0 20 2 max-length - -; #X obj 312 213 print length; #N canvas 0 0 450 300 graph1 0; #X array $0-choice-list 20 float 2; #X coords 0 10 19 0 200 140 1; #X restore 500 71 graph; #X obj 87 350 s $0-choice-list; #X obj 88 327 list prepend 0; #X obj 88 271 t a b; #X msg 118 295 const 0; #X text 233 380 TODO: value-max isn't max because of the [+ 1] inside. Ask kHz about it.; #X floatatom 299 250 5 0 0 0 - - -; #X obj 122 171 make-choice-list 0 20 0 10; #X connect 0 0 16 0; #X connect 2 0 3 0; #X connect 4 0 16 1; #X connect 5 0 16 3; #X connect 6 0 16 4; #X connect 7 0 16 2; #X connect 11 0 10 0; #X connect 12 0 11 0; #X connect 12 1 13 0; #X connect 13 0 10 0; #X connect 16 0 1 0; #X connect 16 0 2 0; #X connect 16 0 12 0; #X connect 16 1 8 0; #X connect 16 1 15 0;
--- NEW FILE: between-log.pd --- #N canvas 347 245 409 326 10; #X msg 66 113 seed $1; #X obj 66 44 r RTC-rs; #X obj 133 245 outlet; #X obj 321 177 - 1; #X obj 180 178 inlet; #X obj 226 178 inlet; #X obj 291 44 inlet; #X obj 133 44 inlet; #X obj 198 247 outlet; #X text 214 279 1994-98 by Karlheinz Essl; #X text 217 296 vs 1.2; #X obj 291 119 int $3; #X obj 133 149 random $3; #X obj 133 206 trans-log $1 $2; #X obj 133 76 t b b; #X obj 133 174 t a a; #X obj 291 141 t a a; #X connect 0 0 12 0; #X connect 1 0 0 0; #X connect 3 0 13 3; #X connect 4 0 13 1; #X connect 5 0 13 2; #X connect 6 0 11 0; #X connect 7 0 14 0; #X connect 11 0 16 0; #X connect 12 0 15 0; #X connect 13 0 2 0; #X connect 14 0 12 0; #X connect 14 1 11 0; #X connect 15 0 13 0; #X connect 15 1 8 0; #X connect 16 0 12 1; #X connect 16 1 3 0;
--- NEW FILE: first.pd --- #N canvas 50 61 213 198 10; #X obj 41 118 outlet; #X obj 41 58 inlet; #X obj 41 88 list split 1; #X connect 1 0 2 0; #X connect 2 0 0 0;
--- NEW FILE: sel-princ-help.pd --- #N canvas 213 34 995 590 10; #X text 515 150 }; #X text 392 121 supply; #X msg 379 146 a b c; #X msg 381 169 1 2 3 4 5; #X obj 63 234 bng 15 250 50 0 empty empty select_one_element 0 -6 0 8 -262144 -1 -1; #X msg 380 192 7 Shadock 3.14 x; #X text 178 86 selection principle; #X obj 63 342 collect; #X obj 107 319 bng 15 250 50 0 empty empty clear_display 0 -6 0 8 -262144 -1 -1; #X text 30 0 sel-princ; #X text 33 18 Changes between the selection principles ALEA , SERIES and SEQUENCE (as defined by G. M. Koenig) and ROTA according to the number sent to the middle inlet:; #X text 46 426 1993-97 by Karlheinz Essl; #X floatatom 241 339 0 0 0 2 idx - -; #X msg 63 383; #X obj 242 303 bng 15 250 50 0 empty empty last 0 -6 0 8 -262144 -1 -1; #X text 48 442 vs. 4: selection principle ROTA added; #X msg 99 70 1 alea; #X msg 99 89 2 series; #X msg 99 109 3 sequence; #X msg 99 131 4 rota; #X obj 99 160 list split 1; #X obj 379 92 loadbang; #N canvas 0 0 450 300 graph1 0; #X array $0-princ 50 float 0; #X coords 0 10 49 0 200 140 1; #X restore 760 132 graph; #X msg 676 325 0 1 2 3 4 5 6 7 8 9; #X obj 604 308 until; #X msg 568 219 50; #N canvas 0 0 408 374 to-array 0; #X obj 78 244 s $0-princ; #X msg 230 209 const 0; #X obj 78 205 list prepend 0; #X obj 101 114 list prepend; #X obj 192 113 t a; #X obj 78 147 list; #X obj 180 81 t b b; #X obj 180 56 inlet; #X obj 101 56 inlet; #X obj 57 56 inlet; #X connect 1 0 0 0; #X connect 2 0 0 0; #X connect 3 0 4 0; #X connect 3 0 5 1; #X connect 4 0 3 1; #X connect 5 0 2 0; #X connect 6 0 3 1; #X connect 6 1 1 0; #X connect 7 0 6 0; #X connect 8 0 3 0; #X connect 9 0 5 0; #X restore 568 424 pd to-array; #X obj 568 241 t b a b; #X obj 676 296 loadbang; #X obj 135 185 cnv 15 80 20 empty empty empty 20 12 0 14 -24198 -66577 0; #X symbolatom 138 187 10 0 0 0 - - -; #X obj 568 197 t b b b b a; #X obj 604 356 sel-princ 3; #X obj 63 262 sel-princ 3; #X text 274 303 bang , when supply is exhausted; #X text 269 342 index of chosen list element; #X obj 517 24 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 517 531 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 532 24 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 532 531 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 511 24 cnv 15 40 15 empty empty empty 20 12 0 14 -262144 -66577 0; #X obj 509 531 cnv 15 40 15 empty empty empty 20 12 0 14 -262144 -66577 0; #N canvas 0 0 738 528 sel-princ 0; #X msg 184 218 1 alea; #X msg 184 237 2 series; #X msg 184 257 3 sequence; #X msg 184 279 4 rota; #X obj 184 308 list split 1; #X symbolatom 107 142 10 0 0 0 - - -; #X obj 107 127 hradio 15 1 0 4 empty empty sel-princ 0 -6 0 8 -262144 -1 -1 0; #X obj 185 335 outlet; #X obj 194 129 + 1; #X obj 141 160 select 1 2 3 4; #X obj 244 66 inlet; #X obj 238 95 - 1; #X connect 0 0 4 0; #X connect 1 0 4 0; #X connect 2 0 4 0; #X connect 3 0 4 0; #X connect 4 0 7 0; #X connect 4 1 5 0; #X connect 6 0 8 0; #X connect 8 0 9 0; #X connect 9 0 0 0; #X connect 9 1 1 0; #X connect 9 2 2 0; #X connect 9 3 3 0; #X connect 10 0 11 0; #X connect 11 0 6 0; #X coords 0 -1 1 1 85 60 1 100 100; #X restore 568 125 pd sel-princ; #X connect 2 0 33 2; #X connect 3 0 33 2; #X connect 4 0 33 0; #X connect 5 0 33 2; #X connect 7 0 13 0; #X connect 8 0 7 1; #X connect 16 0 20 0; #X connect 17 0 20 0; #X connect 18 0 20 0; #X connect 19 0 20 0; #X connect 20 0 33 1; #X connect 20 1 30 0; #X connect 21 0 2 0; #X connect 21 0 18 0; #X connect 23 0 32 2; #X connect 24 0 32 0; #X connect 25 0 27 0; #X connect 27 0 26 0; #X connect 27 1 24 0; #X connect 27 2 26 2; #X connect 28 0 23 0; #X connect 30 0 8 0; #X connect 31 0 25 0; #X connect 31 4 32 1; #X connect 32 0 26 1; #X connect 33 0 7 0; #X connect 33 1 12 0; #X connect 33 2 14 0; #X connect 36 0 37 0; #X connect 38 0 39 0; #X connect 42 0 31 0;
--- NEW FILE: panning-help.pd --- #N canvas 0 48 483 509 10; #X obj 165 247 vsl 15 128 0 127 0 0 empty empty R 0 -8 0 8 -262144 -1 -1 0 1; #X obj 83 244 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144 -1 -1 0 1; #X obj 83 186 panning; #X text 23 51 Equal power panning based on John Chowning's paper "Simulation of Moving Sound Sources".; #X text 23 21 panning; #X floatatom 83 155 0 0 0 0 - - -; #X obj 83 123 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144 -1 -1 0 1; #X floatatom 166 217 0 0 0 0 - - -; #X floatatom 83 217 0 0 0 0 - - -; #X text 83 105 L < < < M > > > R; #X text 20 398 © 1997 by Iain Mott and Karlheinz Essl; #X text 67 318 L; #X text 188 324 R; #X text 129 156 controller value; #X connect 2 0 8 0; #X connect 2 1 7 0; #X connect 5 0 2 0; #X connect 6 0 5 0; #X connect 7 0 0 0; #X connect 8 0 1 0;
--- NEW FILE: periodic-help.pd --- #N canvas 222 211 647 533 10; #X obj 153 255 bng 15 250 50 1 empty empty reset 0 -6 0 8 -261689 -1 -1; #X msg 42 316; #X obj 42 270 collect; #X text 27 -26 periodic; #X text 27 6 Random number generator. The periodicity factor (float between 0 and 1) determines the "periodicity" of the output , i.e. the probability of repetitions. A periodicity factor of 1 will result in a completely periodic output (= constant repetition of a single value) , whereas a periodicity factor of 0 will result into a completely unperiodic behaviour.; #X obj 42 206 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 92 205 0 0 0 2 upper_limit - -; #X floatatom 142 205 0 0 0 0 - - -; #X text 185 437 1995-98 by Karlheinz Essl; #X text 144 -12 vs. 1.1; #X obj 42 246 periodic 10 0.5; #X obj 42 374 list prepend 0; #N canvas 0 0 450 300 graph1 0; #X array $0-period 67 float 0; #X coords 0 10 66 -1 300 100 1; #X restore 301 159 graph; #X obj 42 410 s $0-period; #X msg 153 374 const 0; #X obj 142 121 vsl 15 64 0 1 0 0 empty empty periodicity_factor 0 -8 0 8 -262144 -1 -1 0 1; #X obj 42 174 until; #X obj 42 150 t a b; #X text 600 245 - 0; #X text 601 154 - 10; #X obj 42 290 t b a; #X msg 42 115 67; #X obj 483 314 tabosc4~ $0-period; #X floatatom 483 295 5 0 0 0 - - -; #X obj 483 336 -~ 5; #X obj 482 390 dac~; #X obj 482 360 *~ 0.01; #X text 185 453 vs. 1.1: seedable by the RTC-seed object; #X connect 0 0 2 1; #X connect 0 0 14 0; #X connect 1 0 11 0; #X connect 2 0 20 0; #X connect 5 0 10 0; #X connect 6 0 10 1; #X connect 7 0 10 2; #X connect 10 0 2 0; #X connect 11 0 13 0; #X connect 14 0 13 0; #X connect 15 0 7 0; #X connect 16 0 10 0; #X connect 17 0 16 0; #X connect 17 1 0 0; #X connect 20 0 1 0; #X connect 20 1 1 0; #X connect 21 0 17 0; #X connect 22 0 24 0; #X connect 23 0 22 0; #X connect 24 0 26 0; #X connect 26 0 25 1; #X connect 26 0 25 0;
--- NEW FILE: super-rhythm-help.pd --- #N canvas 130 22 947 727 10; #X text 58 46 Rhythm model based on a supply of entry delays (ED) which elements are chosen by one of the selection principles alea , series or sequence. According to the index of the chosen ED the chord size and the periodicity (probability of repetition) are calculated. The rubato (in %) determines the statistical deviation from the selected ED.; #X text 58 14 super-rhythm; #X text 58 137 see also:; #X msg 124 137 repchord-rhythm; #X text 286 250 max. index; #X text 204 251 min. index; #X text 389 249 min. index; #X text 470 248 max. index; #X text 394 264 - periodicity -; #X text 216 266 - chord size -; #X obj 73 267 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 1 1; #X obj 73 355 super-rhythm 3 10 1 4 0.66 0.33; #X floatatom 133 278 4 0 0 2 rubato - -; #X floatatom 223 284 4 0 0 2 - - -; #X floatatom 295 284 4 0 0 2 - - -; #X floatatom 399 282 4 0 0 2 - - -; #X floatatom 470 283 4 0 0 2 - - -; #N canvas 176 361 448 143 ED-supply 0; #X obj 440 69 outlet; #X obj 440 35 r ED-supply; #X obj 493 66 show; #X obj 493 91 outlet; #X text 256 18 construct your own supply; #X text 20 18 select a given supply of ED's; #X msg 20 80 1000 250 500 250 666 333; #X msg 20 57 250 250 500 1000; #N canvas 264 56 373 304 grid-pattern 0; #X text 235 48 }; #X text 261 62 select a pattern; #X msg 53 105 1 2 3; #X msg 21 39 0.2 0.2 0.2 0.2 0.2 0.66 0.66 0.66 0.5 0.5 0.75 0.75 0.75 0.75; #X msg 35 78 0.5 1.66 2.5 0.33; #X text 293 140 grid; #N canvas 63 44 421 204 create-pattern 0; #X text 154 50 pattern element; #X text 20 51 retrigger; #X obj 83 48 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 105 48 0 0 0 0 - - -; #X text 176 75 clear; #X obj 156 74 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 105 102 0.14 0.14 0.14 0.14 0.14 0.14 0.14 0.8 0.8 0.8 0.8 0.8 0.33 0.33 0.33 0.33 1.52 1.51 1.51 1.51; #X obj 105 73 collect; #X text 44 75 send; #X obj 83 74 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 105 133 outlet; #X connect 2 0 3 0; #X connect 3 0 7 0; #X connect 5 0 7 1; #X connect 6 0 10 0; #X connect 7 0 6 0; #X connect 9 0 6 0; #X restore 70 140 pd create-pattern; #N canvas 375 91 208 259 crunch 0; #X obj 38 45 inlet; #X obj 73 73 t b f; #X obj 73 45 inlet; #X obj 38 100 listreg; #X obj 38 132 Lmult; #X obj 38 162 Lround; #X obj 38 194 outlet; #X obj 64 194 s ED-supply; #X connect 0 0 3 0; #X connect 1 0 3 0; #X connect 1 1 4 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 5 0 7 0; #X restore 21 175 pd crunch; #X obj 21 209 show; #X msg 21 239 254 842 1268 167; #X obj 61 210 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 81 211 clear display; #X msg 245 118 500; #X obj 281 116 loadbang; #X floatatom 245 140 0 0 0 0 - - -; #X connect 2 0 7 0; #X connect 3 0 7 0; #X connect 4 0 7 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 10 0 8 1; #X connect 12 0 14 0; #X connect 13 0 12 0; #X connect 14 0 7 1; #X restore 256 57 pd grid-pattern; #N canvas 4 209 310 257 geometric-scale 0; #X obj 19 76 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 149 86 0 0 0 0 - - -; #X floatatom 214 86 0 0 0 0 - - -; #X text 214 67 steps; #X text 149 67 max.ED; #X obj 19 112 make-ED-scale 100 1000 12; #X msg 19 187 100 123.285 151.991 187.382 231.013 284.804 351.119 432.876 533.67 657.933 811.131 1000; #X obj 60 155 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 19 154 show; #X obj 146 154 s ED-supply; #X text 81 150 clear display; #X msg 149 45 1000; #X msg 214 45 12; #X floatatom 84 86 0 0 0 0 - - -; #X text 84 67 min.ED; #X msg 84 45 100; #X obj 85 23 loadbang; #X connect 0 0 5 0; #X connect 1 0 5 2; #X connect 2 0 5 3; #X connect 5 0 8 0; #X connect 5 0 9 0; #X connect 7 0 8 1; #X connect 8 0 6 0; #X connect 11 0 1 0; #X connect 12 0 2 0; #X connect 13 0 5 1; #X connect 15 0 13 0; #X connect 16 0 15 0; #X connect 16 0 11 0; #X connect 16 0 12 0; #X restore 256 79 pd geometric-scale; #X obj 110 35 loadbang; #X msg 20 35 200 400 600; #N canvas 184 229 301 210 manually 0; #X text 25 44 retrigger; #X obj 89 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 89 70 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 50 72 send; #X obj 111 69 collect; #X floatatom 111 43 0 0 0 0 - - -; #X msg 111 99 125 125 125 375 250 250 666 666 666; #X obj 163 70 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 183 72 clear; #X text 163 44 ED; #X obj 111 144 s ED-supply; #X connect 1 0 5 0; #X connect 2 0 6 0; #X connect 4 0 6 0; #X connect 5 0 4 0; #X connect 6 0 10 0; #X connect 7 0 4 1; #X restore 256 35 pd manually; #X text 204 18 or...; #X connect 1 0 0 0; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 6 0 0 0; #X connect 6 0 2 0; #X connect 7 0 0 0; #X connect 7 0 2 0; #X connect 10 0 11 0; #X connect 11 0 0 0; #X connect 11 0 2 0; #X restore 571 277 pd ED-supply; #X floatatom 229 432 4 0 0 1 brown_factor - -; #X floatatom 284 394 4 0 0 1 chord_size - -; #X floatatom 399 394 4 0 0 1 ED - -; #X obj 73 452 brown-melody 36 84 0.25; #X text 668 277 <<< click to change; #X msg 650 307 250 250 500 1000; #X msg 684 64 Rhythm-Generators; #X obj 73 496 play2 127 500 1 1; #X obj 399 420 * 0.99; #X text 54 543 1995 by Karlheinz Essl; #X text 90 168 selection principle; #N canvas 556 269 497 418 sel_princ 0; #X msg 231 228 1 alea; #X msg 231 247 2 series; #X msg 231 267 3 sequence; #X msg 231 289 4 rota; #X obj 231 318 list split 1; #X obj 231 373 outlet; #X obj 112 61 loadbang; #X obj 112 192 select 1 2 3 4; #X obj 112 171 + 1; #X obj 112 123 hradio 15 1 0 4 empty empty empty 0 -6 0 8 -262144 -1 -1 3; #X msg 112 82 2; #X symbolatom 108 143 10 0 0 0 - - -; #X connect 0 0 4 0; #X connect 1 0 4 0; #X connect 2 0 4 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 4 1 11 0; #X connect 6 0 10 0; #X connect 7 0 0 0; #X connect 7 1 1 0; #X connect 7 2 2 0; #X connect 7 3 3 0; #X connect 8 0 7 0; #X connect 9 0 8 0; #X connect 10 0 9 0; #X coords 0 -1 1 1 90 65 1 100 100; #X restore 103 186 pd sel_princ; #X obj 87 389 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 143 395 bng 15 250 50 0 empty empty last 0 -6 0 8 -262144 -1 -1; #X text 164 393 supply exhausted; #X connect 10 0 11 0; #X connect 11 0 30 0; #X connect 11 0 21 0; #X connect 11 1 31 0; #X connect 11 2 19 0; #X connect 11 3 20 0; #X connect 12 0 11 2; #X connect 13 0 11 3; #X connect 14 0 11 4; #X connect 15 0 11 5; #X connect 16 0 11 6; #X connect 17 0 11 7; #X connect 17 1 23 0; #X connect 18 0 21 3; #X connect 20 0 26 0; #X connect 21 0 25 0; #X connect 26 0 25 2; #X connect 29 0 11 1;
--- NEW FILE: between-log-help.pd --- #N canvas 0 0 575 364 10; #X floatatom 97 163 5 0 0 0 - - -; #X msg 97 105 bang; #X floatatom 143 110 5 0 0 2 min - -; #X floatatom 190 111 5 0 0 2 max - -; #X floatatom 238 113 5 0 0 2 steps - -; #X obj 175 247 between-variations-help; #X text 100 248 Also see:; #X obj 97 136 between-log 0 90 10; #X text 84 34 Bang (or any input) in left inlet outputs a random number of a logarithmic scale between min and max with a certain number of elements.; #X connect 1 0 7 0; #X connect 2 0 7 1; #X connect 3 0 7 2; #X connect 4 0 7 3; #X connect 7 0 0 0;
--- NEW FILE: between-variations-help.pd --- #N canvas 164 130 1035 596 10; #X floatatom 97 163 5 0 0 0 - - -; #X msg 97 105 bang; #X floatatom 143 110 5 0 0 2 min - -; #X floatatom 190 111 5 0 0 2 max - -; #X floatatom 238 113 5 0 0 2 steps - -; #X obj 97 136 between-lin 0 90 10; #X floatatom 312 165 5 0 0 0 - - -; #X msg 312 107 bang; #X floatatom 358 112 5 0 0 2 min - -; #X floatatom 405 113 5 0 0 2 max - -; #X floatatom 453 115 5 0 0 2 steps - -; #X floatatom 546 145 5 0 0 0 - - -; #X msg 546 90 bang; #X floatatom 585 92 5 0 0 2 min - -; #X floatatom 625 92 5 0 0 2 max - -; #X floatatom 545 233 5 0 0 0 - - -; #X msg 545 175 bang; #X floatatom 591 180 5 0 0 2 min - -; #X floatatom 638 181 5 0 0 2 max - -; #X floatatom 546 321 5 0 0 0 - - -; #X msg 546 263 bang; #X floatatom 599 268 5 0 0 2 min - -; #X floatatom 653 269 5 0 0 2 max - -; #X floatatom 727 230 5 0 0 0 - - -; #X msg 727 172 bang; #X floatatom 773 177 5 0 0 2 min - -; #X floatatom 820 178 5 0 0 2 max - -; #X floatatom 728 318 5 0 0 0 - - -; #X msg 728 260 bang; #X floatatom 788 265 5 0 0 2 min - -; #X floatatom 849 266 5 0 0 2 max - -; #X text 537 22 between as default outputs integers only. Use "f" or "float" as third argument to output floats , use "i" or "int" to choose ints.; #X floatatom 572 473 5 0 0 0 - - -; #X msg 572 415 bang; #X floatatom 625 420 5 0 0 2 min - -; #X floatatom 679 421 5 0 0 2 max - -; #X floatatom 734 477 5 0 0 0 - - -; #X msg 734 419 bang; #X floatatom 780 418 5 0 0 2 min - -; #X floatatom 827 417 5 0 0 2 max - -; #X obj 546 118 between 0 10; #X obj 728 291 between 0 10 float; #X obj 546 294 between 0 10 int; #X obj 545 206 between 0 10 i; #X obj 727 203 between 0 10 f; #X obj 734 450 between 1 10.5; #X obj 572 446 between 0.1 10 f; #X text 542 364 Any float-argument that is not equal to its int() value will auto-select float-mode.; #X floatatom 573 565 5 0 0 0 - - -; #X msg 573 507 bang; #X floatatom 626 512 5 0 0 2 min - -; #X floatatom 680 513 5 0 0 2 max - -; #X obj 573 538 between 0.1 10 i; #X text 125 532 unless you explicitly call for ints with the third argument:; #X obj 312 138 between-log 0 90 10; #X connect 1 0 5 0; #X connect 2 0 5 1; #X connect 3 0 5 2; #X connect 4 0 5 3; #X connect 5 0 0 0; #X connect 7 0 54 0; #X connect 8 0 54 1; #X connect 9 0 54 2; #X connect 10 0 54 3; #X connect 12 0 40 0; #X connect 13 0 40 1; #X connect 14 0 40 2; #X connect 16 0 43 0; #X connect 17 0 43 1; #X connect 18 0 43 2; #X connect 20 0 42 0; #X connect 21 0 42 1; #X connect 22 0 42 2; #X connect 24 0 44 0; #X connect 25 0 44 1; #X connect 26 0 44 2; #X connect 28 0 41 0; #X connect 29 0 41 1; #X connect 30 0 41 2; #X connect 33 0 46 0; #X connect 34 0 46 1; #X connect 35 0 46 2; #X connect 37 0 45 0; #X connect 38 0 45 1; #X connect 39 0 45 2; #X connect 40 0 11 0; #X connect 41 0 27 0; #X connect 42 0 19 0; #X connect 43 0 15 0; #X connect 44 0 23 0; #X connect 45 0 36 0; #X connect 46 0 32 0; #X connect 49 0 52 0; #X connect 50 0 52 1; #X connect 51 0 52 2; #X connect 52 0 48 0; #X connect 54 0 6 0;
--- NEW FILE: sneak-rhythm-help.pd --- #N canvas 3 48 673 414 10; #X msg 293 22 Rhythm-Generators; #X text 18 51 Generates a rhythm which "sneaks" between neigboured ED of a scale - this will result in a sort of continuous ritardando/accelerando/rubato etc.; #X text 18 19 sneak-rhythm; #X text 18 104 see also:; #X msg 83 102 rit-acc; #X msg 139 102 ED-trans; #X obj 35 185 sneak-rhythm 100 1000 12; #X obj 35 145 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 1 1; #X text 411 136 display; #X text 446 153 max. ED; #X text 446 259 min. ED; #X obj 420 153 vsl 12 128 0 12 0 0 empty empty empty 0 -8 0 8 -262144 -1 -1 9525 1; #X msg 35 220 60; #X msg 205 102 brown-rhythm; #X obj 420 92 lb 12; #X text 18 297 1994 by Karlheinz Essl; #X obj 35 249 QT-PercPlayer; #X msg 420 113 range 0 $1; #X floatatom 89 162 4 0 0 2 min_ED - -; #X floatatom 143 162 4 0 0 2 max_ED - -; #X floatatom 198 163 4 0 0 2 ED-values - -; #X floatatom 116 214 4 0 0 3 row_index - -; #X floatatom 198 216 4 0 0 3 chosen_ED - -; #X connect 6 0 12 0; #X connect 6 1 21 0; #X connect 6 2 22 0; #X connect 7 0 6 0; #X connect 12 0 16 0; #X connect 14 0 17 0; #X connect 17 0 11 0; #X connect 18 0 6 1; #X connect 19 0 6 2; #X connect 20 0 6 3; #X connect 20 0 17 0; #X connect 21 0 11 0;
--- NEW FILE: make-choice-list.pd --- #N canvas 311 94 558 625 10; #X obj 224 163 + 1; #X obj 61 559 outlet; #X text 252 354 chooses list elements ; #X text 273 238 chooses list size ; #X text 82 152 generate a new list ; #X obj 180 79 inlet; #X obj 224 79 inlet; #X obj 318 79 inlet; #X obj 275 79 inlet; #X obj 61 24 inlet; #X text 174 453 1993-98 by Karlheinz Essl; #X obj 222 322 outlet; #X text 174 469 vs. 1.1; #X obj 318 125 int $4; #X obj 224 125 int $2; #X obj 335 463 t a; #X obj 243 463 list prepend; #X obj 61 520 list; #X obj 192 362 until; #X obj 192 288 t a a; #X obj 148 235 moses 0; #X obj 192 258 int; #X obj 308 180 + 1; #X obj 374 79 loadbang; #X obj 120 42 s $0-reset-output; #X obj 322 436 r $0-reset-output; #X obj 84 463 r $0-reset-output; #X obj 61 42 t b b b; #X text 222 339 length; #X obj 148 200 between $1; #X obj 243 427 int; #X obj 243 392 between $3; #X connect 0 0 29 2; #X connect 5 0 29 1; #X connect 6 0 14 0; #X connect 7 0 13 0; #X connect 8 0 31 1; #X connect 9 0 27 0; #X connect 13 0 22 0; #X connect 14 0 0 0; #X connect 15 0 16 1; #X connect 16 0 15 0; #X connect 16 0 17 1; #X connect 17 0 1 0; #X connect 18 0 31 0; #X connect 19 0 18 0; #X connect 19 1 11 0; #X connect 20 1 21 0; #X connect 21 0 19 0; #X connect 22 0 31 2; #X connect 23 0 13 0; #X connect 23 0 14 0; #X connect 25 0 16 1; #X connect 26 0 17 1; #X connect 27 0 17 0; #X connect 27 1 29 0; #X connect 27 2 24 0; #X connect 29 0 20 0; #X connect 30 0 16 0; #X connect 31 0 30 0;
--- NEW FILE: round.pd --- #N canvas 63 44 245 212 10; #X obj 39 157 outlet; #X obj 39 62 inlet; #X obj 39 92 + 0.5; #X obj 39 124 int; #X text 63 158 1993 by Karlheinz Essl; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 3 0 0 0;
--- NEW FILE: cresc-decresc-help.pd --- #N canvas 172 121 524 498 10; #X text 29 68 Transition between a start velocity and an end velocity within a certain time. When the start velocity is bigger than the end velocity , a decrescendo will be obtained. If the end velocity is bigger than the start velocity , it will result in a crescendo. A bang is sent out the right outlet when the dynamic transition is over. ; #X text 29 36 cresc-decresc; #X floatatom 150 204 0 0 0 0 - - -; #X obj 93 194 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 0 1; #X obj 93 231 metro 150; #X floatatom 257 216 0 0 0 2 start_velocity - -; #X floatatom 257 250 0 0 0 2 end_velocity - -; #X floatatom 256 288 0 0 0 2 time - -; #X msg 93 166 0; #X floatatom 93 348 4 0 0 1 velocity - -; #X text 59 414 1993 by Karlheinz Essl; #X obj 256 345 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 93 310 cresc-decresc 1 127 5000; #X connect 2 0 4 1; #X connect 3 0 4 0; #X connect 4 0 12 0; #X connect 5 0 12 1; #X connect 6 0 12 2; #X connect 7 0 12 3; #X connect 8 0 3 0; #X connect 12 0 9 0; #X connect 12 1 8 0; #X connect 12 1 11 0;
--- NEW FILE: crossfade~-help.pd --- #N canvas 251 120 570 535 10; #X text 80 187 signal 2; #X msg 207 476 RTC-Overview; #X msg 378 33 MSP-RTC; #X text 26 502 1999 by Gerhard Eckel & Karlheinz Essl; #X text 24 66 Crossfades two input signals according to a sine function which guarantees that loudness of the result is constant.; #X text 24 34 crossfade~; #X floatatom 113 267 5 0 0 0 - - -; #X obj 116 244 hsl 128 15 0 127 0 0 empty empty crossfader -2 -8 0 10 -262144 -1 -1 0 1; #X obj 48 307 crossfade~; #X obj 48 335 *~ 0.5; #X text 44 130 signal 1; #X obj 81 204 osc~ 800; #X obj 48 150 osc~ 400; #X obj 284 289 vu 15 120 empty empty -1 -8 0 8 -66577 -1 1 0; #X obj 241 369 env~; #X obj 241 394 - 100; #N canvas 97 74 495 413 linear 0; #X obj 135 165 expr 1-$f1 ; $f1; #X obj 136 142 / 127; #X obj 73 212 *~; #X obj 110 214 *~; #X obj 74 293 env~; #X obj 74 318 - 100; #X obj 74 268 +~; #X obj 74 58 inlet~; #X obj 109 82 inlet~; #X obj 136 122 inlet; #X text 42 28 This linear fading has a "hole in the middle" effect ; #X obj 74 342 outlet; #X connect 0 0 2 1; #X connect 0 1 3 1; #X connect 1 0 0 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 4 0 5 0; #X connect 5 0 11 0; #X connect 6 0 4 0; #X connect 7 0 2 0; #X connect 8 0 3 0; #X connect 9 0 1 0; #X restore 376 243 pd linear; #X obj 377 288 vu 15 120 empty empty -1 -8 0 8 -66577 -1 1 0; #X obj 47 413 *~ 0; #X obj 73 373 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 7600 1; #X obj 70 393 dbtorms; #X obj 47 437 dac~; #X text 369 212 "hole in middle"; #X text 125 305 arg1: 0-127; #X connect 6 0 8 2; #X connect 6 0 16 2; #X connect 7 0 6 0; #X connect 8 0 9 0; #X connect 8 0 14 0; #X connect 9 0 18 0; #X connect 11 0 8 1; #X connect 11 0 16 1; #X connect 12 0 8 0; #X connect 12 0 16 0; #X connect 14 0 15 0; #X connect 15 0 13 0; #X connect 16 0 17 0; #X connect 18 0 21 0; #X connect 18 0 21 1; #X connect 19 0 20 0; #X connect 20 0 18 1;
--- NEW FILE: RTC-device.pd --- #N canvas 63 44 198 241 10; #X obj 130 46 inlet; #X obj 24 46 loadbang; #X msg 24 74 1; #X obj 24 100 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 24 161 int; #X obj 24 191 s RTC-dev; #X obj 24 128 metro 1000; #X connect 0 0 4 1; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 3 0 6 0; #X connect 4 0 5 0; #X connect 6 0 4 0;
--- NEW FILE: wave-rhythm-help.pd --- #N canvas 63 44 500 330 10; #X floatatom 227 171 0 0 0 0 - - -; #X obj 64 226 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 227 226 0 0 0 0 - - -; #X floatatom 145 226 0 0 0 0 - - -; #X obj 64 171 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 ; #X text 259 170 start position; #X floatatom 194 67 0 0 0 0 - - -; #X obj 31 122 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 194 122 0 0 0 0 - - -; #X floatatom 112 122 0 0 0 0 - - -; #X obj 31 67 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 ; #X text 229 68 start position; #X obj 64 193 wave-rhythm 2000 500 5 1; #X obj 31 89 wave-rhythm 500 2000 5 1; #X connect 0 0 12 4; #X connect 4 0 12 0; #X connect 6 0 13 4; #X connect 10 0 13 0; #X connect 12 0 1 0; #X connect 12 1 3 0; #X connect 12 2 2 0; #X connect 13 0 7 0; #X connect 13 1 9 0; #X connect 13 2 8 0;
--- NEW FILE: pitch-from-row.pd --- #N canvas 223 70 296 304 10; #X obj 43 240 outlet; #X obj 43 206 transp-pitch; #X obj 210 51 inlet; #X obj 43 162 sequence; #X obj 43 51 inlet; #X obj 94 85 row-modus; #X obj 94 51 inlet; #X obj 152 52 inlet; #X obj 94 117 normalize-row; #X obj 124 169 outlet; #X obj 199 240 outlet; #X text 62 275 1994 by Karlheinz Essl; #X obj 94 139 t a a; #X connect 1 0 0 0; #X connect 2 0 1 1; #X connect 3 0 1 0; #X connect 3 1 10 0; #X connect 4 0 3 0; #X connect 5 0 8 0; #X connect 6 0 5 0; #X connect 7 0 5 1; #X connect 8 0 12 0; #X connect 12 0 3 1; #X connect 12 1 9 0;
--- NEW FILE: scale-rhythm.pd --- #N canvas 63 44 684 386 10; #X msg 336 107 0 0 0 0 0 0 0 1 0 1 0 0; #X obj 53 138 outlet; #X text 341 220 index list; #X obj 444 166 make-ED-scale 50 500 12; #X obj 444 136 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 205 184 show; #X msg 205 218 0 8 9; #X obj 93 156 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 141 219 index; #X floatatom 93 217 0 0 0 0 - - -; #X obj 93 184 permutate; #X obj 148 152 scale-changer; #X obj 539 135 r sca-rhy.max.ED; #X obj 230 46 r sca-rhy.steps; #X obj 148 128 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 148 102 r sca-rhy.change; #X obj 93 33 inlet; #X floatatom 93 276 0 0 0 0 - - -; #X text 144 277 ED; #X obj 93 248 nth; #X obj 93 307 outlet; #X obj 93 57 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 93 83 metro 500; #N canvas 16 68 431 413 make-start-scale 0; #X obj 53 37 inlet; #X obj 240 98 abs; #X obj 240 70 - 12; #X msg 240 241 0 0 0 0 0 0 0 0 0 0; #X obj 240 129 t f b; #X msg 240 185 0; #X obj 240 157 Uzi; #X obj 240 212 collect; #X obj 53 74 t b b f; #X msg 53 249 1 1; #X obj 53 308 scramble; #X obj 53 353 outlet; #X obj 98 136 t f b; #X msg 98 193 1; #X obj 98 165 Uzi; #X obj 98 220 collect; #X obj 133 334 show; #X obj 133 362 outlet; #X obj 53 277 list prepend; #X connect 0 0 8 0; #X connect 1 0 4 0; #X connect 2 0 1 0; #X connect 3 0 18 1; #X connect 4 0 6 0; #X connect 4 1 7 1; #X connect 5 0 7 0; #X connect 6 0 5 0; #X connect 7 0 3 0; #X connect 8 0 9 0; #X connect 8 1 3 0; #X connect 8 2 12 0; #X connect 8 2 2 0; #X connect 9 0 18 0; #X connect 10 0 11 0; #X connect 10 0 16 0; #X connect 12 0 14 0; #X connect 12 1 15 1; #X connect 13 0 15 0; #X connect 14 0 13 0; #X connect 15 0 9 0; #X connect 16 0 17 0; #X connect 18 0 10 0; #X restore 230 69 pd make-start-scale; #X obj 495 69 r sca-rhy.min.ED; #X connect 3 0 19 1; #X connect 4 0 3 0; #X connect 5 0 6 0; #X connect 7 0 10 0; #X connect 9 0 19 0; #X connect 10 0 9 0; #X connect 12 0 4 0; #X connect 12 0 3 2; #X connect 13 0 23 0; #X connect 14 0 11 0; #X connect 15 0 14 0; #X connect 16 0 21 0; #X connect 17 0 20 0; #X connect 17 0 22 1; #X connect 19 0 17 0; #X connect 21 0 22 0; #X connect 22 0 1 0; #X connect 22 0 7 0; #X connect 23 1 0 0; #X connect 24 0 4 0; #X connect 24 0 3 1;
--- NEW FILE: sneak-random.pd --- #N canvas 136 422 383 299 10; #X obj 96 182 anti-bis; #X text 160 232 vs. 1.1; #X text 160 217 1994 by Karlheinz Essl; #X text 177 95 must not be < 1!!!; #X obj 139 91 - 1; #X obj 96 215 outlet; #X obj 96 150 drunk 5 2; #X obj 139 31 inlet; #X obj 96 32 inlet; #X obj 139 57 int $1; #X obj 96 119 b; #X obj 96 57 t a a; #X connect 0 0 5 0; #X connect 0 1 10 0; #X connect 4 0 6 1; #X connect 6 0 0 0; #X connect 7 0 9 0; #X connect 8 0 11 0; #X connect 9 0 4 0; #X connect 10 0 6 0; #X connect 11 0 10 0; #X connect 11 1 9 0;
--- NEW FILE: brownian-help.pd --- #N canvas 271 188 579 389 10; #X floatatom 91 191 0 0 0 2 min - -; #X floatatom 134 191 0 0 0 2 max - -; #X floatatom 177 190 0 0 0 2 brownian_factor - -; #X floatatom 49 255 6 0 0 1 result - -; #X obj 49 182 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 42 291 1993-98 by Gerhard Eckel; #X text 43 309 vs. 1.1: seedable by RTC-seed; #N canvas 503 52 568 672 ints-and-floats 0; #X floatatom 125 146 0 0 0 2 min - -; #X floatatom 182 146 0 0 0 2 max - -; #X floatatom 239 145 0 0 0 2 brownian_factor - -; #X floatatom 69 209 6 0 0 1 result - -; #X obj 69 136 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X floatatom 74 383 6 0 0 1 result - -; #X obj 74 310 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 70 253 If you use non-whole numbers like "1.5" for min or max , brownian will try to be smart and go into float mode automatically: ; #X floatatom 72 571 6 0 0 1 result - -; #X obj 72 498 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 59 92 If you want float values , use "f" or "float" as last , fourth argument.; #X text 69 606 This is done because Max handles floating point numbers differently from integer values , but in Pd everything is a float. ; #X text 62 23 This abstraction can operate in two modes: int or float. Default mode of operation is determined by its arguments. If you supply whole numbers as "min" and "max" , brownian will generate integer values.; #X text 71 443 You can override this smart behaviour by explicitly ordering integer values using "i" or "int" as last , fourth argument. ; #X floatatom 307 203 6 0 0 1 result - -; #X obj 307 160 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 69 175 brownian -10 10 0.5 float; #X obj 74 349 brownian -1.5 1.5 0.5; #X obj 72 537 brownian -1.5 1.5 0.5 int; #X obj 307 179 brownian -10 10 0.5 f; #X connect 0 0 16 1; #X connect 1 0 16 2; #X connect 2 0 16 3; #X connect 4 0 16 0; #X connect 6 0 17 0; #X connect 9 0 18 0; #X connect 15 0 19 0; #X connect 16 0 3 0; #X connect 17 0 5 0; #X connect 18 0 8 0; #X connect 19 0 14 0; #X restore 375 207 pd ints-and-floats; #X text 296 207 Read this:; #X text 17 25 brownian; #X text 30 63 Random generator based on "brownian movements". Outputs random numbers between min <int , float> and max <int , float> excluding max. The distance between two random numbers is determined by the brownian factor <float between 0 and 1>. When this factor is 1 , "brownian" behaves like an ordinary random generator. When the factor is O , always the same number is repeated.; #X obj 49 221 brownian -10 10 0.5; #N canvas 350 201 591 415 visual-example 0; #N canvas 0 0 450 300 graph1 0; #X array $0-walker 50 float 0; #X coords 0 10 49 -10 200 140 1; #X restore 321 93 graph; #X floatatom 177 190 0 0 0 2 brownian_factor - -; #X obj 49 163 until; #X msg 49 107 50; #X obj 49 128 t a b; #X obj 170 271 f 0; #X obj 197 271 + 1; #X obj 49 242 t a b; #X obj 49 292 tabwrite $0-walker; #X msg 186 250 0; #X msg 177 34 0; #X msg 177 139 1; #X msg 177 97 0.5; #X msg 177 76 0.1; #X msg 177 118 0.9; #X obj 49 55 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 49 74 metro 150; #X msg 177 55 0.01; #X obj 49 221 brownian -10 10 0.5; #X connect 1 0 18 3; #X connect 2 0 18 0; #X connect 3 0 4 0; #X connect 4 0 2 0; #X connect 4 1 9 0; #X connect 5 0 6 0; #X connect 5 0 8 1; #X connect 6 0 5 1; #X connect 7 0 8 0; #X connect 7 1 5 0; #X connect 9 0 5 1; #X connect 10 0 1 0; #X connect 11 0 1 0; #X connect 12 0 1 0; #X connect 13 0 1 0; #X connect 14 0 1 0; #X connect 15 0 16 0; #X connect 16 0 3 0; #X connect 17 0 1 0; #X connect 18 0 7 0; #X restore 377 272 pd visual-example; #X connect 0 0 11 1; #X connect 1 0 11 2; #X connect 2 0 11 3; #X connect 4 0 11 0; #X connect 11 0 3 0;
--- NEW FILE: sneak-help.pd --- #N canvas 332 193 471 567 10; #X text 368 483 object; #X text 123 483 vs. 1.1: seedable by the; #X msg 305 482 RTC-seed; #X msg 315 23 Chance; #X text 15 67 A bang in the left inlet makes a random selection of a supply sent to right inlet before. Note that there are no repetitions of the same element and that the chosen elements are always neighbours of the given supply.; #X text 15 35 sneak; #X text 15 131 see also:; #X obj 29 287 sneak; #X text 258 217 }; #X msg 107 264 7 Shadock 3.14 x; #X floatatom 59 312 4 0 0 1 chosen_list_index - -; #X obj 29 351 collect; #X msg 29 384; #X obj 85 350 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X text 123 468 1994 by Karlheinz Essl; #X msg 155 154 sel-princ; #X msg 83 154 permutate; #X msg 83 131 alea; #N canvas 50 61 145 190 slider 0; #X obj 38 52 inlet; #X obj 38 129 outlet; #X obj 38 78 list-len; #X msg 38 103 range 0 $1; #X connect 0 0 2 0; #X connect 2 0 3 0; #X connect 3 0 1 0; #X restore 298 279 pd slider; #X text 159 209 supply; #X msg 104 208 a b c; #X obj 29 246 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 104 185 loadbang; #X msg 221 154 rota; #X msg 260 154 choose; #X msg 120 131 series; #X msg 170 131 sequence; #X msg 236 131 groups; #X msg 289 131 ratio; #X text 103 47 vs. 1.1; #X obj 301 304 hsl 128 15 0 12 0 0 empty empty empty -2 -6 0 8 -262144 -1 -1 3175 1; #X msg 105 237 1 2 3 4 5; #X connect 7 0 11 0; #X connect 7 1 10 0; #X connect 7 1 30 0; #X connect 9 0 7 1; #X connect 9 0 18 0; #X connect 11 0 12 0; #X connect 13 0 11 1; #X connect 18 0 30 0; #X connect 20 0 7 1; #X connect 20 0 18 0; #X connect 21 0 7 0; #X connect 22 0 20 0; #X connect 31 0 7 1; #X connect 31 0 18 0;
--- NEW FILE: anti-octave-help.pd --- #N canvas 3 48 600 434 10; #X text 29 107 see also:; #X text 29 25 anti-octave; #X text 29 57 Filters out octaves between two consecutive notes and outputs a bang from right outlet whenever an octave has occured.; #X msg 99 129 check-octaves; #X msg 99 106 anti-octave′ #X msg 224 106 anti-interval; #X obj 43 211 anti-octave; #X msg 326 23 Harmony; #X obj 43 287 play2 127 500 0 1; #X floatatom 43 255 0 0 0 0 - - -; #X text 78 256 note name; #X text 29 339 1993 by Karlheinz Essl; #X obj 137 209 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 161 206 Flashes when an octave would have occured; #X msg 43 173 10 , 11 , 12 , 24; #X connect 6 0 9 0; #X connect 6 1 12 0; #X connect 9 0 8 0; #X connect 14 0 6 0;
--- NEW FILE: banger16.pd --- #N canvas 549 180 474 378 10; #X obj 32 50 inlet; #X obj 33 156 select 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15; #X obj 33 180 outlet; #X obj 43 190 outlet; #X obj 53 200 outlet; #X obj 63 210 outlet; #X obj 73 220 outlet; #X obj 83 230 outlet; #X obj 93 240 outlet; #X obj 103 250 outlet; #X obj 113 260 outlet; #X obj 123 270 outlet; #X obj 132 276 outlet; #X obj 145 287 outlet; #X obj 155 293 outlet; #X obj 165 303 outlet; #X obj 175 313 outlet; #X obj 185 323 outlet; #X obj 33 105 f; #X obj 32 74 route set; #X obj 59 106 + 1; #X obj 86 106 mod 16; #X obj 123 39 f $1; #X obj 123 62 select 0; #X msg 123 83 16; #X obj 123 19 loadbang; #X connect 0 0 19 0; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 1 2 4 0; #X connect 1 3 5 0; #X connect 1 4 6 0; #X connect 1 5 7 0; #X connect 1 6 8 0; #X connect 1 7 9 0; #X connect 1 8 10 0; #X connect 1 9 11 0; #X connect 1 10 12 0; #X connect 1 11 13 0; #X connect 1 12 14 0; #X connect 1 13 15 0; #X connect 1 14 16 0; #X connect 1 15 17 0; #X connect 18 0 20 0; #X connect 18 0 1 0; #X connect 19 0 18 1; #X connect 19 1 18 0; #X connect 20 0 21 0; #X connect 21 0 18 1; #X connect 22 0 23 0; #X connect 23 0 24 0; #X connect 23 1 21 1; #X connect 24 0 21 1; #X connect 25 0 22 0;
--- NEW FILE: wave-rhythm.pd --- #N canvas 482 338 688 457 10; #X obj 213 362 outlet; #X obj 367 25 loadbang; #X text 438 390 1999 by Karlheinz Essl; #X text 438 376 vs. 1; #X obj 307 362 outlet; #X obj 60 361 outlet; #X obj 60 45 inlet; #X obj 504 45 inlet; #X obj 367 136 - 1; #X obj 172 44 inlet; #X obj 205 62 inlet; #X obj 416 45 inlet; #X msg 82 270 stop; #X obj 60 125 t b b; #X obj 60 96 sel 1 0; #X obj 109 311 delay; #X obj 454 89 int $4; #X obj 367 89 int $3; #X obj 139 233 trans-log $1 $2; #X obj 60 71 f 0; #X obj 88 71 + 1; #X obj 117 70 mod 2; #X obj 109 150 t b b; #X obj 139 200 t a a; #X obj 139 262 t a a; #N canvas 0 0 626 422 updown-counter 0; #X obj 163 233 f 0; #X obj 197 234 + 1; #X obj 237 235 mod 1; #X floatatom 341 151 5 0 0 0 - - -; #X obj 163 256 t a a; #X obj 280 193 t a a a; #X obj 243 259 select; #X obj 299 260 select 0; #X obj 302 232 - 1; #X msg 213 189 -1; #X msg 241 189 1; #X obj 163 121 inlet; #X obj 205 122 inlet; #X obj 280 122 inlet; #X msg 205 145 0; #X obj 163 160 b; #X text 164 99 bng; #X text 204 102 reset; #X text 282 101 modmax; #X obj 163 290 outlet; #X connect 0 0 4 0; #X connect 1 0 2 0; #X connect 2 0 0 1; #X connect 3 0 5 0; #X connect 4 0 1 0; #X connect 4 0 19 0; #X connect 4 1 6 0; #X connect 5 0 2 1; #X connect 5 1 8 0; #X connect 6 0 9 0; #X connect 6 1 7 0; #X connect 7 0 10 0; #X connect 8 0 6 1; #X connect 9 0 1 1; #X connect 10 0 1 1; #X connect 11 0 15 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 0 1; #X connect 15 0 0 0; #X restore 339 231 pd updown-counter; #X obj 453 202 -; #X obj 367 57 t b b; #X obj 339 264 +; #X floatatom 495 234 5 0 0 0 - - -; #X obj 454 152 t a b a; #X obj 367 111 t a a; #X connect 1 0 27 0; #X connect 6 0 19 0; #X connect 7 0 16 1; #X connect 8 0 18 3; #X connect 9 0 18 1; #X connect 10 0 18 2; #X connect 11 0 17 1; #X connect 12 0 15 0; #X connect 13 0 5 0; #X connect 13 1 22 0; #X connect 14 0 13 0; #X connect 14 1 12 0; #X connect 15 0 22 0; #X connect 15 0 5 0; #X connect 16 0 30 0; #X connect 17 0 31 0; #X connect 18 0 24 0; #X connect 19 0 20 0; #X connect 19 0 14 0; #X connect 20 0 21 0; #X connect 21 0 19 1; #X connect 22 0 15 0; #X connect 22 1 25 0; #X connect 23 0 18 0; #X connect 23 1 0 0; #X connect 24 0 15 1; #X connect 24 1 4 0; #X connect 25 0 28 0; #X connect 26 0 25 2; #X connect 26 0 29 0; #X connect 27 0 17 0; #X connect 27 1 16 0; #X connect 28 0 23 0; #X connect 30 0 28 1; #X connect 30 1 26 0; #X connect 30 2 26 1; #X connect 31 0 8 0; #X connect 31 1 26 0;
--- NEW FILE: butlast.pd --- #N canvas 50 61 246 246 10; #X obj 49 172 outlet; #X obj 49 28 inlet; #X obj 114 115 - 1; #X obj 114 85 list-len; #X obj 49 50 t a a; #X obj 49 140 list split; #X connect 1 0 4 0; #X connect 2 0 5 1; #X connect 3 0 2 0; #X connect 4 0 5 0; #X connect 4 1 3 0; #X connect 5 0 0 0;
--- NEW FILE: integ.pd --- #N canvas 41 129 245 217 10; #X obj 38 46 inlet; #X obj 38 157 outlet; #X obj 95 46 inlet; #X text 63 158 1993 by Gerhard Eckel ; #X obj 66 114 f 0; #X obj 38 114 +; #X msg 95 79 0; #X connect 0 0 5 0; #X connect 2 0 6 0; #X connect 4 0 5 1; #X connect 5 0 4 0; #X connect 5 0 1 0; #X connect 6 0 5 1;
--- NEW FILE: scramble.pd --- #N canvas 472 261 465 385 10; #X obj 131 28 inlet; #N canvas 0 0 450 300 nth 0; #X obj 113 155 list-idx; #X obj 113 129 list; #X obj 113 101 t b a; #X obj 113 80 inlet; #X obj 157 79 inlet; #X obj 113 178 outlet; #X connect 0 0 5 0; #X connect 1 0 0 0; #X connect 2 0 1 0; #X connect 2 1 0 1; #X connect 3 0 2 0; #X connect 4 0 1 1; #X restore 154 220 pd nth; #X obj 154 247 list prepend; #X obj 248 247 t a; #X obj 131 272 list; #N canvas 0 0 565 375 scramble 0; #X obj 123 96 list-len; #X obj 91 157 until; #X obj 123 117 t a b a; #X msg 134 157 clear; #X obj 123 70 inlet; #X obj 144 225 outlet; #X obj 144 198 urne; #X connect 0 0 2 0; #X connect 1 0 6 0; #X connect 2 0 1 0; #X connect 2 1 3 0; #X connect 2 2 6 1; #X connect 3 0 6 0; #X connect 4 0 0 0; #X connect 6 0 5 0; #X restore 154 189 pd scramble; #X obj 131 128 t b a a b; #X obj 131 304 outlet; #X obj 131 53 route bang; #X obj 196 75 t b a; #X obj 131 104 list; #X obj 131 74 b; #X connect 0 0 8 0; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 2 0 4 1; #X connect 3 0 2 1; #X connect 4 0 7 0; #X connect 5 0 1 0; #X connect 6 0 4 0; #X connect 6 1 5 0; #X connect 6 2 1 1; #X connect 6 3 2 1; #X connect 8 0 11 0; #X connect 8 1 9 0; #X connect 9 0 10 0; #X connect 9 1 10 1; #X connect 10 0 6 0; #X connect 11 0 10 0;
--- NEW FILE: brown-rhythm.pd --- #N canvas 525 278 443 366 10; #X obj 40 29 inlet; #X obj 195 168 inlet; #X obj 162 142 inlet; #X obj 99 174 outlet; #X obj 40 312 outlet; #X obj 40 230 metro 300; #X obj 159 254 outlet; #X obj 281 142 - 1; #X obj 251 32 inlet; #X text 133 50 this numbox prohibits numbers < 2!; #X obj 352 32 inlet; #X obj 70 79 sel 1; #X text 160 273 1993-94 by Karlheinz Essl; #X text 160 288 vs. 2; #X obj 281 112 int $3; #X obj 99 116 brownian 0 $3 $4; #X obj 40 53 t a a; #X obj 251 57 t a a; #X obj 99 143 t a a; #X obj 129 227 t a a; #X obj 40 254 t b b; #X obj 129 200 trans-log $1 $2; #X connect 0 0 16 0; #X connect 1 0 21 2; #X connect 2 0 21 1; #X connect 5 0 20 0; #X connect 7 0 21 3; #X connect 8 0 17 0; #X connect 10 0 15 3; #X connect 11 0 14 0; #X connect 14 0 7 0; #X connect 15 0 18 0; #X connect 16 0 5 0; #X connect 16 1 11 0; #X connect 17 0 15 2; #X connect 17 1 14 0; #X connect 18 0 3 0; #X connect 18 1 21 0; #X connect 19 0 5 1; #X connect 19 1 6 0; #X connect 20 0 4 0; #X connect 20 1 15 0; #X connect 21 0 19 0;
--- NEW FILE: Lround.pd --- #N canvas 458 363 493 363 10; #X obj 131 15 inlet; #X obj 131 272 outlet; #X obj 131 231 list-round; #X obj 254 171 pow; #X obj 254 119 t b a; #X msg 254 147 10; #X obj 254 92 * -1; #X obj 269 42 loadbang; #X obj 254 71 f $1; #X obj 254 19 inlet; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 5 0; #X connect 4 1 3 1; #X connect 5 0 3 0; #X connect 6 0 4 0; #X connect 7 0 8 0; #X connect 8 0 6 0; #X connect 9 0 8 0;
--- NEW FILE: between-lin-urn.pd --- #N canvas 296 99 475 353 10; #X obj 43 34 r RTC-rs; #X msg 43 103 seed $1; #X obj 110 235 outlet; #X obj 275 158 - 1; #X obj 154 34 inlet; #X obj 196 34 inlet; #X obj 245 36 inlet; #X obj 110 34 inlet; #X obj 187 237 outlet; #X text 164 260 1996-98 by Karlheinz Essl; #X text 164 275 vs. 1.1; #X obj 245 84 int $3; #X obj 110 197 trans-lin $1 $2; #X obj 110 165 t a a; #X msg 125 112 clear , bang; #X text 151 304 urn *not* from zexy assumed; #X obj 245 107 t a a; #X obj 257 57 loadbang; #X obj 110 64 b; #X obj 110 139 urne $3; #X connect 0 0 1 0; #X connect 1 0 19 0; #X connect 3 0 12 3; #X connect 4 0 12 1; #X connect 5 0 12 2; #X connect 6 0 11 0; #X connect 7 0 18 0; #X connect 11 0 16 0; #X connect 12 0 2 0; #X connect 13 0 12 0; #X connect 13 1 8 0; #X connect 14 0 19 0; #X connect 16 0 19 1; #X connect 16 1 3 0; #X connect 17 0 11 0; #X connect 18 0 19 0; #X connect 19 0 13 0; #X connect 19 1 14 0;
--- NEW FILE: group-rhythm-help.pd --- #N canvas 290 201 486 535 10; #X text 15 36 group-rhythm; #X msg 336 23 Rhythm-Generators; #X text 13 65 Generates a rhythm by choosing elements of a given supply (provided by a geometrical row with its parameters: minimum entry delay , maximum entry delay and number of entry delays) and repeating a chosen value according to the periodicity parameter. This modules incorporates the "Gruppen"-theory of Karlheinz Stockhausen ("...wie die Zeit vergeht..." , in: "die reihe" , Vol. 3 , Vienna 1957) and reflects some considerations of Gottfried Michael Koenig about serialism and aleatory ("Aleatorische und serielle Verfahren in der elektronischen Musik" , in: Die Sonde , Vol. 5/1 , Bonn 1965).; #X obj 39 269 tgl 15 0 empty empty start/stop 0 -6 0 8 -262144 -1 -1 1 1; #X floatatom 230 307 0 0 0 2 periodicity_(0-1) - -; #X floatatom 86 289 4 0 0 2 min_ED - -; #X floatatom 182 292 4 0 0 2 ED-values - -; #X floatatom 134 290 4 0 0 2 max_ED - -; #X obj 39 341 group-rhythm 100 1000 12 0.5; #X floatatom 230 374 4 0 0 3 ED - -; #X floatatom 134 375 4 0 0 3 row_index - -; #X text 17 226 see also:; #X text 214 50 vs. 2; #X obj 39 413 QT-PercPlayer; #X text 16 454 1993-94 by Karlheinz Essl; #X msg 84 224 group-rhythm2; #X msg 39 379 60; #X connect 3 0 8 0; #X connect 4 0 8 4; #X connect 5 0 8 1; #X connect 6 0 8 3; #X connect 7 0 8 2; #X connect 8 0 16 0; #X connect 8 1 10 0; #X connect 8 2 9 0; #X connect 16 0 13 0;
--- NEW FILE: ratio-help.pd --- #N canvas 87 28 954 628 10; #X text 293 589 object; #X text 38 587 vs. 1.1: seedable by the; #X msg 220 588 RTC-seed; #X text 14 67 Chooses elements from a supply <int list> which are repeated according to a multiple list <int list> by using the "series" selection principle.; #X text 14 35 ratio; #X msg 374 23 Chance; #X msg 118 131 series; #X msg 236 131 groups; #X msg 169 131 sequence; #X text 14 131 see also:; #X text 15 113 NB: the supply must be a list of numbers!; #X msg 153 153 sel-princ; #X msg 80 153 permutate; #X msg 80 131 alea; #X text 38 572 1994-98 by Karlheinz Essl after Gottfried Michael Koenig ; #X msg 415 169 1; #X obj 415 147 loadbang; #X obj 215 188 vsl 15 64 0 127 0 0 empty empty empty 0 -8 0 8 -262144 -1 -1 50 1; #X text 489 426 choice list; #X text 311 273 multiple list; #X msg 294 290 1 1 1 1 1; #X msg 481 443; #X obj 481 410 show; #X obj 45 328 ratio; #N canvas 382 43 525 343 multifier 0; #X obj 62 83 inlet; #X obj 100 83 inlet; #X obj 135 83 inlet; #X obj 170 83 inlet; #X obj 205 83 inlet; #X obj 62 273 outlet; #X obj 92 184 show; #X obj 92 210 outlet; #N canvas 0 0 529 403 mpack 0; #X obj 143 51 inlet; #X obj 91 51 inlet; #X obj 141 122 t b f; #X obj 191 51 inlet; #X obj 189 122 t b f; #X obj 238 50 inlet; #X obj 236 121 t b f; #X obj 148 272 outlet; #X obj 300 42 inlet; #X obj 148 229 pack 0 0 0 0 0; #X obj 298 113 t b f; #X obj 94 85 int; #X obj 133 90 int; #X obj 196 89 int; #X obj 247 90 int; #X obj 308 83 int; #X connect 0 0 12 0; #X connect 1 0 11 0; #X connect 2 0 9 0; #X connect 2 1 9 1; #X connect 3 0 13 0; #X connect 4 0 9 0; #X connect 4 1 9 2; #X connect 5 0 14 0; #X connect 6 0 9 0; #X connect 6 1 9 3; #X connect 8 0 15 0; #X connect 9 0 7 0; #X connect 10 0 9 0; #X connect 10 1 9 4; #X connect 11 0 9 0; #X connect 12 0 2 0; #X connect 13 0 4 0; #X connect 14 0 6 0; #X connect 15 0 10 0; #X restore 62 137 pd mpack; #X obj 62 159 t a a; #X connect 0 0 8 0; #X connect 1 0 8 1; #X connect 2 0 8 2; #X connect 3 0 8 3; #X connect 4 0 8 4; #X connect 6 0 7 0; #X connect 8 0 9 0; #X connect 9 0 5 0; #X connect 9 1 6 0; #X restore 215 263 pd multifier; #X msg 60 302 1 2 3 4 5; #X obj 234 188 vsl 15 64 0 127 0 0 empty empty empty 0 -8 0 8 -262144 -1 -1 50 1; #X obj 274 188 vsl 15 64 0 127 0 0 empty empty empty 0 -8 0 8 -262144 -1 -1 50 1; #X obj 254 188 vsl 15 64 0 127 0 0 empty empty empty 0 -8 0 8 -262144 -1 -1 50 1; #X obj 294 188 vsl 15 64 0 127 0 0 empty empty empty 0 -8 0 8 -262144 -1 -1 50 1; #X text 57 284 supply; #X obj 45 180 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 325 195 adjust ratio of supply elements; #X obj 45 388 collect; #X msg 45 444; #X obj 99 389 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X obj 587 375 bng 15 250 50 0 empty empty supply_exhausted 0 -6 0 8 -262144 -1 -1; #X text 54 426 chosen elements; #X msg 291 131 sneak; #X msg 219 153 rota; #X msg 258 153 choose; #X text 86 47 vs. 1.1; #X obj 215 285 t b a; #X obj 515 410 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X connect 15 0 17 0; #X connect 15 0 26 0; #X connect 15 0 28 0; #X connect 15 0 27 0; #X connect 15 0 29 0; #X connect 16 0 15 0; #X connect 17 0 24 0; #X connect 22 0 21 0; #X connect 23 0 33 0; #X connect 23 1 22 0; #X connect 23 2 36 0; #X connect 24 0 42 0; #X connect 24 1 20 0; #X connect 25 0 23 1; #X connect 26 0 24 1; #X connect 27 0 24 3; #X connect 28 0 24 2; #X connect 29 0 24 4; #X connect 31 0 23 0; #X connect 33 0 34 0; #X connect 35 0 33 1; #X connect 42 0 25 0; #X connect 42 1 23 2; #X connect 43 0 22 1;
--- NEW FILE: choose-help.pd --- #N canvas 175 75 592 408 10; #X obj 120 186 choose; #X floatatom 120 124 4 0 0 0 - - -; #X obj 299 114 loadbang; #X msg 299 146 1 2 3 4 5 6.9 0.31 -10; #X obj 160 220 bng 15 250 50 0 empty empty clear_display 0 -6 0 8 -262144 -1 -1; #X msg 120 253; #X text 29 106 number of elements to be chosen; #X text 104 38 An int n sent to the left inlet outputs randomly chosen numbers from a given supply.; #X text 40 42 choose; #X text 125 330 1996 by Karlheinz Essl; #X obj 120 220 show; #X text 241 145 supply:; #X connect 0 0 10 0; #X connect 1 0 0 0; #X connect 2 0 3 0; #X connect 3 0 0 1; #X connect 4 0 10 1; #X connect 10 0 5 0;
--- NEW FILE: between-log-urn.pd --- #N canvas 174 117 385 326 10; #X text 178 287 vs. 1.1; #X text 178 271 1996-98 by Karlheinz Essl; #X msg 35 108 seed $1; #X floatatom 35 88 0 0 0 0 - - -; #X obj 35 39 r RTC-rs; #X obj 124 243 outlet; #X obj 233 177 - 1; #X obj 173 156 inlet; #X obj 190 178 inlet; #X obj 233 39 inlet; #X obj 124 39 inlet; #X obj 182 245 outlet; #X msg 139 118 clear , bang; #X obj 233 117 int $3; #X obj 124 205 trans-log $1 $2; #X obj 124 72 t b b; #X obj 124 176 t a a; #X obj 233 138 t a a; #X obj 124 146 urne $3; #X connect 2 0 18 0; #X connect 3 0 2 0; #X connect 4 0 3 0; #X connect 6 0 14 3; #X connect 7 0 14 1; #X connect 8 0 14 2; #X connect 9 0 13 0; #X connect 10 0 15 0; #X connect 12 0 18 0; #X connect 13 0 17 0; #X connect 14 0 5 0; #X connect 15 0 18 0; #X connect 15 1 13 0; #X connect 16 0 14 0; #X connect 16 1 11 0; #X connect 17 0 18 1; #X connect 17 1 6 0; #X connect 18 0 16 0; #X connect 18 1 12 0;
--- NEW FILE: line2.pd --- #N canvas 0 0 716 354 10; #X obj 85 110 line; #X obj 134 183 outlet; #X obj 85 183 outlet; #X obj 134 157 del; #X obj 85 57 t a a; #X obj 134 83 list split 1; #X obj 85 30 inlet; #X obj 181 32 inlet; #X obj 181 60 t a a; #X obj 134 110 b; #X text 295 55 line2: line which sends a bang to its 2nd outlet , when finished.; #X obj 173 134 route float; #X connect 0 0 2 0; #X connect 3 0 1 0; #X connect 4 0 0 0; #X connect 4 1 5 0; #X connect 5 0 9 0; #X connect 5 1 11 0; #X connect 6 0 4 0; #X connect 7 0 8 0; #X connect 8 0 0 1; #X connect 8 1 11 0; #X connect 9 0 3 0; #X connect 11 0 3 1;
--- NEW FILE: anti-interval.pd --- #N canvas 609 154 322 290 10; #X obj 82 189 outlet; #X obj 82 29 inlet; #X obj 31 31 inlet; #X obj 31 187 outlet; #X obj 129 30 loadbang; #X obj 82 64 int $1; #N canvas 0 0 637 374 check 0; #X obj 144 113 int; #X obj 117 112 int; #X obj 117 270 int; #X obj 117 76 t a b a a; #X obj 117 47 inlet; #X obj 203 44 inlet; #X obj 117 305 outlet; #X obj 173 305 outlet; #X obj 117 155 -; #X obj 117 190 % 12; #X obj 117 214 == 0; #X obj 173 281 bang; #X obj 117 237 select 0 1; #X obj 271 46 inlet; #X text 259 123 if ($i1-$i2)%12==$i3 then out2 bang else $i1; #X obj 271 85 int; #X connect 0 0 8 1; #X connect 1 0 8 0; #X connect 2 0 6 0; #X connect 3 0 1 0; #X connect 3 1 0 0; #X connect 3 2 2 1; #X connect 4 0 3 0; #X connect 5 0 0 1; #X connect 8 0 9 0; #X connect 9 0 10 0; #X connect 10 0 12 0; #X connect 11 0 7 0; #X connect 12 0 2 0; #X connect 12 1 11 0; #X connect 13 0 15 0; #X connect 15 0 10 1; #X restore 31 104 pd check; #X obj 31 138 t a a; #X text 61 223 1995 by Karlheinz Essl; #X connect 1 0 5 0; #X connect 2 0 6 0; #X connect 4 0 5 0; #X connect 5 0 6 2; #X connect 6 0 7 0; #X connect 6 1 0 0; #X connect 7 0 3 0; #X connect 7 1 6 1;
--- NEW FILE: make-scale.pd --- #N canvas 311 51 453 388 10; #X text 265 267 1993 by Karlheinz Essl; #X obj 103 275 outlet; #X obj 103 30 inlet; #X obj 273 31 inlet; #X obj 122 226 list prepend; #X obj 211 226 t a; #X obj 103 247 list; #X obj 122 193 f $1; #X obj 158 193 + 1; #X obj 164 157 int $1; #X obj 122 158 until; #X obj 103 85 t b a b b; #X connect 2 0 11 0; #X connect 3 0 9 0; #X connect 4 0 5 0; #X connect 4 0 6 1; #X connect 5 0 4 1; #X connect 6 0 1 0; #X connect 7 0 8 0; #X connect 7 0 4 0; #X connect 8 0 7 1; #X connect 9 0 7 1; #X connect 10 0 7 0; #X connect 11 0 6 0; #X connect 11 1 10 0; #X connect 11 2 9 0; #X connect 11 3 4 1;
--- NEW FILE: block-bang.pd --- #N canvas 281 180 238 260 10; #X text 56 231 1996 by Karlheinz Essl; #X obj 80 37 inlet; #X obj 86 210 outlet; #X obj 33 208 outlet; #X obj 33 174 sel 1; #X obj 33 90 timer; #X obj 33 39 inlet; #X obj 33 149 > $1; #X obj 33 66 t b b; #X obj 33 120 t a a; #X connect 1 0 7 1; #X connect 4 0 3 0; #X connect 5 0 9 0; #X connect 6 0 8 0; #X connect 7 0 4 0; #X connect 8 0 5 0; #X connect 8 1 5 1; #X connect 9 0 7 0; #X connect 9 1 2 0;
--- NEW FILE: last-help.pd --- #N canvas 3 48 473 349 10; #X obj 106 208 bng 15 250 50 1 empty empty clear_display 0 -6 0 8 -262144 -1 -1; #X obj 65 207 show; #X msg 65 114 1 2 3 4 5; #X msg 85 140 a b c d e f g h i; #X msg 65 240; #X text 25 277 1994 by Karlheinz Essl; #X obj 65 175 last; #X text 25 29 last; #X text 25 61 Output last elemeot of the input list.; #X connect 0 0 1 1; #X connect 1 0 4 0; #X connect 2 0 6 0; #X connect 3 0 6 0; #X connect 6 0 1 0;
--- NEW FILE: play2-help.pd --- #N canvas 278 93 745 606 10; #X text 98 472 vs.3: instrument menu for Quicktime 3 added; #X text 97 25 play2; #X msg 425 31 Toolbox; #X msg 166 152 play; #X text 97 152 see also:; #N canvas 50 61 615 217 generate-notes 0; #X obj 38 134 outlet; #X obj 38 103 brown-melody 36 84 0.2; #X obj 38 30 inlet; #X obj 38 56 repchord-rhythm 100 1000 12 6 0.8 0.2; #X obj 446 134 outlet; #N canvas 50 61 268 257 dur 0; #X obj 54 21 inlet; #X obj 54 144 dur-from-ED; #X obj 54 175 outlet; #X obj 100 20 inlet; #N canvas 38 77 245 265 dur-fact 0; #X obj 31 213 outlet; #X obj 31 112 pass 25; #X obj 31 151 between 0 13; #X obj 31 182 trans-log 0.25 4 12; #X obj 31 43 inlet; #X obj 91 112 between 10 100; #X obj 31 131 t a a; #X connect 1 0 6 0; #X connect 2 0 3 0; #X connect 3 0 0 0; #X connect 4 0 1 0; #X connect 5 0 1 1; #X connect 6 0 2 0; #X connect 6 1 5 0; #X restore 126 91 pd dur-fact; #X obj 54 45 t a a; #X connect 0 0 5 0; #X connect 1 0 2 0; #X connect 3 0 1 1; #X connect 4 0 1 2; #X connect 5 0 1 0; #X connect 5 1 4 0; #X restore 446 103 pd dur; #X obj 213 134 outlet; #X obj 213 103 random-ramp 30 127 5 250 2000 12; #X connect 1 0 0 0; #X connect 2 0 3 0; #X connect 3 0 1 0; #X connect 3 2 7 0; #X connect 3 2 5 0; #X connect 3 3 5 1; #X connect 5 0 4 0; #X connect 7 0 6 0; #X restore 122 188 pd generate-notes; #X obj 100 188 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X floatatom 122 240 4 0 0 2 note - -; #X obj 122 319 play2 127 500 0 1; #X floatatom 430 193 4 0 0 2 midi_channel/fluid_control - -; #X floatatom 236 240 5 0 0 2 dur - -; #X floatatom 179 241 4 0 0 2 vel - -; #X text 95 437 vs.2: fifth inlet added (QT Musical Instrument resp. MIDI channel); #X text 94 427 1992-2002 by Karlheinz Essl; #X text 181 39 vs. 3.2; #X msg 206 152 QT-PercPlayer; #X obj 262 270 hradio 15 1 0 2 empty empty nouteout/fluid~ 0 -6 0 8 -262144 -1 -1 1; #X msg 431 278 load $1; #X obj 431 253 openpanel; #X obj 431 228 bng 20 250 50 0 empty empty load_soundfont 0 -6 0 8 -262144 -1 -1; #X text 97 57 Plays a note whenever a key number is sent to the left inlet. The other parameters (velocity and duration) are optional and can change at any time. - Routes the MIDI-out either to specified serial port (argument: 0) or to the MIDI-synthesizer external object [fluid~] (argument 1).; #X text 96 493 Pd version: use [fluid~] instead of Quicktime , volume slider added.; #X msg 432 389 prog 1 $1; #X obj 432 349 hradio 15 1 0 8 empty empty program_change 0 -6 0 8 -262144 -1 -1 0; #X obj 432 368 + 1; #X msg 432 302 load GortMiniPiano.sf2; #X connect 5 0 7 0; #X connect 5 1 11 0; #X connect 5 2 10 0; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 9 0 8 4; #X connect 10 0 8 2; #X connect 11 0 8 1; #X connect 16 0 8 3; #X connect 17 0 8 4; #X connect 18 0 17 0; #X connect 19 0 18 0; #X connect 22 0 8 4; #X connect 23 0 24 0; #X connect 24 0 22 0; #X connect 25 0 8 4;
--- NEW FILE: markov-harmony.pd --- #N canvas 50 61 437 286 10; #X obj 63 52 inlet; #X obj 63 85 markov #1; #X obj 63 143 st2pitch; #X obj 63 174 outlet; #X obj 183 53 inlet; #X obj 123 52 inlet; #X obj 130 145 outlet; #X obj 184 145 outlet; #X text 109 211 1994 by Karlheinz Essl; #X obj 63 114 t a a; #X connect 0 0 1 0; #X connect 1 0 9 0; #X connect 1 1 7 0; #X connect 2 0 3 0; #X connect 4 0 1 2; #X connect 5 0 1 1; #X connect 9 0 2 0; #X connect 9 1 6 0;
--- NEW FILE: add%.pd --- #N canvas 141 72 308 216 10; #X obj 256 30 inlet; #X obj 49 164 outlet; #X obj 49 130 expr $f1 + $f2*$f1/100.; #X obj 49 68 t f b; #X obj 49 30 inlet; #X text 79 165 1993-99 by Karlheinz Essl; #X obj 205 100 float $1; #X connect 0 0 6 1; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 3 1 6 0; #X connect 4 0 3 0; #X connect 6 0 2 1;
--- NEW FILE: ms2sec-help.pd --- #N canvas 255 305 454 385 10; #X obj 38 95 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #N canvas 50 61 261 222 select-duration 0; #X obj 44 125 outlet; #X obj 44 72 inlet; #X obj 44 98 between-log 2345 23456 12; #X connect 1 0 2 0; #X connect 2 0 0 0; #X restore 38 120 pd select-duration; #X text 18 274 1998 by Karlheinz Essl; #X msg 278 23 Rhythm; #X text 18 28 ms2sec; #X text 18 59 Converts milliseconds into seconds. The argument sets the number of decimal places.; #X floatatom 190 220 0 0 0 0 - - -; #X floatatom 113 220 0 0 0 0 - - -; #X floatatom 38 220 0 0 0 0 - - -; #X floatatom 38 151 0 0 0 0 - - -; #X text 93 151 time in milliseconds; #X text 36 244 time in seconds , rounded; #X text 18 288 Thanks to Peter Elsea for Lround!; #X text 60 97 generate a random duration; #X obj 190 191 ms2sec 2; #X obj 113 191 ms2sec 1; #X obj 38 191 ms2sec 0; #X connect 0 0 1 0; #X connect 1 0 9 0; #X connect 9 0 14 0; #X connect 9 0 15 0; #X connect 9 0 16 0; #X connect 14 0 6 0; #X connect 15 0 7 0; #X connect 16 0 8 0;
--- NEW FILE: super-rhythm.pd --- #N canvas 48 81 988 715 10; #X obj 256 374 delay 100; #X obj 201 64 sel 1; #X obj 201 35 inlet; #X obj 546 363 pass 50; #X obj 590 286 contrario; #X obj 837 261 per2pass; #X obj 777 261 per2pass; #X obj 708 259 - 1; #N canvas 63 44 520 372 chord-size 0; #X obj 290 84 - 1; #X obj 290 52 listlen; #X obj 153 136 int; #X text 205 39 retrigger; #X obj 153 29 inlet; #X obj 29 39 inlet; #X obj 290 25 inlet; #X obj 358 24 inlet; #X obj 439 22 inlet; #X text 200 100 index; #X text 198 143 max. chord size for chosen ED; #X obj 29 305 outlet; #X obj 29 190 random 1; #X obj 29 219 + 1; #X obj 90 308 outlet; #X obj 153 171 expr_scale 0 3 1 1; #X obj 439 56 t b a; #X obj 358 55 t b a; #X obj 29 280 until; #X obj 29 250 t a a; #X floatatom 153 198 5 0 0 0 - - -; #X floatatom 471 93 5 0 0 0 - - -; #X floatatom 398 87 5 0 0 0 - - -; #X floatatom 293 107 5 0 0 0 - - -; #X floatatom 116 158 5 0 0 0 - - -; #X connect 0 0 15 2; #X connect 0 0 23 0; #X connect 1 0 0 0; #X connect 2 0 15 0; #X connect 2 0 24 0; #X connect 4 0 2 0; #X connect 5 0 12 0; #X connect 6 0 1 0; #X connect 7 0 17 0; #X connect 8 0 16 0; #X connect 12 0 13 0; #X connect 13 0 19 0; #X connect 15 0 12 1; #X connect 15 0 20 0; #X connect 16 0 2 0; #X connect 16 1 15 4; #X connect 16 1 21 0; #X connect 17 0 2 0; #X connect 17 1 15 3; #X connect 17 1 22 0; #X connect 18 0 11 0; #X connect 19 0 18 0; #X connect 19 1 14 0; #X restore 152 438 pd chord-size; #X text 774 212 max.ED; #X text 839 213 min.ED; #X obj 707 147 inlet; #X obj 422 145 inlet; #X text 567 392 retrigger; #X obj 152 471 outlet; #X obj 467 497 outlet; #X obj 533 500 outlet; #X obj 401 496 outlet; #N canvas 50 61 316 235 dev 0; #X obj 36 169 outlet; #X text 114 89 min.; #X text 201 92 max.; #X obj 36 135 between 450 550; #N canvas 298 92 402 372 boundaries 0; #X obj 123 236 expr $i1 + ($i2/200. * $i1); #X obj 48 208 expr $i1 - ($i2/200. * $i1); #X obj 210 50 inlet; #X obj 48 50 inlet; #X obj 123 271 outlet; #X obj 48 271 outlet; #X obj 48 181 t a a; #X obj 48 159 int; #X obj 210 92 t b a a; #X obj 210 72 int; #X connect 0 0 4 0; #X connect 1 0 5 0; #X connect 2 0 9 0; #X connect 3 0 7 0; #X connect 6 0 1 0; #X connect 6 1 0 0; #X connect 7 0 6 0; #X connect 8 0 7 0; #X connect 8 1 1 1; #X connect 8 2 0 1; #X connect 9 0 8 0; #X restore 108 70 pd boundaries; #X obj 108 40 inlet; #X obj 179 41 inlet; #X obj 36 41 inlet; #X obj 36 93 b; #X connect 3 0 0 0; #X connect 4 0 3 1; #X connect 4 1 3 2; #X connect 5 0 4 0; #X connect 6 0 4 1; #X connect 7 0 8 0; #X connect 8 0 3 0; #X restore 315 324 pd dev; #X msg 231 338 stop; #X obj 333 296 sel-princ 3; #X obj 152 296 first-bang; #X obj 310 145 inlet; #X obj 364 145 inlet; #X obj 509 145 inlet; #X obj 571 145 inlet; #X obj 622 145 inlet; #X text 192 528 1995 by Karlheinz Essl; #X obj 310 174 int $1; #X obj 422 176 int $3; #X obj 364 176 int $2; #X obj 509 175 int $4; #X obj 571 174 f $5; #X obj 622 174 f $6; #X obj 201 92 t b b b b b b b b; #X obj 712 230 list-len; #X obj 707 170 t a a a a; #X obj 590 325 expr_scale 0 1 100 100; #X obj 745 467 b; #X obj 837 298 t a b; #X obj 777 333 t a b; #X obj 709 283 t a a; #X obj 201 233 t b b b b; #X obj 315 346 t a a; #X obj 369 324 t a a; #X connect 0 0 8 0; #X connect 0 0 42 0; #X connect 1 0 34 0; #X connect 1 1 19 0; #X connect 2 0 1 0; #X connect 3 0 38 0; #X connect 4 0 37 0; #X connect 5 0 39 0; #X connect 6 0 40 0; #X connect 7 0 41 0; #X connect 8 0 14 0; #X connect 8 1 15 0; #X connect 11 0 36 0; #X connect 12 0 29 0; #X connect 18 0 43 0; #X connect 19 0 0 0; #X connect 20 0 18 1; #X connect 20 1 44 0; #X connect 20 2 17 0; #X connect 21 0 8 0; #X connect 22 0 28 0; #X connect 23 0 30 0; #X connect 24 0 31 0; #X connect 25 0 32 0; #X connect 26 0 33 0; #X connect 28 0 20 1; #X connect 29 0 8 3; #X connect 30 0 18 2; #X connect 31 0 8 4; #X connect 32 0 5 0; #X connect 33 0 6 0; #X connect 34 0 42 0; #X connect 34 1 21 1; #X connect 34 2 28 0; #X connect 34 3 30 0; #X connect 34 4 29 0; #X connect 34 5 31 0; #X connect 34 6 32 0; #X connect 34 7 33 0; #X connect 35 0 7 0; #X connect 36 0 20 2; #X connect 36 1 8 2; #X connect 36 2 38 0; #X connect 36 3 35 0; #X connect 37 0 3 1; #X connect 38 0 20 0; #X connect 39 0 37 4; #X connect 39 1 38 0; #X connect 40 0 37 3; #X connect 40 1 38 0; #X connect 41 0 4 1; #X connect 41 1 37 2; #X connect 42 0 21 0; #X connect 42 1 0 0; #X connect 42 2 18 0; #X connect 42 3 3 0; #X connect 43 0 0 1; #X connect 43 1 16 0; #X connect 44 0 8 1; #X connect 44 1 4 0;
--- NEW FILE: ED2EP-help.pd --- #N canvas 319 164 519 501 10; #X obj 110 266 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X text 60 384 EP; #X msg 87 385; #X msg 87 325; #X obj 87 289 show; #X obj 87 149 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #N canvas 50 61 261 246 make-ED 0; #X obj 95 68 loadbang; #X obj 49 132 scramble; #X obj 49 184 outlet; #X obj 49 68 inlet; #X obj 49 157 list-apply round; #X obj 49 102 make-ED-scale 250 1000 6; #X connect 0 0 5 0; #X connect 1 0 4 0; #X connect 3 0 5 0; #X connect 4 0 2 0; #X connect 5 0 1 0; #X restore 87 175 pd make-ED; #X obj 87 356 show; #X msg 301 26 Rhythm; #X obj 161 257 ED2EP 0; #X floatatom 205 236 4 0 0 1 offset - -; #X text 44 64 Converts ED (= entry delays) into EP (= entry points). Argument = offset (can be negative).; #X text 44 31 ED2EP; #X text 255 286 1997 by Karlheinz Essl; #X text 66 324 ED; #X text 107 150 generate a random series of ED's...; #X text 142 42 vs. 2; #X text 255 301 vs. 2: improved implementation; #X obj 87 224 t a a; #X text 47 100 NB: Only works with integers in Max , but with floats as well in Pd.; #X msg 116 199 200 100 300 150.5 400; #X connect 0 0 4 1; #X connect 0 0 7 1; #X connect 4 0 3 0; #X connect 5 0 6 0; #X connect 6 0 18 0; #X connect 7 0 2 0; #X connect 9 0 7 0; #X connect 10 0 9 1; #X connect 18 0 4 0; #X connect 18 1 9 0; #X connect 20 0 18 0;
--- NEW FILE: lb.pd --- #N canvas 63 44 388 264 10; #X obj 61 97 outlet; #X obj 61 23 loadbang; #X obj 61 48 list append $1; #X msg 61 76 $1; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 3 0 0 0;
--- NEW FILE: trans-exp.pd --- #N canvas 242 134 694 561 10; #X obj 121 69 inlet; #X obj 290 98 loadbang; #X floatatom 155 273 0 0 0 0 m - -; #X text 323 270 q; #X obj 234 180 sel 0; #X msg 233 201 1; #X obj 312 196 sel 0; #X msg 312 219 1; #X msg 390 218 1; #X obj 390 196 sel 0; #X obj 233 333 * 1; #X obj 121 487 outlet; #X obj 234 72 inlet; #X obj 356 71 inlet; #X obj 234 155 f $1; #X obj 312 171 f $2; #X obj 390 171 f $3; #X obj 432 69 inlet; #X text 204 371 1993/94 by Karlheinz Essl; #X obj 290 125 t b b b; #X obj 432 104 t b a; #X obj 356 100 t b a; #X obj 233 245 expr ln($f2/$f1) / $f3; #X obj 233 302 expr exp(-$f2*$f1); #X obj 233 221 t a a a; #X floatatom 163 357 5 0 0 0 k - -; #X text 371 431 y = k*exp(m*x); #X obj 233 267 t a a; #X msg 249 98 bang; #X obj 121 432 expr $f2 * exp($f3*$f1); #X connect 0 0 29 0; #X connect 1 0 19 0; #X connect 4 0 5 0; #X connect 4 1 24 0; #X connect 5 0 24 0; #X connect 6 0 7 0; #X connect 6 1 22 1; #X connect 7 0 22 1; #X connect 8 0 23 1; #X connect 9 0 8 0; #X connect 9 0 22 2; #X connect 9 1 22 2; #X connect 10 0 25 0; #X connect 10 0 29 1; #X connect 12 0 14 0; #X connect 13 0 21 0; #X connect 14 0 4 0; #X connect 15 0 6 0; #X connect 16 0 9 0; #X connect 17 0 20 0; #X connect 19 0 14 0; #X connect 19 1 15 0; #X connect 19 2 16 0; #X connect 20 0 19 0; #X connect 20 1 16 0; #X connect 21 0 19 0; #X connect 21 1 15 0; #X connect 22 0 2 0; #X connect 22 0 27 0; #X connect 23 0 10 0; #X connect 24 0 22 0; #X connect 24 1 10 1; #X connect 27 0 23 0; #X connect 27 1 29 2; #X connect 28 0 19 0; #X connect 29 0 11 0;
--- NEW FILE: multiple-help.pd --- #N canvas 427 111 495 420 10; #X msg 316 23 Lists; #X text 15 382 1994 by Karlheinz Essl; #X text 15 19 multiple; #X text 15 53 Multiplies the elements of a supply <int list> according to a list of multiples <int list> sent to the right inlet. The element 0 in the multiple list will erase the respective element of the supply. ; #X obj 68 202 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 109 320 bng 15 250 50 1 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 68 290 multiple; #X msg 68 349; #X obj 68 319 show; #X msg 159 151 3 2 0 1; #X msg 146 130 4 3 2 1; #X text 234 141 }; #X msg 179 194 0 0 1 0; #X msg 170 174 1 1 1 1; #X msg 68 264 1 2 3 4; #X text 246 159 multiples; #X text 15 228 supply; #X text 15 108 NB: both list must have the same length!; #X text 130 322 clear display; #X obj 146 235 t b a; #X obj 146 215 list; #X connect 4 0 14 0; #X connect 5 0 8 1; #X connect 6 0 8 0; #X connect 8 0 7 0; #X connect 9 0 20 0; #X connect 10 0 20 0; #X connect 12 0 20 0; #X connect 13 0 20 0; #X connect 14 0 6 0; #X connect 19 0 14 0; #X connect 19 1 6 1; #X connect 20 0 19 0;
--- NEW FILE: random-row.pd --- #N canvas 38 77 432 237 10; #X obj 25 131 outlet; #X obj 25 98 scramble; #X text 84 137 1994 by Karlheinz Essl; #X obj 25 35 inlet; #X msg 25 69 0 1 2 3 4 5 6 7 8 9 10 11; #X connect 1 0 0 0; #X connect 3 0 4 0; #X connect 4 0 1 0;
--- NEW FILE: geom.pd --- #N canvas 208 111 345 240 10; #X obj 130 24 inlet; #X obj 212 24 inlet; #X obj 49 23 inlet; #X obj 49 188 outlet; #X obj 212 114 float $2; #X obj 130 116 float $1; #X obj 49 152 expr $f2 * pow($f3 , $f1); #X obj 146 64 loadbang; #X obj 146 85 t b b; #X text 117 190 1993 by Karlheinz Essl; #X connect 0 0 5 0; #X connect 1 0 4 0; #X connect 2 0 6 0; #X connect 4 0 6 2; #X connect 5 0 6 1; #X connect 6 0 3 0; #X connect 7 0 8 0; #X connect 8 0 5 0; #X connect 8 1 4 0;
--- NEW FILE: int-or-float.pd --- #N canvas 0 0 794 565 10; #X obj 210 456 outlet; #X obj 547 146 select 0; #X obj 261 331 unpack 0 0; #X obj 277 416 int; #X obj 210 333 inlet; #X msg 598 283 0 1; #X obj 598 177 select i int f float; #X msg 665 281 1 0; #X obj 210 394 spigot 0; #X obj 275 396 spigot 1; #X obj 261 171 int; #X obj 261 198 ==; #X obj 261 149 t f f; #X obj 261 225 select 0; #X msg 261 250 1 0; #X text 62 65 check for "real" floats!; #X obj 261 306 spigot 1; #X msg 312 280 0; #X obj 547 89 loadbang; #X text 343 279 don't check , if argument in use.; #X text 135 254 found a float!; #X obj 547 124 list append $1; #X obj 261 89 t a b; #X obj 261 66 inlet; #X connect 1 1 6 0; #X connect 2 0 8 1; #X connect 2 1 9 1; #X connect 3 0 0 0; #X connect 4 0 8 0; #X connect 4 0 9 0; #X connect 5 0 2 0; #X connect 6 0 5 0; #X connect 6 0 17 0; #X connect 6 1 5 0; #X connect 6 1 17 0; #X connect 6 2 7 0; #X connect 6 2 17 0; #X connect 6 3 7 0; #X connect 6 3 17 0; #X connect 7 0 2 0; #X connect 8 0 0 0; #X connect 9 0 3 0; #X connect 10 0 11 0; #X connect 11 0 13 0; #X connect 12 0 10 0; #X connect 12 1 11 1; #X connect 13 0 14 0; #X connect 14 0 16 0; #X connect 16 0 2 0; #X connect 17 0 16 1; #X connect 18 0 21 0; #X connect 21 0 1 0; #X connect 22 0 12 0; #X connect 22 1 21 0; #X connect 23 0 22 0;
--- NEW FILE: contrario.pd --- #N canvas 51 325 320 289 10; #X obj 119 43 inlet; #X obj 40 42 inlet; #X obj 40 196 outlet; #X obj 40 73 t f b; #X obj 119 128 f $1; #X obj 40 165 expr $f2-$f1; #X text 112 203 1993-2004 by Karlheinz Essl; #X connect 0 0 4 0; #X connect 1 0 3 0; #X connect 3 0 5 0; #X connect 3 1 4 0; #X connect 4 0 5 1; #X connect 5 0 2 0;
--- NEW FILE: groove-rhythm.pd --- #N canvas 381 194 420 367 10; #X obj 244 166 loadbang; #X msg 244 195 1; #X obj 198 39 inlet; #X obj 244 224 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 285 39 inlet; #X obj 241 39 inlet; #X obj 44 314 outlet; #X obj 44 224 metro 500; #X obj 144 39 inlet; #X obj 118 167 * 1; #X obj 74 91 sel 1; #X text 141 320 1998 by Karlheinz Essl; #X obj 118 91 sel-princ $3; #X obj 144 138 f $1; #X obj 118 137 f; #X obj 44 251 t b b; #X obj 44 58 t a a; #X obj 44 35 inlet; #X obj 44 282 spigot 1; #X connect 0 0 1 0; #X connect 1 0 3 0; #X connect 2 0 3 0; #X connect 3 0 18 1; #X connect 4 0 12 2; #X connect 5 0 12 1; #X connect 7 0 15 0; #X connect 8 0 13 0; #X connect 9 0 7 1; #X connect 10 0 14 0; #X connect 12 0 14 0; #X connect 13 0 9 1; #X connect 14 0 9 0; #X connect 15 0 18 0; #X connect 15 1 12 0; #X connect 16 0 7 0; #X connect 16 1 10 0; #X connect 17 0 16 0; #X connect 18 0 6 0;
--- NEW FILE: first-shot.pd --- #N canvas 63 44 379 250 10; #X obj 73 54 inlet; #X obj 73 181 outlet; #X obj 73 118 spigot 1; #X obj 73 146 t a b; #X msg 124 90 0; #X obj 168 55 inlet; #X msg 168 90 1; #X connect 0 0 2 0; #X connect 2 0 3 0; #X connect 3 0 1 0; #X connect 3 1 4 0; #X connect 4 0 2 1; #X connect 5 0 6 0; #X connect 6 0 2 1;
--- NEW FILE: urne.pd --- #N canvas 260 152 601 696 10; #X obj 218 581 tabread $0-urn; #X obj 148 531 tabwrite $0-urn; #X obj 218 460 t a a; #X obj 148 390 - 1; #X obj 97 254 select 0; #X obj 148 503 tabread $0-urn; #X obj 359 335 outlet; #X obj 218 609 outlet; #X obj 286 23 inlet; #X obj 97 26 inlet; #X obj 286 77 f $1; #X obj 297 47 loadbang; #X obj 191 74 b; #X obj 218 437 random; #N canvas 689 538 264 239 count-down 0; #X obj 59 66 inlet; #X obj 127 60 inlet; #X obj 59 159 outlet; #X text 123 37 count from?; #X text 54 35 trigger; #X obj 59 96 bang; #X obj 85 131 - 1; #X obj 59 131 f; #X connect 0 0 5 0; #X connect 1 0 7 1; #X connect 5 0 7 0; #X connect 6 0 7 1; #X connect 7 0 6 0; #X connect 7 0 2 0; #X restore 97 221 pd count-down; #X text 355 361 bang if urn empty; #X text 193 631 urn selection; #X msg 218 343 seed $1; #X obj 218 147 f; #X obj 345 143 table $0-urn $1; #X obj 148 362 t a b; #X obj 97 49 route bang seed clear; #N canvas 549 246 251 276 gate_2 1; #X obj 68 18 inlet; #X obj 84 65 inlet; #X obj 68 212 outlet; #X obj 100 191 outlet; #X obj 68 92 f 0; #X obj 68 118 select 0 1; #X obj 68 41 b; #X connect 0 0 6 0; #X connect 1 0 4 1; #X connect 4 0 5 0; #X connect 5 0 2 0; #X connect 5 1 3 0; #X connect 6 0 4 0; #X restore 97 178 pd gate_2; #N canvas 0 0 450 300 init-urn-table 0; #N canvas 0 0 450 300 count 0; #X obj 158 193 + 1; #X obj 122 158 until; #X obj 122 194 f; #X obj 122 101 inlet; #X msg 167 157 0; #X obj 122 120 t a b; #X obj 122 224 outlet; #X connect 0 0 2 1; #X connect 1 0 2 0; #X connect 2 0 0 0; #X connect 2 0 6 0; #X connect 3 0 5 0; #X connect 4 0 2 1; #X connect 5 0 1 0; #X connect 5 1 4 0; #X restore 117 197 pd count; #X obj 117 218 t a a; #X obj 117 249 tabwrite $0-urn; #X obj 147 173 s $0-urn; #X msg 147 148 resize $1; #X obj 117 82 t a a; #X obj 117 49 inlet; #X obj 147 128 change; #X obj 147 105 int; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 1 1 2 1; #X connect 4 0 3 0; #X connect 5 0 0 0; #X connect 5 1 8 0; #X connect 6 0 5 0; #X connect 7 0 4 0; #X connect 8 0 7 0; #X restore 344 121 pd init-urn-table; #X obj 286 97 t b a a a; #X obj 97 278 t b b; #X msg 155 153 0; #X msg 170 176 1; #X connect 0 0 7 0; #X connect 2 0 0 0; #X connect 2 1 1 1; #X connect 3 0 5 0; #X connect 3 0 13 1; #X connect 4 0 25 0; #X connect 4 1 20 0; #X connect 5 0 1 0; #X connect 8 0 10 0; #X connect 9 0 21 0; #X connect 10 0 24 0; #X connect 11 0 10 0; #X connect 12 0 10 0; #X connect 13 0 2 0; #X connect 14 0 4 0; #X connect 17 0 13 0; #X connect 18 0 17 0; #X connect 20 0 3 0; #X connect 20 1 13 0; #X connect 21 0 22 0; #X connect 21 1 18 0; #X connect 21 2 12 0; #X connect 22 0 14 0; #X connect 22 1 6 0; #X connect 24 0 26 0; #X connect 24 1 14 1; #X connect 24 2 13 1; #X connect 24 3 23 0; #X connect 25 0 6 0; #X connect 25 1 27 0; #X connect 26 0 22 1; #X connect 27 0 22 1;
--- NEW FILE: first-bang.pd --- #N canvas 63 44 314 299 10; #X text 83 256 vs. 2; #X obj 101 212 outlet; #X text 84 272 1993-2002 by Karlheinz Essl; #X obj 39 235 outlet; #X obj 39 45 inlet; #X obj 74 45 inlet; #X obj 101 185 b; #X obj 39 91 f 0; #X msg 74 67 0; #X obj 39 147 sel 0; #X obj 39 168 t b b; #X msg 107 67 1; #X connect 4 0 7 0; #X connect 5 0 8 0; #X connect 6 0 1 0; #X connect 7 0 9 0; #X connect 8 0 7 1; #X connect 9 0 10 0; #X connect 9 1 6 0; #X connect 10 0 3 0; #X connect 10 1 11 0; #X connect 11 0 7 1;
--- NEW FILE: ratio.pd --- #N canvas 63 44 375 272 10; #X obj 132 39 inlet; #X obj 81 169 outlet; #X obj 133 170 outlet; #X obj 31 168 outlet; #X obj 31 39 inlet; #X obj 81 39 inlet; #X obj 81 72 multiple; #X obj 31 132 series; #X text 28 192 1994 by Karlheinz Essl; #X obj 81 92 t a a; #X connect 0 0 6 1; #X connect 4 0 7 0; #X connect 5 0 6 0; #X connect 6 0 9 0; #X connect 7 0 3 0; #X connect 7 1 2 0; #X connect 9 0 7 1; #X connect 9 1 1 0;
--- NEW FILE: anti-bis&osc.pd --- #N canvas 378 98 697 610 10; #X obj 93 117 int; #X obj 93 219 !=; #X obj 93 138 t a a a; #X obj 93 358 int; #X obj 93 302 &&; #X obj 123 412 outlet; #X obj 93 325 select 1 0; #X obj 175 392 outlet; #X obj 115 275 !=; #X obj 197 166 t f b; #X obj 198 191 f; #X obj 93 73 inlet; #X obj 167 144 t a a; #X obj 93 379 t a a; #X text 194 250 If input number is different from the two previously passed input numbers , then pass it along. Otherwise block it and bang the second outlet.; #X text 257 74 Filters out direct repetitions and when a number has occured the penultimate time.; #X obj 93 465 s $0-passed; #X obj 167 28 r $0-passed; #X connect 0 0 2 0; #X connect 1 0 4 0; #X connect 2 0 1 0; #X connect 2 1 8 0; #X connect 2 2 3 1; #X connect 3 0 13 0; #X connect 4 0 6 0; #X connect 6 0 3 0; #X connect 6 1 7 0; #X connect 8 0 4 1; #X connect 9 0 10 1; #X connect 9 1 10 0; #X connect 10 0 8 1; #X connect 11 0 0 0; #X connect 12 0 1 1; #X connect 12 1 9 0; #X connect 13 0 16 0; #X connect 13 1 5 0; #X connect 17 0 12 0;
--- NEW FILE: smooth-line-help.pd --- #N canvas 0 48 676 306 10; #X floatatom 157 108 5 0 0 1 smooth_interval_(ms) - -; #X obj 50 131 smooth-line 1000; #X floatatom 50 158 5 0 0 1 smooth_output - -; #X text 23 51 Interpolates smoothly between successive input values. ; #X text 23 19 smooth-line; #X msg 269 21 Envelopes; #X floatatom 50 97 5 0 0 0 - - -; #X msg 94 97 stop; #X text 33 197 1999 by Karlheinz Essl; #X text 34 217 Pd: 2006 Frank Barknecht; #X connect 0 0 1 1; #X connect 1 0 2 0; #X connect 6 0 1 0; #X connect 7 0 1 0;
--- NEW FILE: expr_scale.pd --- #N canvas 283 421 666 379 10; #X obj 120 199 expr ($f1-$f2)*($f4-$f5)/($f2-$f3)+$f4; #X obj 206 157 f $1; #X obj 356 159 f $4; #X obj 306 155 f $3; #X obj 256 155 f $2; #X obj 206 68 inlet; #X obj 256 68 inlet; #X obj 306 68 inlet; #X obj 356 68 inlet; #X obj 120 127 inlet; #X obj 120 240 outlet; #X text 464 97 ARGS; #X text 474 121 1: input_low_border; #X text 474 143 2: input_high_border; #X text 474 169 3: output_low_border; #X text 474 191 4: output_high_border; #X text 183 37 scale [from_low , from_hi] to [to_low , to_hi]; #X obj 112 38 loadbang; #X connect 0 0 10 0; #X connect 1 0 0 1; #X connect 2 0 0 4; #X connect 3 0 0 3; #X connect 4 0 0 2; #X connect 5 0 1 0; #X connect 6 0 4 0; #X connect 7 0 3 0; #X connect 8 0 2 0; #X connect 9 0 0 0; #X connect 17 0 1 0; #X connect 17 0 3 0; #X connect 17 0 4 0; #X connect 17 0 2 0;
--- NEW FILE: play.pd --- #N canvas 50 61 413 213 10; #X obj 44 50 inlet; #X obj 137 49 inlet; #X obj 90 49 inlet; #X obj 218 50 inlet; #X obj 236 87 r MIDI-channel; #X obj 44 80 makenote $1 $2; #X obj 44 146 noteout $3; #X text 176 164 1992-96 by Karlheinz Essl; #X text 91 166 vs. 2; #X connect 0 0 5 0; #X connect 1 0 5 2; #X connect 2 0 5 1; #X connect 3 0 6 2; #X connect 4 0 6 2; #X connect 5 0 6 0; #X connect 5 1 6 1;
--- NEW FILE: per2pass.pd --- #N canvas 63 44 315 207 10; #X obj 58 130 outlet; #X obj 58 95 expr 100 - ($f1*100); #X obj 58 21 inlet; #X text 81 152 1993 by Karlheinz Essl; #X obj 68 43 loadbang; #X obj 58 68 f $1; #X connect 1 0 0 0; #X connect 2 0 5 0; #X connect 4 0 5 0; #X connect 5 0 1 0;
--- NEW FILE: QT-PercPlayer.pd --- #N canvas 0 0 515 365 10; #N canvas 420 193 575 486 player 0; #X floatatom 151 58 0 0 0 0 - - -; #X obj 111 83 int 127; #X obj 30 83 int 60; #X obj 30 18 inlet; #X obj 30 259 pack 0 0 0; #N canvas 0 0 450 300 plip 0; #N canvas 0 0 528 439 blip 0; #X obj 153 236 osc~; #X obj 190 236 vline~; #X obj 189 262 *~; #X obj 172 285 *~; #X obj 153 26 inlet; #X obj 172 331 outlet~; #X msg 190 202 1 2 0 , 0 $1 3; #X obj 190 108 log; #X obj 190 85 pow 4; #X obj 190 151 * 1e+06; #X obj 190 130 pow -3; #X obj 190 174 * 2; #X obj 259 25 inlet; #X obj 265 87 pow -1; #X obj 265 112 * 1000; #X obj 153 56 t f f f; #X obj 265 136 log; #X obj 265 159 min 3; #X obj 173 307 *~; #X connect 0 0 3 0; #X connect 1 0 2 0; #X connect 1 0 2 1; #X connect 2 0 3 1; #X connect 3 0 18 0; #X connect 4 0 15 0; #X connect 6 0 1 0; #X connect 7 0 10 0; #X connect 8 0 7 0; #X connect 9 0 11 0; #X connect 10 0 9 0; #X connect 11 0 6 0; #X connect 12 0 11 1; #X connect 13 0 14 0; #X connect 14 0 16 0; #X connect 15 0 0 0; #X connect 15 1 8 0; #X connect 15 2 13 0; #X connect 16 0 17 0; #X connect 17 0 18 1; #X connect 18 0 5 0; #X restore 89 139 pd blip; #X obj 89 116 stripnote; #X obj 88 167 throw~ $0-blips; #X obj 89 92 inlet; #X connect 0 0 2 0; #X connect 1 0 0 0; #X connect 1 1 0 1; #X connect 3 0 1 0; #X restore 30 397 pd plip; #X obj 30 281 route 1 2 3 4; #N canvas 0 0 450 300 plip 0; #N canvas 0 0 528 439 blip 0; #X obj 153 236 osc~; #X obj 190 236 vline~; #X obj 189 262 *~; #X obj 172 285 *~; #X obj 153 26 inlet; #X obj 172 331 outlet~; #X msg 190 202 1 2 0 , 0 $1 3; #X obj 190 108 log; #X obj 190 85 pow 4; #X obj 190 151 * 1e+06; #X obj 190 130 pow -3; #X obj 190 174 * 2; #X obj 259 25 inlet; #X obj 265 87 pow -1; #X obj 265 112 * 1000; #X obj 153 56 t f f f; #X obj 265 136 log; #X obj 265 159 min 3; #X obj 173 307 *~; #X connect 0 0 3 0; #X connect 1 0 2 0; #X connect 1 0 2 1; #X connect 2 0 3 1; #X connect 3 0 18 0; #X connect 4 0 15 0; #X connect 6 0 1 0; #X connect 7 0 10 0; #X connect 8 0 7 0; #X connect 9 0 11 0; #X connect 10 0 9 0; #X connect 11 0 6 0; #X connect 12 0 11 1; #X connect 13 0 14 0; #X connect 14 0 16 0; #X connect 15 0 0 0; #X connect 15 1 8 0; #X connect 15 2 13 0; #X connect 16 0 17 0; #X connect 17 0 18 1; #X connect 18 0 5 0; #X restore 89 139 pd blip; #X obj 89 116 stripnote; #X obj 88 167 throw~ $0-blips; #X obj 89 92 inlet; #X connect 0 0 2 0; #X connect 1 0 0 0; #X connect 1 1 0 1; #X connect 3 0 1 0; #X restore 51 374 pd plip; #N canvas 0 0 450 300 plip 0; #N canvas 0 0 528 439 blip 0; #X obj 153 236 osc~; #X obj 190 236 vline~; #X obj 189 262 *~; #X obj 172 285 *~; #X obj 153 26 inlet; #X obj 172 331 outlet~; #X msg 190 202 1 2 0 , 0 $1 3; #X obj 190 108 log; #X obj 190 85 pow 4; #X obj 190 151 * 1e+06; #X obj 190 130 pow -3; #X obj 190 174 * 2; #X obj 259 25 inlet; #X obj 265 87 pow -1; #X obj 265 112 * 1000; #X obj 153 56 t f f f; #X obj 265 136 log; #X obj 265 159 min 3; #X obj 173 307 *~; #X connect 0 0 3 0; #X connect 1 0 2 0; #X connect 1 0 2 1; #X connect 2 0 3 1; #X connect 3 0 18 0; #X connect 4 0 15 0; #X connect 6 0 1 0; #X connect 7 0 10 0; #X connect 8 0 7 0; #X connect 9 0 11 0; #X connect 10 0 9 0; #X connect 11 0 6 0; #X connect 12 0 11 1; #X connect 13 0 14 0; #X connect 14 0 16 0; #X connect 15 0 0 0; #X connect 15 1 8 0; #X connect 15 2 13 0; #X connect 16 0 17 0; #X connect 17 0 18 1; #X connect 18 0 5 0; #X restore 89 139 pd blip; #X obj 89 116 stripnote; #X obj 88 167 throw~ $0-blips; #X obj 89 92 inlet; #X connect 0 0 2 0; #X connect 1 0 0 0; #X connect 1 1 0 1; #X connect 3 0 1 0; #X restore 73 346 pd plip; #N canvas 0 0 450 300 plip 0; #N canvas 0 0 528 439 blip 0; #X obj 153 236 osc~; #X obj 190 236 vline~; #X obj 189 262 *~; #X obj 172 285 *~; #X obj 153 26 inlet; #X obj 172 331 outlet~; #X msg 190 202 1 2 0 , 0 $1 3; #X obj 190 108 log; #X obj 190 85 pow 4; #X obj 190 151 * 1e+06; #X obj 190 130 pow -3; #X obj 190 174 * 2; #X obj 259 25 inlet; #X obj 265 87 pow -1; #X obj 265 112 * 1000; #X obj 153 56 t f f f; #X obj 265 136 log; #X obj 265 159 min 3; #X obj 173 307 *~; #X connect 0 0 3 0; #X connect 1 0 2 0; #X connect 1 0 2 1; #X connect 2 0 3 1; #X connect 3 0 18 0; #X connect 4 0 15 0; #X connect 6 0 1 0; #X connect 7 0 10 0; #X connect 8 0 7 0; #X connect 9 0 11 0; #X connect 10 0 9 0; #X connect 11 0 6 0; #X connect 12 0 11 1; #X connect 13 0 14 0; #X connect 14 0 16 0; #X connect 15 0 0 0; #X connect 15 1 8 0; #X connect 15 2 13 0; #X connect 16 0 17 0; #X connect 17 0 18 1; #X connect 18 0 5 0; #X restore 89 139 pd blip; #X obj 89 116 stripnote; #X obj 88 167 throw~ $0-blips; #X obj 89 92 inlet; #X connect 0 0 2 0; #X connect 1 0 0 0; #X connect 1 1 0 1; #X connect 3 0 1 0; #X restore 94 321 pd plip; #X obj 30 178 mtof; #X obj 111 173 / 127; #X obj 30 48 t a b; #X obj 30 200 makenote 0.3 30; #X obj 30 232 poly 4; #X obj 111 19 inlet; #X obj 184 253 print; #X connect 0 0 1 1; #X connect 1 0 11 0; #X connect 2 0 10 0; #X connect 3 0 12 0; #X connect 4 0 6 0; #X connect 6 0 5 0; #X connect 6 1 7 0; #X connect 6 2 8 0; #X connect 6 3 9 0; #X connect 10 0 13 0; #X connect 11 0 13 1; #X connect 12 0 2 0; #X connect 12 1 1 0; #X connect 13 0 14 0; #X connect 13 1 14 1; #X connect 14 0 4 0; #X connect 14 1 4 1; #X connect 14 2 4 2; #X connect 15 0 1 0; #X restore 206 140 pd player; #X obj 206 81 inlet; #X obj 80 195 dac~; #X obj 79 80 catch~ $0-blips; #X obj 79 164 *~ 0; #X obj 105 120 hsl 64 15 0 1 0 0 empty empty vol 20 8 0 8 -262144 -1 -1 2500 1; #X obj 176 122 tgl 10 0 $0-dsp $0-dsp-r empty 0 -6 0 8 -262144 -1 -1 0 1; #N canvas 0 0 450 300 dsp 0; #X obj 97 77 r pd; #X obj 96 107 route dsp; #X obj 90 174 r $0-dsp; #X obj 95 223 s pd; #X msg 92 198 dsp $1; #X msg 95 127 set $1; #X obj 92 150 s $0-dsp-r; #X connect 0 0 1 0; #X connect 1 0 5 0; #X connect 2 0 4 0; #X connect 4 0 3 0; #X connect 5 0 6 0; #X restore 370 144 pd dsp; #X obj 264 79 inlet; #X connect 1 0 0 0; #X connect 3 0 4 0; #X connect 4 0 2 0; #X connect 4 0 2 1; #X connect 5 0 4 1; #X connect 8 0 0 1; #X coords 0 -1 1 1 90 40 1 100 100;
--- NEW FILE: row-modus-help.pd --- #N canvas 1 48 790 520 10; #X text 19 30 row-modus; #X text 30 144 3 ... retro-inversion; #X text 30 130 2 ... inversion; #X text 30 116 1 ... retrograde; #X text 30 101 0 ... prime; #X text 19 388 1994 by Karlheinz Essl; #X text 140 157 row of Anton Webern , op.28; #X msg 70 208 10 9 0 11 3 4 1 2 6 5 8 7; #X msg 70 349; #X obj 70 319 show; #X obj 70 288 row-modus; #X obj 70 179 loadbang; #X text 145 318 normalized row; #X floatatom 297 246 3 0 0 1 modus - -; #X text 19 57 Puts a row (sent to the left inlet) into a chosen modus specified in the right inlet and output it as a "normalized" row (i.e. starting with pitch class c).; #X obj 105 320 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X msg 328 23 Dodecaphonics; #X text 19 402 Thanks to Charles Baker for his "matrix" object; #N canvas 568 179 568 488 row-modus 0; #X obj 234 337 list split 1; #X symbolatom 144 142 16 0 0 0 - - -; #X obj 144 127 hradio 15 1 0 4 empty empty row_modus 0 -6 0 8 -262144 -1 -1 2; #X obj 234 364 outlet; #X obj 144 60 inlet; #X obj 145 169 select 0 1 2 3; #X msg 234 227 0 prime; #X msg 234 251 1 retrograde; #X msg 234 276 2 inversion; #X msg 234 301 3 retro-inversion; #X connect 0 0 3 0; #X connect 0 1 1 0; #X connect 2 0 5 0; #X connect 4 0 2 0; #X connect 5 0 6 0; #X connect 5 1 7 0; #X connect 5 2 8 0; #X connect 5 3 9 0; #X connect 6 0 0 0; #X connect 7 0 0 0; #X connect 8 0 0 0; #X connect 9 0 0 0; #X coords 0 -1 1 1 125 60 1 140 100; #X restore 297 180 pd row-modus; #X connect 7 0 10 0; #X connect 9 0 8 0; #X connect 10 0 9 0; #X connect 11 0 7 0; #X connect 13 0 10 1; #X connect 15 0 9 1; #X connect 18 0 13 0;
--- NEW FILE: random-ramp-urn-help.pd --- #N canvas 221 33 736 547 10; #X text 146 13 Generates randomly fluctuating envelope shapes of a given dynamic scale (defined by a min and a max velocity and a certain number of values) within a time scale (defined by a min and a max ramp time and a certain number of values). A rhythm bang set to the left inlet outputs a velocity value. A stop message sent to the same inlet will stop the whole process.; #X text 408 329 randomly chosen ramp time; #X floatatom 367 330 5 0 0 1 - - -; #X text 277 360 randomly chosen velocity destination; #X floatatom 243 360 4 0 0 1 - - -; #X floatatom 265 268 4 0 0 2 nr._of_values - -; #X floatatom 432 214 0 0 0 2 min_ramp_time - -; #X floatatom 432 247 0 0 0 2 max_ramp_time - -; #X floatatom 265 240 4 0 0 2 max_velocity - -; #X floatatom 265 210 4 0 0 2 min_veloc. - -; #X obj 120 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 120 401 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144 -1 -1 0 1; #X text 262 177 dynamic scale - - -; #X text 427 177 ramp durations - - -; #X floatatom 120 336 4 0 0 1 velocity - -; #X text 501 518 1994 by Karlheinz Essl; #X obj 39 239 sel 0; #X msg 39 265 stop; #N canvas 380 246 576 346 musical 0; #X floatatom 140 224 0 0 0 0 - - -; #X floatatom 44 224 0 0 0 0 - - -; #X obj 44 140 brown-rhythm 50 1000 12 0.2; #X obj 44 188 brown-melody 21 104 0.25; #X msg 251 140 stop; #X obj 251 112 sel 0; #X obj 44 66 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X text 74 66 start stop; #X obj 44 252 play2 127 500 1 1; #X text 20 294 1994 by Karlheinz Essl; #X text 89 227 note; #X text 185 227 velocity; #X obj 44 162 t a a; #X obj 251 186 random-ramp-urn 10 127 5 250 2000 12; #X text 20 33 This is a very simple musical example for using the random-ramp-urn object:; #X connect 0 0 8 1; #X connect 1 0 8 0; #X connect 2 0 12 0; #X connect 3 0 1 0; #X connect 4 0 13 0; #X connect 5 0 4 0; #X connect 6 0 2 0; #X connect 6 0 5 0; #X connect 12 0 3 0; #X connect 12 1 13 0; #X connect 13 0 0 0; #X restore 438 405 pd musical; #X text 153 191 start stop; #X obj 120 239 metro 150; #X obj 112 401 vsl 8 128 0 127 0 0 empty empty min_vel -30 -8 0 8 -262144 -1 -1 0 1; #X obj 135 401 vsl 8 128 0 127 0 0 empty empty max_vel 0 -8 0 8 -262144 -1 -1 0 1; #X floatatom 432 280 4 0 0 2 nr._of_values - -; #X msg 210 141 random-ramp; #X text 144 109 As opposed to "random-ramp" , this version performs a repetition check of the randomly chosen paramters.; #X text 145 142 See also:; #X obj 120 300 random-ramp-urn 10 127 5 250 2000 12; #X text 15 29 random-ramp-urn; #X connect 5 0 27 3; #X connect 6 0 27 4; #X connect 7 0 27 5; #X connect 8 0 22 0; #X connect 8 0 27 2; #X connect 9 0 21 0; #X connect 9 0 27 1; #X connect 10 0 16 0; #X connect 10 0 20 0; #X connect 14 0 11 0; #X connect 16 0 17 0; #X connect 17 0 27 0; #X connect 20 0 27 0; #X connect 23 0 27 6; #X connect 27 0 14 0; #X connect 27 1 4 0; #X connect 27 2 2 0;
--- NEW FILE: row-modus.pd --- #N canvas 404 174 284 287 10; #X obj 58 217 outlet; #N canvas 475 256 540 340 forms 1; #X obj 183 219 outlet; #X obj 183 86 route 0 1 2 3; #X obj 183 57 inlet; #X obj 183 173 int 0; #X obj 241 172 int 0; #X obj 284 172 int 1; #X obj 241 218 outlet; #X obj 137 173 int 1; #X obj 349 79 hradio 15 1 0 4 empty empty row_modus 0 -6 0 8 -262144 -1 -1 0; #X obj 356 108 && 2; #X connect 1 0 3 0; #X connect 1 0 4 0; #X connect 1 1 7 0; #X connect 1 1 4 0; #X connect 1 2 3 0; #X connect 1 2 5 0; #X connect 1 3 7 0; #X connect 1 3 5 0; #X connect 2 0 1 0; #X connect 3 0 0 0; #X connect 4 0 6 0; #X connect 5 0 6 0; #X connect 7 0 0 0; #X connect 8 0 9 0; #X restore 150 127 pd forms; #X obj 196 155 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 150 155 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X obj 58 184 matrix12 0; #X obj 58 61 inlet; #X obj 129 61 inlet; #X obj 129 90 t b f; #X obj 58 90 t b l; #X text 122 219 1994-97 by Karlheinz Essl; #X connect 1 0 3 0; #X connect 1 1 2 0; #X connect 2 0 4 3; #X connect 3 0 4 2; #X connect 4 0 0 0; #X connect 5 0 8 0; #X connect 6 0 7 0; #X connect 7 0 4 0; #X connect 7 1 1 0; #X connect 8 0 4 0; #X connect 8 1 4 0;
--- NEW FILE: note2cents.pd --- #N canvas 50 61 238 271 10; #X obj 41 188 outlet; #X obj 96 188 outlet; #X obj 41 43 inlet; #X obj 41 90 int; #X obj 96 90 * 100; #X obj 96 121 round; #X obj 96 153 % 100; #X text 39 215 1994 by Karlheinz Essl; #X obj 41 64 t a a; #X connect 2 0 8 0; #X connect 3 0 0 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 1 0; #X connect 8 0 3 0; #X connect 8 1 4 0;
--- NEW FILE: pitch2note.pd --- #N canvas 49 106 299 349 10; #X obj 51 39 inlet; #X obj 116 39 inlet; #X obj 116 89 * 12; #X text 36 286 1993-2004 by Karlheinz Essl; #X text 36 303 vs. 1.1.1; #X obj 51 150 +; #X obj 51 211 outlet; #X msg 128 230 pitch higher than 127!; #X obj 128 204 sel 1; #X obj 128 176 > 127; #X obj 85 120 int; #X floatatom 136 116 0 0 0 0 - - -; #X obj 128 254 print :pitch2note; #X obj 116 63 i $1; #X obj 51 89 t f b b; #X obj 51 173 t a a; #X connect 0 0 14 0; #X connect 1 0 13 0; #X connect 2 0 10 1; #X connect 2 0 11 0; #X connect 5 0 15 0; #X connect 7 0 12 0; #X connect 8 0 7 0; #X connect 9 0 8 0; #X connect 10 0 5 1; #X connect 13 0 2 0; #X connect 14 0 5 0; #X connect 14 1 10 0; #X connect 14 2 13 0; #X connect 15 0 6 0; #X connect 15 1 9 0;