├── ctrl ├── ccursor.pd ├── numlock.pd ├── cb.pd ├── switcher~.pd ├── nems.pd ├── capslock.pd ├── switcher.pd ├── ispigot.pd ├── router.pd ├── keydrum.pd ├── switcher~-help.pd ├── ispigot~.pd ├── keyonchg.pd ├── cline.pd ├── monos.pd ├── keyonoff.pd ├── editmode-help.pd ├── cnum.pd ├── input-help.pd ├── inputd-help.pd ├── inputn-help.pd ├── keyrow.pd ├── c-help.pd ├── capslock-help.pd ├── keynum.pd ├── editmode.pd ├── kbdm.pd └── mspigot.pd ├── math ├── sq~.pd ├── cta.pd ├── cta~.pd ├── minv.pd ├── reciprocal~.pd ├── kinv.pd ├── kinv~.pd ├── reciprocal.pd ├── mrange.pd ├── round-help.pd ├── atc.pd ├── atc~.pd ├── ctr.pd ├── ctr~.pd ├── atr.pd ├── atr~.pd ├── transposer.pd ├── rtom.pd ├── rrangef.pd ├── rrange.pd ├── round.pd ├── rtr.pd ├── runningmax~.pd ├── interpolate.pd ├── maybe-help.pd ├── maybe.pd ├── num.pd └── coin.pd ├── utils ├── interval.pd ├── limit~.pd ├── *+.pd ├── *+~.pd ├── autosend.pd ├── span~.pd ├── sym.pd ├── qtabwrite.pd ├── interval-help.pd ├── spacesym.pd ├── emptysymbol.pd ├── chars.pd ├── ssend~.pd ├── icolor.pd ├── sreceive~.pd ├── e.pd ├── marquee.pd ├── sym-help.pd ├── emptysymbol-help.pd ├── list-replacer.pd ├── mp3conv.pd ├── qtimer.pd ├── lb-help.pd ├── quote.pd ├── colors-help.pd ├── colors.pd ├── hue_to_rgb.pd ├── list-find-1.pd ├── rporta~.pd ├── lb.pd ├── char-sym.pd ├── itimer.pd ├── list-without.pd └── porta~.pd ├── fx ├── delay~.pd ├── sqtremolo~.pd ├── bitcrush~.pd ├── dist1~.pd ├── chebys~.pd ├── pingpong~.pd ├── rateshift2~.pd ├── gater~.pd ├── autocap~.pd ├── phaser-old~.pd ├── sdly~.pd ├── ifilter~.pd ├── stautocap~.pd ├── pitchshifter~-help.pd ├── sidechain~.pd ├── mcomb~.pd ├── soft~.pd ├── bitflip~.pd ├── flanger~.pd ├── skip~.pd ├── dist2~.pd ├── icomb~.pd ├── imoog~.pd ├── ilattice~.pd ├── phaser~.pd ├── rateshift~.pd ├── chorus~.pd ├── isvf~.pd └── pitchshifter~.pd ├── gen ├── sine~.pd ├── noisef~.pd ├── saw~.pd ├── recsnd~.pd ├── pm~.pd ├── playsf~.pd ├── sndm~.pd ├── recp~.pd ├── sndl~.pd ├── sndf~.pd ├── pulse~.pd ├── sndd~.pd ├── sndcf~.pd ├── pulse~-help.pd ├── timestretch~.pd ├── snd~-help.pd ├── tri~-help.pd ├── sndp~-help.pd ├── tri~.pd ├── sndp~.pd ├── analog~.pd ├── sndf~-help.pd ├── sndcm~.pd ├── rec~.pd └── sndm~-help.pd ├── seq ├── aline.pd ├── aline~.pd ├── dust.pd ├── ometro.pd ├── edger~.pd ├── hashread.pd ├── rchoice-help.pd ├── rchoice.pd ├── unmap.pd ├── beat~.pd ├── stack-help.pd ├── bpma.pd ├── hashwrite.pd ├── aline-help.pd ├── bpmm2.pd ├── aline~-help.pd ├── srush.pd ├── burst.pd ├── queue.pd ├── stack.pd ├── seqfill.pd ├── map.pd ├── pmap.pd ├── taptempo.pd ├── rmap-help.pd ├── iadsr~.pd ├── remap.pd └── ft.pd ├── guis ├── tview.pd ├── cview.pd ├── nview.pd ├── spectrum~-help.pd ├── vsig~.pd ├── vsig~-help.pd ├── nview-help.pd ├── cview-help.pd ├── ifiddle~.pd ├── lview-help.pd ├── lview.pd ├── siga~.pd ├── cpuload-help.pd ├── cpuload.pd ├── siga~-help.pd ├── view-help.pd ├── scroll~-help.pd ├── view~-help.pd ├── ifiddle~-help.pd ├── scroll~.pd └── spectrum~.pd └── synths ├── hoover~.pd ├── kick3~.pd ├── snare1~.pd ├── snare2~.pd ├── kick1~.pd └── kick2~.pd /ctrl/ccursor.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1680 29 1600 871 10; 2 | -------------------------------------------------------------------------------- /math/sq~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 260 227 inlet~; 3 | #X obj 245 259 *~; 4 | #X obj 245 278 outlet~; 5 | #X connect 0 0 1 1; 6 | #X connect 0 0 1 0; 7 | #X connect 1 0 2 0; 8 | -------------------------------------------------------------------------------- /math/cta.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 39 78 * 2; 3 | #X obj 39 97 - 1; 4 | #X obj 39 116 outlet; 5 | #X obj 39 59 inlet; 6 | #X connect 0 0 1 0; 7 | #X connect 1 0 2 0; 8 | #X connect 3 0 0 0; 9 | -------------------------------------------------------------------------------- /math/cta~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 39 59 inlet~; 3 | #X obj 39 116 outlet~; 4 | #X obj 39 78 *~ 2; 5 | #X obj 39 97 -~ 1; 6 | #X connect 0 0 2 0; 7 | #X connect 2 0 3 0; 8 | #X connect 3 0 1 0; 9 | -------------------------------------------------------------------------------- /math/minv.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 852 10; 2 | #X obj 300 112 inlet; 3 | #X obj 300 131 - 127; 4 | #X obj 300 150 abs; 5 | #X obj 300 169 outlet; 6 | #X connect 0 0 1 0; 7 | #X connect 1 0 2 0; 8 | #X connect 2 0 3 0; 9 | -------------------------------------------------------------------------------- /math/reciprocal~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1680 29 1600 871 10; 2 | #X obj 289 176 inlet~; 3 | #X obj 274 157 sig~ 1; 4 | #X obj 274 195 /~; 5 | #X obj 274 214 outlet~; 6 | #X connect 0 0 2 1; 7 | #X connect 1 0 2 0; 8 | #X connect 2 0 3 0; 9 | -------------------------------------------------------------------------------- /utils/interval.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 129 77 inlet; 3 | #X obj 129 96 t b b; 4 | #X obj 123 125 realtime; 5 | #X obj 123 144 outlet; 6 | #X connect 0 0 1 0; 7 | #X connect 1 0 2 0; 8 | #X connect 1 1 2 1; 9 | #X connect 2 0 3 0; 10 | -------------------------------------------------------------------------------- /math/kinv.pd: -------------------------------------------------------------------------------- 1 | #N canvas 782 234 450 300 10; 2 | #X obj 69 44 inlet; 3 | #X obj 69 65 * -1; 4 | #X obj 69 86 + 1; 5 | #X obj 69 107 outlet; 6 | #X text 129 77 changes 0 to 1 and 1 to 0; 7 | #X connect 0 0 1 0; 8 | #X connect 1 0 2 0; 9 | #X connect 2 0 3 0; 10 | -------------------------------------------------------------------------------- /math/kinv~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 782 234 800 849 10; 2 | #X text 129 77 changes 0 to 1 and 1 to 0; 3 | #X obj 69 44 inlet~; 4 | #X obj 69 65 *~ -1; 5 | #X obj 69 86 +~ 1; 6 | #X obj 69 107 outlet~; 7 | #X connect 1 0 2 0; 8 | #X connect 2 0 3 0; 9 | #X connect 3 0 4 0; 10 | -------------------------------------------------------------------------------- /fx/delay~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 474 394 454 307 12; 2 | #X obj 81 123 delwrite~ \$0-x \$1; 3 | #X obj 83 77 inlet~; 4 | #X obj 267 121 delread~ \$0-x \$1; 5 | #X obj 268 78 inlet; 6 | #X obj 269 183 outlet~; 7 | #X connect 1 0 0 0; 8 | #X connect 2 0 4 0; 9 | #X connect 3 0 2 0; 10 | -------------------------------------------------------------------------------- /math/reciprocal.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1680 29 1600 871 10; 2 | #X obj 274 126 inlet; 3 | #X obj 274 214 outlet; 4 | #X obj 274 195 /; 5 | #X obj 274 145 t b f; 6 | #X msg 274 164 1; 7 | #X connect 0 0 3 0; 8 | #X connect 2 0 1 0; 9 | #X connect 3 0 4 0; 10 | #X connect 3 1 2 1; 11 | #X connect 4 0 2 0; 12 | -------------------------------------------------------------------------------- /utils/limit~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 1920 1050 10; 2 | #X obj 194 33 inlet~; 3 | #X obj 193 86 z~ 64; 4 | #X obj 229 86 limiter~; 5 | #X obj 214 125 *~; 6 | #X obj 214 147 outlet~; 7 | #X connect 0 0 2 0; 8 | #X connect 0 0 1 0; 9 | #X connect 1 0 3 0; 10 | #X connect 2 0 3 1; 11 | #X connect 3 0 4 0; 12 | -------------------------------------------------------------------------------- /utils/*+.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 2560 1568 10; 2 | #X obj 76 40 inlet; 3 | #X obj 112 40 inlet; 4 | #X obj 40 59 * \$1; 5 | #X obj 40 78 + \$2; 6 | #X obj 40 40 inlet; 7 | #X obj 40 97 outlet; 8 | #X connect 0 0 2 1; 9 | #X connect 1 0 3 1; 10 | #X connect 2 0 3 0; 11 | #X connect 3 0 5 0; 12 | #X connect 4 0 2 0; 13 | -------------------------------------------------------------------------------- /gen/sine~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1920 1048 10; 2 | #X obj 40 40 inlet~; 3 | #X obj 90 40 inlet~; 4 | #X obj 40 110 outlet~; 5 | #X obj 40 87 cos~; 6 | #X obj 40 66 phasor~; 7 | #X obj 40 16 lb \$1; 8 | #X connect 0 0 4 0; 9 | #X connect 1 0 3 0; 10 | #X connect 3 0 2 0; 11 | #X connect 4 0 3 0; 12 | #X connect 5 0 0 0; 13 | -------------------------------------------------------------------------------- /utils/*+~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 40 40 inlet~; 3 | #X obj 40 59 *~ \$1; 4 | #X obj 40 78 +~ \$2; 5 | #X obj 40 97 outlet~; 6 | #X obj 82 40 inlet; 7 | #X obj 118 40 inlet; 8 | #X connect 0 0 1 0; 9 | #X connect 1 0 2 0; 10 | #X connect 2 0 3 0; 11 | #X connect 4 0 1 1; 12 | #X connect 5 0 2 1; 13 | -------------------------------------------------------------------------------- /seq/aline.pd: -------------------------------------------------------------------------------- 1 | #N canvas 2 32 1600 870 10; 2 | #X obj 172 60 inlet; 3 | #X obj 231 56 inlet; 4 | #X obj 244 107 pack 0 \$1; 5 | #X obj 212 145 line; 6 | #X obj 212 164 outlet; 7 | #X obj 172 79 route float; 8 | #X connect 0 0 5 0; 9 | #X connect 1 0 2 1; 10 | #X connect 2 0 3 0; 11 | #X connect 3 0 4 0; 12 | #X connect 5 0 2 0; 13 | #X connect 5 1 3 0; 14 | -------------------------------------------------------------------------------- /seq/aline~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 153 58 inlet; 3 | #X obj 174 128 line~; 4 | #X obj 174 147 outlet~; 5 | #X obj 225 90 inlet; 6 | #X obj 174 109 pack 0 \$1; 7 | #X obj 153 77 route float; 8 | #X connect 0 0 5 0; 9 | #X connect 1 0 2 0; 10 | #X connect 3 0 4 1; 11 | #X connect 4 0 1 0; 12 | #X connect 5 0 4 0; 13 | #X connect 5 1 1 0; 14 | -------------------------------------------------------------------------------- /utils/autosend.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 800 410 10; 2 | #X obj 96 62 inlet; 3 | #X obj 96 170 s; 4 | #X msg 96 151 bang; 5 | #X obj 130 100 prepent set; 6 | #X obj 96 81 list split 1; 7 | #X obj 96 119 t b a; 8 | #X connect 0 0 4 0; 9 | #X connect 2 0 1 0; 10 | #X connect 3 0 2 0; 11 | #X connect 4 0 5 0; 12 | #X connect 4 1 3 0; 13 | #X connect 5 0 2 0; 14 | #X connect 5 1 1 1; 15 | -------------------------------------------------------------------------------- /utils/span~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 40 40 inlet~; 3 | #X obj 97 40 inlet; 4 | #X obj 59 80 pan~; 5 | #X obj 113 69 lb \$1; 6 | #X obj 25 119 outlet~; 7 | #X obj 85 119 outlet~; 8 | #X text 185 79 span~ - simple pan (pan with arg); 9 | #X connect 0 0 2 0; 10 | #X connect 1 0 2 1; 11 | #X connect 2 0 4 0; 12 | #X connect 2 1 5 0; 13 | #X connect 3 0 2 1; 14 | -------------------------------------------------------------------------------- /ctrl/numlock.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 871 10; 2 | #X obj 130 100 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 3 | 1; 4 | #X obj 130 138 outlet; 5 | #X obj 18 103 inlet; 6 | #X obj 128 75 keyonchg Num_Lock; 7 | #X obj 177 122 s numlock; 8 | #X connect 0 0 1 0; 9 | #X connect 0 0 4 0; 10 | #X connect 2 0 0 0; 11 | #X connect 3 0 0 0; 12 | #X coords 0 -1 1 1 65 15 1 80 100; 13 | -------------------------------------------------------------------------------- /utils/sym.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 40 2 inlet; 3 | #X obj 55 40 loadbang; 4 | #X obj 40 97 outlet; 5 | #X msg 55 59 symbol; 6 | #X obj 40 78 l2s; 7 | #X obj 40 21 list; 8 | #X text 181 27 converts a list of characters to a symbol. see also: 9 | chars; 10 | #X connect 0 0 5 0; 11 | #X connect 1 0 3 0; 12 | #X connect 3 0 4 1; 13 | #X connect 4 0 2 0; 14 | #X connect 5 0 4 0; 15 | -------------------------------------------------------------------------------- /fx/sqtremolo~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 522 194 450 300 10; 2 | #X obj 228 54 pulse~; 3 | #X obj 228 74 +~ 1; 4 | #X obj 232 97 /~ 2; 5 | #X obj 177 25 inlet~; 6 | #X obj 220 25 inlet~; 7 | #X obj 263 25 inlet; 8 | #X obj 177 102 *~; 9 | #X obj 177 124 outlet~; 10 | #X connect 0 0 1 0; 11 | #X connect 1 0 2 0; 12 | #X connect 2 0 6 1; 13 | #X connect 3 0 6 0; 14 | #X connect 4 0 0 0; 15 | #X connect 5 0 0 1; 16 | #X connect 6 0 7 0; 17 | -------------------------------------------------------------------------------- /ctrl/cb.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 2560 1566 10; 2 | #X obj 136 29 bendin \$1; 3 | #X obj 136 48 / 129; 4 | #X obj 136 167 outlet; 5 | #X obj 136 102 vsl 15 20 0 127 0 0 empty empty empty 0 -9 0 10 #9c00fc #000000 #000000 0 1; 6 | #X floatatom 192 75 5 0 0 0 - - - 0; 7 | #X obj 145 137 mrange \$1; 8 | #X connect 0 0 1 0; 9 | #X connect 1 0 3 0; 10 | #X connect 1 0 4 0; 11 | #X connect 3 0 2 0; 12 | #X coords 0 -1 1 1 51 25 1 100 100; 13 | -------------------------------------------------------------------------------- /fx/bitcrush~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1680 29 1600 871 10; 2 | #X obj 62 42 inlet~; 3 | #X obj 63 121 samphold~; 4 | #X obj 114 97 phasor~; 5 | #X obj 131 46 inlet; 6 | #X obj 63 149 outlet~; 7 | #X floatatom 127 70 5 0 0 0 - - -; 8 | #X obj 202 4 lb \$1 44099; 9 | #X connect 0 0 1 0; 10 | #X connect 1 0 4 0; 11 | #X connect 2 0 1 1; 12 | #X connect 3 0 5 0; 13 | #X connect 5 0 2 0; 14 | #X connect 6 0 5 0; 15 | #X coords 0 -1 1 1 89 16 1 70 70; 16 | -------------------------------------------------------------------------------- /fx/dist1~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 32 1920 1048 10; 2 | #X obj 216 59 inlet~; 3 | #X obj 216 231 outlet~; 4 | #X obj 216 212 clip~ -1 1; 5 | #X obj 258 59 inlet; 6 | #X obj 216 193 *~ 1; 7 | #X floatatom 211 111 2 1 99 0 - - -; 8 | #X obj 294 59 lb \$1 1; 9 | #X connect 0 0 4 0; 10 | #X connect 2 0 1 0; 11 | #X connect 3 0 5 0; 12 | #X connect 4 0 2 0; 13 | #X connect 5 0 4 1; 14 | #X connect 6 0 5 0; 15 | #X coords 0 -1 1 1 72 16 1 153 111; 16 | -------------------------------------------------------------------------------- /gen/noisef~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 32 1920 1048 10; 2 | #X obj 9 42 noise~; 3 | #X obj 9 126 samphold~; 4 | #X obj 9 149 outlet~; 5 | #X obj 60 102 phasor~ \$1; 6 | #X obj 60 42 inlet~; 7 | #X obj 60 73 max~ 0; 8 | #X text 146 57 White noise at the provided frequency.; 9 | #X obj 60 13 lb \$1; 10 | #X connect 0 0 1 0; 11 | #X connect 1 0 2 0; 12 | #X connect 3 0 1 1; 13 | #X connect 4 0 5 0; 14 | #X connect 5 0 3 0; 15 | #X connect 7 0 4 0; 16 | -------------------------------------------------------------------------------- /utils/qtabwrite.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X obj 40 40 inlet; 3 | #X obj 37 157 tabwrite \$1; 4 | #X obj 40 59 route list; 5 | #X obj 76 40 r qt-\$1; 6 | #X obj 40 97 unpack f f; 7 | #X msg 40 78 \$2 \$1; 8 | #X obj 124 40 r qt; 9 | #X connect 0 0 2 0; 10 | #X connect 2 0 5 0; 11 | #X connect 2 1 1 0; 12 | #X connect 3 0 2 0; 13 | #X connect 4 0 1 0; 14 | #X connect 4 1 1 1; 15 | #X connect 5 0 4 0; 16 | #X connect 6 0 2 0; 17 | -------------------------------------------------------------------------------- /guis/tview.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 2560 1566 12; 2 | #X obj 100 100 view; 3 | #X obj 95 58 inlet; 4 | #X obj 225 52 inlet; 5 | #X obj 100 191 outlet; 6 | #X obj 302 122 loadbang; 7 | #X msg 302 147 [tview] is deprecated - please use [view] instead.; 8 | #X obj 302 172 print tview; 9 | #X connect 0 0 3 0; 10 | #X connect 1 0 0 0; 11 | #X connect 2 0 0 1; 12 | #X connect 4 0 5 0; 13 | #X connect 5 0 6 0; 14 | #X coords 0 -1 1 1 150 86 1 100 100; 15 | -------------------------------------------------------------------------------- /math/mrange.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1680 29 2560 1566 10; 2 | #X obj 181 21 inlet; 3 | #X obj 181 40 / 127; 4 | #X obj 202 134 outlet; 5 | #X obj 202 115 *; 6 | #X obj 217 21 inlet; 7 | #X obj 217 40 init \$1; 8 | #X obj 217 59 sel 0; 9 | #X msg 217 78 1; 10 | #X connect 0 0 1 0; 11 | #X connect 1 0 3 0; 12 | #X connect 3 0 2 0; 13 | #X connect 4 0 5 0; 14 | #X connect 5 0 6 0; 15 | #X connect 6 0 7 0; 16 | #X connect 6 1 3 1; 17 | #X connect 7 0 3 1; 18 | -------------------------------------------------------------------------------- /math/round-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 67 192 round; 3 | #X obj 70 157 hsl 128 15 -2 2 0 0 empty empty empty -2 -8 0 10 -262144 4 | -1 -1 7400 1; 5 | #X floatatom 67 174 5 0 0 0 - - -; 6 | #X floatatom 67 211 5 0 0 0 - - -; 7 | #X text 317 50 round - rounds a float to the nearest integer.; 8 | #X text 323 96 pretty self-explanatory if you ask me.; 9 | #X connect 0 0 3 0; 10 | #X connect 1 0 2 0; 11 | #X connect 2 0 0 0; 12 | -------------------------------------------------------------------------------- /guis/cview.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 59 1600 817 10; 2 | #X floatatom 100 100 3 0 0 0 - - -, f 3; 3 | #X obj 114 50 ctlin; 4 | #X floatatom 120 100 3 0 0 0 - - -, f 3; 5 | #X floatatom 140 100 3 0 0 0 - - -, f 3; 6 | #X obj 64 138 outlet; 7 | #X obj 114 138 outlet; 8 | #X obj 164 138 outlet; 9 | #X connect 0 0 4 0; 10 | #X connect 1 0 0 0; 11 | #X connect 1 1 2 0; 12 | #X connect 1 2 3 0; 13 | #X connect 2 0 5 0; 14 | #X connect 3 0 6 0; 15 | #X coords 0 -1 1 1 60 31 1 100 86; 16 | -------------------------------------------------------------------------------- /guis/nview.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 59 1600 817 10; 2 | #X floatatom 100 100 3 0 0 0 - - -, f 3; 3 | #X floatatom 120 100 3 0 0 0 - - -, f 3; 4 | #X floatatom 140 100 3 0 0 0 - - -, f 3; 5 | #X obj 64 138 outlet; 6 | #X obj 114 138 outlet; 7 | #X obj 164 138 outlet; 8 | #X obj 114 50 notein; 9 | #X connect 0 0 3 0; 10 | #X connect 1 0 4 0; 11 | #X connect 2 0 5 0; 12 | #X connect 6 0 0 0; 13 | #X connect 6 1 1 0; 14 | #X connect 6 2 2 0; 15 | #X coords 0 -1 1 1 60 31 1 100 86; 16 | -------------------------------------------------------------------------------- /guis/spectrum~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 84 268 spectrum~; 3 | #X obj 84 222 osc~; 4 | #X obj 84 154 phasor~ 1; 5 | #X obj 84 203 *~ 1000; 6 | #X floatatom 123 185 5 0 0 0 - - -; 7 | #X text 302 88 spectrum~ - spectrum analyzer; 8 | #X text 288 137 this just shows the FFT table for the input signal. 9 | the [nbx] shows the value of the [spectrum~]'s \$0.; 10 | #X connect 1 0 0 0; 11 | #X connect 2 0 3 0; 12 | #X connect 3 0 1 0; 13 | #X connect 4 0 3 1; 14 | -------------------------------------------------------------------------------- /math/atc.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 82 16 lb \$1; 3 | #X obj 82 35 sel 0; 4 | #X obj 100 80 / 2; 5 | #X msg 82 54 1; 6 | #X obj 132 11 inlet; 7 | #X obj 40 59 inlet; 8 | #X obj 40 78 + 1; 9 | #X obj 40 97 * 0.5; 10 | #X obj 40 116 outlet; 11 | #X connect 0 0 1 0; 12 | #X connect 1 0 3 0; 13 | #X connect 1 1 2 0; 14 | #X connect 2 0 7 1; 15 | #X connect 3 0 2 0; 16 | #X connect 4 0 2 0; 17 | #X connect 5 0 6 0; 18 | #X connect 6 0 7 0; 19 | #X connect 7 0 8 0; 20 | -------------------------------------------------------------------------------- /utils/interval-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 51 296 interval; 3 | #X floatatom 51 325 5 0 0 0 - - -; 4 | #X obj 51 267 metro 300; 5 | #X obj 51 211 loadbang; 6 | #X obj 51 240 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 7 | 1; 8 | #X text 220 125 interval - measures the interval between bangs; 9 | #X text 222 174 uses the [realtime] object interally.; 10 | #X connect 0 0 1 0; 11 | #X connect 2 0 0 0; 12 | #X connect 3 0 4 0; 13 | #X connect 4 0 2 0; 14 | -------------------------------------------------------------------------------- /math/atc~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 40 59 inlet~; 3 | #X obj 40 78 +~ 1; 4 | #X obj 40 116 outlet~; 5 | #X obj 82 16 lb \$1; 6 | #X obj 82 35 sel 0; 7 | #X obj 40 97 *~ 0.5; 8 | #X obj 100 80 / 2; 9 | #X msg 82 54 1; 10 | #X obj 132 11 inlet; 11 | #X connect 0 0 1 0; 12 | #X connect 1 0 5 0; 13 | #X connect 3 0 4 0; 14 | #X connect 4 0 7 0; 15 | #X connect 4 1 6 0; 16 | #X connect 5 0 2 0; 17 | #X connect 6 0 5 1; 18 | #X connect 7 0 6 0; 19 | #X connect 8 0 6 0; 20 | -------------------------------------------------------------------------------- /gen/saw~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 32 1920 1048 10; 2 | #X obj 118 104 inlet~; 3 | #X obj 175 104 inlet; 4 | #X obj 118 167 outlet~; 5 | #X obj 118 125 phasor~ \$1; 6 | #X obj 118 146 cta~; 7 | #X text 96 13 Basic saw wave oscillator. Basically just a bipolar version of [phasor~].; 8 | #X obj 118 83 lb \$1; 9 | #X text 111 62 frequency; 10 | #X text 180 86 phase reset; 11 | #X connect 0 0 3 0; 12 | #X connect 1 0 3 1; 13 | #X connect 3 0 4 0; 14 | #X connect 4 0 2 0; 15 | #X connect 6 0 0 0; 16 | -------------------------------------------------------------------------------- /guis/vsig~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 2560 1566 10; 2 | #X obj 103 100 hsl 128 15 -1 1 0 0 empty empty 0.000000000 -2 8 0 10 #fcfcfc #000000 #fc0400 0 1; 3 | #X obj 100 41 unsig~ 30; 4 | #X obj 100 22 inlet~; 5 | #X msg 110 81 label \$1; 6 | #X obj 110 62 makefilename %0.9f; 7 | #X obj 48 62 outlet~; 8 | #X connect 1 0 0 0; 9 | #X connect 1 0 4 0; 10 | #X connect 2 0 1 0; 11 | #X connect 2 0 5 0; 12 | #X connect 3 0 0 0; 13 | #X connect 4 0 3 0; 14 | #X coords 0 -1 1 1 133 15 2 100 100; 15 | -------------------------------------------------------------------------------- /seq/dust.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 32 2560 1566 10; 2 | #X obj 227 57 inlet; 3 | #X floatatom 214 122 5 0 0 0 - - - 0; 4 | #X obj 136 147 random \$1; 5 | #X obj 136 167 del; 6 | #X obj 136 127 ometro \$1; 7 | #X obj 136 187 outlet; 8 | #X obj 186 85 moses 2; 9 | #X obj 258 95 init \$1; 10 | #X connect 0 0 6 0; 11 | #X connect 1 0 2 1; 12 | #X connect 1 0 4 0; 13 | #X connect 2 0 3 0; 14 | #X connect 3 0 5 0; 15 | #X connect 4 0 2 0; 16 | #X connect 6 0 4 0; 17 | #X connect 6 1 1 0; 18 | #X connect 7 0 1 0; 19 | -------------------------------------------------------------------------------- /gen/recsnd~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 870 10; 2 | #X obj 63 -3 inlet; 3 | #X obj 42 106 *~ 0; 4 | #X obj 42 143 tabread4~; 5 | #X obj 109 75 symbol; 6 | #X msg 109 97 set \$1; 7 | #X obj 14 4 inlet~; 8 | #X obj 42 178 outlet~; 9 | #X obj 63 20 route size table; 10 | #X obj 63 62 - 2; 11 | #X connect 0 0 7 0; 12 | #X connect 1 0 2 0; 13 | #X connect 2 0 6 0; 14 | #X connect 3 0 4 0; 15 | #X connect 4 0 2 0; 16 | #X connect 5 0 1 0; 17 | #X connect 7 0 8 0; 18 | #X connect 7 1 3 0; 19 | #X connect 8 0 1 1; 20 | -------------------------------------------------------------------------------- /utils/spacesym.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 2560 1566 10; 2 | #X obj 188 162 bang; 3 | #X obj 188 143 inlet; 4 | #X obj 188 200 outlet; 5 | #X text 287 160 spacesym - bang the inlet to output a "space symbol" - useful for if you want to put spaces in labels. unfortunately pure data doesn't like it if you save patches with them...; 6 | #X obj 188 181 char-sym space; 7 | #X text 222 94 THIS ABSTRACTION IS DEPRECATED! USE [char-sym space] INSTEAD.; 8 | #X connect 0 0 4 0; 9 | #X connect 1 0 0 0; 10 | #X connect 4 0 2 0; 11 | -------------------------------------------------------------------------------- /fx/chebys~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 800 421 10; 2 | #X obj 40 40 inlet~; 3 | #X obj 82 59 dbtorms; 4 | #X obj 44 130 cheby~ \$1; 5 | #X obj 82 21 inlet; 6 | #X obj 82 40 unpack f f; 7 | #X obj 82 90 pack f f; 8 | #X msg 82 109 coef \$1 \$2; 9 | #X obj 44 149 outlet~; 10 | #X text 190 34 wrapper for cheby~ - chebyshev distortion; 11 | #X connect 0 0 2 0; 12 | #X connect 1 0 5 0; 13 | #X connect 2 0 7 0; 14 | #X connect 3 0 4 0; 15 | #X connect 4 0 1 0; 16 | #X connect 4 1 5 1; 17 | #X connect 5 0 6 0; 18 | #X connect 6 0 2 0; 19 | -------------------------------------------------------------------------------- /fx/pingpong~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 220 62 inlet~; 3 | #X obj 167 192 outlet~; 4 | #X obj 277 192 outlet~; 5 | #X obj 132 100 delwrite~ \$0-pp \$1; 6 | #X obj 133 133 delread~ \$0-pp \$1; 7 | #X obj 313 133 delread~ \$0-pp2 \$1; 8 | #X obj 312 100 delwrite~ \$0-pp2 \$1; 9 | #X obj 262 99 *~ \$2; 10 | #X obj 289 80 lb \$2 0.5; 11 | #X connect 0 0 3 0; 12 | #X connect 4 0 1 0; 13 | #X connect 4 0 6 0; 14 | #X connect 5 0 7 0; 15 | #X connect 5 0 2 0; 16 | #X connect 7 0 3 0; 17 | #X connect 8 0 7 1; 18 | -------------------------------------------------------------------------------- /guis/vsig~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 61 221 osc~ 0.25; 3 | #X obj 201 182 osc~ 0.25; 4 | #X obj 201 221 atc~; 5 | #X text 385 255 see also: [view~].; 6 | #X text 399 128 vsig~ - view signal; 7 | #X obj 61 260 vsig~; 8 | #X obj 201 260 vsig~; 9 | #X text 373 173 allows you to see graphically the current value of 10 | a signal \, assuming it's between -1 and 1 . if you'd rather view a 11 | signal between 0 and 1 \, try [vcsig~].; 12 | #X connect 0 0 5 0; 13 | #X connect 1 0 2 0; 14 | #X connect 2 0 6 0; 15 | -------------------------------------------------------------------------------- /utils/emptysymbol.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 32 1920 1048 10; 2 | #X obj 45 87 inlet; 3 | #X obj 72 107 loadbang; 4 | #X obj 72 127 symbol; 5 | #X obj 45 147 sel a; 6 | #X obj 45 179 outlet; 7 | #X obj 87 179 outlet; 8 | #X text 163 63 Empty symbol selector.; 9 | #X text 160 94 Bangs its left outlet when it receives the empty symbol 10 | \; passes the input to the right outlet when it receives anything else. 11 | ; 12 | #X connect 0 0 3 0; 13 | #X connect 1 0 2 0; 14 | #X connect 2 0 3 1; 15 | #X connect 3 0 4 0; 16 | #X connect 3 1 5 0; 17 | -------------------------------------------------------------------------------- /utils/chars.pd: -------------------------------------------------------------------------------- 1 | #N canvas 2480 29 800 871 10; 2 | #X obj 40 2 inlet; 3 | #X obj 76 100 loadbang; 4 | #X obj 40 136 s2l; 5 | #X obj 40 155 outlet; 6 | #X msg 76 119 symbol; 7 | #X obj 40 81 symbol; 8 | #X text 165 102 converts a symbol to a list of characters. see also: 9 | sym; 10 | #X obj 40 21 route float; 11 | #X obj 40 40 makesymbol %s; 12 | #X connect 0 0 7 0; 13 | #X connect 1 0 4 0; 14 | #X connect 2 0 3 0; 15 | #X connect 4 0 2 1; 16 | #X connect 5 0 2 0; 17 | #X connect 7 0 8 0; 18 | #X connect 7 1 5 0; 19 | #X connect 8 0 5 0; 20 | -------------------------------------------------------------------------------- /ctrl/switcher~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 51 70 inlet~; 3 | #X obj 100 70 inlet; 4 | #X obj 147 70 inlet~; 5 | #X obj 147 135 *~ 0; 6 | #X obj 51 135 *~ 1; 7 | #X obj 100 100 hradio 15 1 0 2 empty empty empty 0 -8 0 10 -260097 8 | -1 -1 0; 9 | #X obj 100 135 kinv; 10 | #X obj 99 200 outlet~; 11 | #X connect 0 0 4 0; 12 | #X connect 1 0 5 0; 13 | #X connect 2 0 3 0; 14 | #X connect 3 0 7 0; 15 | #X connect 4 0 7 0; 16 | #X connect 5 0 6 0; 17 | #X connect 5 0 3 1; 18 | #X connect 6 0 4 1; 19 | #X coords 0 -1 1 1 30 15 2 100 100; 20 | -------------------------------------------------------------------------------- /math/ctr.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 2560 1566 10; 2 | #X obj 525 250 lb \$1; 3 | #X obj 561 250 lb \$2; 4 | #X obj 531 310 -; 5 | #X obj 502 222 inlet; 6 | #X obj 562 222 inlet; 7 | #X obj 286 258 inlet; 8 | #X obj 428 327 * 0; 9 | #X obj 428 346 + 0; 10 | #X obj 428 365 outlet; 11 | #X text 321 254 expects input from range 0 to 1; 12 | #X connect 0 0 2 1; 13 | #X connect 0 0 7 1; 14 | #X connect 1 0 2 0; 15 | #X connect 2 0 6 1; 16 | #X connect 3 0 0 0; 17 | #X connect 4 0 1 0; 18 | #X connect 5 0 6 0; 19 | #X connect 6 0 7 0; 20 | #X connect 7 0 8 0; 21 | -------------------------------------------------------------------------------- /math/ctr~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 800 849 10; 2 | #X obj 286 258 inlet~; 3 | #X obj 525 250 lb \$1; 4 | #X obj 428 346 +~ 0; 5 | #X obj 561 250 lb \$2; 6 | #X obj 531 310 -; 7 | #X obj 428 365 outlet~; 8 | #X obj 428 327 *~ 0; 9 | #X text 332 255 expects control from range 0 to 1; 10 | #X obj 502 222 inlet; 11 | #X obj 562 222 inlet; 12 | #X connect 0 0 6 0; 13 | #X connect 1 0 2 1; 14 | #X connect 1 0 4 1; 15 | #X connect 2 0 5 0; 16 | #X connect 3 0 4 0; 17 | #X connect 4 0 6 1; 18 | #X connect 6 0 2 0; 19 | #X connect 8 0 1 0; 20 | #X connect 9 0 3 0; 21 | -------------------------------------------------------------------------------- /seq/ometro.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1680 29 1600 871 10; 2 | #X obj 137 33 inlet; 3 | #X obj 137 193 outlet; 4 | #X obj 137 58 route bang float; 5 | #X obj 155 103 moses 2; 6 | #X msg 163 131 1; 7 | #X obj 144 151 change; 8 | #X obj 101 31 f \$1; 9 | #X obj 137 174 metro; 10 | #X obj 101 12 loadbang; 11 | #X connect 0 0 2 0; 12 | #X connect 2 0 7 0; 13 | #X connect 2 1 3 0; 14 | #X connect 3 0 5 0; 15 | #X connect 3 1 4 0; 16 | #X connect 3 1 7 1; 17 | #X connect 4 0 5 0; 18 | #X connect 5 0 7 0; 19 | #X connect 6 0 2 0; 20 | #X connect 7 0 1 0; 21 | #X connect 8 0 6 0; 22 | -------------------------------------------------------------------------------- /gen/pm~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 32 1920 1048 10; 2 | #X obj 119 249 cos~; 3 | #X obj 119 217 +~; 4 | #X obj 119 283 outlet~; 5 | #X obj 119 165 phasor~; 6 | #X obj 119 136 inlet~; 7 | #X obj 135 192 inlet~; 8 | #X text 38 57 signal inlets: 1: freq \, 2: phase; 9 | #X text 41 306 Modified slightly from the version in Frank Barknecht's "PDX7".; 10 | #X text 38 21 Basic sine-based phase modulation oscillator.; 11 | #X obj 119 110 lb \$1; 12 | #X connect 0 0 2 0; 13 | #X connect 1 0 0 0; 14 | #X connect 3 0 1 0; 15 | #X connect 4 0 3 0; 16 | #X connect 5 0 1 1; 17 | #X connect 9 0 4 0; 18 | -------------------------------------------------------------------------------- /seq/edger~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 303 184 wrap~; 3 | #X obj 303 222 edge~; 4 | #X obj 303 165 inlet~; 5 | #X obj 303 203 expr~ $v1<$f2; 6 | #X obj 303 260 outlet; 7 | #X obj 330 241 outlet; 8 | #X obj 378 184 / 10; 9 | #X obj 426 119 inlet; 10 | #X obj 378 119 lb \$1 5; 11 | #X text 378 237 non-zero to zero transition; 12 | #X text 345 260 zero to non-zero transition; 13 | #X connect 0 0 3 0; 14 | #X connect 1 0 4 0; 15 | #X connect 1 1 5 0; 16 | #X connect 2 0 0 0; 17 | #X connect 3 0 1 0; 18 | #X connect 6 0 3 1; 19 | #X connect 7 0 6 0; 20 | #X connect 8 0 6 0; 21 | -------------------------------------------------------------------------------- /fx/rateshift2~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 2560 1566 10; 2 | #X obj 63 32 inlet~; 3 | #X obj 166 149 vd~ \$0-rs; 4 | #X obj 166 170 outlet~; 5 | #X obj 166 107 phasor~; 6 | #X obj 166 86 inlet~; 7 | #X text 65 115 rate shifter 2; 8 | #X obj 63 55 delwrite~ \$0-rs 100; 9 | #X obj 234 107 sel 0; 10 | #X msg 234 129 100; 11 | #X obj 234 85 init \$1; 12 | #X obj 166 128 *~ 100; 13 | #X connect 0 0 6 0; 14 | #X connect 1 0 2 0; 15 | #X connect 3 0 10 0; 16 | #X connect 4 0 3 0; 17 | #X connect 7 0 8 0; 18 | #X connect 7 1 10 1; 19 | #X connect 8 0 10 1; 20 | #X connect 9 0 7 0; 21 | #X connect 10 0 1 0; 22 | -------------------------------------------------------------------------------- /guis/nview-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 46 104 nview; 3 | #X text 175 38 nview - note view; 4 | #X text 164 67 displays all incoming midi note information \, straight 5 | from [notein]; 6 | #N canvas 0 29 800 849 META 0; 7 | #X text 12 45 LIBRARY defaultxr; 8 | #X text 12 65 AUTHOR modula t. worm; 9 | #X text 12 85 WEBSITE http://github.com/defaultxr/pure-data-patches 10 | ; 11 | #X text 12 105 RELEASE_DATE 2013; 12 | #X text 12 5 KEYWORDS note gui view; 13 | #X text 12 25 DESCRIPTION graphically view all incoming midi note data. 14 | ; 15 | #X restore 190 127 pd META; 16 | -------------------------------------------------------------------------------- /gen/playsf~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 800 849 10; 2 | #X obj 225 187 inlet; 3 | #X obj 387 187 loadbang; 4 | #X obj 387 206 symbol \$1; 5 | #X obj 387 225 emptysymbol; 6 | #X obj 450 263 readsf~; 7 | #X obj 450 282 outlet~; 8 | #X obj 498 282 outlet; 9 | #X msg 450 244 open \$1 \, 1; 10 | #X obj 225 206 route float open file bang; 11 | #X connect 0 0 8 0; 12 | #X connect 1 0 2 0; 13 | #X connect 2 0 3 0; 14 | #X connect 3 1 7 0; 15 | #X connect 4 0 5 0; 16 | #X connect 4 1 6 0; 17 | #X connect 7 0 4 0; 18 | #X connect 8 0 4 0; 19 | #X connect 8 1 2 0; 20 | #X connect 8 2 2 0; 21 | #X connect 8 3 2 0; 22 | -------------------------------------------------------------------------------- /math/atr.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 525 250 lb \$1; 3 | #X obj 561 250 lb \$2; 4 | #X obj 531 310 -; 5 | #X obj 502 222 inlet; 6 | #X obj 562 222 inlet; 7 | #X obj 286 258 inlet; 8 | #X text 332 255 expects input from range -1 to 1; 9 | #X obj 318 309 atc; 10 | #X obj 428 327 * 0; 11 | #X obj 428 346 + 0; 12 | #X obj 428 365 outlet; 13 | #X connect 0 0 2 1; 14 | #X connect 0 0 9 1; 15 | #X connect 1 0 2 0; 16 | #X connect 2 0 8 1; 17 | #X connect 3 0 0 0; 18 | #X connect 4 0 1 0; 19 | #X connect 5 0 7 0; 20 | #X connect 7 0 8 0; 21 | #X connect 8 0 9 0; 22 | #X connect 9 0 10 0; 23 | -------------------------------------------------------------------------------- /ctrl/nems.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1680 1021 10; 2 | #X obj 147 103 inlet; 3 | #X obj 147 122 spigot; 4 | #X text 272 79 nems - Not Edit Mode Spigot (only allow messages to 5 | pass when edit mode is OFF); 6 | #X obj 147 141 outlet; 7 | #X obj 156 6 loadbang; 8 | #X obj 183 84 editmode; 9 | #X obj 156 25 f \$1; 10 | #X obj 156 44 sel 0; 11 | #X msg 156 63 2; 12 | #X obj 183 103 == 0; 13 | #X connect 0 0 1 0; 14 | #X connect 1 0 3 0; 15 | #X connect 4 0 6 0; 16 | #X connect 5 0 9 0; 17 | #X connect 6 0 7 0; 18 | #X connect 7 0 8 0; 19 | #X connect 7 1 5 0; 20 | #X connect 8 0 5 0; 21 | #X connect 9 0 1 1; 22 | -------------------------------------------------------------------------------- /ctrl/capslock.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 130 -4 keyname; 3 | #X obj 130 100 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 4 | 1; 5 | #X obj 130 157 outlet; 6 | #X obj 130 138 f; 7 | #X obj 21 101 inlet; 8 | #X obj 130 76 sel Caps_Lock; 9 | #X obj 130 19 pack f s; 10 | #X obj 130 38 route 1; 11 | #X obj 130 57 symbol; 12 | #X connect 0 0 6 0; 13 | #X connect 0 1 6 1; 14 | #X connect 1 0 3 0; 15 | #X connect 3 0 2 0; 16 | #X connect 4 0 3 0; 17 | #X connect 5 0 1 0; 18 | #X connect 6 0 7 0; 19 | #X connect 7 0 8 0; 20 | #X connect 8 0 5 0; 21 | #X coords 0 -1 1 1 65 15 1 80 100; 22 | -------------------------------------------------------------------------------- /math/atr~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 286 258 inlet~; 3 | #X obj 525 250 lb \$1; 4 | #X obj 428 346 +~ 0; 5 | #X obj 561 250 lb \$2; 6 | #X obj 531 310 -; 7 | #X obj 428 365 outlet~; 8 | #X obj 428 327 *~ 0; 9 | #X obj 502 222 inlet; 10 | #X obj 562 222 inlet; 11 | #X obj 318 309 atc~; 12 | #X text 332 255 expects signal from range -1 to 1; 13 | #X connect 0 0 9 0; 14 | #X connect 1 0 2 1; 15 | #X connect 1 0 4 1; 16 | #X connect 2 0 5 0; 17 | #X connect 3 0 4 0; 18 | #X connect 4 0 6 1; 19 | #X connect 6 0 2 0; 20 | #X connect 7 0 1 0; 21 | #X connect 8 0 3 0; 22 | #X connect 9 0 6 0; 23 | -------------------------------------------------------------------------------- /seq/hashread.pd: -------------------------------------------------------------------------------- 1 | #N canvas 800 29 800 849 10; 2 | #X obj 397 188 inlet; 3 | #X obj 460 344 outlet; 4 | #X text 147 248 hashread; 5 | #X obj 460 306 s \$1; 6 | #X obj 460 325 r \$0-hr; 7 | #X msg 460 287 get \$1 \$2-hr; 8 | #X obj 504 188 loadbang; 9 | #X msg 504 226 set get \, adddollar 1 \, add2 \$1-hr; 10 | #X obj 504 207 f \$0; 11 | #X obj 397 207 route float; 12 | #X obj 460 226 symbol; 13 | #X connect 0 0 9 0; 14 | #X connect 4 0 1 0; 15 | #X connect 5 0 3 0; 16 | #X connect 6 0 8 0; 17 | #X connect 7 0 5 0; 18 | #X connect 8 0 7 0; 19 | #X connect 9 0 5 0; 20 | #X connect 9 1 10 0; 21 | #X connect 10 0 5 0; 22 | -------------------------------------------------------------------------------- /gen/sndm~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1680 29 2560 1566 10; 2 | #X obj 322 304 inlet; 3 | #X obj 322 482 snd~ \$1; 4 | #X obj 322 413 sndcm~ \$2; 5 | #X obj 322 501 outlet~; 6 | #X text 505 369 sndm~ - just a shortcut for sndcm~ and snd~; 7 | #X obj 322 323 route open; 8 | #X obj 387 370 list prepend open; 9 | #X obj 387 389 list trim; 10 | #X obj 390 451 outlet~; 11 | #X obj 446 452 outlet; 12 | #X connect 0 0 5 0; 13 | #X connect 1 0 3 0; 14 | #X connect 1 1 2 0; 15 | #X connect 2 0 8 0; 16 | #X connect 2 0 1 0; 17 | #X connect 2 1 9 0; 18 | #X connect 5 0 6 0; 19 | #X connect 5 1 2 0; 20 | #X connect 6 0 7 0; 21 | #X connect 7 0 1 1; 22 | -------------------------------------------------------------------------------- /guis/cview-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X obj 101 194 cview; 3 | #X text 368 174 cview - view all incoming midi CC.; 4 | #X text 336 226 this is just a diagnostic tool to allow you to visually 5 | see everything pd is getting in from midi CC.; 6 | #N canvas 0 29 800 849 META 0; 7 | #X text 12 45 LIBRARY defaultxr; 8 | #X text 12 65 AUTHOR modula t. worm; 9 | #X text 12 85 WEBSITE http://github.com/defaultxr/pure-data-patches 10 | ; 11 | #X text 12 105 RELEASE_DATE 2013; 12 | #X text 12 5 KEYWORDS midi cc analysis gui; 13 | #X text 12 25 DESCRIPTION view all incoming midi cc; 14 | #X restore 130 267 pd META; 15 | -------------------------------------------------------------------------------- /gen/recp~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 52 60 inlet; 3 | #X obj 52 105 symbol; 4 | #X msg 52 124 set \$1; 5 | #X obj 52 188 outlet~; 6 | #X obj 52 153 tabplay~; 7 | #X obj 100 188 outlet; 8 | #X obj 52 83 route table time size freq; 9 | #X obj 128 102 bang; 10 | #X obj 128 121 spigot \$1; 11 | #X obj 321 88 spigot \$1; 12 | #X connect 0 0 6 0; 13 | #X connect 1 0 2 0; 14 | #X connect 2 0 4 0; 15 | #X connect 4 0 3 0; 16 | #X connect 4 1 5 0; 17 | #X connect 4 1 9 0; 18 | #X connect 6 0 1 0; 19 | #X connect 6 2 7 0; 20 | #X connect 6 4 4 0; 21 | #X connect 7 0 8 0; 22 | #X connect 8 0 4 0; 23 | #X connect 9 0 6 0; 24 | -------------------------------------------------------------------------------- /utils/ssend~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 1920 1050 10; 2 | #X obj 40 40 inlet~; 3 | #X obj 155 40 inlet; 4 | #N canvas 1920 30 1920 1050 \$0-sender 0; 5 | #X obj 0 0 inlet~; 6 | #X obj 0 30 send~ bar; 7 | #X connect 0 0 1 0; 8 | #X restore 40 72 pd \$0-sender; 9 | #X obj 155 90 pack s \$0; 10 | #X obj 57 17 namecanvas \$0-ssend; 11 | #X msg 155 109 \; pd-\$2-sender clear \, obj 0 0 inlet~ \, obj 0 30 12 | send~ \$1 \, connect 0 0 1 0 \; \$2-ssend connect 0 0 2 0; 13 | #X obj 191 40 loadbang; 14 | #X obj 191 59 symbol \$1; 15 | #X connect 0 0 2 0; 16 | #X connect 1 0 3 0; 17 | #X connect 3 0 5 0; 18 | #X connect 6 0 7 0; 19 | #X connect 7 0 3 0; 20 | -------------------------------------------------------------------------------- /utils/icolor.pd: -------------------------------------------------------------------------------- 1 | #N canvas 846 148 539 373 10; 2 | #X obj 140 81 vsl 15 50 0 1 0 0 empty empty empty 0 -9 0 10 -258113 3 | -1 -1 0 1; 4 | #X obj 155 81 vsl 15 50 0 1 0 0 empty empty empty 0 -9 0 10 -4034 -1 5 | -1 0 1; 6 | #X obj 170 81 vsl 15 50 0 1 0 0 empty empty empty 0 -9 0 10 -4160 -1 7 | -1 0 1; 8 | #X obj 137 232 outlet; 9 | #X obj 137 213 pack f f f; 10 | #X obj 210 153 t b f; 11 | #X obj 160 153 t b f; 12 | #X connect 0 0 4 0; 13 | #X connect 1 0 6 0; 14 | #X connect 2 0 5 0; 15 | #X connect 4 0 3 0; 16 | #X connect 5 0 4 0; 17 | #X connect 5 1 4 2; 18 | #X connect 6 0 4 0; 19 | #X connect 6 1 4 1; 20 | #X coords 0 -1 1 1 45 69 1 140 65; 21 | -------------------------------------------------------------------------------- /ctrl/switcher.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1920 1048 10; 2 | #X obj 127 105 hradio 15 1 0 2 empty empty empty 0 -8 0 10 #f8fc00 #000000 #000000 0; 3 | #X obj 69 155 spigot 1; 4 | #X obj 151 155 spigot 0; 5 | #X obj 69 24 inlet; 6 | #X obj 174 48 inlet; 7 | #X obj 116 216 outlet; 8 | #X obj 140 65 f; 9 | #X obj 69 43 route switch; 10 | #X obj 114 136 == 0; 11 | #X connect 0 0 2 1; 12 | #X connect 0 0 8 0; 13 | #X connect 1 0 5 0; 14 | #X connect 2 0 5 0; 15 | #X connect 3 0 7 0; 16 | #X connect 4 0 2 0; 17 | #X connect 6 0 0 0; 18 | #X connect 7 0 6 0; 19 | #X connect 7 1 1 0; 20 | #X connect 8 0 1 1; 21 | #X connect 8 0 6 1; 22 | #X coords 0 -1 1 1 30 15 2 127 105; 23 | -------------------------------------------------------------------------------- /fx/gater~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 40 40 inlet~; 3 | #X obj 73 73 abs~; 4 | #X obj 73 111 expr~ $v1>$f2; 5 | #X obj 184 83 lb \$1 0.5; 6 | #X obj 40 184 outlet~; 7 | #X obj 148 83 inlet; 8 | #X obj 128 200 vsl 15 128 0 1 0 0 empty empty empty 0 -9 0 10 -262144 9 | -1 -1 0 1; 10 | #X obj 100 174 unsig~ 30; 11 | #X obj 73 130 lop~ 5; 12 | #X obj 73 92 lop~ 20; 13 | #X obj 40 165 *~; 14 | #X connect 0 0 1 0; 15 | #X connect 0 0 10 0; 16 | #X connect 1 0 9 0; 17 | #X connect 2 0 8 0; 18 | #X connect 3 0 2 1; 19 | #X connect 5 0 2 1; 20 | #X connect 7 0 6 0; 21 | #X connect 8 0 7 0; 22 | #X connect 8 0 10 1; 23 | #X connect 9 0 2 0; 24 | #X connect 10 0 4 0; 25 | -------------------------------------------------------------------------------- /gen/sndl~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 2560 1566 10; 2 | #X obj 275 287 inlet; 3 | #X obj 332 442 snd~ \$1; 4 | #X obj 332 461 outlet~; 5 | #X obj 401 396 list prepend open; 6 | #X obj 401 415 list trim; 7 | #X obj 341 287 inlet; 8 | #X obj 377 287 inlet; 9 | #X text 515 379 sndl~ - just a shortcut for sndcl~ and snd~; 10 | #X obj 332 423 sndcl~ \$2; 11 | #X obj 275 306 route open; 12 | #X obj 380 461 outlet~; 13 | #X connect 0 0 9 0; 14 | #X connect 1 0 2 0; 15 | #X connect 1 1 8 0; 16 | #X connect 3 0 4 0; 17 | #X connect 4 0 1 1; 18 | #X connect 5 0 8 1; 19 | #X connect 6 0 8 2; 20 | #X connect 8 0 1 0; 21 | #X connect 8 0 10 0; 22 | #X connect 9 0 3 0; 23 | #X connect 9 1 8 0; 24 | -------------------------------------------------------------------------------- /utils/sreceive~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 1920 1050 10; 2 | #X obj 165 50 inlet; 3 | #X obj 165 100 pack s \$0; 4 | #X obj 67 27 namecanvas \$0-sreceive; 5 | #N canvas 1920 30 1920 1050 \$0-receiver 0; 6 | #X obj 0 0 receive~ fuck; 7 | #X obj 0 30 outlet~; 8 | #X connect 0 0 1 0; 9 | #X restore 50 82 pd \$0-receiver; 10 | #X obj 50 107 outlet~; 11 | #X msg 165 119 \; pd-\$2-receiver clear \, obj 0 0 receive~ \$1 \, 12 | obj 0 30 outlet~ \, connect 0 0 1 0 \; \$2-sreceive connect 3 0 4 0 13 | ; 14 | #X obj 201 50 loadbang; 15 | #X obj 201 69 symbol \$1; 16 | #X connect 0 0 1 0; 17 | #X connect 1 0 5 0; 18 | #X connect 3 0 4 0; 19 | #X connect 6 0 7 0; 20 | #X connect 7 0 1 0; 21 | -------------------------------------------------------------------------------- /ctrl/ispigot.pd: -------------------------------------------------------------------------------- 1 | #N canvas 161 101 2560 1566 10; 2 | #X obj 129 58 inlet; 3 | #X obj 193 57 inlet; 4 | #X obj 129 175 outlet; 5 | #X obj 193 86 tgl 20 0 empty empty empty 17 7 0 10 #fc2828 #202020 #202020 0 1; 6 | #X obj 232 94 sel 0 1; 7 | #X msg 232 161 color \$1 12 12; 8 | #X msg 259 127 16; 9 | #X msg 232 127 13; 10 | #X obj 129 134 spigot; 11 | #X obj 229 57 init \$1; 12 | #X connect 0 0 8 0; 13 | #X connect 1 0 3 0; 14 | #X connect 3 0 4 0; 15 | #X connect 3 0 8 1; 16 | #X connect 4 0 7 0; 17 | #X connect 4 1 6 0; 18 | #X connect 5 0 3 0; 19 | #X connect 6 0 5 0; 20 | #X connect 7 0 5 0; 21 | #X connect 8 0 2 0; 22 | #X connect 9 0 3 0; 23 | #X coords 0 -1 1 1 20 20 2 193 86; 24 | -------------------------------------------------------------------------------- /ctrl/router.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 2560 1566 10; 2 | #X obj 127 105 hradio 15 1 0 2 empty empty empty 0 -8 0 10 #00fc04 #000000 #000000 0; 3 | #X obj 69 24 inlet; 4 | #X obj 88 175 outlet; 5 | #X obj 69 43 route switch; 6 | #X obj 130 175 outlet; 7 | #X obj 88 141 route 0 1; 8 | #X obj 88 122 prepent; 9 | #X obj 165 37 inlet; 10 | #X obj 151 86 == 0; 11 | #X obj 127 86 f 1; 12 | #X connect 0 0 6 1; 13 | #X connect 1 0 3 0; 14 | #X connect 3 0 9 0; 15 | #X connect 3 1 6 0; 16 | #X connect 5 0 2 0; 17 | #X connect 5 1 4 0; 18 | #X connect 6 0 5 0; 19 | #X connect 7 0 9 0; 20 | #X connect 8 0 9 1; 21 | #X connect 9 0 0 0; 22 | #X connect 9 0 8 0; 23 | #X coords 0 -1 1 1 30 15 2 127 105; 24 | -------------------------------------------------------------------------------- /ctrl/keydrum.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 590 312 outlet; 3 | #X obj 565 194 sel 97 115 122 120 100 99 102 118 103 98 104 110 106 4 | 109 107 44; 5 | #X obj 565 175 inlet; 6 | #X obj 680 312 outlet; 7 | #X obj 760 312 outlet; 8 | #X obj 840 312 outlet; 9 | #X connect 1 0 0 0; 10 | #X connect 1 1 0 0; 11 | #X connect 1 2 0 0; 12 | #X connect 1 3 0 0; 13 | #X connect 1 4 3 0; 14 | #X connect 1 5 3 0; 15 | #X connect 1 6 3 0; 16 | #X connect 1 7 3 0; 17 | #X connect 1 8 4 0; 18 | #X connect 1 9 4 0; 19 | #X connect 1 10 4 0; 20 | #X connect 1 11 4 0; 21 | #X connect 1 12 5 0; 22 | #X connect 1 13 5 0; 23 | #X connect 1 14 5 0; 24 | #X connect 1 15 5 0; 25 | #X connect 2 0 1 0; 26 | -------------------------------------------------------------------------------- /utils/e.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 32 1920 1048 10; 2 | #X obj 575 312 inlet; 3 | #X text 749 298 e - "every"; 4 | #X obj 575 439 outlet; 5 | #X text 749 336 output every \$1-th input \, with an offset of \$2. 6 | ; 7 | #X obj 575 335 t a b; 8 | #X obj 602 392 == \$2; 9 | #X obj 575 415 spigot; 10 | #X obj 679 312 inlet; 11 | #X obj 746 374 inlet; 12 | #X obj 631 358 + 1; 13 | #X obj 602 358 f 0; 14 | #X obj 658 358 % \$1; 15 | #X connect 0 0 4 0; 16 | #X connect 4 0 6 0; 17 | #X connect 4 1 10 0; 18 | #X connect 5 0 6 1; 19 | #X connect 6 0 2 0; 20 | #X connect 7 0 11 1; 21 | #X connect 8 0 5 1; 22 | #X connect 9 0 11 0; 23 | #X connect 10 0 9 0; 24 | #X connect 10 0 5 0; 25 | #X connect 11 0 10 1; 26 | -------------------------------------------------------------------------------- /utils/marquee.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X symbolatom 100 100 20 0 0 0 - - -; 3 | #X obj 331 61 inlet; 4 | #X obj 331 80 route list float; 5 | #X obj 316 159 map; 6 | #X obj 316 178 symbol; 7 | #X text 379 55 marquee (to display elements of a list at regular intervals) 8 | ; 9 | #X obj 316 247 outlet; 10 | #X obj 331 108 list; 11 | #X obj 263 138 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 12 | -1 -1; 13 | #X obj 248 102 ometro 4000; 14 | #X connect 1 0 2 0; 15 | #X connect 2 0 7 0; 16 | #X connect 3 0 4 0; 17 | #X connect 4 0 6 0; 18 | #X connect 4 0 0 0; 19 | #X connect 7 0 3 1; 20 | #X connect 8 0 3 0; 21 | #X connect 9 0 3 0; 22 | #X coords 0 -1 1 1 122 16 2 100 100; 23 | -------------------------------------------------------------------------------- /utils/sym-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X symbolatom 75 251 10 0 0 0 - - -; 3 | #X obj 75 272 chars; 4 | #X symbolatom 75 337 10 0 0 0 - - -; 5 | #X obj 75 310 sym; 6 | #X text 233 132 sym - concatenate a list into a symbol; 7 | #X text 211 175 [sym] basically just concatenates a list into a symbol 8 | quickly. you can do the same thing just by sending an empty symbol 9 | to the right inlet of [l2s]. but [sym] is here if you're lazy.; 10 | #X text 117 271 <-- [chars] converts a symbol into a list of characters 11 | ; 12 | #X text 100 306 <-- [sym] converts a list into a symbol (the opposite 13 | of [chars]!); 14 | #X connect 0 0 1 0; 15 | #X connect 1 0 3 0; 16 | #X connect 3 0 2 0; 17 | -------------------------------------------------------------------------------- /utils/emptysymbol-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 97 207 emptysymbol; 3 | #X obj 94 239 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 4 | -1; 5 | #X msg 58 143 symbol; 6 | #X msg 76 162 symbol foo; 7 | #X msg 88 181 symbol bar; 8 | #X symbolatom 141 233 10 0 0 0 - - -; 9 | #X text 265 90 emptysymbol - detects the empty symbol; 10 | #X text 276 124 emptysymbol will send a bang to the left outlet if 11 | it receives an empty symbol on its inlet. if it receives a symbol that 12 | isn't empty \, then it will simply pass that symbol to its right outlet. 13 | ; 14 | #X connect 0 0 1 0; 15 | #X connect 0 1 5 0; 16 | #X connect 2 0 0 0; 17 | #X connect 3 0 0 0; 18 | #X connect 4 0 0 0; 19 | -------------------------------------------------------------------------------- /ctrl/switcher~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 2560 1566 10; 2 | #X text 299 144 bswitcher~; 3 | #X text 267 174 not sure why i named it 'bswitcher~'. i'm probably going to rename it in the future.; 4 | #X text 269 218 bswitcher~ allows you to switch between 2 signal inputs \, either by clicking on the gui with your mouse \, or by sending a 0 or 1 to the middle inlet.; 5 | #X obj 50 283 osc~ 3; 6 | #X obj 137 283 osc~ 300; 7 | #X obj 93 278 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1; 8 | #X floatatom 93 295 5 0 0 0 - - - 0; 9 | #X obj 82 379 view~; 10 | #X obj 82 332 switcher~; 11 | #X connect 3 0 8 0; 12 | #X connect 4 0 8 2; 13 | #X connect 5 0 6 0; 14 | #X connect 6 0 8 1; 15 | #X connect 8 0 7 0; 16 | -------------------------------------------------------------------------------- /gen/sndf~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 1920 1048 10; 2 | #X obj 308 288 inlet; 3 | #X obj 332 466 outlet~; 4 | #X obj 381 399 list prepend open; 5 | #X obj 381 419 list trim; 6 | #X text 515 379 sndf~ - just a shortcut for sndcf~ and snd~; 7 | #X obj 332 426 sndcf~; 8 | #X obj 274 333 inlet~; 9 | #X obj 308 308 route open; 10 | #X obj 332 446 snd~; 11 | #X obj 381 288 loadbang; 12 | #X obj 381 328 pdcontrol; 13 | #X msg 381 308 args 0; 14 | #X connect 0 0 7 0; 15 | #X connect 2 0 3 0; 16 | #X connect 3 0 8 1; 17 | #X connect 5 0 8 0; 18 | #X connect 6 0 5 0; 19 | #X connect 7 0 2 0; 20 | #X connect 7 1 5 1; 21 | #X connect 8 0 1 0; 22 | #X connect 8 1 5 1; 23 | #X connect 9 0 11 0; 24 | #X connect 10 0 2 0; 25 | #X connect 11 0 10 0; 26 | -------------------------------------------------------------------------------- /math/transposer.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 104 207 pow 0.0833333; 3 | #X obj 179 188 / 12; 4 | #X obj 104 169 t b f; 5 | #X msg 104 188 2; 6 | #X obj 104 126 inlet; 7 | #X obj 104 226 outlet; 8 | #X text 214 145 transposer - outputs the number necessary to shift 9 | a frequency by the semitones provided via the inlet.; 10 | #X text 211 182 (basically \, a frequency shifter with input in semitones 11 | and output in the number necessary to multiply the freq by); 12 | #X obj 145 126 loadbang; 13 | #X obj 145 145 f \$1; 14 | #X connect 0 0 5 0; 15 | #X connect 1 0 0 1; 16 | #X connect 2 0 3 0; 17 | #X connect 2 1 1 0; 18 | #X connect 3 0 0 0; 19 | #X connect 4 0 2 0; 20 | #X connect 8 0 9 0; 21 | #X connect 9 0 2 0; 22 | -------------------------------------------------------------------------------- /ctrl/ispigot~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1920 1048 10; 2 | #X obj 193 57 inlet; 3 | #X obj 193 86 tgl 20 0 empty empty empty 17 7 0 10 #14e814 #202020 #202020 0 1; 4 | #X obj 129 58 inlet~; 5 | #X obj 129 157 outlet~; 6 | #X obj 229 57 lb \$1; 7 | #X obj 129 134 *~; 8 | #X obj 144 112 aline~ 5; 9 | #X obj 232 94 sel 0 1; 10 | #X msg 232 161 color \$1 12 12; 11 | #X msg 259 127 16; 12 | #X msg 232 127 13; 13 | #X connect 0 0 1 0; 14 | #X connect 1 0 6 0; 15 | #X connect 1 0 7 0; 16 | #X connect 2 0 5 0; 17 | #X connect 4 0 1 0; 18 | #X connect 5 0 3 0; 19 | #X connect 6 0 5 1; 20 | #X connect 7 0 10 0; 21 | #X connect 7 1 9 0; 22 | #X connect 8 0 1 0; 23 | #X connect 9 0 8 0; 24 | #X connect 10 0 8 0; 25 | #X coords 0 -1 1 1 20 20 2 193 86; 26 | -------------------------------------------------------------------------------- /fx/autocap~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 32 1920 1048 10; 2 | #X obj 158 129 inlet~; 3 | #X obj 246 113 inlet~; 4 | #X text 129 112 capture input; 5 | #X text 246 95 trigger input; 6 | #X obj 65 131 inlet; 7 | #X text 29 113 bang to play; 8 | #X obj 146 218 rec~; 9 | #X obj 228 183 fiddle~; 10 | #X obj 146 296 outlet~; 11 | #X text 81 43 automatic capture; 12 | #X obj 146 277 recsnd~; 13 | #X obj 136 246 sndcm~; 14 | #X obj 43 182 route float bang; 15 | #X msg 100 206 60; 16 | #X connect 0 0 6 0; 17 | #X connect 1 0 7 0; 18 | #X connect 4 0 12 0; 19 | #X connect 6 0 11 0; 20 | #X connect 6 0 10 1; 21 | #X connect 7 1 6 1; 22 | #X connect 10 0 8 0; 23 | #X connect 11 0 10 0; 24 | #X connect 12 0 11 0; 25 | #X connect 12 1 13 0; 26 | #X connect 13 0 11 0; 27 | -------------------------------------------------------------------------------- /fx/phaser-old~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 870 10; 2 | #X obj 40 40 inlet~; 3 | #X obj 40 259 outlet~; 4 | #X obj 40 89 rpole~; 5 | #X obj 40 64 rzero_rev~; 6 | #X obj 40 138 rpole~; 7 | #X obj 40 113 rzero_rev~; 8 | #X obj 40 186 rpole~; 9 | #X obj 40 161 rzero_rev~; 10 | #X obj 40 235 rpole~; 11 | #X obj 40 210 rzero_rev~; 12 | #X obj 125 49 inlet~; 13 | #X connect 0 0 3 0; 14 | #X connect 2 0 5 0; 15 | #X connect 3 0 2 0; 16 | #X connect 4 0 7 0; 17 | #X connect 5 0 4 0; 18 | #X connect 6 0 9 0; 19 | #X connect 7 0 6 0; 20 | #X connect 8 0 1 0; 21 | #X connect 9 0 8 0; 22 | #X connect 10 0 3 1; 23 | #X connect 10 0 2 1; 24 | #X connect 10 0 5 1; 25 | #X connect 10 0 4 1; 26 | #X connect 10 0 7 1; 27 | #X connect 10 0 6 1; 28 | #X connect 10 0 9 1; 29 | #X connect 10 0 8 1; 30 | -------------------------------------------------------------------------------- /guis/ifiddle~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 387 183 inlet~; 3 | #X obj 387 202 fiddle~; 4 | #X obj 194 281 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 5 | -1 -1; 6 | #X floatatom 162 280 5 0 0 3 pitch - -; 7 | #X obj 413 221 unpack; 8 | #X floatatom 209 280 5 0 0 3 pitch - -; 9 | #X floatatom 241 280 5 0 0 3 amp - -; 10 | #X obj 313 379 outlet; 11 | #X obj 363 379 outlet; 12 | #X obj 413 379 outlet; 13 | #X obj 463 379 outlet; 14 | #X obj 459 183 inlet; 15 | #X connect 0 0 1 0; 16 | #X connect 1 0 3 0; 17 | #X connect 1 0 7 0; 18 | #X connect 1 1 2 0; 19 | #X connect 1 1 8 0; 20 | #X connect 1 2 4 0; 21 | #X connect 4 0 5 0; 22 | #X connect 4 0 9 0; 23 | #X connect 4 1 6 0; 24 | #X connect 4 1 10 0; 25 | #X connect 11 0 1 0; 26 | #X coords 0 -1 1 1 111 45 1 162 265; 27 | -------------------------------------------------------------------------------- /gen/pulse~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 32 2560 1566 10; 2 | #X declare -path xr; 3 | #X obj 72 101 inlet~; 4 | #X obj 72 143 phasor~ \$1; 5 | #X obj 207 101 inlet~; 6 | #X obj 207 143 atc~; 7 | #X obj 354 78 inlet; 8 | #X text 85 21 Basic pulse wave oscillator with modulatable pulse width.; 9 | #X text 60 53 frequency; 10 | #X text 200 51 width (-1 to 1); 11 | #X text 338 53 phase reset; 12 | #X obj 72 79 lb \$1; 13 | #X obj 207 78 lb \$2; 14 | #X obj 72 186 outlet~; 15 | #X obj 72 164 expr~ (($v1 < $v2)*2)-1; 16 | #X obj 162 221 declare -path xr; 17 | #X obj 207 122 *~ 0.9; 18 | #X connect 0 0 1 0; 19 | #X connect 1 0 12 0; 20 | #X connect 2 0 14 0; 21 | #X connect 3 0 12 1; 22 | #X connect 4 0 1 1; 23 | #X connect 9 0 0 0; 24 | #X connect 10 0 2 0; 25 | #X connect 12 0 11 0; 26 | #X connect 14 0 3 0; 27 | -------------------------------------------------------------------------------- /gen/sndd~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 154 249 +~ 1; 3 | #X obj 154 287 outlet~; 4 | #X obj 117 178 inlet~; 5 | #X text -101 176 control sound with audio signal from 0 to 1; 6 | #X floatatom 175 212 10 0 0 1 length - -; 7 | #X obj 154 230 *~ 0; 8 | #X obj 117 197 wrap~; 9 | #X obj 309 72 inlet; 10 | #X obj 184 101 route length table; 11 | #X msg 236 245 set \$1; 12 | #X obj 236 176 symbol; 13 | #X obj 154 268 tabread4~; 14 | #X obj 309 91 outlet; 15 | #X connect 0 0 11 0; 16 | #X connect 2 0 6 0; 17 | #X connect 4 0 5 1; 18 | #X connect 5 0 0 0; 19 | #X connect 6 0 5 0; 20 | #X connect 7 0 8 0; 21 | #X connect 7 0 12 0; 22 | #X connect 8 0 4 0; 23 | #X connect 8 1 10 0; 24 | #X connect 9 0 11 0; 25 | #X connect 10 0 9 0; 26 | #X connect 11 0 1 0; 27 | #X coords 0 0 1 1 73 17 0; 28 | -------------------------------------------------------------------------------- /seq/rchoice-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 800 29 800 849 10; 2 | #X symbolatom 38 275 10 0 0 0 - - -; 3 | #X obj 9 224 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 4 | -1; 5 | #X text 227 120 rchoice - randomly choose an element from a list; 6 | #X obj 38 256 rchoice foo bar baz; 7 | #X msg 111 200 spam ham eggs; 8 | #X msg 29 227 dog cat robot; 9 | #X msg 138 220 purple orange green; 10 | #X text 220 147 you can provide a default list as arguments \, or you 11 | can set the list by sending it to the right inlet. bang the left inlet 12 | to choose from the current list \, or send a list to the left inlet 13 | to choose from that list (without setting rchoice's list to it).; 14 | #X connect 1 0 3 0; 15 | #X connect 3 0 0 0; 16 | #X connect 4 0 3 1; 17 | #X connect 5 0 3 0; 18 | #X connect 6 0 3 1; 19 | -------------------------------------------------------------------------------- /seq/rchoice.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1920 1048 10; 2 | #X obj 79 54 inlet; 3 | #X obj 157 164 list length; 4 | #X obj 124 184 random; 5 | #X obj 79 224 outlet; 6 | #X obj 79 204 list-idx; 7 | #X obj 79 140 t l b l; 8 | #X obj 79 74 route list bang; 9 | #X obj 160 113 list; 10 | #X obj 219 51 loadbang; 11 | #X obj 181 74 inlet; 12 | #X obj 105 112 list; 13 | #X msg 219 74 args; 14 | #X obj 219 97 pdcontrol; 15 | #X connect 0 0 6 0; 16 | #X connect 1 0 2 1; 17 | #X connect 2 0 4 1; 18 | #X connect 4 0 3 0; 19 | #X connect 5 0 4 0; 20 | #X connect 5 1 2 0; 21 | #X connect 5 2 1 0; 22 | #X connect 6 0 5 0; 23 | #X connect 6 1 7 0; 24 | #X connect 6 2 10 0; 25 | #X connect 7 0 5 0; 26 | #X connect 8 0 11 0; 27 | #X connect 9 0 7 1; 28 | #X connect 10 0 5 0; 29 | #X connect 11 0 12 0; 30 | #X connect 12 0 7 1; 31 | -------------------------------------------------------------------------------- /seq/unmap.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 2560 1566 10; 2 | #X obj 471 189 inlet; 3 | #X obj 471 246 outlet; 4 | #X obj 471 227 list-find; 5 | #X obj 522 188 list trim; 6 | #X obj 540 149 inlet; 7 | #X text 133 189 unmap - map symbols received on the left inlet to their index in the list provided on the right inlet or as arguments.; 8 | #X obj 522 265 any; 9 | #X obj 471 208 t a a; 10 | #X obj 522 284 outlet; 11 | #X obj 522 246 sel 0; 12 | #X obj 479 149 pdcontrol; 13 | #X obj 479 109 loadbang; 14 | #X msg 479 129 args; 15 | #X connect 0 0 7 0; 16 | #X connect 2 0 1 0; 17 | #X connect 2 1 9 0; 18 | #X connect 3 0 2 1; 19 | #X connect 4 0 3 0; 20 | #X connect 6 0 8 0; 21 | #X connect 7 0 2 0; 22 | #X connect 7 1 6 1; 23 | #X connect 9 0 6 0; 24 | #X connect 10 0 3 0; 25 | #X connect 11 0 12 0; 26 | #X connect 12 0 10 0; 27 | -------------------------------------------------------------------------------- /ctrl/keyonchg.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 52 97 spigot; 3 | #X obj 46 9 keyname; 4 | #X msg 85 47 1; 5 | #X msg 118 47 0; 6 | #X msg 26 163 0; 7 | #X obj 53 207 change; 8 | #X obj 53 245 outlet; 9 | #X obj 155 57 loadbang; 10 | #X obj 155 76 \$2; 11 | #X obj 53 226 sel 1; 12 | #X obj 85 28 sel \$1; 13 | #X obj 52 116 sel 0; 14 | #X obj 26 144 del 50; 15 | #X obj 155 95 sel 0; 16 | #X text 77 178 outputs bang when \$1 is pressed; 17 | #X connect 0 0 11 0; 18 | #X connect 1 0 0 0; 19 | #X connect 1 1 10 0; 20 | #X connect 2 0 0 1; 21 | #X connect 3 0 0 1; 22 | #X connect 4 0 5 0; 23 | #X connect 5 0 9 0; 24 | #X connect 7 0 8 0; 25 | #X connect 8 0 13 0; 26 | #X connect 9 0 6 0; 27 | #X connect 10 0 2 0; 28 | #X connect 10 1 3 0; 29 | #X connect 11 0 12 0; 30 | #X connect 11 1 5 0; 31 | #X connect 12 0 4 0; 32 | #X connect 13 1 12 1; 33 | -------------------------------------------------------------------------------- /ctrl/cline.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1680 29 1600 871 10; 2 | #X obj 376 101 inlet; 3 | #X obj 280 61 mc l; 4 | #X obj 280 85 route name; 5 | #X obj 289 312 hsl 128 15 0 127 0 0 empty empty le:127 -2 7 0 10 -4032 6 | -1 -1 12700 1; 7 | #X symbolatom 205 179 10 0 0 0 - - -; 8 | #X obj 436 303 pack f s; 9 | #X obj 501 276 outlet; 10 | #X obj 280 110 symbol; 11 | #X obj 365 223 t b a; 12 | #X obj 376 141 line; 13 | #X obj 463 239 nop; 14 | #X msg 436 322 label \$2:\$1 \, set \$1; 15 | #X connect 0 0 9 0; 16 | #X connect 1 0 2 0; 17 | #X connect 2 0 7 0; 18 | #X connect 2 1 9 0; 19 | #X connect 3 0 9 0; 20 | #X connect 5 0 11 0; 21 | #X connect 7 0 4 0; 22 | #X connect 7 0 8 0; 23 | #X connect 8 0 3 0; 24 | #X connect 8 1 5 1; 25 | #X connect 9 0 10 0; 26 | #X connect 10 0 6 0; 27 | #X connect 10 0 5 0; 28 | #X connect 11 0 3 0; 29 | #X coords 0 -1 1 1 133 30 1 286 297; 30 | -------------------------------------------------------------------------------- /gen/sndcf~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1680 29 1600 871 10; 2 | #X obj 319 69 inlet; 3 | #X obj 280 153 phasor~; 4 | #X obj 280 175 outlet~; 5 | #X obj 217 87 inlet~; 6 | #X obj 319 88 route float freq bang; 7 | #X msg 401 136 0; 8 | #X text 18 207 sndcf~ - soundfile control by frequency. connect the 9 | audio outlet to snd~'s audio inlet and snd~'s message outlet to sndcf~'s 10 | message inlet. then you can send an audio signal into sndcf~ representing 11 | the frequency you want to play the sound at. for example \, [sig~ 1] 12 | will play the sound at normal speed \, [sig~ 0.5] will play at half 13 | speed \, and [sig~ 2] will play at double speed.; 14 | #X obj 280 127 *~ 0; 15 | #X connect 0 0 4 0; 16 | #X connect 1 0 2 0; 17 | #X connect 3 0 7 0; 18 | #X connect 4 0 1 1; 19 | #X connect 4 1 7 1; 20 | #X connect 4 2 5 0; 21 | #X connect 5 0 1 1; 22 | #X connect 7 0 1 0; 23 | -------------------------------------------------------------------------------- /fx/sdly~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1920 1048 10; 2 | #X obj 40 40 inlet~; 3 | #X obj 40 115 delwrite~ \$0-del \$1; 4 | #X obj 197 58 vd~ \$0-del; 5 | #X obj 197 120 outlet~; 6 | #X obj 165 88 *~; 7 | #X obj 197 14 lb \$1; 8 | #X obj 197 36 inlet~; 9 | #X obj 277 71 inlet~; 10 | #X obj 277 49 lb \$2; 11 | #X text 346 24 sdly~ - Simple delay.; 12 | #X text 351 115 Inlets:; 13 | #X text 356 135 1 - Signal input.; 14 | #X text 356 148 2 - Delay time.; 15 | #X text 356 161 3 - Delay feedback.; 16 | #X text 351 53 Arguments:; 17 | #X text 357 76 1 - Max and default delay time.; 18 | #X text 357 89 2 - Default delay feedback.; 19 | #X text 350 189 Outlets:; 20 | #X text 354 210 1 - Delayed output.; 21 | #X connect 0 0 1 0; 22 | #X connect 2 0 3 0; 23 | #X connect 2 0 4 0; 24 | #X connect 4 0 1 0; 25 | #X connect 5 0 6 0; 26 | #X connect 6 0 2 0; 27 | #X connect 7 0 4 1; 28 | #X connect 8 0 7 0; 29 | -------------------------------------------------------------------------------- /math/rtom.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 2560 1566 10; 2 | #X obj 56 107 inlet; 3 | #X obj 121 269 outlet; 4 | #X text 304 143 The input range can be specified by providing the bottom and top of the range as arguments \, or by providing them to the 2nd and 3rd inlets \, respectively.; 5 | #X obj 136 107 inlet; 6 | #X obj 121 229 /; 7 | #X obj 121 249 * 127; 8 | #X obj 96 107 inlet; 9 | #X obj 96 152 t b f; 10 | #X obj 96 131 lb \$1; 11 | #X obj 136 131 f \$2; 12 | #X obj 56 148 - \$1; 13 | #X obj 136 209 - \$1; 14 | #X text 305 108 rangem - Range to MIDI. Scale a specified range to MIDI range (0-127).; 15 | #X connect 0 0 10 0; 16 | #X connect 3 0 9 0; 17 | #X connect 4 0 5 0; 18 | #X connect 5 0 1 0; 19 | #X connect 6 0 8 0; 20 | #X connect 7 0 9 0; 21 | #X connect 7 1 11 1; 22 | #X connect 8 0 7 0; 23 | #X connect 8 0 10 1; 24 | #X connect 9 0 11 0; 25 | #X connect 10 0 4 0; 26 | #X connect 11 0 4 1; 27 | -------------------------------------------------------------------------------- /utils/list-replacer.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 265 32 inlet; 3 | #X obj 265 92 list-drip; 4 | #X obj 265 129 sel \$1; 5 | #X text 377 71 list-replacer: replaces all instances of one item in 6 | a list with another list; 7 | #X obj 265 163 l; 8 | #X obj 410 273 l; 9 | #X obj 410 292 outlet; 10 | #X obj 283 238 list prepend; 11 | #X obj 361 238 list; 12 | #X obj 283 195 t l; 13 | #X obj 265 70 t l b; 14 | #X obj 265 51 list; 15 | #X obj 370 146 list; 16 | #X obj 370 127 inlet; 17 | #X connect 0 0 11 0; 18 | #X connect 1 0 2 0; 19 | #X connect 1 1 5 0; 20 | #X connect 2 0 4 0; 21 | #X connect 2 1 9 0; 22 | #X connect 4 0 9 0; 23 | #X connect 5 0 6 0; 24 | #X connect 7 0 8 0; 25 | #X connect 7 0 5 1; 26 | #X connect 8 0 7 1; 27 | #X connect 9 0 7 0; 28 | #X connect 10 0 1 0; 29 | #X connect 10 1 7 1; 30 | #X connect 11 0 10 0; 31 | #X connect 12 0 4 1; 32 | #X connect 13 0 12 0; 33 | -------------------------------------------------------------------------------- /utils/mp3conv.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X obj 336 350 shell; 3 | #X obj 336 274 quote; 4 | #X obj 363 419 outlet; 5 | #X obj 471 272 l2s _; 6 | #X obj 336 255 t a a; 7 | #X obj 336 236 inlet; 8 | #X obj 471 291 s2l /; 9 | #X obj 471 310 list-idx -1; 10 | #X obj 471 329 list append .wav; 11 | #X obj 471 367 sym; 12 | #X obj 336 293 list append; 13 | #X obj 336 312 prepent --decode; 14 | #X obj 336 331 prepent lame; 15 | #X obj 471 348 list prepend /tmp/; 16 | #X obj 363 400 symbol; 17 | #X connect 0 1 14 0; 18 | #X connect 1 0 10 0; 19 | #X connect 3 0 6 0; 20 | #X connect 4 0 1 0; 21 | #X connect 4 1 3 0; 22 | #X connect 5 0 4 0; 23 | #X connect 6 0 7 0; 24 | #X connect 7 0 8 0; 25 | #X connect 8 0 13 0; 26 | #X connect 9 0 10 1; 27 | #X connect 9 0 14 1; 28 | #X connect 10 0 11 0; 29 | #X connect 11 0 12 0; 30 | #X connect 12 0 0 0; 31 | #X connect 13 0 9 0; 32 | #X connect 14 0 2 0; 33 | -------------------------------------------------------------------------------- /ctrl/monos.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 800 849 10; 2 | #X obj 284 129 mono; 3 | #X text 399 111 monos - a convenient version of mono. this version 4 | of mono outputs data that resembles [notein]'s output \, but in a format 5 | that monosynths can understand.; 6 | #X obj 327 146 > 0; 7 | #X obj 327 165 change; 8 | #X obj 254 239 outlet; 9 | #X obj 327 239 outlet; 10 | #X obj 285 192 sel 0; 11 | #X obj 254 220 f; 12 | #X obj 320 95 t f f; 13 | #X obj 327 220 *; 14 | #X obj 407 166 sel 0; 15 | #X obj 327 184 t f f; 16 | #X obj 284 55 inlet; 17 | #X obj 320 55 inlet; 18 | #X connect 0 0 7 0; 19 | #X connect 0 1 2 0; 20 | #X connect 2 0 3 0; 21 | #X connect 3 0 11 0; 22 | #X connect 6 0 7 0; 23 | #X connect 7 0 4 0; 24 | #X connect 8 0 0 1; 25 | #X connect 8 1 10 0; 26 | #X connect 9 0 5 0; 27 | #X connect 10 1 9 1; 28 | #X connect 11 0 6 0; 29 | #X connect 11 1 9 0; 30 | #X connect 12 0 0 0; 31 | #X connect 13 0 8 0; 32 | -------------------------------------------------------------------------------- /seq/beat~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X obj 356 166 inlet~; 3 | #X obj 356 205 *~ 1; 4 | #X obj 407 161 lb \$1 16; 5 | #X obj 356 224 edger~; 6 | #X obj 389 246 lb \$2 1; 7 | #X obj 356 394 outlet; 8 | #X obj 356 265 bfilt2; 9 | #X text 493 194 beat~ - make beats from a phasor; 10 | #X obj 420 394 outlet; 11 | #X obj 407 142 inlet; 12 | #X obj 482 242 inlet; 13 | #X text 488 270 arg 1 is how many bangs should trigger for each cycle 14 | of the audio (phasor) input. outputs every [arg 2] bangs.; 15 | #X obj 377 186 - 1; 16 | #X obj 420 356 snapshot~; 17 | #X obj 420 375 int; 18 | #X connect 0 0 1 0; 19 | #X connect 1 0 3 0; 20 | #X connect 1 0 13 0; 21 | #X connect 2 0 12 0; 22 | #X connect 3 0 6 0; 23 | #X connect 3 0 13 0; 24 | #X connect 4 0 6 1; 25 | #X connect 6 0 5 0; 26 | #X connect 9 0 2 0; 27 | #X connect 10 0 4 0; 28 | #X connect 12 0 1 1; 29 | #X connect 13 0 14 0; 30 | #X connect 14 0 8 0; 31 | -------------------------------------------------------------------------------- /guis/lview-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X obj 49 251 lview; 3 | #X msg 44 191 this is a very long list. it's longer than the width 4 | of [lview] would allow but you can still see the whole thing... right? 5 | ; 6 | #X msg 34 148 foo; 7 | #X msg 37 170 1 2 3 4; 8 | #X msg 24 127 bang; 9 | #X text 213 10 lview - list view; 10 | #X text 209 40 displays the entire list received on the inlet \, as 11 | well as the length of that list.; 12 | #N canvas 0 29 800 849 META 0; 13 | #X text 12 65 LIBRARY defaultxr; 14 | #X text 12 85 AUTHOR modula t. worm; 15 | #X text 12 105 WEBSITE http://github.com/defaultxr/pure-data-patches 16 | ; 17 | #X text 12 125 RELEASE_DATE 2013; 18 | #X text 12 5 KEYWORDS list gui view; 19 | #X text 12 25 DESCRIPTION graphically show a list; 20 | #X text 12 45 INLET_0 list; 21 | #X restore 460 107 pd META; 22 | #X connect 1 0 0 0; 23 | #X connect 2 0 0 0; 24 | #X connect 3 0 0 0; 25 | #X connect 4 0 0 0; 26 | -------------------------------------------------------------------------------- /gen/pulse~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 155 248 pulse~; 3 | #X obj 155 275 view~; 4 | #X obj 222 197 hsl 128 15 -1 1 0 0 empty empty empty -2 -8 0 10 -262144 5 | -1 -1 12600 1; 6 | #X floatatom 219 214 10 0 0 0 - - -; 7 | #X obj 219 232 sig~; 8 | #X obj 155 199 sig~ 159; 9 | #X msg 219 178 0; 10 | #X obj 219 159 loadbang; 11 | #X text 421 62 pulse~ - pulse wave with modulatable width; 12 | #X text 415 101 pulse~ outputs a bipolar non-band-limited pulse wave 13 | with a modulatable width. the first inlet is for the frequency and 14 | the second takes a signal from -1 to 1 to specify the width.; 15 | #X text 417 155 take note of what happens when the width is set to 16 | -1 or 1 ...; 17 | #X floatatom 155 181 5 0 0 0 - - -; 18 | #X connect 0 0 1 0; 19 | #X connect 2 0 3 0; 20 | #X connect 3 0 4 0; 21 | #X connect 4 0 0 1; 22 | #X connect 5 0 0 0; 23 | #X connect 6 0 2 0; 24 | #X connect 7 0 6 0; 25 | #X connect 11 0 5 0; 26 | -------------------------------------------------------------------------------- /guis/lview.pd: -------------------------------------------------------------------------------- 1 | #N canvas 800 29 800 410 10; 2 | #X obj 282 71 inlet; 3 | #X obj 101 116 cnv 15 79 15 empty \$0-cnv 0 0 9 0 12 -262144 -1 0; 4 | #X obj 309 178 list length; 5 | #X obj 282 90 route list; 6 | #X text 420 21 vlist - view a list; 7 | #X floatatom 149 100 5 0 0 0 - - -; 8 | #X obj 282 291 s \$0-cnv; 9 | #X obj 297 221 spacesym; 10 | #X obj 297 202 loadbang; 11 | #X obj 282 240 l2s; 12 | #X msg 282 259 label \$1 \, vis_size 79 15 \, label_font 0 12 \, color 13 | 0 22 \, label_pos 0 9; 14 | #X obj 339 109 list; 15 | #X msg 242 219 0; 16 | #X obj 282 159 t a a; 17 | #X connect 0 0 3 0; 18 | #X connect 2 0 5 0; 19 | #X connect 3 0 13 0; 20 | #X connect 3 1 11 0; 21 | #X connect 7 0 9 1; 22 | #X connect 8 0 7 0; 23 | #X connect 8 0 12 0; 24 | #X connect 9 0 10 0; 25 | #X connect 10 0 6 0; 26 | #X connect 11 0 13 0; 27 | #X connect 12 0 9 0; 28 | #X connect 13 0 9 0; 29 | #X connect 13 1 2 0; 30 | #X coords 0 -1 1 1 81 32 1 100 100; 31 | -------------------------------------------------------------------------------- /ctrl/keyonoff.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 52 97 spigot; 3 | #X obj 15 10 keyname; 4 | #X msg 82 62 1; 5 | #X msg 117 63 0; 6 | #X obj 52 117 select 0; 7 | #X msg 26 163 0; 8 | #X obj 53 207 change; 9 | #X obj 53 227 outlet; 10 | #X obj 75 31 select \$1; 11 | #X obj 153 23 loadbang; 12 | #X obj 26 144 delay 50; 13 | #X obj 154 44 \$2; 14 | #X obj 155 65 select 0; 15 | #X text 112 140 outputs 1 when desired key; 16 | #X text 111 153 is pressed \, 0 when released; 17 | #X text 112 166 only passes changes (no dupes); 18 | #X text 111 180 jason@noisybox.net; 19 | #X connect 0 0 4 0; 20 | #X connect 1 0 0 0; 21 | #X connect 1 1 8 0; 22 | #X connect 2 0 0 1; 23 | #X connect 3 0 0 1; 24 | #X connect 4 0 10 0; 25 | #X connect 4 1 6 0; 26 | #X connect 5 0 6 0; 27 | #X connect 6 0 7 0; 28 | #X connect 8 0 2 0; 29 | #X connect 8 1 3 0; 30 | #X connect 9 0 11 0; 31 | #X connect 10 0 5 0; 32 | #X connect 11 0 12 0; 33 | #X connect 12 1 10 1; 34 | -------------------------------------------------------------------------------- /seq/stack-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X msg 15 24 1 \, 2 \, 3; 3 | #X obj 73 52 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 4 | -1; 5 | #X floatatom 37 44 5 0 0 0 - - -; 6 | #X floatatom 37 106 5 0 0 0 - - -; 7 | #X obj 37 77 stack 3; 8 | #X text 143 60 stack is an implementation of a last-in-first-out stack. 9 | to push something onto the stack (i.e. add it to the list) \, simply 10 | send the it to the inlet. to pop something off the top of the stack 11 | (i.e. get the last item that was pushed and remove it from the list) 12 | \, send a bang to the inlet. if there are no items left in the stack 13 | \, it will output bang. if you provide a non-zero argument \, the stack 14 | will not grow past that size (the least recent item to be pushed will 15 | be the first to be removed).; 16 | #X text 141 26 stack - last-in-first-out stack.; 17 | #X connect 0 0 4 0; 18 | #X connect 1 0 4 0; 19 | #X connect 2 0 4 0; 20 | #X connect 4 0 3 0; 21 | -------------------------------------------------------------------------------- /fx/ifilter~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X obj 77 48 inlet~; 3 | #X obj 103 115 hsl 128 13 0 127 0 0 empty empty freq -2 8 0 10 -262144 4 | -1 -1 0 1; 5 | #X obj 103 128 hsl 128 13 0.001 1 0 0 empty empty resonance -2 8 0 6 | 10 -262144 -1 -1 0 1; 7 | #X obj 77 274 outlet~; 8 | #X obj 218 100 bng 15 250 50 0 empty empty r 4 7 0 10 -262144 -1 -1 9 | ; 10 | #X obj 83 178 mtof; 11 | #X msg 23 129 reset; 12 | #X obj 187 35 inlet; 13 | #X obj 187 54 route freq res; 14 | #X obj 77 254 \$1; 15 | #X obj 185 78 autoscale 0 1; 16 | #X obj 84 205 aline~ 20; 17 | #X obj 145 205 aline~ 20; 18 | #X connect 0 0 9 0; 19 | #X connect 1 0 5 0; 20 | #X connect 2 0 12 0; 21 | #X connect 4 0 6 0; 22 | #X connect 5 0 11 0; 23 | #X connect 6 0 9 0; 24 | #X connect 7 0 8 0; 25 | #X connect 8 0 1 0; 26 | #X connect 8 1 10 0; 27 | #X connect 8 2 1 0; 28 | #X connect 9 0 3 0; 29 | #X connect 10 0 2 0; 30 | #X connect 11 0 9 1; 31 | #X connect 12 0 9 2; 32 | #X coords 0 -1 1 1 133 41 1 100 100; 33 | -------------------------------------------------------------------------------- /synths/hoover~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1680 29 1600 871 10; 2 | #X obj 350 185 inlet~; 3 | #X obj 308 312 pulse~; 4 | #X obj 350 312 pulse~; 5 | #X obj 392 312 pulse~; 6 | #X obj 308 263 /~ 2; 7 | #X obj 392 263 *~ 2; 8 | #X obj 457 266 *~ 0.9; 9 | #X obj 457 247 osc~; 10 | #X floatatom 457 210 5 0 0 0 - - -; 11 | #X obj 457 228 sig~; 12 | #X obj 350 371 /~ 3; 13 | #X obj 350 409 chorus~; 14 | #X obj 350 204 *~ 1; 15 | #X obj 350 428 outlet~; 16 | #X obj 457 191 lb \$1 7.21; 17 | #X obj 350 390 lop~ 3000; 18 | #X connect 0 0 12 0; 19 | #X connect 1 0 10 0; 20 | #X connect 2 0 10 0; 21 | #X connect 3 0 10 0; 22 | #X connect 4 0 1 0; 23 | #X connect 5 0 3 0; 24 | #X connect 6 0 3 1; 25 | #X connect 6 0 2 1; 26 | #X connect 6 0 1 1; 27 | #X connect 7 0 6 0; 28 | #X connect 8 0 9 0; 29 | #X connect 9 0 7 0; 30 | #X connect 10 0 15 0; 31 | #X connect 11 0 13 0; 32 | #X connect 12 0 4 0; 33 | #X connect 12 0 2 0; 34 | #X connect 12 0 5 0; 35 | #X connect 14 0 8 0; 36 | #X connect 15 0 11 0; 37 | -------------------------------------------------------------------------------- /utils/qtimer.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 871 10; 2 | #X obj 470 306 t b b; 3 | #X obj 462 331 realtime; 4 | #X floatatom 462 350 5 0 0 0 - - -; 5 | #X obj 462 387 int; 6 | #X obj 462 406 * 10; 7 | #X floatatom 462 436 5 0 0 0 - - -; 8 | #X obj 462 368 / 10; 9 | #X obj 548 262 inlet; 10 | #X obj 462 454 outlet; 11 | #X text 595 332 quantizable timer; 12 | #X floatatom 502 371 5 0 0 0 - - -; 13 | #X obj 548 281 route bang quan float start; 14 | #X obj 667 300 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 15 | -1 -1; 16 | #X obj 546 231 lb \$1 10; 17 | #X connect 0 0 1 0; 18 | #X connect 0 1 1 1; 19 | #X connect 1 0 2 0; 20 | #X connect 2 0 6 0; 21 | #X connect 3 0 4 0; 22 | #X connect 4 0 5 0; 23 | #X connect 5 0 8 0; 24 | #X connect 6 0 3 0; 25 | #X connect 7 0 11 0; 26 | #X connect 10 0 6 1; 27 | #X connect 10 0 4 1; 28 | #X connect 11 0 0 0; 29 | #X connect 11 1 10 0; 30 | #X connect 11 2 10 0; 31 | #X connect 11 3 12 0; 32 | #X connect 12 0 1 0; 33 | #X connect 13 0 10 0; 34 | -------------------------------------------------------------------------------- /math/rrangef.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 2560 1566 10; 2 | #X obj 91 287 + \$1; 3 | #X obj 91 306 outlet; 4 | #X obj 91 35 inlet; 5 | #X obj 132 135 unpack f f; 6 | #X obj 91 226 - \$1; 7 | #X obj 91 54 route bang list float; 8 | #X msg 173 73 0 \$1; 9 | #X obj 252 37 inlet; 10 | #X obj 288 37 inlet; 11 | #X obj 132 154 t b f; 12 | #X obj 91 207 f \$2; 13 | #X obj 132 99 list trim; 14 | #X obj 91 245 t b f; 15 | #X text 332 62 rrangef - random float within a range \, inclusive.; 16 | #X obj 91 268 randomF; 17 | #X connect 0 0 1 0; 18 | #X connect 2 0 5 0; 19 | #X connect 3 0 9 0; 20 | #X connect 3 1 10 1; 21 | #X connect 4 0 12 0; 22 | #X connect 5 0 10 0; 23 | #X connect 5 1 11 0; 24 | #X connect 5 2 6 0; 25 | #X connect 5 3 3 0; 26 | #X connect 6 0 3 0; 27 | #X connect 7 0 9 0; 28 | #X connect 8 0 10 1; 29 | #X connect 9 0 10 0; 30 | #X connect 9 1 4 1; 31 | #X connect 9 1 0 1; 32 | #X connect 10 0 4 0; 33 | #X connect 11 0 3 0; 34 | #X connect 12 0 14 0; 35 | #X connect 12 1 14 1; 36 | #X connect 14 0 0 0; 37 | -------------------------------------------------------------------------------- /seq/bpma.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 94 137 metro; 3 | #X obj 109 92 / 4; 4 | #X obj 78 -2 inlet; 5 | #X obj 78 17 route bang float; 6 | #X floatatom 109 113 10 0 0 1 time_between_bangs - -; 7 | #X floatatom 109 46 5 0 0 0 - - -; 8 | #X obj 109 72 expr (60/$f1)*1000; 9 | #X obj 94 46 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1 10 | ; 11 | #X obj 333 56 lb \$2 64; 12 | #X obj 236 75 / 4; 13 | #X text 368 80 second argument = number of bangs per measure; 14 | #X obj 94 175 outlet; 15 | #X obj 94 156 count \$2; 16 | #X text 332 -8 bpm any; 17 | #X floatatom 230 91 5 0 0 0 - - -; 18 | #X obj 215 -5 lb \$1 120; 19 | #X connect 0 0 12 0; 20 | #X connect 1 0 4 0; 21 | #X connect 2 0 3 0; 22 | #X connect 3 0 7 0; 23 | #X connect 3 1 5 0; 24 | #X connect 4 0 0 1; 25 | #X connect 5 0 6 0; 26 | #X connect 6 0 1 0; 27 | #X connect 7 0 0 0; 28 | #X connect 8 0 9 0; 29 | #X connect 8 0 12 1; 30 | #X connect 9 0 1 1; 31 | #X connect 9 0 14 0; 32 | #X connect 12 0 11 0; 33 | #X connect 15 0 5 0; 34 | -------------------------------------------------------------------------------- /seq/hashwrite.pd: -------------------------------------------------------------------------------- 1 | #N canvas 800 29 800 849 10; 2 | #X obj 260 255 inlet; 3 | #X obj 393 245 inlet; 4 | #X text 336 22 hashwrite; 5 | #X obj 328 460 s \$1; 6 | #X msg 328 348 set foo \$1; 7 | #X msg 273 388 set; 8 | #X msg 393 314 set set \$1 \, adddollar 1; 9 | #X obj 393 264 route float; 10 | #X obj 456 283 symbol; 11 | #X obj 342 313 symbol; 12 | #X msg 446 354 set set \$1; 13 | #X text 341 49 send something to the right inlet to set the key \, 14 | and then something to the left inlet to set the value of that key. 15 | ; 16 | #X text 333 91 remember that neither keys nor values can be lists. 17 | ; 18 | #X obj 260 274 route bang float; 19 | #X connect 0 0 13 0; 20 | #X connect 1 0 7 0; 21 | #X connect 4 0 3 0; 22 | #X connect 5 0 3 0; 23 | #X connect 6 0 4 0; 24 | #X connect 7 0 6 0; 25 | #X connect 7 0 10 0; 26 | #X connect 7 1 8 0; 27 | #X connect 8 0 6 0; 28 | #X connect 8 0 10 0; 29 | #X connect 9 0 4 0; 30 | #X connect 10 0 5 0; 31 | #X connect 13 0 5 0; 32 | #X connect 13 1 4 0; 33 | #X connect 13 2 9 0; 34 | -------------------------------------------------------------------------------- /synths/kick3~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 265 93 inlet; 3 | #X obj 265 112 route bang; 4 | #X obj 335 424 osc~; 5 | #X obj 265 169 line~; 6 | #X obj 265 131 f \$3; 7 | #X msg 265 150 1 \, 0 \$1; 8 | #X obj 335 211 *~; 9 | #X obj 335 243 *~; 10 | #X obj 335 275 *~; 11 | #X obj 335 307 *~; 12 | #X obj 335 386 *~ 0; 13 | #X obj 356 329 loadbang; 14 | #X obj 356 348 f \$1; 15 | #X obj 356 367 - \$2; 16 | #X obj 335 405 +~ \$2; 17 | #X obj 265 496 *~; 18 | #X obj 265 515 outlet~; 19 | #X connect 0 0 1 0; 20 | #X connect 1 0 4 0; 21 | #X connect 2 0 15 1; 22 | #X connect 3 0 6 1; 23 | #X connect 3 0 6 0; 24 | #X connect 3 0 15 0; 25 | #X connect 4 0 5 0; 26 | #X connect 5 0 3 0; 27 | #X connect 6 0 7 1; 28 | #X connect 6 0 7 0; 29 | #X connect 7 0 8 0; 30 | #X connect 7 0 8 1; 31 | #X connect 8 0 9 1; 32 | #X connect 8 0 9 0; 33 | #X connect 9 0 10 0; 34 | #X connect 10 0 14 0; 35 | #X connect 11 0 12 0; 36 | #X connect 12 0 13 0; 37 | #X connect 13 0 10 1; 38 | #X connect 14 0 2 0; 39 | #X connect 15 0 16 0; 40 | -------------------------------------------------------------------------------- /guis/siga~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X obj 34 9 inlet~; 3 | #X floatatom 138 100 7 0 0 0 - - -; 4 | #X floatatom 138 148 7 0 0 0 min - -; 5 | #X floatatom 138 132 7 0 0 0 max - -; 6 | #X obj 100 149 bng 15 250 50 0 empty empty r 4 7 0 10 -262144 -1 -1 7 | ; 8 | #X obj 34 36 unsig~ 31; 9 | #X floatatom 138 116 7 0 0 0 avg - -; 10 | #X obj 182 102 vsl 8 59 -1 1 0 0 \$0-dead \$0-deadr empty 0 -9 0 10 11 | -262144 -1 -1 5800 1; 12 | #X obj -27 128 steady 10000; 13 | #X obj 275 71 lop~ 0.5; 14 | #X obj 275 128 int; 15 | #X obj 275 109 * 10000; 16 | #X obj 275 147 / 10000; 17 | #X obj 275 90 unsig~ 120; 18 | #X obj 43 87 loadbang; 19 | #X connect 0 0 5 0; 20 | #X connect 0 0 9 0; 21 | #X connect 4 0 8 0; 22 | #X connect 5 0 1 0; 23 | #X connect 5 0 7 0; 24 | #X connect 5 0 8 0; 25 | #X connect 8 0 3 0; 26 | #X connect 8 1 2 0; 27 | #X connect 9 0 13 0; 28 | #X connect 10 0 12 0; 29 | #X connect 11 0 10 0; 30 | #X connect 12 0 6 0; 31 | #X connect 13 0 11 0; 32 | #X connect 14 0 4 0; 33 | #X coords 0 -1 1 1 90 64 1 100 100; 34 | -------------------------------------------------------------------------------- /utils/lb-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 1920 1048 10; 2 | #X floatatom 77 199 5 0 0 0 - - - 0; 3 | #X obj 77 171 lb 3; 4 | #X text 183 94 [lb] - loadbang with a default and "fallback"; 5 | #X text 184 134 [lb] is like [loadbang] \, but you can provide a number as an argument and it will output that number instead of a bang.; 6 | #X text 185 182 A second argument can be provided to specify a value if the first argument is zero. This is useful as a "fallback" value. For example \, if you use \$1 as the first argument but it's not provided in the parent patch \, then [lb]'s second argument will be output instead. This is because arguments that aren't provided default to 0 . Of course \, you need to be careful about this since if the argument IS provided \, and it's provided as a 0 \, then the second argument of [lb] will be output instead of 0 as the user intended. If that's a concern \, you might want to manually parse the list of arguments with an object like [pdcontrol] instead \; specifically \, with its "args" message.; 7 | #X connect 1 0 0 0; 8 | -------------------------------------------------------------------------------- /math/rrange.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 2560 1566 10; 2 | #X obj 91 336 + \$1; 3 | #X obj 91 355 outlet; 4 | #X obj 91 35 inlet; 5 | #X obj 132 165 unpack f f; 6 | #X obj 91 256 - \$1; 7 | #X obj 91 54 route bang list float; 8 | #X msg 173 73 0 \$1; 9 | #X obj 252 37 inlet; 10 | #X obj 288 37 inlet; 11 | #X obj 132 184 t b f; 12 | #X obj 91 237 f \$2; 13 | #X text 332 62 rrange - random within a range \, inclusive.; 14 | #X obj 132 99 list trim; 15 | #X obj 91 294 t b f; 16 | #X obj 91 275 + 1; 17 | #X obj 91 317 random; 18 | #X connect 0 0 1 0; 19 | #X connect 2 0 5 0; 20 | #X connect 3 0 9 0; 21 | #X connect 3 1 10 1; 22 | #X connect 4 0 14 0; 23 | #X connect 5 0 10 0; 24 | #X connect 5 1 12 0; 25 | #X connect 5 2 6 0; 26 | #X connect 5 3 3 0; 27 | #X connect 6 0 3 0; 28 | #X connect 7 0 9 0; 29 | #X connect 8 0 10 1; 30 | #X connect 9 0 10 0; 31 | #X connect 9 1 4 1; 32 | #X connect 9 1 0 1; 33 | #X connect 10 0 4 0; 34 | #X connect 12 0 3 0; 35 | #X connect 13 0 15 0; 36 | #X connect 13 1 15 1; 37 | #X connect 14 0 13 0; 38 | #X connect 15 0 0 0; 39 | -------------------------------------------------------------------------------- /guis/cpuload-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X obj 164 168 cpuload; 3 | #X text 418 153 cpuload - display current cpu load average; 4 | #X text 413 199 this came with pure data \, i just stole it and turned 5 | it into an abstraction.; 6 | #X floatatom 164 197 5 0 0 0 - - -; 7 | #X text 414 246 if you don't know what this is \, it's basically the 8 | number of jobs your cpu has had in queue over the last minute. if the 9 | number is less than one \, that means your cpu hasn't had any jobs 10 | in queue. if the number is more than one \, some processes had to wait 11 | while the cpu was taking care of others.; 12 | #N canvas 0 29 800 849 META 0; 13 | #X text 12 65 LIBRARY defaultxr; 14 | #X text 12 85 AUTHOR modula t. worm; 15 | #X text 12 105 WEBSITE http://github.com/defaultxr/pure-data-patches 16 | ; 17 | #X text 12 125 RELEASE_DATE 2013; 18 | #X text 12 25 DESCRIPTION display current cpu load average; 19 | #X text 12 5 KEYWORDS cpu load average; 20 | #X text 12 45 OUTLET_0 float; 21 | #X restore 260 307 pd META; 22 | #X connect 0 0 3 0; 23 | -------------------------------------------------------------------------------- /utils/quote.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 800 849 10; 2 | #X obj 49 338 list split 1; 3 | #X obj 102 374 list-splat -1; 4 | #X obj 76 412 list append; 5 | #X obj 13 431 list append; 6 | #X msg 139 393 \$1"; 7 | #X msg 49 378 "\$1; 8 | #X obj 104 234 t a a; 9 | #X obj 201 273 list length; 10 | #X obj 201 292 > 1; 11 | #X obj 49 319 spigot; 12 | #X obj 209 349 spigot; 13 | #X msg 209 387 "\$1"; 14 | #X obj 242 330 kinv; 15 | #X obj 209 368 symbol; 16 | #X obj 46 463 list trim; 17 | #X obj 104 215 inlet; 18 | #X obj 113 500 outlet; 19 | #X connect 0 0 5 0; 20 | #X connect 0 1 1 0; 21 | #X connect 1 0 2 0; 22 | #X connect 1 1 4 0; 23 | #X connect 2 0 3 1; 24 | #X connect 3 0 14 0; 25 | #X connect 4 0 2 1; 26 | #X connect 5 0 3 0; 27 | #X connect 6 0 9 0; 28 | #X connect 6 0 10 0; 29 | #X connect 6 1 7 0; 30 | #X connect 7 0 8 0; 31 | #X connect 8 0 9 1; 32 | #X connect 8 0 12 0; 33 | #X connect 9 0 0 0; 34 | #X connect 10 0 13 0; 35 | #X connect 11 0 16 0; 36 | #X connect 12 0 10 1; 37 | #X connect 13 0 11 0; 38 | #X connect 14 0 16 0; 39 | #X connect 15 0 6 0; 40 | -------------------------------------------------------------------------------- /seq/aline-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X floatatom 37 28 5 0 0 0 glide_to - -; 3 | #X floatatom 49 85 5 0 0 0 output - -; 4 | #X floatatom 118 28 5 0 0 0 in_msec - -; 5 | #X text 181 14 aline - automatic line; 6 | #X obj 49 56 aline 1000; 7 | #X text 181 51 aline is basically just an abstraction for line that 8 | automatically turns floats into ramp messages. in other words \, sending 9 | a float to the left inlet will not make the line "jump" to that value 10 | \; the line will ramp to that value over the amount of time provided 11 | as the first argument (or to the right inlet).; 12 | #X text 177 137 note that there is no loss of functionality if you 13 | use this! you can still send a pair of numbers to the left inlet to 14 | set the destination value and the ramp time simultaneously. thus \, 15 | you can still make the internal line jump to a value by sending a message 16 | like "5 0" to jump to the number 5 in 0 milliseconds.; 17 | #X text 182 233 see also: aline~; 18 | #X connect 0 0 4 0; 19 | #X connect 2 0 4 1; 20 | #X connect 4 0 1 0; 21 | -------------------------------------------------------------------------------- /math/round.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 1080 1920 1048 10; 2 | #X obj 74 278 + 0.5; 3 | #X obj 74 120 inlet; 4 | #X obj 74 300 int; 5 | #X obj 74 344 outlet; 6 | #X obj 74 171 t f f; 7 | #X obj 101 193 > 0; 8 | #X obj 101 214 sel 0 1; 9 | #X msg 101 246 -0.5; 10 | #X msg 135 246 0.5; 11 | #X obj 74 149 / \$1; 12 | #X obj 74 321 * \$1; 13 | #X text 297 100 round - Round an input to a multiple of a specified number.; 14 | #X text 307 139 left inlet - The input number.; 15 | #X text 306 154 right inlet / arg 1 - The multiple to round the input to.; 16 | #X text 312 188 outlet - The rounded output.; 17 | #X obj 217 216 t a; 18 | #X obj 199 180 inlet; 19 | #X obj 237 180 lb \$1 1; 20 | #X connect 0 0 2 0; 21 | #X connect 1 0 9 0; 22 | #X connect 2 0 10 0; 23 | #X connect 4 0 0 0; 24 | #X connect 4 1 5 0; 25 | #X connect 5 0 6 0; 26 | #X connect 6 0 7 0; 27 | #X connect 6 1 8 0; 28 | #X connect 7 0 0 1; 29 | #X connect 8 0 0 1; 30 | #X connect 9 0 4 0; 31 | #X connect 10 0 3 0; 32 | #X connect 15 0 10 1; 33 | #X connect 15 0 9 1; 34 | #X connect 16 0 15 0; 35 | #X connect 17 0 15 0; 36 | -------------------------------------------------------------------------------- /fx/stautocap~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 158 189 inlet~; 3 | #X text 129 172 capture input; 4 | #X text 296 171 trigger input; 5 | #X obj 45 191 inlet; 6 | #X text 9 173 bang to play; 7 | #X obj 158 248 rec~; 8 | #X obj 146 356 outlet~; 9 | #X text 150 67 automatic capture; 10 | #X obj 146 337 recsnd~; 11 | #X obj 136 306 sndcm~; 12 | #X obj 43 242 route float bang; 13 | #X msg 100 266 60; 14 | #X obj 238 189 inlet~; 15 | #X text 209 172 capture input; 16 | #X obj 280 248 rec~; 17 | #X obj 266 356 outlet~; 18 | #X obj 266 337 recsnd~; 19 | #X obj 256 306 sndcm~; 20 | #X obj 296 189 inlet; 21 | #X connect 0 0 5 0; 22 | #X connect 3 0 10 0; 23 | #X connect 5 0 9 0; 24 | #X connect 5 0 8 1; 25 | #X connect 8 0 6 0; 26 | #X connect 9 0 8 0; 27 | #X connect 10 0 9 0; 28 | #X connect 10 0 17 0; 29 | #X connect 10 1 11 0; 30 | #X connect 11 0 9 0; 31 | #X connect 11 0 17 0; 32 | #X connect 12 0 14 0; 33 | #X connect 14 0 17 0; 34 | #X connect 14 0 16 1; 35 | #X connect 16 0 15 0; 36 | #X connect 17 0 16 0; 37 | #X connect 18 0 14 1; 38 | #X connect 18 0 5 1; 39 | -------------------------------------------------------------------------------- /ctrl/editmode-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 78 168 editmode; 3 | #X floatatom 86 199 5 0 0 0 - - -; 4 | #X obj 56 219 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 5 | 1; 6 | #X floatatom 78 130 5 0 0 0 - - -; 7 | #X text 284 144 editmode - detect when edit mode is on.; 8 | #X text 281 208 [editmode] detects the state of edit mode. when edit 9 | mode is on \, [editmode] will output 1.. when it's off \, it will output 10 | 0..; 11 | #X text 285 266 you can change the window that [editmode] detects edit 12 | mode in by providing an argument to [editmode] or by sending a float 13 | to the inlet. if you send 0 \, [editmode] detects edit mode in its 14 | own window (i.e. the one that'd pop up if you right-clicked [editmode] 15 | and selected "Open"). if you send 1 \, [editmode] detects edit mode 16 | in the parent window of [editmode]'s window (i.e. this window). if 17 | you send 2 \, the parent of this window is used \, and so on.; 18 | #X text 288 401 see also:; 19 | #X obj 354 402 nems; 20 | #X connect 0 0 1 0; 21 | #X connect 0 0 2 0; 22 | #X connect 3 0 0 0; 23 | -------------------------------------------------------------------------------- /fx/pitchshifter~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 450 300 10; 2 | #X obj 58 266 dac~; 3 | #X obj 40 224 *~ 0.1; 4 | #X obj 90 224 *~ 0.1; 5 | #X obj 91 152 pitchshifter~; 6 | #X msg 254 140 transpose \$1; 7 | #X floatatom 254 121 5 0 0 0 - - -; 8 | #X floatatom 293 171 5 0 0 0 - - -; 9 | #X msg 293 191 window \$1; 10 | #X floatatom 225 220 5 0 0 0 - - -; 11 | #X msg 225 239 delay \$1; 12 | #X obj 10 14 cnv 15 300 100 empty empty empty 20 12 0 14 -241291 -66577 13 | 0; 14 | #X obj 40 49 osc~ 440; 15 | #X obj 211 54 phasor~ 1; 16 | #X text 21 23 Try replacing this signal with [adc~]; 17 | #X obj 127 198 / 100; 18 | #X floatatom 129 179 5 0 0 0 - - -; 19 | #X obj 40 83 expr~ tanh(8*$v1*(1-$v2)); 20 | #X connect 1 0 0 0; 21 | #X connect 2 0 0 1; 22 | #X connect 3 0 2 0; 23 | #X connect 4 0 3 1; 24 | #X connect 5 0 4 0; 25 | #X connect 6 0 7 0; 26 | #X connect 7 0 3 1; 27 | #X connect 8 0 9 0; 28 | #X connect 9 0 3 1; 29 | #X connect 11 0 16 0; 30 | #X connect 12 0 16 1; 31 | #X connect 14 0 2 1; 32 | #X connect 14 0 1 1; 33 | #X connect 15 0 14 0; 34 | #X connect 16 0 1 0; 35 | #X connect 16 0 3 0; 36 | -------------------------------------------------------------------------------- /seq/bpmm2.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 88 127 metro; 3 | #X obj 88 36 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 100 4 | ; 5 | #X obj 104 62 expr 60/$f1*1000; 6 | #X obj 88 148 outlet; 7 | #X msg 202 32 120; 8 | #X obj 207 -34 loadbang; 9 | #X obj 207 4 sel 0; 10 | #X obj 207 -15 f \$1; 11 | #X floatatom 104 100 10 0 0 1 time_between_bangs - -; 12 | #X obj 104 81 / 16; 13 | #X text 46 -55 this bpmm outputs 64th notes; 14 | #X text 126 125 bangs for each 64th note; 15 | #X obj 64 -39 inlet; 16 | #X obj 103 36 nbx 3 14 10 999 0 0 empty empty empty 0 -8 0 10 -262144 17 | -1 -1 120 256; 18 | #X obj 64 -1 moses 2; 19 | #X obj 64 -20 route float; 20 | #X connect 0 0 3 0; 21 | #X connect 1 0 0 0; 22 | #X connect 2 0 9 0; 23 | #X connect 4 0 13 0; 24 | #X connect 5 0 7 0; 25 | #X connect 6 0 4 0; 26 | #X connect 6 1 13 0; 27 | #X connect 7 0 6 0; 28 | #X connect 8 0 0 1; 29 | #X connect 9 0 8 0; 30 | #X connect 12 0 15 0; 31 | #X connect 13 0 2 0; 32 | #X connect 14 0 1 0; 33 | #X connect 14 1 13 0; 34 | #X connect 15 0 14 0; 35 | #X connect 15 1 1 0; 36 | #X coords 0 -1 1 1 79 14 1 60 36; 37 | -------------------------------------------------------------------------------- /seq/aline~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X floatatom 37 28 5 0 0 0 glide_to - -; 3 | #X obj 49 56 aline~ 1000; 4 | #X obj 49 85 unsig~ 30; 5 | #X floatatom 49 114 5 0 0 0 output - -; 6 | #X text 181 14 aline~ - automatic line; 7 | #X text 181 51 aline~ is basically just an abstraction for line~ that 8 | automatically turns floats into ramp messages. in other words \, sending 9 | a float to the left inlet will not make the line "jump" to that value 10 | \; the line will ramp to that value over the amount of time provided 11 | as the first argument (or to the right inlet).; 12 | #X text 177 137 note that there is no loss of functionality if you 13 | use this! you can still send a pair of numbers to the left inlet to 14 | set the destination value and the ramp time simultaneously. thus \, 15 | you can still make the internal line~ jump to a value by sending a 16 | message like "5 0" to jump to the number 5 in 0 milliseconds.; 17 | #X floatatom 124 28 5 0 0 0 in_msec - -; 18 | #X text 179 228 see also: aline; 19 | #X connect 0 0 1 0; 20 | #X connect 1 0 2 0; 21 | #X connect 2 0 3 0; 22 | #X connect 7 0 1 1; 23 | -------------------------------------------------------------------------------- /fx/sidechain~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 2560 1566 10; 2 | #X obj 73 54 inlet~; 3 | #X obj 73 262 outlet~; 4 | #X text 282 73 sidechaining (connect the outlet to a *~); 5 | #X obj 73 73 env~; 6 | #X obj 73 92 / 100; 7 | #X obj 73 111 change; 8 | #X obj 100 149 delta; 9 | #X obj 100 168 moses; 10 | #X obj 73 130 t f f; 11 | #X obj 27 193 kinv; 12 | #X obj 100 210 f \$2; 13 | #X obj 130 210 f \$1; 14 | #X obj 130 191 bang; 15 | #X obj 100 191 bang; 16 | #X text 306 104 arguments are: attack time \, release time; 17 | #X obj 208 111 inlet; 18 | #X obj 154 111 inlet; 19 | #X obj 154 130 lb \$1 10; 20 | #X obj 208 130 lb \$2 10; 21 | #X obj 73 237 aline~; 22 | #X connect 0 0 3 0; 23 | #X connect 3 0 4 0; 24 | #X connect 4 0 5 0; 25 | #X connect 5 0 8 0; 26 | #X connect 6 0 7 0; 27 | #X connect 7 0 13 0; 28 | #X connect 7 1 12 0; 29 | #X connect 8 0 9 0; 30 | #X connect 8 1 6 0; 31 | #X connect 9 0 19 0; 32 | #X connect 10 0 19 1; 33 | #X connect 11 0 19 1; 34 | #X connect 12 0 11 0; 35 | #X connect 13 0 10 0; 36 | #X connect 15 0 18 0; 37 | #X connect 16 0 17 0; 38 | #X connect 17 0 11 1; 39 | #X connect 18 0 10 1; 40 | #X connect 19 0 1 0; 41 | -------------------------------------------------------------------------------- /gen/timestretch~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 182 70 inlet~; 3 | #X text 460 68 timestretch~ is supposed to generate a triangle sort 4 | of wave that \, when connected to a snd~ \, will time-stretch the sound 5 | smoothly.; 6 | #X obj 238 254 outlet~; 7 | #X obj 238 197 pulse~; 8 | #X obj 238 235 sndcf~; 9 | #X obj 419 70 inlet; 10 | #X obj 280 200 max~ 1; 11 | #X obj 238 216 *~; 12 | #X obj 348 70 inlet~; 13 | #X obj 182 139 clip~ -1 1; 14 | #X text 461 112 this is for playing a sound SLOWER \; if you provide 15 | a number larger than 1 or smaller than -1 to the first inlet~ \, then 16 | you will still get a "chipmunk effect". i may fix this eventually. 17 | ; 18 | #X text 460 167 the left inlet~ is the speed to play the sound at (i.e. 19 | 0.5 for half speed). the right inlet~ is for how much "folding" to 20 | do. judge for yourself... the control inlet should be connected to 21 | the control outlet of the snd~.; 22 | #X connect 0 0 6 0; 23 | #X connect 0 0 9 0; 24 | #X connect 3 0 7 0; 25 | #X connect 4 0 2 0; 26 | #X connect 5 0 4 1; 27 | #X connect 6 0 7 1; 28 | #X connect 7 0 4 0; 29 | #X connect 8 0 3 0; 30 | #X connect 9 0 3 1; 31 | -------------------------------------------------------------------------------- /gen/snd~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X msg 89 118 open \$1; 3 | #X obj 89 89 openpanel; 4 | #X obj 89 62 bng 15 250 50 0 empty empty select_a_wav 17 7 0 10 -262144 5 | -1 -1; 6 | #X obj 68 176 o~; 7 | #X obj 17 118 aline~ 1000; 8 | #X obj 371 245 sndl~; 9 | #X obj 417 245 sndp~; 10 | #X obj 463 245 sndm~; 11 | #X text 268 244 see also:; 12 | #X text 276 29 snd~ - load a sound file into memory; 13 | #X obj 68 147 snd~; 14 | #X obj 325 245 sndf~; 15 | #X text 265 66 sndf~ allows you to load a sound into memory (either 16 | by sending an "open" message to the right inlet or by providing the 17 | filename as the argument) and read thru it by sending values from 0 18 | (start of the sound) to 1 (end of the sound) to the left inlet.; 19 | #X text 267 133 this abstraction is used internally by objects like 20 | sndf~ \, sndl~ \, sndm~ \, etc. for most purposes \, you'll probably 21 | find those a lot more convenient.; 22 | #X obj -43 89 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144 23 | -1 -1 6000 1; 24 | #X connect 0 0 10 1; 25 | #X connect 1 0 0 0; 26 | #X connect 2 0 1 0; 27 | #X connect 4 0 10 0; 28 | #X connect 10 0 3 0; 29 | #X connect 14 0 4 0; 30 | -------------------------------------------------------------------------------- /fx/mcomb~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1598 868 10; 2 | #X obj 126 128 comb~ \$1 \$2 \$3 \$4 \$5; 3 | #X obj 126 23 inlet~; 4 | #X obj 146 68 hsl 128 12 0 50 0 0 empty empty delay 2 6 0 10 -262144 5 | -1 -1 229 1; 6 | #X obj 146 80 hsl 128 12 0 1 0 0 empty empty predly_coefficient 2 6 7 | 0 10 -262144 -1 -1 0 1; 8 | #X obj 146 92 hsl 128 12 0 1 0 0 empty empty postdly_coefficient 2 9 | 6 0 10 -262144 -1 -1 0 1; 10 | #X obj 146 104 hsl 128 12 0 1 0 0 empty empty output_coefficient 2 11 | 6 0 10 -262144 -1 -1 0 1; 12 | #X floatatom 282 63 5 0 0 0 - - -; 13 | #X floatatom 282 82 5 0 0 0 - - -; 14 | #X floatatom 282 101 5 0 0 0 - - -; 15 | #X floatatom 282 120 5 0 0 0 - - -; 16 | #X obj 126 154 outlet~; 17 | #X obj 179 16 lb \$1; 18 | #X obj 215 16 lb \$2; 19 | #X obj 251 16 lb \$3; 20 | #X obj 287 16 lb \$4; 21 | #X connect 0 0 10 0; 22 | #X connect 1 0 0 0; 23 | #X connect 2 0 0 1; 24 | #X connect 2 0 6 0; 25 | #X connect 3 0 0 2; 26 | #X connect 3 0 7 0; 27 | #X connect 4 0 0 3; 28 | #X connect 4 0 8 0; 29 | #X connect 5 0 0 4; 30 | #X connect 5 0 9 0; 31 | #X connect 11 0 2 0; 32 | #X connect 12 0 3 0; 33 | #X connect 13 0 4 0; 34 | #X connect 14 0 5 0; 35 | #X coords 0 0 1 1 133 63 0; 36 | -------------------------------------------------------------------------------- /ctrl/cnum.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 871 10; 2 | #X msg 261 351 -1; 3 | #X msg 230 351 1; 4 | #X msg 333 458 a \$1; 5 | #X obj 333 477 num; 6 | #X obj 229 279 keyname; 7 | #X obj 230 313 spigot; 8 | #X obj 333 496 outlet; 9 | #X floatatom 261 509 5 0 0 0 - - -; 10 | #X obj 230 332 sel KP_Up KP_Down; 11 | #X obj 204 375 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 12 | -1 -1; 13 | #X obj 333 439 * 1; 14 | #X obj 348 355 keyonoff Alt_L; 15 | #X obj 348 374 sel 1 0; 16 | #X msg 348 394 5; 17 | #X msg 376 394 1; 18 | #X obj 438 374 sel 1 0; 19 | #X msg 466 394 1; 20 | #X obj 438 355 keyonoff Super_L; 21 | #X msg 438 394 0.01; 22 | #X connect 0 0 10 0; 23 | #X connect 1 0 10 0; 24 | #X connect 2 0 3 0; 25 | #X connect 3 0 6 0; 26 | #X connect 3 0 7 0; 27 | #X connect 4 0 5 1; 28 | #X connect 4 1 5 0; 29 | #X connect 5 0 8 0; 30 | #X connect 8 0 1 0; 31 | #X connect 8 0 9 0; 32 | #X connect 8 1 0 0; 33 | #X connect 10 0 2 0; 34 | #X connect 11 0 12 0; 35 | #X connect 12 0 13 0; 36 | #X connect 12 1 14 0; 37 | #X connect 13 0 10 1; 38 | #X connect 14 0 10 1; 39 | #X connect 15 0 18 0; 40 | #X connect 15 1 16 0; 41 | #X connect 16 0 10 1; 42 | #X connect 17 0 15 0; 43 | #X connect 18 0 10 1; 44 | -------------------------------------------------------------------------------- /utils/colors-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 109 328 colors; 3 | #X obj 112 366 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144 4 | -1 -1 0 1; 5 | #X msg 109 347 color \$1 22 22; 6 | #X obj 142 302 t b f; 7 | #X obj 145 285 hsl 128 15 0 255 0 0 empty empty empty -2 -8 0 10 -4160 8 | -1 -1 12700 1; 9 | #X obj 122 263 t b f; 10 | #X obj 125 246 hsl 128 15 0 255 0 0 empty empty empty -2 -8 0 10 -4034 11 | -1 -1 12700 1; 12 | #X obj 112 223 t b f; 13 | #X obj 115 206 hsl 128 15 0 255 0 0 empty empty empty -2 -8 0 10 -258113 14 | -1 -1 12700 1; 15 | #X text 407 136 colors - output a pd-compatible color; 16 | #X text 384 179 [colors] will output a pd-compatible color when its 17 | left inlet is banged. otherwise \, you can provide floats from 0 to 18 | 255 to each inlet for red \, green \, and blue \, respectively.; 19 | #X text 390 235 i didn't really "make" this \, this is just something 20 | i stole from a pd help patch.; 21 | #X connect 0 0 2 0; 22 | #X connect 2 0 1 0; 23 | #X connect 3 0 0 0; 24 | #X connect 3 1 0 2; 25 | #X connect 4 0 3 0; 26 | #X connect 5 0 0 0; 27 | #X connect 5 1 0 1; 28 | #X connect 6 0 5 0; 29 | #X connect 7 0 0 0; 30 | #X connect 7 1 0 0; 31 | #X connect 8 0 7 0; 32 | -------------------------------------------------------------------------------- /utils/colors.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1920 1048 10; 2 | #X obj 86 76 inlet; 3 | #X obj 209 75 inlet; 4 | #X obj 275 75 inlet; 5 | #X text 137 28 red; 6 | #X text 207 30 green; 7 | #X text 279 30 blue; 8 | #X obj 275 197 t b f; 9 | #X obj 209 252 +; 10 | #X obj 209 273 t b f; 11 | #X obj 209 303 +; 12 | #X obj 132 176 * -65536; 13 | #X obj 209 176 * -256; 14 | #X obj 275 176 * -1; 15 | #X obj 209 323 - 1; 16 | #X obj 132 134 lb \$1 255; 17 | #X obj 209 134 lb \$2 255; 18 | #X obj 275 134 lb \$3 255; 19 | #X obj 194 372 outlet; 20 | #X obj 194 348 f; 21 | #X obj 86 115 route bang float; 22 | #X obj 275 155 int; 23 | #X obj 209 155 int; 24 | #X obj 132 155 int; 25 | #X connect 0 0 19 0; 26 | #X connect 1 0 15 0; 27 | #X connect 2 0 16 0; 28 | #X connect 6 0 7 0; 29 | #X connect 6 1 7 1; 30 | #X connect 7 0 8 0; 31 | #X connect 8 0 9 0; 32 | #X connect 8 1 9 1; 33 | #X connect 9 0 13 0; 34 | #X connect 10 0 9 0; 35 | #X connect 11 0 7 0; 36 | #X connect 12 0 6 0; 37 | #X connect 13 0 18 1; 38 | #X connect 14 0 22 0; 39 | #X connect 15 0 21 0; 40 | #X connect 16 0 20 0; 41 | #X connect 18 0 17 0; 42 | #X connect 19 0 18 0; 43 | #X connect 19 1 14 0; 44 | #X connect 20 0 12 0; 45 | #X connect 21 0 11 0; 46 | #X connect 22 0 10 0; 47 | -------------------------------------------------------------------------------- /gen/tri~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 95 330 view~; 3 | #X obj 162 197 hsl 128 15 -1 1 0 0 empty empty empty -2 -8 0 10 -262144 4 | -1 -1 12600 1; 5 | #X floatatom 159 214 10 0 0 0 - - -; 6 | #X obj 159 232 sig~; 7 | #X obj 95 199 sig~ 159; 8 | #X msg 159 178 0; 9 | #X obj 159 159 loadbang; 10 | #X floatatom 95 181 5 0 0 0 - - -; 11 | #X obj 95 303 tri~; 12 | #X text 355 62 tri~ - reverse saw \, triangle \, and saw wave with 13 | modulatable width and phase reset.; 14 | #X text 355 101 tri~ outputs a bipolar non-band-limited saw/triangle 15 | wave with a modulatable width. the first inlet is for the frequency. 16 | the second takes a signal from -1 to 1 to specify the width \, with 17 | numbers below 0 resulting in a reverse saw \, numbers above 0 resulting 18 | in a forward saw \, and 0 resulting in a triangle wave. the third inlet 19 | can be used for a phase reset \, just like with [phasor~].; 20 | #X text 357 204 take note of what happens when the width is set to 21 | -1 or 1 ... i'm not sure how to fix this.; 22 | #X connect 1 0 2 0; 23 | #X connect 2 0 3 0; 24 | #X connect 3 0 8 1; 25 | #X connect 4 0 8 0; 26 | #X connect 5 0 1 0; 27 | #X connect 6 0 5 0; 28 | #X connect 7 0 4 0; 29 | #X connect 8 0 0 0; 30 | -------------------------------------------------------------------------------- /utils/hue_to_rgb.pd: -------------------------------------------------------------------------------- 1 | #N canvas 800 0 787 410 10; 2 | #X obj 246 130 inlet; 3 | #X obj 246 149 wrap; 4 | #X obj 319 223 t f f; 5 | #X obj 346 242 < 1; 6 | #X obj 319 523 outlet; 7 | #X obj 319 265 spigot; 8 | #X obj 378 270 kinv; 9 | #X obj 265 287 spigot; 10 | #X obj 246 168 t f f f; 11 | #X obj 319 204 * 6; 12 | #X obj 265 306 * 2; 13 | #X obj 217 361 kinv; 14 | #X msg 265 368 1; 15 | #X obj 265 325 < 1; 16 | #X obj 265 349 sel 1; 17 | #X obj 125 340 spigot; 18 | #X obj 152 397 < 2; 19 | #X obj 125 359 t f f; 20 | #X obj 152 378 * 3; 21 | #X obj 125 437 expr (((2./3)-$f1)*6)*$f2; 22 | #X connect 0 0 1 0; 23 | #X connect 1 0 8 0; 24 | #X connect 2 0 5 0; 25 | #X connect 2 1 3 0; 26 | #X connect 3 0 5 1; 27 | #X connect 3 0 6 0; 28 | #X connect 5 0 4 0; 29 | #X connect 6 0 7 1; 30 | #X connect 6 0 15 1; 31 | #X connect 7 0 10 0; 32 | #X connect 8 0 15 0; 33 | #X connect 8 1 7 0; 34 | #X connect 8 2 9 0; 35 | #X connect 9 0 2 0; 36 | #X connect 10 0 13 0; 37 | #X connect 11 0 15 1; 38 | #X connect 12 0 4 0; 39 | #X connect 13 0 11 0; 40 | #X connect 13 0 14 0; 41 | #X connect 14 0 12 0; 42 | #X connect 15 0 17 0; 43 | #X connect 16 0 19 1; 44 | #X connect 17 0 19 0; 45 | #X connect 17 1 18 0; 46 | #X connect 18 0 16 0; 47 | #X connect 19 0 4 0; 48 | -------------------------------------------------------------------------------- /math/rtr.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 849 10; 2 | #X obj 504 199 inlet; 3 | #X obj 540 199 inlet; 4 | #X obj 589 199 inlet; 5 | #X obj 540 180 lb \$1; 6 | #X obj 589 180 lb \$2; 7 | #X obj 638 199 inlet; 8 | #X obj 687 199 inlet; 9 | #X obj 638 180 lb \$3; 10 | #X obj 687 180 lb \$4; 11 | #X obj 542 343 outlet; 12 | #X obj 557 267 -; 13 | #X obj 589 218 f; 14 | #X obj 540 218 f; 15 | #X obj 542 286 / 0; 16 | #X obj 655 267 -; 17 | #X obj 542 305 * 0; 18 | #X obj 542 324 + 0; 19 | #X obj 504 266 +; 20 | #X obj 519 247 * -1; 21 | #X obj 638 218 f; 22 | #X obj 687 218 f; 23 | #X text 183 235 rtr (range to range): scale a stream of numbers from 24 | a known range to a different range.; 25 | #X connect 0 0 17 0; 26 | #X connect 1 0 12 0; 27 | #X connect 2 0 11 0; 28 | #X connect 3 0 12 0; 29 | #X connect 4 0 11 0; 30 | #X connect 5 0 19 0; 31 | #X connect 6 0 20 0; 32 | #X connect 7 0 19 0; 33 | #X connect 8 0 20 0; 34 | #X connect 10 0 13 1; 35 | #X connect 11 0 10 0; 36 | #X connect 12 0 10 1; 37 | #X connect 12 0 18 0; 38 | #X connect 13 0 15 0; 39 | #X connect 14 0 15 1; 40 | #X connect 15 0 16 0; 41 | #X connect 16 0 9 0; 42 | #X connect 17 0 13 0; 43 | #X connect 18 0 17 1; 44 | #X connect 19 0 14 1; 45 | #X connect 19 0 16 1; 46 | #X connect 20 0 14 0; 47 | -------------------------------------------------------------------------------- /math/runningmax~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 1920 1050 12; 2 | #X obj 627 316 threshold~; 3 | #X obj 617 344 snapshot~; 4 | #X msg 694 293 0; 5 | #X obj 604 436 change; 6 | #X obj 638 468 bang; 7 | #X msg 715 442 set \$1 0 \$1 0; 8 | #X obj 523 434 moses; 9 | #X obj 618 225 inlet~; 10 | #X obj 667 225 inlet; 11 | #X obj 604 493 outlet; 12 | #X obj 548 344 snapshot~; 13 | #X obj 740 307 route bang float; 14 | #X obj 667 248 route bang reset float; 15 | #X text 722 95 runningmax~ - output the highest value seen in the signal. 16 | the right inlet can be used as a threshold reset \; send a bang to 17 | reset to the current value \, or a float to reset to the specified 18 | value.; 19 | #X connect 0 0 1 0; 20 | #X connect 0 0 2 0; 21 | #X connect 1 0 6 0; 22 | #X connect 2 0 0 1; 23 | #X connect 3 0 5 0; 24 | #X connect 3 0 4 0; 25 | #X connect 3 0 6 1; 26 | #X connect 3 0 9 0; 27 | #X connect 4 0 2 0; 28 | #X connect 5 0 0 0; 29 | #X connect 6 1 3 0; 30 | #X connect 7 0 1 0; 31 | #X connect 7 0 0 0; 32 | #X connect 7 0 10 0; 33 | #X connect 8 0 12 0; 34 | #X connect 10 0 3 0; 35 | #X connect 10 0 6 1; 36 | #X connect 11 0 10 0; 37 | #X connect 11 1 12 0; 38 | #X connect 12 0 10 0; 39 | #X connect 12 1 11 0; 40 | #X connect 12 2 6 1; 41 | #X connect 12 2 3 0; 42 | -------------------------------------------------------------------------------- /guis/cpuload.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 32 1920 1048 10; 2 | #X floatatom 126 266 5 0 0 0 - - -; 3 | #X obj 126 162 metro 1000; 4 | #X msg 126 188 cat /proc/loadavg; 5 | #X obj 126 214 shell; 6 | #X obj 126 241 unpack f f f s f; 7 | #X obj 126 293 outlet; 8 | #X obj 126 140 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 9 | 1; 10 | #X obj 126 42 inlet; 11 | #X msg 126 112 0; 12 | #X msg 165 112 1; 13 | #X obj 126 88 moses 1; 14 | #X obj 69 65 loadbang; 15 | #X text 289 63 cpuload - show the current 1-minute load average (basically 16 | the CPU usage %) of the system.; 17 | #X obj 126 65 route float bang; 18 | #X text 290 110 inputs: a positive float enables automatic gui updates 19 | \, a non-positive disables it.; 20 | #X text 291 149 a bang input can be used to trigger an immediate update. 21 | ; 22 | #X text 289 178 output: the load average is passed to the outlet.; 23 | #X connect 0 0 5 0; 24 | #X connect 1 0 2 0; 25 | #X connect 2 0 3 0; 26 | #X connect 3 0 4 0; 27 | #X connect 4 0 0 0; 28 | #X connect 6 0 1 0; 29 | #X connect 7 0 13 0; 30 | #X connect 8 0 6 0; 31 | #X connect 9 0 6 0; 32 | #X connect 10 0 8 0; 33 | #X connect 10 1 9 0; 34 | #X connect 11 0 6 0; 35 | #X connect 13 0 10 0; 36 | #X connect 13 1 2 0; 37 | #X coords 0 -1 1 1 80 16 1 78 266; 38 | -------------------------------------------------------------------------------- /ctrl/input-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 142 109 keyname; 3 | #X obj 139 130 pack f s; 4 | #X obj 139 153 route 1; 5 | #X symbolatom 38 251 30 0 0 0 - - -; 6 | #X symbolatom 109 295 30 0 0 0 - - -; 7 | #X obj 139 177 spigot; 8 | #X obj 181 177 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 9 | 1; 10 | #X obj 109 397 s2l; 11 | #X obj 141 361 makefilename %c; 12 | #X obj 141 323 loadbang; 13 | #X msg 141 342 1; 14 | #X msg 141 380 symbol \$1; 15 | #X text 340 125 input - input accumulator; 16 | #X obj 139 200 input; 17 | #X obj 109 416 print input; 18 | #X text 325 184 [input] allows you to accumulate a line of text by 19 | sending keynames to the inlet. [input]'s left outlet outputs a preview 20 | of the accumulated text whenever it changes \, and the right outlet 21 | outputs the "finished" text once you press enter. you can also use 22 | BackSpace to delete the last character you entered.; 23 | #X connect 0 0 1 0; 24 | #X connect 0 1 1 1; 25 | #X connect 1 0 2 0; 26 | #X connect 2 0 5 0; 27 | #X connect 4 0 7 0; 28 | #X connect 5 0 13 0; 29 | #X connect 6 0 5 1; 30 | #X connect 7 0 14 0; 31 | #X connect 8 0 11 0; 32 | #X connect 9 0 10 0; 33 | #X connect 10 0 8 0; 34 | #X connect 11 0 7 1; 35 | #X connect 13 0 3 0; 36 | #X connect 13 1 4 0; 37 | -------------------------------------------------------------------------------- /seq/srush.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X text 291 60 this will generate snare rolls/rushes; 3 | #X obj 255 122 inlet; 4 | #X obj 444 188 inlet; 5 | #X text -106 119 to trigger: format is NUMBER INITDLY. NUMBER is how 6 | many bangs to output \, INITDLY is the initial delay between them. 7 | ; 8 | #X obj 255 141 unpack f f; 9 | #X text 301 117 second inlet is to change the delay time; 10 | #X obj 255 330 outlet; 11 | #X obj 255 203 f; 12 | #X obj 255 222 - 1; 13 | #X obj 255 311 bang; 14 | #X obj 267 263 sel 1 0; 15 | #X obj 353 221 del; 16 | #X obj 473 345 outlet; 17 | #X obj 267 244 > 0; 18 | #X obj 373 299 spigot; 19 | #X obj 302 222 spigot; 20 | #X obj 373 256 f; 21 | #X obj 361 168 t f f f; 22 | #X connect 1 0 4 0; 23 | #X connect 2 0 11 0; 24 | #X connect 2 0 16 1; 25 | #X connect 4 0 7 0; 26 | #X connect 4 1 17 0; 27 | #X connect 7 0 8 0; 28 | #X connect 8 0 9 0; 29 | #X connect 8 0 7 1; 30 | #X connect 8 0 13 0; 31 | #X connect 9 0 6 0; 32 | #X connect 10 0 11 0; 33 | #X connect 11 0 15 0; 34 | #X connect 11 0 16 0; 35 | #X connect 13 0 10 0; 36 | #X connect 13 0 14 1; 37 | #X connect 13 0 15 1; 38 | #X connect 14 0 12 0; 39 | #X connect 15 0 7 0; 40 | #X connect 16 0 14 0; 41 | #X connect 17 0 12 0; 42 | #X connect 17 1 11 0; 43 | #X connect 17 2 16 1; 44 | -------------------------------------------------------------------------------- /utils/list-find-1.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 1920 1050 10; 2 | #X obj 91 51 inlet; 3 | #X obj 187 51 inlet; 4 | #X obj 114 426 outlet; 5 | #X text 60 31 value to find; 6 | #X text 184 31 list to search in; 7 | #X text 257 155 [list-find-1] Find first position of a value (symbol 8 | or float) in a list.; 9 | #X obj 91 180 list-dripslow; 10 | #X text 256 194 outputs -1 if the value wasn't found \, else outputs 11 | the index of the value.; 12 | #X msg 166 357 -1; 13 | #X msg 138 215 0; 14 | #X obj 91 153 until; 15 | #X obj 91 213 t a b; 16 | #X obj 114 357 f; 17 | #X obj 91 265 compare-any; 18 | #X obj 91 284 sel 1; 19 | #X obj 91 80 t b b a; 20 | #X obj 166 120 list; 21 | #X obj 129 241 int; 22 | #X obj 153 241 + 1; 23 | #X connect 0 0 15 0; 24 | #X connect 1 0 16 1; 25 | #X connect 6 0 11 0; 26 | #X connect 6 1 10 1; 27 | #X connect 6 1 8 0; 28 | #X connect 8 0 2 0; 29 | #X connect 9 0 17 0; 30 | #X connect 10 0 6 0; 31 | #X connect 11 0 13 0; 32 | #X connect 11 1 17 0; 33 | #X connect 12 0 2 0; 34 | #X connect 13 0 14 0; 35 | #X connect 14 0 10 1; 36 | #X connect 14 0 12 0; 37 | #X connect 15 0 10 0; 38 | #X connect 15 1 9 0; 39 | #X connect 15 1 16 0; 40 | #X connect 15 2 13 1; 41 | #X connect 16 0 6 1; 42 | #X connect 17 0 12 1; 43 | #X connect 17 0 18 0; 44 | #X connect 18 0 17 1; 45 | -------------------------------------------------------------------------------- /gen/sndp~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X msg 125 118 open \$1; 3 | #X obj 125 89 openpanel; 4 | #X obj 125 62 bng 15 250 50 0 empty empty select_a_wav 17 7 0 10 -262144 5 | -1 -1; 6 | #X obj 88 176 o~; 7 | #X obj 342 264 snd~; 8 | #X obj 474 264 sndm~; 9 | #X text 285 263 see also:; 10 | #X obj 382 264 sndf~; 11 | #X text 296 29 sndp~ - sound play; 12 | #X text 285 66 sndp~ allows you to load a sound into memory (either 13 | by sending an "open" message to the right inlet or by providing the 14 | filename as the argument) and play through the whole thing by sending 15 | a bang to the inlet.; 16 | #X obj 88 147 sndp~; 17 | #X obj 88 110 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 18 | -1; 19 | #X obj 132 147 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 20 | -1 -1; 21 | #X text 285 132 this is the simplest of the sound playing abstractions. 22 | it's a subset of sndm~. it can only play thru the whole sound at the 23 | original rate. this makes it best for drums.; 24 | #X obj 428 264 sndl~; 25 | #X text 285 198 the left outlet outputs the sound \, while the right 26 | outlet bangs once the sound has finished playing.; 27 | #X connect 0 0 10 0; 28 | #X connect 1 0 0 0; 29 | #X connect 2 0 1 0; 30 | #X connect 10 0 3 0; 31 | #X connect 10 1 12 0; 32 | #X connect 11 0 10 0; 33 | -------------------------------------------------------------------------------- /seq/burst.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 1920 1050 10; 2 | #X obj 457 68 inlet; 3 | #X obj 580 199 inlet; 4 | #X obj 734 280 inlet; 5 | #X obj 509 450 outlet; 6 | #X obj 498 178 t b f; 7 | #X obj 509 340 f; 8 | #X obj 533 340 + 1; 9 | #X obj 509 360 bang; 10 | #X obj 589 355 del \$2; 11 | #X obj 457 88 route bang float list; 12 | #X obj 539 108 unpack f f; 13 | #X obj 540 423 sel 0; 14 | #X obj 540 402 == 0; 15 | #X msg 495 265 1; 16 | #X text 374 27 burst generator - when one bang is received \, output 17 | \$1 bangs separated by \$2 milliseconds; 18 | #X obj 540 381 mod; 19 | #X obj 580 219 route float list; 20 | #X obj 634 266 unpack f f; 21 | #X obj 569 297 lb \$1 1; 22 | #X connect 0 0 9 0; 23 | #X connect 1 0 16 0; 24 | #X connect 2 0 8 1; 25 | #X connect 4 0 13 0; 26 | #X connect 4 1 18 0; 27 | #X connect 5 0 6 0; 28 | #X connect 5 0 7 0; 29 | #X connect 5 0 15 0; 30 | #X connect 6 0 5 1; 31 | #X connect 7 0 3 0; 32 | #X connect 8 0 5 0; 33 | #X connect 9 0 13 0; 34 | #X connect 9 1 4 0; 35 | #X connect 9 2 10 0; 36 | #X connect 10 0 4 0; 37 | #X connect 10 1 8 1; 38 | #X connect 11 0 8 0; 39 | #X connect 12 0 11 0; 40 | #X connect 13 0 5 0; 41 | #X connect 15 0 12 0; 42 | #X connect 16 0 18 0; 43 | #X connect 16 1 17 0; 44 | #X connect 17 0 18 0; 45 | #X connect 17 1 8 1; 46 | #X connect 18 0 15 1; 47 | -------------------------------------------------------------------------------- /guis/siga~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X text 459 134 siga~ - signal analysis; 3 | #X text 447 184 siga~ will show you the current value of the signal 4 | \, the average value of the signal \, and the maximum and minimum detected 5 | values. these values are all based on polling so you can't trust them 6 | to be the actual maximum \, minimum \, average \, etc. there is also 7 | a [vsl] which visualizes the current value of the signal as long as 8 | it is within the range of -1 to 1; 9 | #X text 443 289 the "r" [bng] button will reset the maximum and minimum 10 | recorded values.; 11 | #X obj 67 262 osc~ 9999; 12 | #X obj 167 262 osc~ 0.5; 13 | #X obj 267 291 siga~; 14 | #X obj 267 262 +~ 50; 15 | #X obj 267 232 osc~ 0.5; 16 | #N canvas 0 29 800 849 META 0; 17 | #X text 12 65 LIBRARY defaultxr; 18 | #X text 12 85 AUTHOR modula t. worm; 19 | #X text 12 105 WEBSITE http://github.com/defaultxr/pure-data-patches 20 | ; 21 | #X text 12 125 RELEASE_DATE 2013; 22 | #X text 12 5 KEYWORDS signal analysis average; 23 | #X text 12 25 DESCRIPTION show statistics about the incoming signal 24 | ; 25 | #X text 12 45 INLET_0 signal; 26 | #X restore 550 357 pd META; 27 | #X obj 67 291 siga~; 28 | #X obj 167 291 siga~; 29 | #X connect 3 0 9 0; 30 | #X connect 4 0 10 0; 31 | #X connect 6 0 5 0; 32 | #X connect 7 0 6 0; 33 | -------------------------------------------------------------------------------- /seq/queue.pd: -------------------------------------------------------------------------------- 1 | #N canvas 800 29 800 410 10; 2 | #X obj 198 4 inlet; 3 | #X msg 248 64 add2 \$1; 4 | #X obj 320 311 outlet; 5 | #X obj 253 105 loadbang; 6 | #X obj 253 124 f \$1; 7 | #X obj 223 200 list-splat; 8 | #X obj 198 23 route bang float symbol; 9 | #X obj 333 42 symbol; 10 | #X obj 342 349 prepent set; 11 | #X obj 253 143 sel 0; 12 | #X msg 223 86 list; 13 | #X msg 125 135 set list; 14 | #X text 380 18 queue - first in first out queue. send a bang to dequeue 15 | or an item to enqueue.; 16 | #X text 380 75 outputs bang if there is nothing left on the queue. 17 | ; 18 | #X text 380 47 first argument \, if nonzero \, is the maximum size 19 | of the queue (latest elements are erased first).; 20 | #X obj 251 275 list split 1; 21 | #X obj 280 162 * -1; 22 | #X obj 285 330 route bang; 23 | #X connect 0 0 6 0; 24 | #X connect 1 0 10 0; 25 | #X connect 3 0 4 0; 26 | #X connect 3 0 11 0; 27 | #X connect 4 0 9 0; 28 | #X connect 5 1 15 0; 29 | #X connect 5 2 15 0; 30 | #X connect 6 0 10 0; 31 | #X connect 6 1 1 0; 32 | #X connect 6 2 1 0; 33 | #X connect 6 3 7 0; 34 | #X connect 7 0 1 0; 35 | #X connect 8 0 10 0; 36 | #X connect 9 1 16 0; 37 | #X connect 10 0 5 0; 38 | #X connect 11 0 10 0; 39 | #X connect 15 0 2 0; 40 | #X connect 15 1 17 0; 41 | #X connect 15 2 2 0; 42 | #X connect 16 0 5 1; 43 | #X connect 17 0 11 0; 44 | #X connect 17 1 8 0; 45 | -------------------------------------------------------------------------------- /synths/snare1~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 681 160 450 397 10; 2 | #X obj 166 160 line~; 3 | #X text 202 96 start \, end \, time; 4 | #X obj 114 97 f \$1; 5 | #X obj 144 97 f \$2; 6 | #X obj 174 97 f \$3; 7 | #X obj 41 125 / 100; 8 | #X msg 55 90 100; 9 | #X obj 164 123 pack 0 0; 10 | #X msg 172 65 bang; 11 | #X obj 59 333 outlet~; 12 | #X obj 28 7 inlet; 13 | #X obj 113 277 line~; 14 | #X obj 132 205 del \$3; 15 | #X msg 137 233 0 5; 16 | #X obj 66 302 *~; 17 | #X obj 219 203 loadbang; 18 | #X msg 221 231 0; 19 | #X msg 79 161 bang; 20 | #X obj -5 232 pack 0 2; 21 | #X obj 124 185 noisef~ \$1; 22 | #X obj 29 28 route start end time float bang; 23 | #X connect 0 0 19 0; 24 | #X connect 2 0 0 0; 25 | #X connect 3 0 7 0; 26 | #X connect 4 0 7 1; 27 | #X connect 5 0 17 0; 28 | #X connect 5 0 18 0; 29 | #X connect 6 0 5 0; 30 | #X connect 7 0 0 0; 31 | #X connect 8 0 2 0; 32 | #X connect 8 0 4 0; 33 | #X connect 8 0 3 0; 34 | #X connect 10 0 20 0; 35 | #X connect 11 0 14 1; 36 | #X connect 12 0 13 0; 37 | #X connect 13 0 11 0; 38 | #X connect 14 0 9 0; 39 | #X connect 15 0 16 0; 40 | #X connect 16 0 11 0; 41 | #X connect 17 0 12 0; 42 | #X connect 18 0 11 0; 43 | #X connect 19 0 14 0; 44 | #X connect 20 0 2 1; 45 | #X connect 20 1 3 1; 46 | #X connect 20 2 4 1; 47 | #X connect 20 2 12 1; 48 | #X connect 20 3 5 0; 49 | #X connect 20 3 8 0; 50 | #X connect 20 4 8 0; 51 | #X connect 20 4 6 0; 52 | -------------------------------------------------------------------------------- /guis/view-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 800 29 800 849 10; 2 | #X obj 166 221 tview; 3 | #X symbolatom 186 150 10 0 0 0 - - -; 4 | #X obj 207 169 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 5 | -1 -1; 6 | #X floatatom 147 157 5 0 0 0 - - -; 7 | #X obj 98 164 r tview; 8 | #X msg 234 175 test message!; 9 | #X msg 244 196 list test!; 10 | #X text 365 122 tview - textual view of input history; 11 | #N canvas 800 29 800 849 note 0; 12 | #X obj 230 278 outlet; 13 | #X obj 191 108 bng 15 250 50 0 empty empty note 17 7 0 10 -262144 -1 14 | -1; 15 | #X obj 191 240 sel END; 16 | #X msg 126 192 0; 17 | #X msg 191 125 1; 18 | #X obj 230 259 s2l _; 19 | #X obj 191 144 metro 500; 20 | #X obj 191 163 map i_love_pure_data! :D it's_so_much_fun! i_hope_you_find 21 | my_patches_useful... END; 22 | #X connect 1 0 4 0; 23 | #X connect 2 0 3 0; 24 | #X connect 2 1 5 0; 25 | #X connect 3 0 6 0; 26 | #X connect 4 0 6 0; 27 | #X connect 5 0 0 0; 28 | #X connect 6 0 7 0; 29 | #X connect 7 0 2 0; 30 | #X coords 0 -1 1 1 50 15 2 191 108; 31 | #X restore 63 192 pd note; 32 | #X text 383 159 tview will show the last 5 inputs received by its inlet. 33 | this makes it easier to monitor what's going on. a toggle box is provided 34 | to stop input.; 35 | #X connect 1 0 0 0; 36 | #X connect 2 0 0 0; 37 | #X connect 3 0 0 0; 38 | #X connect 4 0 0 0; 39 | #X connect 5 0 0 0; 40 | #X connect 6 0 0 0; 41 | #X connect 8 0 0 0; 42 | -------------------------------------------------------------------------------- /seq/stack.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X obj 188 54 inlet; 3 | #X msg 238 114 add2 \$1; 4 | #X obj 213 215 list-splat -1; 5 | #X obj 250 270 outlet; 6 | #X obj 192 245 loadbang; 7 | #X obj 192 264 f \$1; 8 | #X obj 192 346 * -1; 9 | #X obj 135 365 list-splat; 10 | #X text 370 97 first argument \, if nonzero \, is the maximum size 11 | of the stack (earliest elements are erased first).; 12 | #X obj 192 327 - 1; 13 | #X obj 188 73 route bang float symbol; 14 | #X obj 323 92 symbol; 15 | #X obj 163 433 prepent set; 16 | #X obj 192 283 sel 0; 17 | #X msg 213 136 list; 18 | #X text 370 125 outputs bang if there is nothing left on the stack. 19 | ; 20 | #X msg 115 185 set list; 21 | #X obj 163 394 route bang; 22 | #X text 370 68 stack - last in first out stack. send a bang to pop 23 | or an item to push.; 24 | #X connect 0 0 10 0; 25 | #X connect 1 0 14 0; 26 | #X connect 2 0 7 0; 27 | #X connect 2 1 3 0; 28 | #X connect 2 2 3 0; 29 | #X connect 4 0 5 0; 30 | #X connect 4 0 16 0; 31 | #X connect 5 0 13 0; 32 | #X connect 6 0 7 1; 33 | #X connect 7 1 17 0; 34 | #X connect 7 2 17 0; 35 | #X connect 9 0 6 0; 36 | #X connect 10 0 14 0; 37 | #X connect 10 1 1 0; 38 | #X connect 10 2 1 0; 39 | #X connect 10 3 11 0; 40 | #X connect 11 0 1 0; 41 | #X connect 12 0 14 0; 42 | #X connect 13 1 9 0; 43 | #X connect 14 0 2 0; 44 | #X connect 16 0 14 0; 45 | #X connect 17 0 16 0; 46 | #X connect 17 1 12 0; 47 | -------------------------------------------------------------------------------- /ctrl/inputd-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 129 190 inputd; 3 | #X obj 132 99 keyname; 4 | #X obj 129 120 pack f s; 5 | #X obj 129 143 route 1; 6 | #X symbolatom 28 241 30 0 0 0 - - -; 7 | #X symbolatom 99 285 30 0 0 0 - - -; 8 | #X floatatom 162 209 5 0 0 0 - - -; 9 | #X text 330 115 inputd - input accumulator deluxe; 10 | #X obj 129 167 spigot; 11 | #X obj 171 167 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 12 | 1; 13 | #X text 315 174 this is similar to [input] in that it allows you to 14 | build up a line of text by sending keynames to be accumulated \, but 15 | it also includes the feature of a "cursor" within the line \, whose 16 | position is sent to the third outlet. you can thus delete characters 17 | at the start of the line (press up and then delete) without having 18 | to backspace through the whole line.; 19 | #X obj 99 387 s2l; 20 | #X obj 131 351 makefilename %c; 21 | #X obj 131 313 loadbang; 22 | #X msg 131 332 1; 23 | #X msg 131 370 symbol \$1; 24 | #X obj 99 406 print inputd; 25 | #X connect 0 0 4 0; 26 | #X connect 0 1 5 0; 27 | #X connect 0 2 6 0; 28 | #X connect 1 0 2 0; 29 | #X connect 1 1 2 1; 30 | #X connect 2 0 3 0; 31 | #X connect 3 0 8 0; 32 | #X connect 5 0 11 0; 33 | #X connect 8 0 0 0; 34 | #X connect 9 0 8 1; 35 | #X connect 11 0 16 0; 36 | #X connect 12 0 15 0; 37 | #X connect 13 0 14 0; 38 | #X connect 14 0 12 0; 39 | #X connect 15 0 11 1; 40 | -------------------------------------------------------------------------------- /seq/seqfill.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 800 849 10; 2 | #X obj 382 168 inlet; 3 | #X obj 349 412 count \$1; 4 | #X obj 349 393 until; 5 | #X obj 349 374 f \$1; 6 | #X obj 382 343 t b f; 7 | #X obj 382 194 route every e; 8 | #X obj 394 478 %; 9 | #X obj 349 540 pack f f; 10 | #X obj 349 431 t f f; 11 | #X obj 394 497 sel 0; 12 | #X msg 394 516 1; 13 | #X msg 421 516 0; 14 | #X text 453 91 seqfill - fill a sequencer based on an equation.; 15 | #X obj 349 559 outlet; 16 | #X obj 382 222 route float; 17 | #X obj 445 260 s2l '; 18 | #X obj 445 241 symbol; 19 | #X obj 382 241 t f b; 20 | #X obj 383 453 +; 21 | #X msg 447 436 0; 22 | #X obj 445 279 unpack f f; 23 | #X text 433 116 every [num]'[offset]; 24 | #X obj 382 293 sel 0; 25 | #X connect 0 0 5 0; 26 | #X connect 1 0 8 0; 27 | #X connect 2 0 1 0; 28 | #X connect 3 0 2 0; 29 | #X connect 4 0 3 0; 30 | #X connect 4 1 6 1; 31 | #X connect 5 0 14 0; 32 | #X connect 5 1 14 0; 33 | #X connect 6 0 9 0; 34 | #X connect 7 0 13 0; 35 | #X connect 8 0 7 0; 36 | #X connect 8 1 18 0; 37 | #X connect 9 0 10 0; 38 | #X connect 9 1 11 0; 39 | #X connect 10 0 7 1; 40 | #X connect 11 0 7 1; 41 | #X connect 14 0 17 0; 42 | #X connect 14 1 16 0; 43 | #X connect 15 0 20 0; 44 | #X connect 16 0 15 0; 45 | #X connect 17 0 22 0; 46 | #X connect 17 1 19 0; 47 | #X connect 18 0 6 0; 48 | #X connect 19 0 18 1; 49 | #X connect 20 0 4 0; 50 | #X connect 20 1 18 1; 51 | #X connect 22 1 4 0; 52 | -------------------------------------------------------------------------------- /ctrl/inputn-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 152 119 keyname; 3 | #X obj 149 140 pack f s; 4 | #X obj 149 163 route 1; 5 | #X symbolatom 48 261 30 0 0 0 - - -; 6 | #X floatatom 172 237 5 0 0 0 - - -; 7 | #X obj 149 187 spigot; 8 | #X obj 191 187 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 9 | 1; 10 | #X obj 149 210 inputn; 11 | #X text 350 135 inputn - input accumulator for numbers; 12 | #X text 335 194 this is similar to [input] \, except that it is only 13 | for numbers. you can build up a number (even negative numbers or numbers 14 | with decimal points) by sending keynames to the inlet. right now \, 15 | [inputn] is pretty dumb in that it doesn't prevent you from putting 16 | more than one decimal point or from putting the dash in places where 17 | it doesn't make sense. therefore \, you'll have to be careful and watch 18 | pd's console window for any errors.; 19 | #X text 334 307 also \, take note that the left outlet outputs a symbol 20 | \, NOT a float. that's because if it outputted floats \, you wouldn't 21 | be able to tell if you had entered a period or dash until then next 22 | number you input.; 23 | #X text 342 392 ...so obviously there are a lot of things i could improve 24 | in this abstraction.; 25 | #X connect 0 0 1 0; 26 | #X connect 0 1 1 1; 27 | #X connect 1 0 2 0; 28 | #X connect 2 0 5 0; 29 | #X connect 5 0 7 0; 30 | #X connect 6 0 5 1; 31 | #X connect 7 0 3 0; 32 | #X connect 7 1 4 0; 33 | -------------------------------------------------------------------------------- /guis/scroll~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 800 29 2560 1566 10; 2 | #X obj 134 266 scroll~; 3 | #X obj 134 111 osc~ 333; 4 | #X obj 170 152 atc~; 5 | #X obj 134 247 *~; 6 | #X obj 170 249 vcsig~; 7 | #X obj 170 133 osc~ 0.1; 8 | #X obj 196 173 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 #fcfcfc #000000 #000000 0 1; 9 | #X text 378 80 scroll~ - scrolling amplitude view; 10 | #X text 371 119 this abstraction shows you the amplitude of an incoming signal \, and scrolls it. right now it just uses [env~] internally but i might change it in the future.; 11 | #X text 365 185 the [tgl] stops polling the amplitude and also stops scrolling the view. so if you see something interesting you can pause it. the [nbx] changes how many milliseconds between each poll of the amplitude.; 12 | #X obj 193 190 aline~ 50; 13 | #N canvas 0 29 800 849 META 0; 14 | #X text 12 65 LIBRARY defaultxr; 15 | #X text 12 85 AUTHOR modula t. worm; 16 | #X text 12 105 WEBSITE http://github.com/defaultxr/pure-data-patches; 17 | #X text 12 125 RELEASE_DATE 2013; 18 | #X text 12 5 KEYWORDS scroll gui amplitude analysis; 19 | #X text 12 25 DESCRIPTION scrolling amplitude view; 20 | #X text 12 45 INLET_0 signal; 21 | #X restore 380 347 pd META; 22 | #X obj 170 211 switcher~; 23 | #X connect 1 0 3 0; 24 | #X connect 2 0 12 0; 25 | #X connect 3 0 0 0; 26 | #X connect 5 0 2 0; 27 | #X connect 6 0 10 0; 28 | #X connect 10 0 12 2; 29 | #X connect 12 0 4 0; 30 | #X connect 12 0 3 1; 31 | -------------------------------------------------------------------------------- /gen/tri~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 32 2560 1568 12; 2 | #X obj 76 99 inlet~; 3 | #X obj 181 62 inlet~; 4 | #X obj 127 447 outlet~; 5 | #X obj 181 147 *~ -1; 6 | #X obj 181 174 +~ 1; 7 | #X obj 76 272 *~; 8 | #X obj 152 223 *~; 9 | #X obj 127 321 min~; 10 | #X obj 189 287 +~; 11 | #X obj 152 248 *~ -1; 12 | #X obj 127 371 *~; 13 | #X obj 328 187 expr~ pow($v1*($v1-1) \, -1); 14 | #X obj 181 108 atc~; 15 | #X obj 127 396 +~ 0.5; 16 | #X obj 127 421 *~ 2; 17 | #X obj 278 89 inlet; 18 | #X text 367 96 inlets: 1: frequency. 2: shape (-1 and 1 for up or down saw \, 0 for triangle). 3: phase reset.; 19 | #X text 369 19 Basic triangle oscillator.; 20 | #X text 368 49 Can be smoothly morphed to an upward or downward saw wave using its second signal inlet.; 21 | #X obj 76 74 lb \$1; 22 | #X obj 76 126 phasor~; 23 | #X obj 181 37 lb \$2; 24 | #X obj 181 85 *~ 0.999999; 25 | #X connect 0 0 20 0; 26 | #X connect 1 0 22 0; 27 | #X connect 3 0 4 0; 28 | #X connect 4 0 6 1; 29 | #X connect 4 0 8 1; 30 | #X connect 5 0 7 0; 31 | #X connect 6 0 9 0; 32 | #X connect 7 0 10 0; 33 | #X connect 8 0 7 1; 34 | #X connect 9 0 8 0; 35 | #X connect 10 0 13 0; 36 | #X connect 11 0 10 1; 37 | #X connect 12 0 5 1; 38 | #X connect 12 0 3 0; 39 | #X connect 12 0 11 0; 40 | #X connect 13 0 14 0; 41 | #X connect 14 0 2 0; 42 | #X connect 15 0 20 1; 43 | #X connect 19 0 0 0; 44 | #X connect 20 0 5 0; 45 | #X connect 20 0 6 0; 46 | #X connect 21 0 1 0; 47 | #X connect 22 0 12 0; 48 | -------------------------------------------------------------------------------- /utils/rporta~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X obj 137 80 inlet; 3 | #X obj 170 145 -; 4 | #X obj 170 164 abs; 5 | #X obj 170 183 / 12; 6 | #X obj 137 99 t f f f; 7 | #X obj 137 202 mtof; 8 | #X obj 137 270 outlet~; 9 | #X obj 211 185 lb \$1 1000; 10 | #X obj 170 202 *; 11 | #X text 206 77 rporta~ - relative poramento. first argument is how 12 | long in milliseconds it takes to move from one note to a note one octave 13 | away from it. accepts midi numbers as input.; 14 | #X obj 277 166 inlet; 15 | #X text 206 115 you can connect a [mono] to the inlets of rporta~ for 16 | convenience.; 17 | #X obj 304 208 delta; 18 | #X obj 277 185 t f f; 19 | #X obj 268 208 sel 1; 20 | #X obj 289 231 f; 21 | #X obj 289 250 sel 1; 22 | #X obj 170 221 spigot 1; 23 | #X msg 250 296 0; 24 | #X msg 247 250 1; 25 | #X obj 137 251 aline~; 26 | #X connect 0 0 4 0; 27 | #X connect 1 0 2 0; 28 | #X connect 2 0 3 0; 29 | #X connect 3 0 8 0; 30 | #X connect 4 0 5 0; 31 | #X connect 4 1 1 1; 32 | #X connect 4 2 1 0; 33 | #X connect 5 0 20 0; 34 | #X connect 7 0 8 1; 35 | #X connect 8 0 17 0; 36 | #X connect 10 0 13 0; 37 | #X connect 12 0 15 1; 38 | #X connect 13 0 14 0; 39 | #X connect 13 1 12 0; 40 | #X connect 14 0 15 0; 41 | #X connect 14 1 19 0; 42 | #X connect 15 0 16 0; 43 | #X connect 16 0 18 0; 44 | #X connect 16 1 19 0; 45 | #X connect 17 0 20 1; 46 | #X connect 18 0 17 1; 47 | #X connect 18 0 20 1; 48 | #X connect 19 0 17 1; 49 | #X connect 20 0 6 0; 50 | -------------------------------------------------------------------------------- /synths/snare2~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 845 171 463 536 10; 2 | #X text 202 96 start \, end \, time; 3 | #X obj 114 97 f \$1; 4 | #X obj 144 97 f \$2; 5 | #X obj 174 97 f \$3; 6 | #X obj 28 29 inlet; 7 | #X obj 41 125 / 100; 8 | #X msg 15 86 100; 9 | #X obj 164 123 pack 0 0; 10 | #X msg 151 36 bang; 11 | #X obj 115 448 outlet~; 12 | #X obj 207 14 inlet; 13 | #X obj 208 35 route start end time; 14 | #X obj 154 319 line~; 15 | #X obj 180 241 del \$3; 16 | #X msg 178 275 0 5; 17 | #X obj 122 417 *~; 18 | #X msg 118 272 0; 19 | #X msg 79 161 bang; 20 | #X obj -5 232 pack 0 2; 21 | #X obj 98 230 noise~; 22 | #X obj 145 296 lop~; 23 | #X obj 163 143 line; 24 | #X obj 43 50 route bang float; 25 | #X connect 1 0 21 0; 26 | #X connect 2 0 7 0; 27 | #X connect 3 0 7 1; 28 | #X connect 4 0 22 0; 29 | #X connect 5 0 17 0; 30 | #X connect 5 0 18 0; 31 | #X connect 6 0 5 0; 32 | #X connect 7 0 21 0; 33 | #X connect 8 0 1 0; 34 | #X connect 8 0 3 0; 35 | #X connect 8 0 2 0; 36 | #X connect 10 0 11 0; 37 | #X connect 11 0 1 1; 38 | #X connect 11 1 2 1; 39 | #X connect 11 2 3 1; 40 | #X connect 11 2 13 1; 41 | #X connect 12 0 15 1; 42 | #X connect 13 0 14 0; 43 | #X connect 14 0 12 0; 44 | #X connect 15 0 9 0; 45 | #X connect 16 0 12 0; 46 | #X connect 17 0 13 0; 47 | #X connect 18 0 12 0; 48 | #X connect 19 0 20 0; 49 | #X connect 20 0 15 0; 50 | #X connect 21 0 20 1; 51 | #X connect 22 0 8 0; 52 | #X connect 22 0 6 0; 53 | #X connect 22 1 8 0; 54 | #X connect 22 1 5 0; 55 | -------------------------------------------------------------------------------- /utils/lb.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 1920 1048 10; 2 | #X obj 233 122 loadbang; 3 | #X obj 260 215 outlet; 4 | #X obj 287 57 inlet; 5 | #X obj 287 77 route bang float; 6 | #X obj 233 182 any \$2; 7 | #X obj 233 142 any \$1; 8 | #X obj 233 162 route 0; 9 | #X text 437 52 [lb] - loadbang with a default and "fallback"; 10 | #X text 438 92 [lb] is like [loadbang] \, but you can provide a number as an argument and it will output that number instead of a bang.; 11 | #X text 438 140 A second argument can be provided to specify a value if the first argument is zero. This is useful as a "fallback" value. For example \, if you use \$1 as the first argument but it's not provided in the parent patch \, then [lb]'s second argument will be output instead. This is because arguments that aren't provided default to 0 . Of course \, you need to be careful about this since if the argument IS provided \, and it's provided as a 0 \, then the second argument of [lb] will be output instead of 0 as the user intended. If that's a concern \, you might want to manually parse the arguments \, which you can get by sending an "args" message to [pdcontrol].; 12 | #X obj 213 122 bng 18 250 50 0 empty empty empty 0 -9 0 10 #fcfcfc #000000 #000000; 13 | #X connect 0 0 5 0; 14 | #X connect 2 0 3 0; 15 | #X connect 3 0 5 0; 16 | #X connect 3 1 1 0; 17 | #X connect 3 2 1 0; 18 | #X connect 4 0 1 0; 19 | #X connect 5 0 6 0; 20 | #X connect 6 0 4 0; 21 | #X connect 6 1 1 0; 22 | #X connect 10 0 5 0; 23 | -------------------------------------------------------------------------------- /gen/sndp~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 2560 1568 10; 2 | #X obj 280 255 soundfiler; 3 | #X msg 280 236 read -resize \$1 \$2-file; 4 | #X obj 338 132 loadbang; 5 | #X obj 338 161 f \$0; 6 | #X obj 253 198 pack s f; 7 | #X obj 165 237 table \$0-file; 8 | #X obj 84 221 outlet~; 9 | #X obj 253 160 symbol \$1; 10 | #X obj 270 126 openpanel; 11 | #X obj 270 109 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000; 12 | #X symbolatom 317 199 50 0 0 0 - - - 0; 13 | #X obj 253 109 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000; 14 | #X obj 84 68 inlet; 15 | #X obj 84 177 tabplay~ \$0-file; 16 | #X obj 84 155 t b f; 17 | #X msg 253 274 \; \$2-file normalize; 18 | #X obj 177 200 outlet; 19 | #X obj 84 133 / 127; 20 | #X msg 84 106 127; 21 | #X obj 84 87 route bang float open file; 22 | #X obj 84 200 *~ 1; 23 | #X obj 253 217 t a a; 24 | #X connect 1 0 0 0; 25 | #X connect 2 0 3 0; 26 | #X connect 2 0 7 0; 27 | #X connect 3 0 4 1; 28 | #X connect 4 0 21 0; 29 | #X connect 7 0 10 0; 30 | #X connect 7 0 4 0; 31 | #X connect 8 0 7 0; 32 | #X connect 9 0 8 0; 33 | #X connect 11 0 7 0; 34 | #X connect 12 0 19 0; 35 | #X connect 13 0 20 0; 36 | #X connect 13 1 16 0; 37 | #X connect 14 0 13 0; 38 | #X connect 14 1 20 1; 39 | #X connect 17 0 14 0; 40 | #X connect 18 0 17 0; 41 | #X connect 19 0 18 0; 42 | #X connect 19 1 17 0; 43 | #X connect 19 2 7 0; 44 | #X connect 19 3 7 0; 45 | #X connect 20 0 6 0; 46 | #X connect 21 0 15 0; 47 | #X connect 21 1 1 0; 48 | -------------------------------------------------------------------------------- /utils/char-sym.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 1620 2880 1586 10; 2 | #X obj 32 59 inlet; 3 | #X obj 89 195 makefilename %c; 4 | #X obj 89 233 outlet; 5 | #X msg 89 214 symbol \$1; 6 | #X obj 32 78 route bang; 7 | #X text 349 32 char-sym - Output a symbol consisting of a single "special character".; 8 | #X obj 155 59 loadbang; 9 | #X obj 89 117 symbol \$1; 10 | #X obj 182 233 outlet; 11 | #X text 349 76 This can be useful if you want to put a "special character" inside symbols \, which is necessary if you want an object's label to have said character in it. Pd doesn't seem to keep the spaces or newlines in labels when re-opening patches/abstractions \, so the next best thing is to use a [loadbang] to set the desired label at load time.; 12 | #X obj 155 78 t b b; 13 | #X msg 182 117 space 32 newline 10 nl 10; 14 | #X text 351 169 Currently-supported "special characters" are: space \, newline.; 15 | #X obj 89 176 remap, f 16; 16 | #X obj 89 136 emptysymbol; 17 | #X text 352 209 The name of the character can be provided as an argument or to the inlet. Send a bang to the inlet to re-send the last-requested character. Unrecognized inputs are passed through to the 2nd outlet.; 18 | #X connect 0 0 4 0; 19 | #X connect 1 0 3 0; 20 | #X connect 3 0 2 0; 21 | #X connect 4 0 7 0; 22 | #X connect 4 1 7 0; 23 | #X connect 6 0 10 0; 24 | #X connect 7 0 14 0; 25 | #X connect 10 0 7 0; 26 | #X connect 10 1 11 0; 27 | #X connect 11 0 13 1; 28 | #X connect 13 0 1 0; 29 | #X connect 13 1 8 0; 30 | #X connect 14 1 13 0; 31 | -------------------------------------------------------------------------------- /fx/soft~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 800 0 800 849 10; 2 | #X obj 184 121 *~; 3 | #X obj 162 168 *~; 4 | #X obj 332 38 inlet; 5 | #X obj 162 199 *~ 0; 6 | #X obj 212 199 *~ 0; 7 | #X obj 262 199 *~ 0; 8 | #X obj 316 199 sig~; 9 | #X obj 163 237 outlet~; 10 | #X obj 163 37 clip~ -1 1; 11 | #X obj 164 9 inlet~; 12 | #X obj 487 100 cnv 15 185 45 empty empty empty 20 12 0 14 -261234 -66577 13 | 0; 14 | #X floatatom 338 100 5 0 0 0 - - -; 15 | #X floatatom 370 100 5 0 0 0 - - -; 16 | #X floatatom 402 100 5 0 0 0 - - -; 17 | #X floatatom 434 100 5 0 0 0 - - -; 18 | #X text 493 101 f(x) = ax^3 + bx^2 + cx + d; 19 | #X obj 422 175 * -1; 20 | #X obj 332 57 lb \$1; 21 | #X obj 368 38 inlet; 22 | #X obj 404 38 inlet; 23 | #X obj 452 38 inlet; 24 | #X obj 404 57 lb \$3 1; 25 | #X obj 452 57 lb \$4; 26 | #X obj 368 57 lb \$2; 27 | #X connect 0 0 1 1; 28 | #X connect 0 0 4 0; 29 | #X connect 1 0 3 0; 30 | #X connect 2 0 17 0; 31 | #X connect 3 0 7 0; 32 | #X connect 4 0 7 0; 33 | #X connect 5 0 7 0; 34 | #X connect 6 0 7 0; 35 | #X connect 8 0 0 0; 36 | #X connect 8 0 0 1; 37 | #X connect 8 0 1 0; 38 | #X connect 8 0 5 0; 39 | #X connect 9 0 8 0; 40 | #X connect 11 0 3 1; 41 | #X connect 12 0 4 1; 42 | #X connect 12 0 16 0; 43 | #X connect 13 0 5 1; 44 | #X connect 14 0 6 0; 45 | #X connect 16 0 14 0; 46 | #X connect 17 0 11 0; 47 | #X connect 18 0 23 0; 48 | #X connect 19 0 21 0; 49 | #X connect 20 0 22 0; 50 | #X connect 21 0 13 0; 51 | #X connect 22 0 14 0; 52 | #X connect 23 0 12 0; 53 | #X coords 0 -1 1 1 166 15 1 300 100; 54 | -------------------------------------------------------------------------------- /synths/kick1~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 1920 1050 10; 2 | #X obj 206 160 line~; 3 | #X text 242 96 start \, end \, time; 4 | #X obj 154 97 f \$1; 5 | #X obj 184 97 f \$2; 6 | #X obj 214 97 f \$3; 7 | #X obj 68 29 inlet; 8 | #X obj 204 123 pack 0 0; 9 | #X msg 191 36 bang; 10 | #X obj 99 333 outlet~; 11 | #X obj 247 14 inlet; 12 | #X obj 153 277 line~; 13 | #X obj 172 205 del \$3; 14 | #X obj 106 302 *~; 15 | #X obj 259 203 loadbang; 16 | #X msg 261 231 0; 17 | #X msg 119 161 bang; 18 | #X obj 35 232 pack 0 2; 19 | #X obj 165 185 osc~ \$1; 20 | #X obj 248 35 route start end time attack release; 21 | #X obj 170 232 pack 0 5; 22 | #X obj 71 63 route bang float; 23 | #X msg 73 92 127; 24 | #X obj 81 125 / 127; 25 | #X connect 0 0 17 0; 26 | #X connect 2 0 0 0; 27 | #X connect 3 0 6 0; 28 | #X connect 4 0 6 1; 29 | #X connect 5 0 7 0; 30 | #X connect 5 0 20 0; 31 | #X connect 6 0 0 0; 32 | #X connect 7 0 2 0; 33 | #X connect 7 0 4 0; 34 | #X connect 7 0 3 0; 35 | #X connect 9 0 18 0; 36 | #X connect 10 0 12 1; 37 | #X connect 11 0 19 0; 38 | #X connect 12 0 8 0; 39 | #X connect 13 0 14 0; 40 | #X connect 14 0 10 0; 41 | #X connect 15 0 11 0; 42 | #X connect 16 0 10 0; 43 | #X connect 17 0 12 0; 44 | #X connect 18 0 2 1; 45 | #X connect 18 1 3 1; 46 | #X connect 18 2 4 1; 47 | #X connect 18 2 11 1; 48 | #X connect 18 3 16 1; 49 | #X connect 18 4 19 1; 50 | #X connect 19 0 10 0; 51 | #X connect 20 0 21 0; 52 | #X connect 20 1 22 0; 53 | #X connect 21 0 22 0; 54 | #X connect 22 0 16 0; 55 | #X connect 22 0 15 0; 56 | -------------------------------------------------------------------------------- /seq/map.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 0 1920 1048 10; 2 | #X obj 602 228 list length; 3 | #X obj 407 125 inlet; 4 | #X obj 407 378 outlet; 5 | #X obj 581 165 inlet; 6 | #X obj 486 165 t b a; 7 | #X obj 575 208 t a a; 8 | #X obj 575 188 list; 9 | #X text 116 156 map - simple map; 10 | #X obj 407 145 route bang float list reset; 11 | #X text 23 192 you can specify the default mapping as the arguments \, or you can change it with the right inlet. the left inlet accepts bangs or floats to output from the mapping list. try something like [map 5 4 3 2 1] and send bangs or floats to the left inlet.; 12 | #X obj 407 273 i 0; 13 | #X obj 431 273 + 1; 14 | #X obj 526 190 bang; 15 | #X msg 526 210 0; 16 | #X obj 407 318 mod; 17 | #X obj 455 273 mod; 18 | #X obj 575 145 pdcontrol; 19 | #X obj 575 105 loadbang; 20 | #X obj 407 358 list store; 21 | #X msg 407 338 get \$1; 22 | #X msg 575 125 args; 23 | #X connect 0 0 15 1; 24 | #X connect 0 0 14 1; 25 | #X connect 1 0 8 0; 26 | #X connect 3 0 6 0; 27 | #X connect 4 0 10 0; 28 | #X connect 4 1 6 0; 29 | #X connect 5 0 18 1; 30 | #X connect 5 1 0 0; 31 | #X connect 6 0 5 0; 32 | #X connect 8 0 10 0; 33 | #X connect 8 1 10 0; 34 | #X connect 8 2 4 0; 35 | #X connect 8 3 12 0; 36 | #X connect 10 0 11 0; 37 | #X connect 10 0 14 0; 38 | #X connect 11 0 15 0; 39 | #X connect 12 0 13 0; 40 | #X connect 13 0 10 1; 41 | #X connect 14 0 19 0; 42 | #X connect 15 0 10 1; 43 | #X connect 16 0 6 0; 44 | #X connect 17 0 20 0; 45 | #X connect 18 0 2 0; 46 | #X connect 19 0 18 0; 47 | #X connect 20 0 16 0; 48 | -------------------------------------------------------------------------------- /fx/bitflip~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 871 10; 2 | #X obj 529 207 inlet~; 3 | #X obj 529 249 *~; 4 | #N canvas 0 0 450 300 (subpatch) 0; 5 | #X array \$0-bitcrush 7 float 3; 6 | #A 0 0 -1 1 0 0 0 0; 7 | #X coords 0 1 7 -1 200 140 1; 8 | #X restore 642 297 graph; 9 | #X obj 555 249 tabosc4~ \$0-bitcrush; 10 | #X obj 529 284 outlet~; 11 | #X obj 601 164 inlet; 12 | #X obj 719 276 tabwrite \$0-bitcrush; 13 | #X obj 658 215 unpack; 14 | #X obj 707 124 pack 0 0; 15 | #X msg 702 77 0; 16 | #X msg 729 77 1; 17 | #X msg 756 77 -1; 18 | #X msg 707 143 array \$1 \$2; 19 | #X obj 772 115 nbx 5 14 0 7 0 0 empty empty empty 0 -8 0 10 -262144 20 | -1 -1 7 256; 21 | #X obj 601 183 route float array bang; 22 | #X text 764 196 todo: add randomization for the table; 23 | #X obj 579 225 lb \$1 9000; 24 | #X obj 585 80 rchoice; 25 | #X obj 633 80 count 8; 26 | #X obj 601 15 until; 27 | #X msg 601 -4 8; 28 | #X msg 585 61 1 -1 0; 29 | #X obj 601 36 t b b; 30 | #X connect 0 0 1 0; 31 | #X connect 1 0 4 0; 32 | #X connect 3 0 1 1; 33 | #X connect 5 0 14 0; 34 | #X connect 7 0 6 0; 35 | #X connect 7 1 6 1; 36 | #X connect 8 0 12 0; 37 | #X connect 9 0 8 0; 38 | #X connect 10 0 8 0; 39 | #X connect 11 0 8 0; 40 | #X connect 12 0 14 0; 41 | #X connect 13 0 8 1; 42 | #X connect 14 0 3 0; 43 | #X connect 14 1 7 0; 44 | #X connect 14 2 20 0; 45 | #X connect 16 0 3 0; 46 | #X connect 17 0 8 0; 47 | #X connect 18 0 13 0; 48 | #X connect 19 0 22 0; 49 | #X connect 20 0 19 0; 50 | #X connect 21 0 17 0; 51 | #X connect 22 0 21 0; 52 | #X connect 22 1 18 0; 53 | -------------------------------------------------------------------------------- /guis/view~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 1920 1050 10; 2 | #X obj 41 445 view~; 3 | #X obj 41 367 osc~ 0.1; 4 | #X obj 251 445 view~; 5 | #X obj 251 406 osc~ 100; 6 | #X obj 461 445 view~; 7 | #X obj 671 445 view~; 8 | #X obj 461 406 tri~; 9 | #X obj 461 347 sig~ 100; 10 | #X obj 671 406 pulse~; 11 | #X obj 671 347 sig~ 100; 12 | #X obj 471 377 osc~ 0.1; 13 | #X obj 687 377 osc~ 0.1; 14 | #X text 472 91 view~ - view a signal; 15 | #X obj 41 406 *~ 10; 16 | #X text 466 133 view~ allows you to see a signal. It also shows the 17 | "current" value (snapshotted each time the internal metro bangs) \, 18 | and a running minimum and maximum value. You can change the refresh 19 | rate with the number box \, and reset the minimum and maximum to 0 20 | with the "r" bang.; 21 | #X text 33 254 The output of [view~] is clipped between -2 and 2 so 22 | that pd doesn't try drawing a waveform way out of the scope of the 23 | patch. Otherwise you might end up with some really big scrollbars :) 24 | ; 25 | #X text 465 217 view~ also has a mode switch \; in the first mode \, 26 | the display is redrawn every time the internal metro bangs. In the 27 | second mode \, the view is redrawn whenever the signal rises above 28 | zero. In the third mode \, the view is only redrawn when view~'s right 29 | inlet receives a bang.; 30 | #X connect 1 0 13 0; 31 | #X connect 3 0 2 0; 32 | #X connect 6 0 4 0; 33 | #X connect 7 0 6 0; 34 | #X connect 8 0 5 0; 35 | #X connect 9 0 8 0; 36 | #X connect 10 0 6 1; 37 | #X connect 11 0 8 1; 38 | #X connect 13 0 0 0; 39 | -------------------------------------------------------------------------------- /gen/analog~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 2560 1566 10; 2 | #X obj 211 342 outlet~; 3 | #X obj 158 29 inlet; 4 | #X obj 211 248 sig~ \$1; 5 | #X obj 158 48 route bang float; 6 | #X obj 110 151 / 100; 7 | #X obj 110 199 randomF; 8 | #X obj 110 170 t b f; 9 | #X floatatom 110 52 5 0 0 0 - - - 0; 10 | #X obj 40 286 osc~ 1e-08; 11 | #X obj 97 267 + 0.25; 12 | #X obj 97 248 randomF 0.01; 13 | #X obj 40 218 random 100; 14 | #X obj 211 229 + \$1; 15 | #X obj 205 200 t b f; 16 | #X obj 40 237 / 5e+06; 17 | #X obj 154 316 /~ 1; 18 | #X obj 175 267 abs; 19 | #X obj 93 53 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000; 20 | #X obj 175 248 - 101; 21 | #X text 296 89 arg 1 - argument for sig~. arg 2 - "phatness" \, out of 100 (default 10); 22 | #X obj 110 104 sel 0; 23 | #X msg 110 128 10; 24 | #X obj 110 82 init \$2; 25 | #X connect 1 0 3 0; 26 | #X connect 2 0 0 0; 27 | #X connect 3 0 22 0; 28 | #X connect 3 1 13 0; 29 | #X connect 4 0 6 0; 30 | #X connect 5 0 12 0; 31 | #X connect 6 0 5 0; 32 | #X connect 6 0 10 0; 33 | #X connect 6 0 11 0; 34 | #X connect 6 1 5 1; 35 | #X connect 7 0 22 0; 36 | #X connect 8 0 15 0; 37 | #X connect 9 0 8 1; 38 | #X connect 10 0 9 0; 39 | #X connect 11 0 14 0; 40 | #X connect 12 0 2 0; 41 | #X connect 13 0 12 0; 42 | #X connect 13 1 12 1; 43 | #X connect 14 0 8 0; 44 | #X connect 15 0 0 0; 45 | #X connect 16 0 15 1; 46 | #X connect 17 0 22 0; 47 | #X connect 18 0 16 0; 48 | #X connect 20 0 21 0; 49 | #X connect 20 1 4 0; 50 | #X connect 21 0 4 0; 51 | #X connect 22 0 20 0; 52 | #X connect 22 0 18 0; 53 | -------------------------------------------------------------------------------- /fx/flanger~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 63 233 895 469 10; 2 | #X obj 23 163 inlet~; 3 | #X obj 23 182 delwrite~ \$0-flanger 1000; 4 | #X obj 179 182 lb \$1 0.3; 5 | #X obj 179 163 inlet; 6 | #X text 179 26 arguments/inlets:; 7 | #X obj 239 163 inlet; 8 | #X obj 353 163 inlet; 9 | #X obj 239 182 lb \$2 0.5; 10 | #X obj 237 387 outlet~; 11 | #X obj 237 368 mixer~ 2; 12 | #X obj 169 329 vd~ \$0-flanger; 13 | #X obj 259 329 vd~ \$0-flanger; 14 | #X obj 259 272 osc~ 0.3; 15 | #X text 179 6 flanger~ - a basic flanger; 16 | #X obj 259 310 +~ 20; 17 | #X obj 89 371 *~ 0.5; 18 | #X obj 407 163 inlet; 19 | #X msg 407 201 0; 20 | #X text 179 86 4 - initial delay (ms); 21 | #X obj 353 182 lb \$4 20; 22 | #X obj 299 163 inlet; 23 | #X obj 299 182 lb \$3 10; 24 | #X obj 259 291 *~ 10; 25 | #X text 179 99 5 - LFO reset (phase or bang); 26 | #X text 179 73 3 - depth (ms); 27 | #X text 179 60 2 - feedback (-1 to 1); 28 | #X text 179 47 1 - rate (Hz); 29 | #X obj 407 182 route bang; 30 | #X obj 380 271 view~; 31 | #X connect 0 0 1 0; 32 | #X connect 2 0 12 0; 33 | #X connect 3 0 2 0; 34 | #X connect 5 0 7 0; 35 | #X connect 6 0 19 0; 36 | #X connect 7 0 15 1; 37 | #X connect 9 0 8 0; 38 | #X connect 10 0 9 0; 39 | #X connect 11 0 9 1; 40 | #X connect 11 0 15 0; 41 | #X connect 12 0 22 0; 42 | #X connect 12 0 28 0; 43 | #X connect 14 0 11 0; 44 | #X connect 15 0 1 0; 45 | #X connect 16 0 27 0; 46 | #X connect 17 0 12 1; 47 | #X connect 19 0 10 0; 48 | #X connect 19 0 14 1; 49 | #X connect 20 0 21 0; 50 | #X connect 21 0 22 1; 51 | #X connect 22 0 14 0; 52 | #X connect 27 0 17 0; 53 | #X connect 27 1 12 1; 54 | -------------------------------------------------------------------------------- /utils/itimer.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 1620 2880 1586 10; 2 | #X floatatom 139 136 4 0 0 0 - - - 0; 3 | #X floatatom 125 136 2 0 0 0 - - - 0; 4 | #X floatatom 105 136 3 0 0 0 - - - 0; 5 | #X obj 228 8 inlet; 6 | #X obj 228 376 outlet; 7 | #X obj 270 376 outlet; 8 | #X obj 312 376 outlet; 9 | #X obj 246 200 realtime; 10 | #X obj 147 118 tgl 18 0 empty empty empty 0 -9 0 10 #faff00 #000000 #000000 0 1; 11 | #X msg 281 60 1; 12 | #X obj 228 60 > 0; 13 | #X msg 311 60 0; 14 | #X obj 291 179 metro 5; 15 | #X obj 228 27 route bang float start stop; 16 | #X obj 288 250 % 1000; 17 | #X obj 246 250 / 1000; 18 | #X obj 236 316 int; 19 | #X obj 236 335 / 60; 20 | #X obj 236 354 int; 21 | #X obj 270 316 % 60; 22 | #X obj 270 335 int; 23 | #X obj 236 283 t f f; 24 | #X obj 246 219 t f f; 25 | #X obj 261 143 t f f; 26 | #X obj 246 179 sel 1; 27 | #X connect 3 0 13 0; 28 | #X connect 7 0 22 0; 29 | #X connect 8 0 23 0; 30 | #X connect 9 0 8 0; 31 | #X connect 10 0 8 0; 32 | #X connect 11 0 8 0; 33 | #X connect 12 0 7 1; 34 | #X connect 13 0 8 0; 35 | #X connect 13 1 10 0; 36 | #X connect 13 2 9 0; 37 | #X connect 13 3 11 0; 38 | #X connect 14 0 0 0; 39 | #X connect 14 0 6 0; 40 | #X connect 15 0 21 0; 41 | #X connect 16 0 17 0; 42 | #X connect 17 0 18 0; 43 | #X connect 18 0 2 0; 44 | #X connect 18 0 4 0; 45 | #X connect 19 0 20 0; 46 | #X connect 20 0 1 0; 47 | #X connect 20 0 5 0; 48 | #X connect 21 0 16 0; 49 | #X connect 21 1 19 0; 50 | #X connect 22 0 15 0; 51 | #X connect 22 1 14 0; 52 | #X connect 23 0 12 0; 53 | #X connect 23 1 24 0; 54 | #X connect 24 0 7 0; 55 | #X coords 0 -1 1 1 60 36 1 105 118; 56 | -------------------------------------------------------------------------------- /ctrl/keyrow.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 800 849 10; 2 | #X obj 193 201 unmap; 3 | #X obj 193 220 outlet; 4 | #X obj 390 90 sel 0 1 2 3; 5 | #X obj 390 71 lb \$1; 6 | #X obj 390 52 inlet; 7 | #X obj 144 135 inlet; 8 | #X obj 460 201 unmap; 9 | #X obj 460 220 outlet; 10 | #X msg 220 125 49 50 51 52 53 54 55 56 57 48 45 61; 11 | #X msg 220 144 113 119 101 114 116 121 117 105 111 112 91 93; 12 | #X msg 220 163 97 115 100 102 103 104 106 107 108 59 39; 13 | #X msg 220 182 122 120 99 118 98 110 109 44 46 47; 14 | #X msg 487 125 33 64 35 36 37 94 38 42 40 41 95 43; 15 | #X msg 487 144 81 87 69 82 84 89 85 73 79 80; 16 | #X msg 487 163 65 83 68 70 71 72 74 75 76 58 34; 17 | #X text 48 32 keyrow generates numbers for each row of keys on your 18 | keyboard. the left outlet is for non-capitalized/shifted keys \, while 19 | the right outlet is for capitalized/shifted keys.; 20 | #X text 49 78 note: pure data apparently can't get the keycodes for 21 | brackets (i.e.: shift+[ or shift+]) nor the backslash.; 22 | #X msg 487 182 90 88 67 86 66 78 77 60 62 63; 23 | #X connect 0 0 1 0; 24 | #X connect 2 0 8 0; 25 | #X connect 2 0 12 0; 26 | #X connect 2 1 9 0; 27 | #X connect 2 1 13 0; 28 | #X connect 2 2 10 0; 29 | #X connect 2 2 14 0; 30 | #X connect 2 3 11 0; 31 | #X connect 2 3 17 0; 32 | #X connect 3 0 2 0; 33 | #X connect 4 0 3 0; 34 | #X connect 5 0 0 0; 35 | #X connect 5 0 6 0; 36 | #X connect 6 0 7 0; 37 | #X connect 8 0 0 1; 38 | #X connect 9 0 0 1; 39 | #X connect 10 0 0 1; 40 | #X connect 11 0 0 1; 41 | #X connect 12 0 6 1; 42 | #X connect 13 0 6 1; 43 | #X connect 14 0 6 1; 44 | #X connect 17 0 6 1; 45 | -------------------------------------------------------------------------------- /ctrl/c-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1680 29 1600 871 10; 2 | #X floatatom 93 215 5 0 0 0 - - -; 3 | #X obj 64 233 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144 4 | -1 -1 5443 1; 5 | #X text 344 128 c - receive midi control value; 6 | #X obj 61 310 osc~ 440; 7 | #X obj 79 358 o~; 8 | #X floatatom 100 497 5 0 0 0 - - -; 9 | #X obj 76 518 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144 10 | -1 -1 0 1; 11 | #X text 339 166 [c] is a convenient GUI and interface to MIDI CC messages. 12 | It will output the CC values from the CC number provided as the first 13 | argument.; 14 | #X text 339 211 You can also provide more arguments to [c] for additional 15 | functionality:; 16 | #X text 349 248 - provide "B" as an argument to only output "bang" 17 | when the CC value is 127; 18 | #X text 349 278 - provide "R" as an argument to use [c]'s relative 19 | mode.; 20 | #X text 349 298 - provide "I" as an argument to use [c]'s inverted 21 | relative mode.; 22 | #X text 349 326 - provide any other symbol as an argument to prefix 23 | [c]'s numeric output with that symbol.; 24 | #X text 349 356 - provide a number as an argument to scale [c]'s numeric 25 | output between 0 and that number.; 26 | #X obj 132 327 c 1 vol; 27 | #X obj 93 183 c 5; 28 | #X obj 100 464 c 5 50; 29 | #X floatatom 100 446 5 0 0 0 - - -; 30 | #X obj 103 429 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144 31 | -1 -1 0 1; 32 | #X connect 3 0 4 0; 33 | #X connect 14 0 4 1; 34 | #X connect 15 0 0 0; 35 | #X connect 15 0 1 0; 36 | #X connect 16 0 6 0; 37 | #X connect 16 0 5 0; 38 | #X connect 17 0 16 0; 39 | #X connect 18 0 17 0; 40 | -------------------------------------------------------------------------------- /ctrl/capslock-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 69 220 capslock; 3 | #X floatatom 69 259 5 0 0 0 - - -; 4 | #X obj 69 183 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 5 | -1; 6 | #X text 213 129 capslock - capslock detection; 7 | #X text 219 175 this is just a simple abstraction to test whether your 8 | caps-lock is on or off.; 9 | #X text 225 225 you can't rely on this for accuracy because it assumes 10 | that caps lock was off at the time of creation \, and all it does is 11 | toggles its internal value when it detects a push of the caps lock 12 | key.; 13 | #N canvas 0 29 1600 849 caps-cop 0; 14 | #X obj 210 377 hradio 69 1 0 2 empty empty THE_CAPS_COP_IS_AFTER_U 15 | 0 -5 0 10 -1 -62784 -1 1; 16 | #X obj 191 156 capslock; 17 | #X obj 77 253 metro 300; 18 | #X obj 191 190 sel 1 0; 19 | #X msg 77 342 color 22 \$1 22; 20 | #X text 204 89 i have too much time on my hands \, clearly.; 21 | #X obj 77 272 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 22 | 1; 23 | #X obj 77 323 + 13; 24 | #X obj 77 304 * 5; 25 | #X msg 210 249 color 22 22 22 \, label; 26 | #X obj 222 220 loadbang; 27 | #X msg 191 268 label THE_CAPS_COP_IS_AFTER_U \, label_pos 0 -5; 28 | #X connect 1 0 2 0; 29 | #X connect 1 0 3 0; 30 | #X connect 2 0 6 0; 31 | #X connect 3 0 11 0; 32 | #X connect 3 1 9 0; 33 | #X connect 4 0 0 0; 34 | #X connect 6 0 8 0; 35 | #X connect 6 0 0 0; 36 | #X connect 7 0 4 0; 37 | #X connect 8 0 7 0; 38 | #X connect 9 0 0 0; 39 | #X connect 10 0 9 0; 40 | #X connect 11 0 0 0; 41 | #X coords 0 -1 1 1 158 100 2 200 357; 42 | #X restore 158 327 pd caps-cop; 43 | #X connect 0 0 1 0; 44 | #X connect 2 0 0 0; 45 | -------------------------------------------------------------------------------- /fx/skip~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1600 848 10; 2 | #X obj 126 136 *~ 1; 3 | #X obj 236 14 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 4 | 1; 5 | #X obj 278 55 - 1; 6 | #X obj 278 75 abs; 7 | #X obj 194 215 *~ 0; 8 | #X obj 126 282 outlet~; 9 | #X obj 110 49 inlet~; 10 | #X obj 194 193 vd~ \$0-skipper; 11 | #X obj 182 -28 inlet; 12 | #X obj 180 262 *~ 0; 13 | #X obj 188 115 metro; 14 | #X obj 178 165 delwrite~ \$0-skipper 700; 15 | #X obj 80 -10 lb \$1; 16 | #X obj 80 9 sel 0; 17 | #X obj 181 27 nbx 3 14 1 700 0 0 empty empty metro 37 7 0 10 -262144 18 | -1 -1 80 256; 19 | #X msg 80 28 30; 20 | #X obj 182 -9 route bang float feedback state max; 21 | #X obj 347 94 min 700; 22 | #X obj 196 139 random; 23 | #X obj 356 40 sel 0; 24 | #X msg 313 70 30; 25 | #X obj 356 17 lb \$2; 26 | #X obj 181 41 nbx 3 14 0 700 0 0 empty empty max 37 7 0 10 -262144 27 | -1 -1 700 256; 28 | #X connect 0 0 5 0; 29 | #X connect 1 0 2 0; 30 | #X connect 1 0 4 1; 31 | #X connect 1 0 10 0; 32 | #X connect 2 0 3 0; 33 | #X connect 3 0 0 1; 34 | #X connect 4 0 5 0; 35 | #X connect 4 0 9 0; 36 | #X connect 6 0 0 0; 37 | #X connect 6 0 11 0; 38 | #X connect 7 0 4 0; 39 | #X connect 8 0 16 0; 40 | #X connect 9 0 11 0; 41 | #X connect 10 0 18 0; 42 | #X connect 12 0 13 0; 43 | #X connect 13 0 15 0; 44 | #X connect 13 1 14 0; 45 | #X connect 15 0 14 0; 46 | #X connect 16 0 1 0; 47 | #X connect 16 2 9 1; 48 | #X connect 16 3 1 0; 49 | #X connect 16 4 17 0; 50 | #X connect 17 0 22 0; 51 | #X connect 18 0 7 0; 52 | #X connect 19 0 20 0; 53 | #X connect 19 1 17 0; 54 | #X connect 20 0 17 0; 55 | #X connect 21 0 19 0; 56 | #X connect 22 0 18 1; 57 | #X coords 0 -1 1 1 70 41 1 181 14; 58 | -------------------------------------------------------------------------------- /guis/ifiddle~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X obj 273 246 ifiddle~; 3 | #X obj 253 190 osc~; 4 | #X floatatom 253 153 5 0 0 0 - - -; 5 | #X obj 253 171 mtof; 6 | #X text 393 55 ifiddle~ - interface fiddle~; 7 | #X obj 288 82 loadbang; 8 | #X msg 253 134 57; 9 | #X obj 273 227 *~; 10 | #X obj 288 208 line~; 11 | #X msg 288 134 1 \, 0.25 500; 12 | #X text 400 105 this is basically just a gui for fiddle~. the first 13 | 2 outlets come straight from fiddle~'s first 2 outlets \, while the 14 | last 2 outlets are the unpacked output of fiddle~'s third outlet.; 15 | #X obj 307 303 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 16 | -1 -1; 17 | #X floatatom 273 302 5 0 0 0 - - -; 18 | #X floatatom 342 302 5 0 0 0 - - -; 19 | #X floatatom 377 302 5 0 0 0 - - -; 20 | #N canvas 0 29 800 849 META 0; 21 | #X text 12 145 LIBRARY defaultxr; 22 | #X text 12 165 AUTHOR modula t. worm; 23 | #X text 12 185 WEBSITE http://github.com/defaultxr/pure-data-patches 24 | ; 25 | #X text 12 205 RELEASE_DATE 2013; 26 | #X text 12 5 KEYWORDS fiddle gui analysis; 27 | #X text 12 25 DESCRIPTION graphically show fiddle~ output; 28 | #X text 12 45 INLET_0 signal; 29 | #X text 12 65 OUTLET_0 cooked pitch; 30 | #X text 12 85 OUTLET_1 bang on attack; 31 | #X text 12 105 OUTLET_2 pitch; 32 | #X text 12 125 OUTLET_3 amplitude; 33 | #X restore 300 377 pd META; 34 | #X connect 0 0 12 0; 35 | #X connect 0 1 11 0; 36 | #X connect 0 2 13 0; 37 | #X connect 0 3 14 0; 38 | #X connect 1 0 7 0; 39 | #X connect 2 0 3 0; 40 | #X connect 3 0 1 0; 41 | #X connect 5 0 6 0; 42 | #X connect 5 0 9 0; 43 | #X connect 6 0 2 0; 44 | #X connect 7 0 0 0; 45 | #X connect 8 0 7 1; 46 | #X connect 9 0 8 0; 47 | -------------------------------------------------------------------------------- /fx/dist2~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 800 849 10; 2 | #X obj 80 94 inlet~; 3 | #X obj 80 151 tabread4~ \$0-dist; 4 | #N canvas 0 0 450 300 (subpatch) 0; 5 | #X array \$0-dist 100 float 3; 6 | #A 0 -0.138336 -0.126831 -0.0871887 -0.0279846 0.0339355 0.0811462 7 | 0.101349 0.0942993 0.0708923 0.0440979 0.0274048 0.0286865 0.0443726 8 | 0.0686951 0.0931702 0.102081 0.0855408 0.0458984 -0.000640869 -0.0314331 9 | -0.0432739 -0.0445251 -0.0301208 -0.00448608 0.012207 0.0162354 0.012207 10 | -0.00189209 -0.0205994 -0.0395203 -0.0607605 -0.0764771 -0.0816956 11 | -0.0893555 -0.107544 -0.126099 -0.131226 -0.117706 -0.0906372 -0.0574341 12 | -0.0180664 0.0237732 0.0463257 0.0330811 -0.00088501 -0.0347595 -0.0674438 13 | -0.0944824 -0.100433 -0.0802307 -0.0414734 0.000305176 0.0317078 0.0583191 14 | 0.0818176 0.0847778 0.0737305 0.0763855 0.0897217 0.0939331 0.0869751 15 | 0.0735168 0.0594482 0.0464172 0.0231018 -0.00775146 -0.0232239 -0.0144043 16 | 0.0067749 0.0206604 0.0174255 0.0110779 0.00866699 -0.00357056 -0.0185242 17 | -0.0153809 -0.00180054 0.00500488 0.0032959 -0.00592041 -0.0253296 18 | -0.057251 -0.0930481 -0.111053 -0.103333 -0.0856628 -0.0715637 -0.0572815 19 | -0.0379028 -0.0272522 -0.0399475 -0.0567017 -0.0479431 -0.0148315 0.0240173 20 | 0.0563049 0.0777588 0.0884705 0.0849915 0.0675964; 21 | #X coords 0 1 99 -1 200 140 1; 22 | #X restore 330 77 graph; 23 | #X obj 80 132 *~ 50; 24 | #X obj 80 113 +~ 1; 25 | #X obj 191 170 tabwrite~ \$0-dist; 26 | #X obj 191 135 inlet~; 27 | #X obj 80 170 outlet~; 28 | #X obj 233 135 inlet; 29 | #X connect 0 0 4 0; 30 | #X connect 1 0 7 0; 31 | #X connect 3 0 1 0; 32 | #X connect 4 0 3 0; 33 | #X connect 6 0 5 0; 34 | #X connect 8 0 5 0; 35 | -------------------------------------------------------------------------------- /utils/list-without.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 800 849 10; 2 | #X obj 188 285 inlet; 3 | #X obj 238 285 inlet; 4 | #X obj 164 381 list-find; 5 | #X obj 164 484 list-rev; 6 | #X obj 223 332 any; 7 | #X obj 188 304 t b a; 8 | #X msg 115 578 bar baz; 9 | #X msg 164 416 add2 \$1; 10 | #X msg 164 451 0; 11 | #X obj 215 416 bang; 12 | #X obj 187 580 list-delete; 13 | #X obj 164 503 list-drip; 14 | #X obj 31 481 prepent set; 15 | #X obj 164 522 t b f; 16 | #X msg 117 646 bar baz; 17 | #X obj 117 665 outlet; 18 | #X obj 289 665 outlet; 19 | #X obj 223 351 t a b; 20 | #X msg 250 416 set; 21 | #X obj 232 483 list length; 22 | #X obj 304 483 list length; 23 | #X obj 289 536 sel 1; 24 | #X obj 289 517 ==; 25 | #X text 294 292 left inlet - list to remove item from.; 26 | #X text 294 305 right inlet - item to remove all instances of.; 27 | #X text 294 319 left outlet - list with all instances removed.; 28 | #X text 294 332 right outlet - bang if output list is of length 0; 29 | #X connect 0 0 5 0; 30 | #X connect 1 0 4 1; 31 | #X connect 2 0 7 0; 32 | #X connect 2 1 9 0; 33 | #X connect 3 0 11 0; 34 | #X connect 4 0 17 0; 35 | #X connect 5 0 4 0; 36 | #X connect 5 1 2 1; 37 | #X connect 5 1 12 0; 38 | #X connect 5 1 20 0; 39 | #X connect 6 0 10 0; 40 | #X connect 7 0 8 0; 41 | #X connect 8 0 3 0; 42 | #X connect 8 0 19 0; 43 | #X connect 9 0 8 0; 44 | #X connect 10 0 12 0; 45 | #X connect 11 0 13 0; 46 | #X connect 11 1 14 0; 47 | #X connect 12 0 6 0; 48 | #X connect 12 0 14 0; 49 | #X connect 13 0 6 0; 50 | #X connect 13 1 10 1; 51 | #X connect 14 0 15 0; 52 | #X connect 17 0 2 0; 53 | #X connect 17 1 18 0; 54 | #X connect 18 0 8 0; 55 | #X connect 19 0 22 0; 56 | #X connect 20 0 22 1; 57 | #X connect 21 0 16 0; 58 | #X connect 22 0 21 0; 59 | -------------------------------------------------------------------------------- /math/interpolate.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1680 59 2560 1566 10; 2 | #X obj 159 25 inlet; 3 | #X obj 114 555 outlet; 4 | #X text 372 378 interpolate - output numbers between INPUT and LAST_INPUT \, then output INPUT; 5 | #X obj 222 260 f; 6 | #X obj 202 400 until; 7 | #X obj 232 352 abs; 8 | #X obj 269 496 +; 9 | #X obj 232 314 -; 10 | #X obj 232 371 t f f; 11 | #X obj 222 164 t f b b f; 12 | #X obj 222 279 t f f; 13 | #X obj 339 430 sel 0 1; 14 | #X obj 114 517 change; 15 | #X obj 222 463 * 1; 16 | #X msg 369 458 1; 17 | #X msg 339 458 -1; 18 | #X obj 232 333 t f f; 19 | #X obj 339 411 < 0; 20 | #X obj 159 44 route reset; 21 | #X obj 159 101 t b f b; 22 | #X msg 198 120 0; 23 | #X msg 159 120 1; 24 | #X obj 159 63 route bang; 25 | #X msg 159 82 0; 26 | #X obj 114 536 spigot 1; 27 | #X obj 222 429 count; 28 | #X connect 0 0 18 0; 29 | #X connect 3 0 10 0; 30 | #X connect 4 0 25 0; 31 | #X connect 5 0 8 0; 32 | #X connect 6 0 12 0; 33 | #X connect 7 0 16 0; 34 | #X connect 8 0 4 0; 35 | #X connect 8 1 25 2; 36 | #X connect 9 0 3 1; 37 | #X connect 9 0 12 0; 38 | #X connect 9 1 3 0; 39 | #X connect 9 2 25 1; 40 | #X connect 9 3 7 1; 41 | #X connect 10 0 7 0; 42 | #X connect 10 1 6 1; 43 | #X connect 11 0 15 0; 44 | #X connect 11 1 14 0; 45 | #X connect 12 0 24 0; 46 | #X connect 13 0 6 0; 47 | #X connect 14 0 13 1; 48 | #X connect 15 0 13 1; 49 | #X connect 16 0 5 0; 50 | #X connect 16 1 17 0; 51 | #X connect 17 0 11 0; 52 | #X connect 18 0 22 0; 53 | #X connect 18 1 9 0; 54 | #X connect 19 0 21 0; 55 | #X connect 19 1 9 0; 56 | #X connect 19 2 20 0; 57 | #X connect 20 0 24 1; 58 | #X connect 21 0 24 1; 59 | #X connect 22 0 23 0; 60 | #X connect 22 1 19 0; 61 | #X connect 23 0 19 0; 62 | #X connect 24 0 1 0; 63 | #X connect 25 0 13 0; 64 | -------------------------------------------------------------------------------- /seq/pmap.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 2560 1566 10; 2 | #X obj 480 417 list-idx; 3 | #X obj 602 223 list length; 4 | #X obj 480 379 l; 5 | #X obj 407 124 inlet; 6 | #X obj 446 328 t b f; 7 | #X obj 480 466 outlet; 8 | #X obj 407 273 count; 9 | #X obj 581 162 inlet; 10 | #X obj 486 162 t b a; 11 | #X obj 575 204 t a a; 12 | #X obj 575 185 list; 13 | #X obj 407 143 route bang float list reset; 14 | #X msg 526 189 reset; 15 | #X text 79 151 pmap - program map; 16 | #X text 73 177 accepts "org" message to set restart point.; 17 | #X obj 432 466 sel org; 18 | #X obj 525 379 mod; 19 | #X obj 432 520 f; 20 | #X obj 525 398 t f f; 21 | #X obj 432 539 + 1; 22 | #X obj 572 616 f; 23 | #X obj 432 558 t b f; 24 | #X obj 572 635 - 0; 25 | #X obj 407 292 + 0; 26 | #X obj 575 143 pdcontrol; 27 | #X obj 575 103 loadbang; 28 | #X msg 575 123 args; 29 | #X connect 0 0 5 0; 30 | #X connect 0 0 15 0; 31 | #X connect 1 0 20 0; 32 | #X connect 1 0 16 1; 33 | #X connect 2 0 0 0; 34 | #X connect 3 0 11 0; 35 | #X connect 4 0 2 0; 36 | #X connect 4 1 16 0; 37 | #X connect 6 0 23 0; 38 | #X connect 7 0 10 0; 39 | #X connect 8 0 6 0; 40 | #X connect 8 1 10 0; 41 | #X connect 9 0 2 1; 42 | #X connect 9 1 1 0; 43 | #X connect 10 0 9 0; 44 | #X connect 11 0 6 0; 45 | #X connect 11 1 4 0; 46 | #X connect 11 2 8 0; 47 | #X connect 11 3 12 0; 48 | #X connect 12 0 6 0; 49 | #X connect 15 0 17 0; 50 | #X connect 16 0 18 0; 51 | #X connect 17 0 19 0; 52 | #X connect 18 0 0 1; 53 | #X connect 18 1 17 1; 54 | #X connect 19 0 21 0; 55 | #X connect 20 0 22 0; 56 | #X connect 21 0 20 0; 57 | #X connect 21 1 22 1; 58 | #X connect 21 1 23 1; 59 | #X connect 22 0 6 1; 60 | #X connect 23 0 4 0; 61 | #X connect 24 0 10 0; 62 | #X connect 25 0 26 0; 63 | #X connect 26 0 24 0; 64 | -------------------------------------------------------------------------------- /fx/icomb~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 1920 1050 10; 2 | #X obj 126 188 comb~ \$1 \$2 \$3 \$4 \$5; 3 | #X obj 126 23 inlet~; 4 | #X obj 146 68 hsl 128 12 0 50 0 0 empty empty delay_7.87402 2 6 0 10 5 | -262144 -1 -1 2000 1; 6 | #X obj 146 80 hsl 128 12 0 1 0 0 empty empty predelay_0.889764 2 6 7 | 0 10 -262144 -1 -1 11300 1; 8 | #X obj 146 92 hsl 128 12 0 1 0 0 empty empty postdly_coefficient 2 9 | 6 0 10 -262144 -1 -1 7300 1; 10 | #X obj 146 104 hsl 128 12 0 1 0 0 empty empty output_coefficient 2 11 | 6 0 10 -262144 -1 -1 11100 1; 12 | #X obj 126 214 outlet~; 13 | #X obj 179 16 lb \$1; 14 | #X obj 215 16 lb \$2; 15 | #X obj 251 16 lb \$3; 16 | #X obj 287 16 lb \$4; 17 | #X obj 179 -3 inlet; 18 | #X obj 215 -3 inlet; 19 | #X obj 251 -3 inlet; 20 | #X obj 287 -3 inlet; 21 | #X obj 78 154 aline~ 100; 22 | #X obj 144 154 aline~ 100; 23 | #X obj 210 154 aline~ 100; 24 | #X obj 276 154 aline~ 100; 25 | #X msg 280 51 label delay_\$1; 26 | #X msg 280 71 label predelay_\$1; 27 | #X msg 280 91 label postdelay_\$1; 28 | #X msg 280 111 label output_\$1; 29 | #X connect 0 0 6 0; 30 | #X connect 1 0 0 0; 31 | #X connect 2 0 15 0; 32 | #X connect 2 0 19 0; 33 | #X connect 3 0 16 0; 34 | #X connect 3 0 20 0; 35 | #X connect 4 0 17 0; 36 | #X connect 4 0 21 0; 37 | #X connect 5 0 18 0; 38 | #X connect 5 0 22 0; 39 | #X connect 7 0 2 0; 40 | #X connect 8 0 3 0; 41 | #X connect 9 0 4 0; 42 | #X connect 10 0 5 0; 43 | #X connect 11 0 7 0; 44 | #X connect 12 0 8 0; 45 | #X connect 13 0 9 0; 46 | #X connect 14 0 10 0; 47 | #X connect 15 0 0 1; 48 | #X connect 16 0 0 2; 49 | #X connect 17 0 0 3; 50 | #X connect 18 0 0 4; 51 | #X connect 19 0 2 0; 52 | #X connect 20 0 3 0; 53 | #X connect 21 0 4 0; 54 | #X connect 22 0 5 0; 55 | #X coords 0 -1 1 1 133 63 1 143 53; 56 | -------------------------------------------------------------------------------- /ctrl/keynum.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X msg 249 138 0; 3 | #X msg 276 138 1; 4 | #X msg 303 138 2; 5 | #X msg 330 138 3; 6 | #X msg 357 138 4; 7 | #X msg 384 138 5; 8 | #X msg 411 138 6; 9 | #X msg 438 138 7; 10 | #X msg 465 138 8; 11 | #X msg 492 138 9; 12 | #X obj 531 181 spigot 0; 13 | #X obj 608 97 loadbang; 14 | #X obj 608 116 symbol \$1; 15 | #X obj 608 135 sel h; 16 | #X msg 608 154 1; 17 | #X msg 635 154 0; 18 | #X msg 510 108 a; 19 | #X msg 540 108 b; 20 | #X msg 570 108 c; 21 | #X msg 520 128 d; 22 | #X msg 550 128 e; 23 | #X msg 580 128 f; 24 | #X obj 298 60 key; 25 | #X obj 298 79 sel 48 49 50 51 52 53 54 55 56 57 97 98 99 100 101 102 26 | ; 27 | #X obj 414 237 outlet; 28 | #X connect 0 0 24 0; 29 | #X connect 1 0 24 0; 30 | #X connect 2 0 24 0; 31 | #X connect 3 0 24 0; 32 | #X connect 4 0 24 0; 33 | #X connect 5 0 24 0; 34 | #X connect 6 0 24 0; 35 | #X connect 7 0 24 0; 36 | #X connect 8 0 24 0; 37 | #X connect 9 0 24 0; 38 | #X connect 10 0 24 0; 39 | #X connect 11 0 12 0; 40 | #X connect 12 0 13 0; 41 | #X connect 13 0 14 0; 42 | #X connect 13 1 15 0; 43 | #X connect 14 0 10 1; 44 | #X connect 15 0 10 1; 45 | #X connect 16 0 10 0; 46 | #X connect 17 0 10 0; 47 | #X connect 18 0 10 0; 48 | #X connect 19 0 10 0; 49 | #X connect 20 0 10 0; 50 | #X connect 21 0 10 0; 51 | #X connect 22 0 23 0; 52 | #X connect 23 0 0 0; 53 | #X connect 23 1 1 0; 54 | #X connect 23 2 2 0; 55 | #X connect 23 3 3 0; 56 | #X connect 23 4 4 0; 57 | #X connect 23 5 5 0; 58 | #X connect 23 6 6 0; 59 | #X connect 23 7 7 0; 60 | #X connect 23 8 8 0; 61 | #X connect 23 9 9 0; 62 | #X connect 23 10 16 0; 63 | #X connect 23 11 17 0; 64 | #X connect 23 12 18 0; 65 | #X connect 23 13 19 0; 66 | #X connect 23 14 20 0; 67 | #X connect 23 15 21 0; 68 | -------------------------------------------------------------------------------- /fx/imoog~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 32 1920 1048 10; 2 | #X obj 157 98 inlet~; 3 | #X obj 183 165 hsl 128 13 0 127 0 0 empty empty frequency_8.1758 -2 4 | 7 0 10 -262144 -1 -1 0 1; 5 | #X obj 183 178 hsl 128 13 0.001 4 0 0 empty empty resonance_0.001 -2 6 | 7 0 10 -262144 -1 -1 0 1; 7 | #X obj 157 304 moog~; 8 | #X obj 157 327 outlet~; 9 | #X obj 298 150 bng 15 250 50 0 empty empty r 4 7 0 10 -262144 -1 -1 10 | ; 11 | #X obj 164 228 mtof; 12 | #X msg 103 179 reset; 13 | #X obj 227 35 inlet; 14 | #X obj 266 12 lb \$1; 15 | #X msg 266 35 freq \$1; 16 | #X msg 326 35 res \$1; 17 | #X obj 227 90 ftom; 18 | #X obj 432 109 / 127; 19 | #X obj 432 132 * 4; 20 | #X obj 326 12 lb \$2; 21 | #X obj 225 255 aline~ 10; 22 | #X obj 164 255 aline~ 10; 23 | #X msg 347 241 label resonance_\$1; 24 | #X msg 347 220 label frequency_\$1; 25 | #X obj 227 64 route float freq frequency mfreq midi res resonance mres 26 | ; 27 | #X obj 560 88 print imoog~: unknown message:; 28 | #X connect 0 0 3 0; 29 | #X connect 1 0 6 0; 30 | #X connect 2 0 16 0; 31 | #X connect 2 0 18 0; 32 | #X connect 3 0 4 0; 33 | #X connect 5 0 7 0; 34 | #X connect 6 0 17 0; 35 | #X connect 6 0 19 0; 36 | #X connect 7 0 3 0; 37 | #X connect 8 0 20 0; 38 | #X connect 9 0 10 0; 39 | #X connect 10 0 20 0; 40 | #X connect 11 0 20 0; 41 | #X connect 12 0 1 0; 42 | #X connect 13 0 14 0; 43 | #X connect 14 0 2 0; 44 | #X connect 15 0 11 0; 45 | #X connect 16 0 3 2; 46 | #X connect 17 0 3 1; 47 | #X connect 18 0 2 0; 48 | #X connect 19 0 1 0; 49 | #X connect 20 0 12 0; 50 | #X connect 20 1 12 0; 51 | #X connect 20 2 12 0; 52 | #X connect 20 3 1 0; 53 | #X connect 20 4 1 0; 54 | #X connect 20 5 2 0; 55 | #X connect 20 6 2 0; 56 | #X connect 20 7 13 0; 57 | #X connect 20 8 21 0; 58 | #X coords 0 -1 1 1 133 41 1 180 150; 59 | -------------------------------------------------------------------------------- /seq/taptempo.pd: -------------------------------------------------------------------------------- 1 | #N canvas 800 29 800 849 10; 2 | #X obj 152 100 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 3 | -1 -1; 4 | #X obj 152 123 t b b; 5 | #X obj 145 202 moses 3000; 6 | #X floatatom 145 221 5 0 0 0 - - -; 7 | #X msg 172 258 add2 \$1; 8 | #X obj 184 321 list length; 9 | #X obj 184 449 >= 4; 10 | #X obj 151 468 spigot; 11 | #X obj 238 352 > 4; 12 | #X obj 205 371 spigot; 13 | #X obj 205 409 list prepend set; 14 | #X obj 205 390 list-delete 0 1; 15 | #X obj 145 239 t b f; 16 | #X obj 205 428 list trim; 17 | #X msg 145 283 2605.13 603.688 673.607 580.323; 18 | #X obj 145 302 t a a a; 19 | #X obj 151 487 unpack f f f f; 20 | #X floatatom 122 531 5 0 0 1 time_between_bangs - -; 21 | #X obj 122 512 expr ($f1+$f2+$f3+$f4)/16; 22 | #X obj 145 183 realtime; 23 | #X floatatom 122 568 5 0 0 1 detected_bpm - -; 24 | #X obj 122 549 expr (60000/$f1)/4; 25 | #X obj 152 82 inlet; 26 | #X obj 122 601 outlet; 27 | #X connect 0 0 1 0; 28 | #X connect 1 0 19 0; 29 | #X connect 1 1 19 1; 30 | #X connect 2 0 3 0; 31 | #X connect 3 0 12 0; 32 | #X connect 4 0 14 0; 33 | #X connect 5 0 6 0; 34 | #X connect 5 0 8 0; 35 | #X connect 6 0 7 1; 36 | #X connect 7 0 16 0; 37 | #X connect 8 0 9 1; 38 | #X connect 9 0 11 0; 39 | #X connect 10 0 13 0; 40 | #X connect 11 0 10 0; 41 | #X connect 12 0 14 0; 42 | #X connect 12 1 4 0; 43 | #X connect 13 0 14 0; 44 | #X connect 14 0 15 0; 45 | #X connect 15 0 7 0; 46 | #X connect 15 1 9 0; 47 | #X connect 15 2 5 0; 48 | #X connect 16 0 18 0; 49 | #X connect 16 1 18 1; 50 | #X connect 16 2 18 2; 51 | #X connect 16 3 18 3; 52 | #X connect 17 0 21 0; 53 | #X connect 18 0 17 0; 54 | #X connect 19 0 2 0; 55 | #X connect 20 0 23 0; 56 | #X connect 21 0 20 0; 57 | #X connect 22 0 0 0; 58 | #X coords 0 -1 1 1 67 15 1 100 100; 59 | -------------------------------------------------------------------------------- /utils/porta~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X obj 137 82 inlet; 3 | #X obj 137 302 mtof; 4 | #X obj 137 370 outlet~; 5 | #X obj 185 283 lb \$1 1000; 6 | #X obj 277 266 inlet; 7 | #X obj 304 308 delta; 8 | #X obj 277 285 t f f; 9 | #X obj 268 308 sel 1; 10 | #X obj 289 331 f; 11 | #X obj 289 350 sel 1; 12 | #X obj 170 321 spigot 1; 13 | #X msg 250 396 0; 14 | #X msg 247 350 1; 15 | #X text 286 97 porta~ - poramento. first argument is how long in milliseconds 16 | it takes to move from one note to another. accepts midi numbers as 17 | input.; 18 | #X obj 137 120 t f b; 19 | #X obj 170 302 f; 20 | #X text 287 134 you can connect a [mono] to the inlets of rporta~ for 21 | convenience.; 22 | #X obj 137 101 route float time list; 23 | #X obj 219 120 unpack f f; 24 | #X obj 276 157 sel 0; 25 | #X obj 303 176 bang; 26 | #X obj 219 199 spigot; 27 | #X msg 231 162 0; 28 | #X msg 261 184 1; 29 | #X obj 137 351 aline~; 30 | #X connect 0 0 17 0; 31 | #X connect 1 0 24 0; 32 | #X connect 3 0 15 1; 33 | #X connect 4 0 6 0; 34 | #X connect 5 0 8 1; 35 | #X connect 6 0 7 0; 36 | #X connect 6 1 5 0; 37 | #X connect 7 0 8 0; 38 | #X connect 7 1 12 0; 39 | #X connect 8 0 9 0; 40 | #X connect 9 0 11 0; 41 | #X connect 9 1 12 0; 42 | #X connect 10 0 24 1; 43 | #X connect 11 0 10 1; 44 | #X connect 11 0 24 1; 45 | #X connect 12 0 10 1; 46 | #X connect 14 0 1 0; 47 | #X connect 14 1 15 0; 48 | #X connect 15 0 10 0; 49 | #X connect 17 0 14 0; 50 | #X connect 17 1 3 0; 51 | #X connect 17 2 18 0; 52 | #X connect 18 0 21 0; 53 | #X connect 18 1 19 0; 54 | #X connect 19 0 11 0; 55 | #X connect 19 0 22 0; 56 | #X connect 19 1 20 0; 57 | #X connect 20 0 12 0; 58 | #X connect 20 0 23 0; 59 | #X connect 21 0 14 0; 60 | #X connect 22 0 21 1; 61 | #X connect 23 0 21 1; 62 | #X connect 24 0 2 0; 63 | -------------------------------------------------------------------------------- /gen/sndf~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1920 1048 10; 2 | #X obj 58 137 sndf~; 3 | #X msg 85 108 open \$1; 4 | #X obj 85 79 openpanel; 5 | #X obj 85 52 bng 15 250 50 0 empty empty select\ a\ wav 17 7 0 10 #fcfcfc #000000 #000000; 6 | #X floatatom 13 80 5 0 0 0 multiple\ of\ sound's\ original\ speed - - 0; 7 | #X obj 58 166 o~; 8 | #X text 266 19 sndf~ - sound frequency; 9 | #X text 255 56 sndf~ allows you to load a sound into memory (either by sending an "open" message to the right inlet or by providing the filename as the argument) and loop it at a multiple of its original speed.; 10 | #X text 257 123 for example \, to play the sound at its original speed \, send a value of 1 to the left inlet. to play it at twice the original speed \, send a value of 2 to the left inlet. to play at half speed \, send 0.5 to the left inlet.; 11 | #X obj 13 108 aline~ 1000; 12 | #X obj 315 355 snd~; 13 | #X obj 355 355 sndl~; 14 | #X obj 401 355 sndp~; 15 | #X obj 447 355 sndm~; 16 | #X text 258 354 see also:; 17 | #X floatatom 109 260 5 0 0 0 multiple\ of\ sound's\ original\ speed - - 0; 18 | #X obj 64 346 o~; 19 | #X obj 109 288 aline~ 1000; 20 | #X obj 64 317 snd~; 21 | #X obj 94 317 sndcf~; 22 | #X text 257 211 <-- these two are the same! sndf~ is basically an abstraction to snd~ and sndcf~. sndcf~ generates the control values for snd~. keep this in mind if you want to do something more complex than what sndf~ allows - it can probably be done with sndcf~ and snd if sndf~ isn't close enough to the functionality you need.; 23 | #X connect 0 0 5 0; 24 | #X connect 1 0 0 1; 25 | #X connect 1 0 18 1; 26 | #X connect 2 0 1 0; 27 | #X connect 3 0 2 0; 28 | #X connect 4 0 9 0; 29 | #X connect 9 0 0 0; 30 | #X connect 15 0 17 0; 31 | #X connect 17 0 19 0; 32 | #X connect 18 0 16 0; 33 | #X connect 18 1 19 1; 34 | #X connect 19 0 18 0; 35 | -------------------------------------------------------------------------------- /math/maybe-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 1920 1048 10; 2 | #X obj 42 249 maybe; 3 | #X obj 27 44 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000; 4 | #X floatatom 51 226 5 0 0 0 - - - 0; 5 | #X msg 51 90 2; 6 | #X msg 46 69 0.5; 7 | #X text 73 67 50% chance.; 8 | #X msg 58 112 5; 9 | #X text 82 90 1 in 2 (50%) chance.; 10 | #X text 87 112 1 in 5 (20%) chance.; 11 | #X msg 66 135 0.2; 12 | #X text 100 135 20% chance.; 13 | #X msg 73 161 1; 14 | #X text 103 159 100% chance.; 15 | #X text 315 289 examples: bang - 50% chance of 1; 16 | #X text 393 312 3 - 1 in 3 chance of 1; 17 | #X text 387 323 10 - 1 in 10 chance of 1; 18 | #X text 393 334 1 - 100% chance of 1; 19 | #X text 375 301 0.75 - 75% chance of 1; 20 | #X text 317 60 The probability of a "heads" result defaults to 50% \, but you can change it by providing a number as an argument \, or by sending a number to the second inlet. Sending a number to the first (hot) inlet sets the probability and triggers the "coin flip" at that probability.; 21 | #X text 316 151 Sending a bang to the first inlet triggers the coin flip at the currently-set probability.; 22 | #X text 319 15 [maybe] - "flip a coin" and output a 1 on "heads" or a 0 on "tails".; 23 | #X text 308 202 Setting the probability (N) to a number between 0 and 1 means an N/1 probability. i.e. 0.5 is a 50% probability \, 0.25 is a 25% \, etc. Setting the probability above 1 means a 1/N probability \, i.e. 2 is 1/2 probability \, 100 is 1/100 .; 24 | #X floatatom 42 269 5 0 0 0 - - - 0; 25 | #X text 45 42 Trigger with currently-set probability.; 26 | #X text 312 378 See also: [coin] - used internally in [maybe] \; simply outputs a 1 on heads and a 0 on tails.; 27 | #X connect 0 0 22 0; 28 | #X connect 1 0 0 0; 29 | #X connect 2 0 0 0; 30 | #X connect 3 0 0 0; 31 | #X connect 4 0 0 0; 32 | #X connect 6 0 0 0; 33 | #X connect 9 0 0 0; 34 | #X connect 11 0 0 0; 35 | -------------------------------------------------------------------------------- /fx/ilattice~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1680 29 1600 871 10; 2 | #X obj 100 121 vsl 11 70 -1 1 0 1 empty empty empty 20 8 0 8 -262144 3 | -1 -1 6900 1; 4 | #X msg 90 331 rc 0 \$1; 5 | #X obj 111 121 vsl 11 70 -1 1 0 1 empty empty empty 20 8 0 8 -262144 6 | -1 -1 700 1; 7 | #X obj 122 121 vsl 11 70 -1 1 0 1 empty empty empty 20 8 0 8 -262144 8 | -1 -1 6900 1; 9 | #X obj 133 121 vsl 11 70 -1 1 0 1 empty empty empty 20 8 0 8 -262144 10 | -1 -1 6900 1; 11 | #X obj 144 121 vsl 11 70 -1 1 0 1 empty empty empty 20 8 0 8 -262144 12 | -1 -1 6900 1; 13 | #X obj 155 121 vsl 11 70 -1 1 0 1 empty empty empty 20 8 0 8 -262144 14 | -1 -1 4876 1; 15 | #X obj 166 121 vsl 11 70 -1 1 0 1 empty empty empty 20 8 0 8 -262144 16 | -1 -1 6900 1; 17 | #X obj 177 121 vsl 11 70 -1 1 0 1 empty empty empty 20 8 0 8 -262144 18 | -1 -1 6900 1; 19 | #X msg 119 307 rc 1 \$1; 20 | #X msg 151 332 rc 2 \$1; 21 | #X msg 180 308 rc 3 \$1; 22 | #X msg 212 331 rc 4 \$1; 23 | #X msg 241 307 rc 5 \$1; 24 | #X msg 273 332 rc 6 \$1; 25 | #X msg 302 308 rc 7 \$1; 26 | #X floatatom 107 73 5 -1 1 0 - - -; 27 | #X obj 373 392 lattice~ 8; 28 | #X obj 373 238 inlet~; 29 | #X obj 373 411 outlet~; 30 | #X obj 107 54 lb 0; 31 | #X connect 0 0 1 0; 32 | #X connect 1 0 17 0; 33 | #X connect 2 0 9 0; 34 | #X connect 3 0 10 0; 35 | #X connect 4 0 11 0; 36 | #X connect 5 0 12 0; 37 | #X connect 6 0 13 0; 38 | #X connect 7 0 14 0; 39 | #X connect 8 0 15 0; 40 | #X connect 9 0 17 0; 41 | #X connect 10 0 17 0; 42 | #X connect 11 0 17 0; 43 | #X connect 12 0 17 0; 44 | #X connect 13 0 17 0; 45 | #X connect 14 0 17 0; 46 | #X connect 15 0 17 0; 47 | #X connect 16 0 0 0; 48 | #X connect 16 0 2 0; 49 | #X connect 16 0 3 0; 50 | #X connect 16 0 4 0; 51 | #X connect 16 0 5 0; 52 | #X connect 16 0 6 0; 53 | #X connect 16 0 7 0; 54 | #X connect 16 0 8 0; 55 | #X connect 17 0 19 0; 56 | #X connect 18 0 17 0; 57 | #X connect 20 0 16 0; 58 | #X coords 0 -1 1 1 88 94 1 100 100; 59 | -------------------------------------------------------------------------------- /math/maybe.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 2560 1566 10; 2 | #X text 400 252 3 - 1 in 3 chance of 1; 3 | #X text 394 263 10 - 1 in 10 chance of 1; 4 | #X text 400 274 1 - 100% chance of 1; 5 | #X text 382 241 0.75 - 75% chance of 1; 6 | #X obj 170 160 inlet; 7 | #X obj 170 183 t a b; 8 | #X obj 140 283 spigot; 9 | #X obj 140 306 outlet; 10 | #X obj 221 126 inlet; 11 | #X obj 212 101 pdcontrol; 12 | #X msg 212 78 args; 13 | #X obj 212 55 loadbang; 14 | #X msg 212 176 0.5; 15 | #X obj 212 153 route bang float; 16 | #X obj 258 176 moses 0; 17 | #X obj 197 206 f; 18 | #X text 321 93 The probability of a heads defaults to 50% \, but you can change it by providing a number as an argument \, or by sending a number to the second inlet.; 19 | #X text 322 157 Setting the probability (N) to a number between 0 and 1 means an N/1 probability. i.e. 0.5 is a 50% probability \, 0.25 is a 25% \, etc. Setting the probability above 1 means a 1/N probability \, i.e. 2 is 1/2 probability \, 100 is 1/100.; 20 | #X text 322 229 examples: 0.5 - 50% chance of 1; 21 | #X text 322 300 See also: [coin] - Simply outputs 1 on "heads" and 0 on "tails" \, also with settable probability.; 22 | #X obj 197 229 coin; 23 | #X obj 218 259 == 0; 24 | #X obj 185 283 spigot; 25 | #X obj 185 306 outlet; 26 | #X text 323 40 [maybe] - For each input \, "flip a coin" with a specific probability of heads. If heads \, output the input on the left outlet. if tails \, output it on the right.; 27 | #X connect 4 0 5 0; 28 | #X connect 5 0 6 0; 29 | #X connect 5 0 22 0; 30 | #X connect 5 1 15 0; 31 | #X connect 6 0 7 0; 32 | #X connect 8 0 13 0; 33 | #X connect 9 0 13 0; 34 | #X connect 10 0 9 0; 35 | #X connect 11 0 10 0; 36 | #X connect 12 0 15 1; 37 | #X connect 13 0 12 0; 38 | #X connect 13 1 14 0; 39 | #X connect 14 1 15 1; 40 | #X connect 15 0 20 0; 41 | #X connect 20 0 6 1; 42 | #X connect 20 0 21 0; 43 | #X connect 21 0 22 1; 44 | #X connect 22 0 23 0; 45 | -------------------------------------------------------------------------------- /ctrl/editmode.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 2560 1566 10; 2 | #X obj 480 236 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1; 3 | #X text 497 232 this should be an X when edit mode is ON; 4 | #X obj 480 258 outlet; 5 | #X obj 525 198 route editmode; 6 | #X obj 525 179 receive13; 7 | #X msg 525 160 set \$1; 8 | #X obj 498 141 t a a; 9 | #X obj 480 12 loadbang; 10 | #X obj 507 50 f \$1; 11 | #X obj 507 69 sel 0; 12 | #X obj 498 122 window_name; 13 | #X msg 498 95 1; 14 | #X msg 621 117 \; \$1 editmode \, editmode; 15 | #X obj 480 31 t b b; 16 | #X obj 558 18 inlet; 17 | #X text 612 55 I originally thought that toggling edit mode twice would be an easy way to determine whether it's active in a certain patch... But I realized that has strange side effects \, so I disabled it.; 18 | #X text 68 125 Edit mode is active by default on new patches and inactive by default on loaded patches. We assume that edit mode is active at first since that's the more common case. It's also less likely to cause unwanted things to happen since usually you'll want to disable functions when edit mode is on.; 19 | #X text 67 19 editmode - output 1 when edit mode is on \, output 0 when it's off.; 20 | #X text 66 62 Note that this abstraction is not 100% reliable \, because (as far as I'm currently aware) it's not possible to detect with complete certainty whether edit mode is on in a Pd patch.; 21 | #X text 61 232 Relevant issue: https://github.com/pure-data/pure-data/issues/819; 22 | #X text 59 278 Relevant pull request: https://github.com/pure-data/pure-data/pull/828; 23 | #X connect 0 0 2 0; 24 | #X connect 3 0 0 0; 25 | #X connect 4 0 3 0; 26 | #X connect 5 0 4 0; 27 | #X connect 6 1 5 0; 28 | #X connect 7 0 13 0; 29 | #X connect 8 0 9 0; 30 | #X connect 9 0 11 0; 31 | #X connect 9 1 10 0; 32 | #X connect 10 0 6 0; 33 | #X connect 11 0 10 0; 34 | #X connect 13 0 0 0; 35 | #X connect 13 1 8 0; 36 | #X connect 14 0 8 0; 37 | #X coords 0 -1 1 1 67 15 1 428 236; 38 | -------------------------------------------------------------------------------- /fx/phaser~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 32 1920 1048 10; 2 | #X obj 365 156 inlet~; 3 | #X obj 357 345 outlet~; 4 | #X obj 556 240 phasor~; 5 | #X obj 536 267 cos~; 6 | #X obj 574 272 +~ 0.5; 7 | #X floatatom 556 216 5 0 0 1 freq - -; 8 | #X obj 536 321 +~ 2; 9 | #X floatatom 635 304 5 0 0 1 depth - -; 10 | #X obj 575 307 wrap~; 11 | #X obj 575 329 cos~; 12 | #X obj 575 352 *~ 2; 13 | #X obj 575 379 +~ 2; 14 | #X obj 536 294 *~ 2; 15 | #X obj 535 483 *~ 0.8; 16 | #X obj 389 218 delwrite~ \$0-phase1 100; 17 | #X obj 535 460 vd~ \$0-phase1; 18 | #X obj 576 423 *~ 0.8; 19 | #X floatatom 645 431 5 0 0 1 feedback - -; 20 | #X obj 575 400 vd~ \$0-phase2; 21 | #X obj 373 285 delwrite~ \$0-phase2 100; 22 | #X text 419 44 copied from guitarextended.wordpress.com \, with modifications 23 | ; 24 | #X text 422 19 a phaser effect; 25 | #X text 849 128 phaser feedback (-1 to 1); 26 | #X text 851 98 LFO depth; 27 | #X text 850 67 LFO frequency; 28 | #X text 852 38 arguments:; 29 | #X obj 556 189 lb \$1 0.7; 30 | #X obj 635 277 lb \$2 0.5; 31 | #X obj 667 402 lb \$3 0.8; 32 | #X obj 556 166 inlet; 33 | #X obj 635 250 inlet; 34 | #X obj 667 378 inlet; 35 | #X connect 0 0 14 0; 36 | #X connect 0 0 19 0; 37 | #X connect 0 0 1 0; 38 | #X connect 2 0 3 0; 39 | #X connect 2 0 4 0; 40 | #X connect 3 0 12 0; 41 | #X connect 4 0 8 0; 42 | #X connect 5 0 2 0; 43 | #X connect 6 0 15 0; 44 | #X connect 7 0 10 1; 45 | #X connect 7 0 11 1; 46 | #X connect 7 0 12 1; 47 | #X connect 7 0 6 1; 48 | #X connect 8 0 9 0; 49 | #X connect 9 0 10 0; 50 | #X connect 10 0 11 0; 51 | #X connect 11 0 18 0; 52 | #X connect 12 0 6 0; 53 | #X connect 13 0 14 0; 54 | #X connect 15 0 13 0; 55 | #X connect 15 0 1 0; 56 | #X connect 16 0 19 0; 57 | #X connect 17 0 16 1; 58 | #X connect 17 0 13 1; 59 | #X connect 18 0 16 0; 60 | #X connect 18 0 1 0; 61 | #X connect 26 0 5 0; 62 | #X connect 27 0 7 0; 63 | #X connect 28 0 17 0; 64 | #X connect 29 0 26 0; 65 | #X connect 30 0 27 0; 66 | #X connect 31 0 28 0; 67 | -------------------------------------------------------------------------------- /guis/scroll~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #N canvas 0 0 450 300 (subpatch) 0; 3 | #X array \$0-scroll 200 float 0; 4 | #X coords 0 1 199 0 200 140 1 0 0; 5 | #X restore 100 114 graph; 6 | #X obj 509 165 inlet~; 7 | #X obj 246 100 nbx 5 14 1 5000 0 0 empty empty empty 0 -8 0 10 -262144 8 | -1 -1 20 256; 9 | #X obj 219 44 loadbang; 10 | #X obj 219 63 t b b; 11 | #X obj 232 100 tgl 14 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 12 | 1; 13 | #N canvas 0 29 1600 849 analysis 0; 14 | #X obj 157 37 inlet~; 15 | #X obj 37 37 inlet; 16 | #X obj 157 56 env~; 17 | #X obj 157 75 / 100; 18 | #X floatatom 164 99 5 0 0 0 - - -; 19 | #X obj 123 135 f; 20 | #X floatatom 157 154 5 0 0 0 - - -; 21 | #X obj 150 211 until; 22 | #X obj 157 135 average 100; 23 | #X floatatom 220 117 5 0 0 0 - - -; 24 | #X obj 123 173 t f b; 25 | #X obj 150 249 t f f; 26 | #X obj 102 287 + 1; 27 | #X obj 88 202 t f b; 28 | #X obj 102 306 tabread \$0-scroll; 29 | #X obj 130 357 tabwrite \$0-scroll; 30 | #X obj 94 37 inlet; 31 | #X obj 74 93 metro; 32 | #X msg 150 192 200; 33 | #X obj 150 230 count 200; 34 | #X msg 115 221 199; 35 | #X connect 0 0 2 0; 36 | #X connect 1 0 17 0; 37 | #X connect 2 0 3 0; 38 | #X connect 3 0 4 0; 39 | #X connect 3 0 5 1; 40 | #X connect 3 0 8 0; 41 | #X connect 5 0 10 0; 42 | #X connect 7 0 19 0; 43 | #X connect 8 0 6 0; 44 | #X connect 9 0 8 1; 45 | #X connect 10 0 13 0; 46 | #X connect 10 1 18 0; 47 | #X connect 11 0 12 0; 48 | #X connect 11 1 15 1; 49 | #X connect 12 0 14 0; 50 | #X connect 13 0 15 0; 51 | #X connect 13 1 20 0; 52 | #X connect 14 0 15 0; 53 | #X connect 16 0 17 1; 54 | #X connect 17 0 5 0; 55 | #X connect 18 0 7 0; 56 | #X connect 19 0 11 0; 57 | #X connect 20 0 15 1; 58 | #X restore 346 248 pd analysis; 59 | #X text 440 58 scrolling amplitude view; 60 | #X msg 246 82 20; 61 | #X connect 1 0 6 2; 62 | #X connect 2 0 6 1; 63 | #X connect 3 0 4 0; 64 | #X connect 4 0 5 0; 65 | #X connect 4 1 8 0; 66 | #X connect 5 0 6 0; 67 | #X connect 8 0 2 0; 68 | #X coords 0 -1 1 1 200 154 2 100 100; 69 | -------------------------------------------------------------------------------- /gen/sndcm~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 2560 1566 10; 2 | #X obj 179 137 inlet; 3 | #X obj 264 465 outlet~; 4 | #X obj 264 446 line~; 5 | #X obj 264 378 pack f 0 1; 6 | #X msg 264 427 \$2 \, \$3 \$1; 7 | #X obj 142 298 /; 8 | #X obj 142 243 mtof; 9 | #X obj 279 340 /; 10 | #X obj 264 359 f; 11 | #X obj 255 297 t b b f; 12 | #X obj 115 208 moses; 13 | #X msg 115 339 0; 14 | #X obj 179 184 f 60; 15 | #X msg 398 427 \$1; 16 | #X obj 398 449 del; 17 | #X obj 398 471 outlet; 18 | #X text 408 155 [snd~] midinote number controller - Convert incoming MIDI note numbers to an audio signal that can be used to drive [snd~].; 19 | #X text 407 211 The first argument is the base note (defaults to 60). This can also be altered by sending a "base" message with the new base note as its argument.; 20 | #X text 406 272 The first outlet is the audio signal for driving [snd~].; 21 | #X msg 334 427 time \$1; 22 | #X text 407 305 The second outlet sends a "time" message with the time that the note will play for \, and sends a bang when the note finishes playing.; 23 | #X obj 179 156 route float time bang freq base stop; 24 | #X msg 339 227 stop; 25 | #X obj 182 229 sel 0; 26 | #X msg 182 251 60; 27 | #X obj 182 273 mtof; 28 | #X obj 182 207 init \$1; 29 | #X connect 0 0 21 0; 30 | #X connect 2 0 1 0; 31 | #X connect 3 0 4 0; 32 | #X connect 3 0 13 0; 33 | #X connect 3 0 19 0; 34 | #X connect 4 0 2 0; 35 | #X connect 5 0 9 0; 36 | #X connect 6 0 5 0; 37 | #X connect 7 0 8 1; 38 | #X connect 8 0 3 0; 39 | #X connect 9 0 8 0; 40 | #X connect 9 1 7 0; 41 | #X connect 9 2 7 1; 42 | #X connect 10 0 11 0; 43 | #X connect 10 1 6 0; 44 | #X connect 11 0 2 0; 45 | #X connect 12 0 10 0; 46 | #X connect 13 0 14 0; 47 | #X connect 14 0 15 0; 48 | #X connect 19 0 15 0; 49 | #X connect 21 0 12 0; 50 | #X connect 21 1 7 0; 51 | #X connect 21 2 12 0; 52 | #X connect 21 4 26 0; 53 | #X connect 21 5 22 0; 54 | #X connect 22 0 2 0; 55 | #X connect 23 0 24 0; 56 | #X connect 23 1 25 0; 57 | #X connect 24 0 25 0; 58 | #X connect 25 0 5 1; 59 | #X connect 26 0 23 0; 60 | -------------------------------------------------------------------------------- /seq/rmap-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 800 849 10; 2 | #X obj 85 186 rmap foo bar baz; 3 | #X obj 85 238 route 0 1 2; 4 | #X floatatom 110 288 5 0 0 0 - - -; 5 | #X floatatom 72 288 5 0 0 0 - - -; 6 | #X floatatom 148 288 5 0 0 0 - - -; 7 | #X floatatom 110 115 5 0 0 0 - - -; 8 | #X floatatom 72 115 5 0 0 0 - - -; 9 | #X floatatom 148 115 5 0 0 0 - - -; 10 | #X obj 72 133 s foo; 11 | #X obj 110 133 s bar; 12 | #X obj 148 133 s baz; 13 | #X text 253 36 rmap - receive map; 14 | #X text 238 187 originally i used the [dyn~] object to generate the 15 | [receives] inside of [rmap] \, but [dyn~] throws generated objects 16 | around randomly. i hand-coded the new dynamic [receive] generation 17 | into [rmap] so now it's easier to copy/paste from inside the [rmap] 18 | to somewhere else.; 19 | #X text 241 260 because pure data is not designed to be dynamically 20 | patched \, you should (for efficiency reasons) remove [rmap] from your 21 | abstractions once you're done prototyping them \, replacing them with 22 | the contents of the [pd 0-receives] subpatch inside [rmap].; 23 | #X text 242 87 [rmap] takes as arguments a list of names to receive 24 | from. each name is indexed from zero and anything that that [receive] 25 | gets will be output to [rmap]'s outlet with that index prepended. this 26 | is useful if you have a bunch of [receive]s that you want to get data 27 | from but you don't want to have to create them \, connect them \, and 28 | sort all their data manually.; 29 | #X text 239 346 TL \, DR: [rmap] dynamically generates copy/pastable 30 | [receive]s based on the arguments you provide to it.; 31 | #X text 245 398 NOTE: you can also provide a list of receive names 32 | to the inlet to re-generate the [receive]s from the new list \, but 33 | again \, keep in mind that this is extremely inefficient.; 34 | #X obj 97 215 print rmap; 35 | #X connect 0 0 1 0; 36 | #X connect 0 0 17 0; 37 | #X connect 1 0 3 0; 38 | #X connect 1 1 2 0; 39 | #X connect 1 2 4 0; 40 | #X connect 5 0 9 0; 41 | #X connect 6 0 8 0; 42 | #X connect 7 0 10 0; 43 | -------------------------------------------------------------------------------- /fx/rateshift~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 2560 1568 10; 2 | #X obj 263 92 inlet~; 3 | #X obj 67 275 outlet~; 4 | #X msg 297 221 0; 5 | #X obj 297 202 loadbang; 6 | #X obj 67 237 +~ 1; 7 | #X obj 67 32 inlet~; 8 | #X text 298 111 record inlet~; 9 | #X obj 67 256 tabread4~ \$0-foo; 10 | #X obj 263 259 poke~ \$0-foo; 11 | #X obj 446 144 table \$0-foo 1000; 12 | #X obj 67 218 *~ 1000; 13 | #X floatatom 100 162 20 0 0 1 freq - - 0; 14 | #X obj 100 143 expr 1/$f1; 15 | #X obj 115 108 nbx 5 14 0 1e+37 0 0 empty empty sample_rate 56 8 0 10 #fcfcfc #000000 #000000 0 256; 16 | #X obj 100 124 /; 17 | #X obj 115 89 samplerate~; 18 | #X obj 88 70 t b b; 19 | #X text 38 17 frequency inlet~; 20 | #X obj 67 199 phasor~; 21 | #X obj 67 180 *~ 0.5; 22 | #X text 502 106 todo: allow changing of table size...; 23 | #X obj 160 39 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000; 24 | #X obj 485 176 inlet; 25 | #X obj 297 240 count~ 0 1000; 26 | #X obj 67 161 /~ 2; 27 | #X obj 381 258 pack 0 \$0; 28 | #X floatatom 381 240 20 0 0 0 - - - 0; 29 | #X msg 381 277 \; \$2-foo resize \$1; 30 | #X obj 521 176 lb \$1 1000; 31 | #X obj 485 213 s \$0-size; 32 | #X obj 372 185 r \$0-size; 33 | #X obj 88 89 f; 34 | #X obj 195 48 r \$0-size; 35 | #X obj 88 51 loadbang; 36 | #X obj 141 198 / 2; 37 | #X connect 0 0 8 0; 38 | #X connect 2 0 23 0; 39 | #X connect 3 0 2 0; 40 | #X connect 4 0 7 0; 41 | #X connect 5 0 24 0; 42 | #X connect 7 0 1 0; 43 | #X connect 10 0 4 0; 44 | #X connect 11 0 19 1; 45 | #X connect 12 0 11 0; 46 | #X connect 13 0 14 1; 47 | #X connect 14 0 12 0; 48 | #X connect 15 0 13 0; 49 | #X connect 16 0 31 0; 50 | #X connect 16 1 15 0; 51 | #X connect 18 0 10 0; 52 | #X connect 19 0 18 0; 53 | #X connect 21 0 16 0; 54 | #X connect 22 0 29 0; 55 | #X connect 23 0 8 1; 56 | #X connect 24 0 19 0; 57 | #X connect 25 0 27 0; 58 | #X connect 26 0 25 0; 59 | #X connect 28 0 29 0; 60 | #X connect 30 0 26 0; 61 | #X connect 30 0 23 1; 62 | #X connect 31 0 14 0; 63 | #X connect 32 0 31 1; 64 | #X connect 32 0 34 0; 65 | #X connect 33 0 16 0; 66 | #X connect 34 0 10 1; 67 | -------------------------------------------------------------------------------- /guis/spectrum~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X obj 320 190 rfft~; 3 | #X obj 266 250 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 4 | 1; 5 | #N canvas 51 367 1153 478 (subpatch) 0; 6 | #X array \$0-spectrum 128 float 1; 7 | #A 0 0 0 5.8882 12.5399 28.5399 19.1648 7.55733 60.659 54.8225 44.5395 8 | 10.73 20.5334 1.53325 8.52295 15.2883 6.1932 7.87364 3.03803 3.56201 9 | 9.48956 9.73141 10.9989 7.69733 4.49939 3.03321 0.760168 7.63142 10.1332 10 | 1.04049 2.59296 3.40462 5.5713 11.8307 5.47887 4.90066 1.67959 0.413196 11 | 3.95031 4.65363 7.40541 2.78899 1.43104 1.11291 0.683993 6.86258 6.34736 12 | 0.98924 1.24287 2.95143 3.40045 4.70083 3.1974 1.3976 2.15757 0.327944 13 | 2.24814 1.26996 3.20077 2.01661 1.3529 3.33544 1.03665 3.53202 4.62736 14 | 3.5372 1.69866 1.84261 1.21934 2.3829 4.02492 1.25037 1.29798 0.881524 15 | 0.257636 3.32787 3.1869 3.27722 1.04605 1.80433 0.227698 1.91999 3.95707 16 | 1.8873 1.02101 1.11693 0.532754 2.12476 2.30425 0.7519 1.35191 0.85395 17 | 0.809871 0.622037 1.27587 3.20298 0.711632 1.01088 0.873053 0.973579 18 | 3.15052 1.84758 0.792534 0.83581 0.407863 1.70519 1.94838 2.41124 1.34063 19 | 0.667188 0.143867 0.494887 2.5509 2.28721 0.484336 0.427732 1.10092 20 | 1.40452 2.45389 1.60821 0.529206 1.0566 0.375388 1.20361 1.05768 1.00261 21 | 0.719916 0.529711 1.31158; 22 | #X coords 0 256 127 0 200 140 1 0 0; 23 | #X restore 46 389 graph; 24 | #X obj 320 222 *~; 25 | #X obj 347 222 *~; 26 | #X obj 320 285 biquad~ 0 0 0 0 1; 27 | #X obj 266 267 metro 50; 28 | #X obj 320 266 q8_sqrt~; 29 | #X obj 52 37 block~ 4096; 30 | #X obj 266 231 loadbang; 31 | #X msg 196 280 \; pd dsp 1; 32 | #X obj 320 171 inlet~; 33 | #X obj 320 338 tabwrite~ \$0-spectrum; 34 | #X obj 320 313 /~ 5; 35 | #X connect 0 0 3 0; 36 | #X connect 0 0 3 1; 37 | #X connect 0 1 4 0; 38 | #X connect 0 1 4 1; 39 | #X connect 1 0 6 0; 40 | #X connect 3 0 7 0; 41 | #X connect 4 0 7 0; 42 | #X connect 5 0 13 0; 43 | #X connect 6 0 12 0; 44 | #X connect 7 0 5 0; 45 | #X connect 9 0 1 0; 46 | #X connect 9 0 10 0; 47 | #X connect 11 0 0 0; 48 | #X connect 13 0 12 0; 49 | #X coords 0 -1 1 1 200 154 2 46 375; 50 | -------------------------------------------------------------------------------- /gen/rec~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 800 849 10; 2 | #X obj 29 343 tabwrite~ \$0-intab; 3 | #X obj -95 362 pack 0 \$0; 4 | #X obj 5 175 change; 5 | #X obj 67 52 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 6 | ; 7 | #X msg -95 381 \; \$2-intab resize \$1; 8 | #X floatatom -95 344 20 0 0 0 - - -; 9 | #X obj 29 324 vd~ \$0-intox; 10 | #X obj 2 235 timer; 11 | #X obj -176 213 delwrite~ \$0-intox 30000; 12 | #X obj -176 194 inlet~; 13 | #X obj 67 7 inlet; 14 | #X obj 87 76 loadbang; 15 | #X obj 188 274 outlet; 16 | #X obj 87 95 symbol \$0-intab; 17 | #X msg 117 293 size \$1; 18 | #X msg 164 192 table \$1; 19 | #X obj 2 254 min 30000; 20 | #X obj 52 52 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 21 | -1; 22 | #X msg 76 182 freq \$1; 23 | #X obj 200 142 soundfiler; 24 | #X obj 200 68 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 25 | -1; 26 | #X obj 200 85 savepanel; 27 | #X msg 200 123 write -wave \$1 \$2-intab; 28 | #X obj 200 104 pack symbol \$0; 29 | #X obj 67 30 route float bang save; 30 | #X msg 67 237 time \$1; 31 | #X obj -95 325 * 44.1; 32 | #X obj 76 163 expr 1/($f1/1000); 33 | #X obj 239 188 table \$0-intab; 34 | #X obj 5 194 sel 0; 35 | #X obj 29 213 bang; 36 | #X obj 5 156 != 0; 37 | #X obj 2 273 t b f; 38 | #X connect 1 0 4 0; 39 | #X connect 2 0 29 0; 40 | #X connect 3 0 31 0; 41 | #X connect 5 0 1 0; 42 | #X connect 6 0 0 0; 43 | #X connect 7 0 16 0; 44 | #X connect 9 0 8 0; 45 | #X connect 10 0 24 0; 46 | #X connect 11 0 13 0; 47 | #X connect 13 0 15 0; 48 | #X connect 14 0 12 0; 49 | #X connect 15 0 12 0; 50 | #X connect 16 0 25 0; 51 | #X connect 16 0 27 0; 52 | #X connect 16 0 32 0; 53 | #X connect 17 0 13 0; 54 | #X connect 18 0 12 0; 55 | #X connect 20 0 21 0; 56 | #X connect 21 0 23 0; 57 | #X connect 22 0 19 0; 58 | #X connect 23 0 22 0; 59 | #X connect 24 0 3 0; 60 | #X connect 24 1 3 0; 61 | #X connect 24 2 20 0; 62 | #X connect 25 0 12 0; 63 | #X connect 26 0 5 0; 64 | #X connect 26 0 14 0; 65 | #X connect 27 0 18 0; 66 | #X connect 29 0 7 1; 67 | #X connect 29 1 30 0; 68 | #X connect 30 0 7 0; 69 | #X connect 31 0 2 0; 70 | #X connect 32 0 0 0; 71 | #X connect 32 1 26 0; 72 | #X connect 32 1 6 0; 73 | #X coords 0 -1 1 1 62 16 1 20 50; 74 | -------------------------------------------------------------------------------- /math/num.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1920 1048 10; 2 | #X obj 120 246 inlet; 3 | #X obj 120 267 route float bang set a s m d; 4 | #X obj 170 394 +; 5 | #X obj 214 289 * -1; 6 | #X obj 170 372 f; 7 | #X obj 214 328 t b f; 8 | #X obj 274 374 f; 9 | #X obj 274 396 *; 10 | #X obj 274 339 t b f; 11 | #X obj 324 374 f; 12 | #X obj 324 339 t b f; 13 | #X obj 324 396 /; 14 | #X obj 120 418 outlet; 15 | #X obj 338 225 route + - * /; 16 | #X msg 338 249 a \$1; 17 | #X msg 372 249 s \$1; 18 | #X msg 406 249 m \$1; 19 | #X msg 440 249 d \$1; 20 | #X obj 120 334 f; 21 | #X obj 51 238 lb \$1; 22 | #X msg 51 260 set \$1; 23 | #X text 84 65 Supports messages like "set" \, "a" \, "s" \, "m" \, and "d" to set \, add \, subtract \, multiply \, and divide the stored number (outputting it in the process).; 24 | #X text 84 113 The first argument specifies the default value.; 25 | #X text 83 36 num - Store and change a number with messages.; 26 | #X text 87 178 FIX: allow minimum and maximum values to be set with the 2nd and 3rd arguments.; 27 | #X obj 512 226 inlet; 28 | #X msg 512 249 set \$1; 29 | #X text 85 138 The second inlet is a shortcut for setting the value without outputting it.; 30 | #X connect 0 0 1 0; 31 | #X connect 1 0 18 0; 32 | #X connect 1 1 18 0; 33 | #X connect 1 2 4 1; 34 | #X connect 1 2 6 1; 35 | #X connect 1 2 9 1; 36 | #X connect 1 2 18 1; 37 | #X connect 1 3 5 0; 38 | #X connect 1 4 3 0; 39 | #X connect 1 5 8 0; 40 | #X connect 1 6 10 0; 41 | #X connect 1 7 13 0; 42 | #X connect 2 0 1 0; 43 | #X connect 3 0 5 0; 44 | #X connect 4 0 2 0; 45 | #X connect 5 0 4 0; 46 | #X connect 5 1 2 1; 47 | #X connect 6 0 7 0; 48 | #X connect 7 0 1 0; 49 | #X connect 8 0 6 0; 50 | #X connect 8 1 7 1; 51 | #X connect 9 0 11 0; 52 | #X connect 10 0 9 0; 53 | #X connect 10 1 11 1; 54 | #X connect 11 0 1 0; 55 | #X connect 13 0 14 0; 56 | #X connect 13 1 15 0; 57 | #X connect 13 2 16 0; 58 | #X connect 13 3 17 0; 59 | #X connect 14 0 1 0; 60 | #X connect 15 0 1 0; 61 | #X connect 16 0 1 0; 62 | #X connect 17 0 1 0; 63 | #X connect 18 0 4 1; 64 | #X connect 18 0 6 1; 65 | #X connect 18 0 9 1; 66 | #X connect 18 0 12 0; 67 | #X connect 19 0 20 0; 68 | #X connect 20 0 1 0; 69 | #X connect 25 0 26 0; 70 | #X connect 26 0 1 0; 71 | -------------------------------------------------------------------------------- /seq/iadsr~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 800 849 10; 2 | #X floatatom 100 80 6 0 999999 3 - #0-attackc #0-attack; 3 | #X floatatom 138 80 6 0 999999 3 - #0-decayc #0-decay; 4 | #X floatatom 176 80 6 0 127 3 - #0-sustainc #0-sustain; 5 | #X floatatom 214 80 6 0 999999 3 - #0-releasec #0-release; 6 | #X obj 24 33 r \$0-env; 7 | #X obj 106 52 envgen 136 24 1 0 ; 8 | #X obj 256 207 *~; 9 | #X obj 266 148 r \$0-notevol; 10 | #N canvas 0 0 1600 849 envelope 0; 11 | #X obj 339 462 pack f f f f; 12 | #X obj 407 326 mrange; 13 | #X obj 332 326 t b f; 14 | #X obj 407 345 t b f; 15 | #X obj 494 326 t b f; 16 | #X msg 339 481 0 \$1 1 \$2 \$3 \$4 \, freeze 1; 17 | #X obj 198 500 outlet; 18 | #X msg 198 424 attack \$1; 19 | #X msg 198 443 decay \$1; 20 | #X msg 198 462 sustain \$1; 21 | #X msg 198 481 release \$1; 22 | #X obj 339 500 s \$0-env; 23 | #X obj 252 288 r \$0-attack; 24 | #X obj 332 288 r \$0-decay; 25 | #X obj 407 288 r \$0-sustain; 26 | #X obj 494 288 r \$0-release; 27 | #X connect 0 0 5 0; 28 | #X connect 1 0 3 0; 29 | #X connect 1 0 9 0; 30 | #X connect 2 0 0 0; 31 | #X connect 2 1 0 1; 32 | #X connect 3 0 0 0; 33 | #X connect 3 1 0 2; 34 | #X connect 4 0 0 0; 35 | #X connect 4 1 0 3; 36 | #X connect 5 0 11 0; 37 | #X connect 7 0 6 0; 38 | #X connect 8 0 6 0; 39 | #X connect 9 0 6 0; 40 | #X connect 10 0 6 0; 41 | #X connect 12 0 0 0; 42 | #X connect 12 0 7 0; 43 | #X connect 13 0 2 0; 44 | #X connect 13 0 8 0; 45 | #X connect 14 0 1 0; 46 | #X connect 15 0 4 0; 47 | #X connect 15 0 10 0; 48 | #X restore 256 129 pd envelope; 49 | #X obj 256 175 adsr~ 0 0 0 0 -1; 50 | #X obj 256 226 outlet~; 51 | #X obj 114 149 unpack s f; 52 | #X obj 114 192 pack s f \$0; 53 | #X msg 114 211 \; \$3-\$1c \$2; 54 | #X obj 67 243 unpack f f; 55 | #X obj 21 111 inlet; 56 | #X obj 21 130 route float list; 57 | #X obj 21 363 s \$0-notevol; 58 | #X text 142 9 iadsr~ - a simple gui for adsr~; 59 | #X connect 4 0 5 0; 60 | #X connect 6 0 10 0; 61 | #X connect 7 0 9 0; 62 | #X connect 8 0 9 0; 63 | #X connect 9 0 6 1; 64 | #X connect 9 0 6 0; 65 | #X connect 11 0 12 0; 66 | #X connect 11 1 12 1; 67 | #X connect 12 0 13 0; 68 | #X connect 14 1 17 0; 69 | #X connect 15 0 16 0; 70 | #X connect 16 0 17 0; 71 | #X connect 16 1 14 0; 72 | #X connect 16 2 11 0; 73 | #X coords 0 -1 1 1 152 61 1 100 37; 74 | -------------------------------------------------------------------------------- /ctrl/kbdm.pd: -------------------------------------------------------------------------------- 1 | #N canvas 800 0 2560 1566 10; 2 | #X obj 115 337 outlet; 3 | #N canvas 0 0 450 300 (subpatch) 0; 4 | #X array \$0-kbdmidi2 123 float 1; 5 | #A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 72 0 74 76 0 0 0 0 0 0 0 0 0 0 0 75 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 67 64 63 0 0 66 68 0 70 0 73 71 69 0 0 0 0 61 0 0 65 0 62 0 60; 6 | #A color 0; 7 | #A width 1; 8 | #X coords 0 127 122 0 200 140 1; 9 | #X restore 397 343 graph; 10 | #X obj 88 277 tabread \$0-kbdmidi0; 11 | #N canvas 0 0 450 300 (subpatch) 0; 12 | #X array \$0-kbdmidi1 123 float 1; 13 | #A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 92 0 78 80 0 83 85 87 0 90 0 0 0 95 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 94 0 96 0 0 0 0 0 0 0 81 0 0 0 89 0 0 0 0 0 91 93 77 82 0 84 88 0 79 0 86 60; 14 | #A color 0; 15 | #A width 1; 16 | #X coords 0 127 122 0 200 140 1; 17 | #X restore 396 186 graph; 18 | #X text 33 58 first arg: 1 for only get key events from the top half of the keyboard (q2w3er5 \, etc). 2 for the bottom (zsxdcvg \, etc). 0 for both.; 19 | #X msg 88 239 set \$2-kbdmidi\$1; 20 | #X obj 88 219 pack f \$0; 21 | #X obj 14 129 inlet; 22 | #N canvas 0 0 450 300 (subpatch) 0; 23 | #X array \$0-kbdmidi0 123 float 1; 24 | #A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 72 0 74 76 92 0 78 80 0 83 85 87 0 90 0 75 0 95 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 94 0 96 0 0 0 0 67 64 63 81 0 66 68 89 70 0 73 71 69 91 93 77 82 61 84 88 65 79 62 86 60; 25 | #A color 0; 26 | #A width 1; 27 | #X coords 0 127 122 0 200 140 1; 28 | #X restore 396 26 graph; 29 | #X obj 14 149 route float keyboard oct; 30 | #X obj 88 297 sel 0; 31 | #X obj 115 317 +; 32 | #X obj 160 194 map -60 -48 -36 -24 -12 0 12 24 36; 33 | #X obj 160 174 clip 0 8; 34 | #X text 33 32 kbdm - Translate key numbers into midi note numbers.; 35 | #X obj 88 179 init \$1; 36 | #X connect 2 0 10 0; 37 | #X connect 5 0 2 0; 38 | #X connect 6 0 5 0; 39 | #X connect 7 0 9 0; 40 | #X connect 9 0 2 0; 41 | #X connect 9 1 6 0; 42 | #X connect 9 2 13 0; 43 | #X connect 10 1 11 0; 44 | #X connect 11 0 0 0; 45 | #X connect 12 0 11 1; 46 | #X connect 13 0 12 0; 47 | #X connect 15 0 6 0; 48 | -------------------------------------------------------------------------------- /synths/kick2~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 449 66 667 593 10; 2 | #X obj 128 147 line~; 3 | #X obj 114 97 f \$1; 4 | #X obj 144 97 f \$2; 5 | #X obj 174 97 f \$3; 6 | #X obj 21 15 inlet; 7 | #X obj 128 123 pack 0 0; 8 | #X msg 151 36 bang; 9 | #X obj 76 538 outlet~; 10 | #X obj 207 14 inlet; 11 | #X obj 130 482 line~; 12 | #X obj 135 399 del \$3; 13 | #X obj 83 507 *~; 14 | #X obj 218 437 loadbang; 15 | #X msg 220 465 0; 16 | #X msg 67 295 bang; 17 | #X obj 39 458 pack 0 2; 18 | #X obj 135 419 pack 0 5; 19 | #X obj 176 259 *~; 20 | #X obj 128 275 +~; 21 | #X floatatom 196 230 0 0 0 0 - - -; 22 | #X text 73 177 carrier; 23 | #X text 72 195 frequency; 24 | #X obj 127 319 osc~; 25 | #X obj 176 199 osc~; 26 | #X text 263 96 carstart \, carend \, modstart \, modend \, time; 27 | #X obj 204 97 f \$4; 28 | #X obj 234 97 f \$5; 29 | #X obj 207 35 route carstart carend modstart modend time attack release 30 | modistart modiend modindex; 31 | #X obj 357 192 loadbang; 32 | #X msg 357 213 100; 33 | #X obj 185 123 pack 0 0; 34 | #X obj 185 148 line~; 35 | #X obj 41 125 / 127; 36 | #X msg 8 93 127; 37 | #X obj 6 61 route bang float; 38 | #X connect 0 0 18 0; 39 | #X connect 1 0 0 0; 40 | #X connect 2 0 5 0; 41 | #X connect 3 0 31 0; 42 | #X connect 4 0 6 0; 43 | #X connect 4 0 34 0; 44 | #X connect 5 0 0 0; 45 | #X connect 6 0 1 0; 46 | #X connect 6 0 3 0; 47 | #X connect 6 0 2 0; 48 | #X connect 6 0 25 0; 49 | #X connect 6 0 26 0; 50 | #X connect 8 0 27 0; 51 | #X connect 9 0 11 1; 52 | #X connect 10 0 16 0; 53 | #X connect 11 0 7 0; 54 | #X connect 12 0 13 0; 55 | #X connect 13 0 9 0; 56 | #X connect 14 0 10 0; 57 | #X connect 15 0 9 0; 58 | #X connect 16 0 9 0; 59 | #X connect 17 0 18 1; 60 | #X connect 18 0 22 0; 61 | #X connect 19 0 17 1; 62 | #X connect 22 0 11 0; 63 | #X connect 23 0 17 0; 64 | #X connect 25 0 30 0; 65 | #X connect 26 0 5 1; 66 | #X connect 26 0 30 1; 67 | #X connect 26 0 10 1; 68 | #X connect 27 0 1 1; 69 | #X connect 27 1 2 1; 70 | #X connect 27 2 3 1; 71 | #X connect 27 3 25 1; 72 | #X connect 27 4 26 1; 73 | #X connect 27 5 15 1; 74 | #X connect 27 6 16 1; 75 | #X connect 27 7 19 0; 76 | #X connect 27 9 19 0; 77 | #X connect 28 0 29 0; 78 | #X connect 29 0 19 0; 79 | #X connect 30 0 31 0; 80 | #X connect 31 0 23 0; 81 | #X connect 32 0 14 0; 82 | #X connect 32 0 15 0; 83 | #X connect 33 0 32 0; 84 | #X connect 34 0 33 0; 85 | #X connect 34 1 32 0; 86 | -------------------------------------------------------------------------------- /fx/chorus~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 2560 1566 10; 2 | #X obj 242 274 inlet~; 3 | #X obj 380 489 vd~ \$0-chorus; 4 | #X obj 380 451 atc~; 5 | #X obj 242 293 delwrite~ \$0-chorus 50; 6 | #X obj 434 293 inlet; 7 | #X obj 380 358 phasor~; 8 | #X obj 380 432 cos~; 9 | #X obj 464 489 vd~ \$0-chorus; 10 | #X obj 464 451 atc~; 11 | #X obj 464 432 cos~; 12 | #X obj 548 489 vd~ \$0-chorus; 13 | #X obj 548 451 atc~; 14 | #X obj 548 432 cos~; 15 | #X obj 632 489 vd~ \$0-chorus; 16 | #X obj 632 451 atc~; 17 | #X obj 632 432 cos~; 18 | #X obj 520 331 clip 0 50; 19 | #X floatatom 380 243 5 0 0 0 - - - 0; 20 | #X obj 434 312 route freq float depth; 21 | #X obj 499 568 /~ 4; 22 | #X obj 499 587 outlet~; 23 | #X msg 502 254 depth \$1; 24 | #X floatatom 502 236 5 0 0 0 - - - 0; 25 | #X obj 380 470 *~ 20; 26 | #X obj 464 470 *~ 20; 27 | #X obj 548 470 *~ 20; 28 | #X obj 632 470 *~ 20; 29 | #X obj 505 219 hsl 128 15 0 50 0 0 empty empty empty -2 -8 0 10 #fcfcfc #000000 #000000 0 1; 30 | #X obj 464 413 +~ 0.25; 31 | #X obj 548 413 +~ 0.5; 32 | #X obj 632 413 +~ 0.75; 33 | #X obj 380 293 init \$1; 34 | #X obj 380 312 sel 0; 35 | #X msg 380 331 8; 36 | #X obj 502 181 sel 0; 37 | #X obj 502 162 init \$2; 38 | #X msg 502 200 3; 39 | #X connect 0 0 3 0; 40 | #X connect 1 0 19 0; 41 | #X connect 2 0 23 0; 42 | #X connect 4 0 18 0; 43 | #X connect 5 0 6 0; 44 | #X connect 5 0 28 0; 45 | #X connect 5 0 29 0; 46 | #X connect 5 0 30 0; 47 | #X connect 6 0 2 0; 48 | #X connect 7 0 19 0; 49 | #X connect 8 0 24 0; 50 | #X connect 9 0 8 0; 51 | #X connect 10 0 19 0; 52 | #X connect 11 0 25 0; 53 | #X connect 12 0 11 0; 54 | #X connect 13 0 19 0; 55 | #X connect 14 0 26 0; 56 | #X connect 15 0 14 0; 57 | #X connect 16 0 23 1; 58 | #X connect 16 0 24 1; 59 | #X connect 16 0 25 1; 60 | #X connect 16 0 26 1; 61 | #X connect 17 0 31 0; 62 | #X connect 18 0 5 0; 63 | #X connect 18 1 5 0; 64 | #X connect 18 2 16 0; 65 | #X connect 19 0 20 0; 66 | #X connect 21 0 18 0; 67 | #X connect 22 0 21 0; 68 | #X connect 23 0 1 0; 69 | #X connect 24 0 7 0; 70 | #X connect 25 0 10 0; 71 | #X connect 26 0 13 0; 72 | #X connect 27 0 22 0; 73 | #X connect 28 0 9 0; 74 | #X connect 29 0 12 0; 75 | #X connect 30 0 15 0; 76 | #X connect 31 0 32 0; 77 | #X connect 32 0 33 0; 78 | #X connect 32 1 5 0; 79 | #X connect 33 0 5 0; 80 | #X connect 34 0 36 0; 81 | #X connect 34 1 27 0; 82 | #X connect 35 0 34 0; 83 | #X connect 36 0 27 0; 84 | -------------------------------------------------------------------------------- /gen/sndm~-help.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 1600 849 10; 2 | #X msg 115 128 open \$1; 3 | #X obj 115 99 openpanel; 4 | #X obj 115 72 bng 15 250 50 0 empty empty select_a_wav 17 7 0 10 -262144 5 | -1 -1; 6 | #X obj 78 186 o~; 7 | #X obj 335 425 snd~; 8 | #X obj 421 425 sndp~; 9 | #X text 278 424 see also:; 10 | #X obj 84 366 o~; 11 | #X obj 84 337 snd~; 12 | #X obj 375 425 sndf~; 13 | #X floatatom 44 73 5 0 0 0 midi_note - -; 14 | #X obj 467 425 sndl~; 15 | #X obj 78 157 sndm~; 16 | #X obj 124 157 vcsig~; 17 | #X obj 78 95 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 18 | -1; 19 | #X floatatom 114 283 5 0 0 0 midi_note - -; 20 | #X obj 148 305 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 21 | -1 -1; 22 | #X obj 114 337 sndcm~; 23 | #X text 275 76 sndm~ allows you to load a sound into memory (either 24 | by sending an "open" message to the right inlet or by providing the 25 | filename as the argument) and play through the whole thing using an 26 | internal line~. to play it \, you can send midi notes to the inlet 27 | (the default base note is 60 \, though this can be changed by providing 28 | a second argument or sending a meassage like "base 50" to change the 29 | base note to 50 \, for example) or by sending a bang to repeat the 30 | last note.; 31 | #X text 275 283 the left outlet outputs the sound \, while the right 32 | outlet outputs the value of the internal line~.; 33 | #X text 277 193 for example \, if you send a "50" and then a bang \, 34 | the sound will play at midi note 50 twice.; 35 | #X text 277 235 sndm~'s features are a superset of sndp~'s features. 36 | sndp~ can only accept bangs to play the sound at the original pitch. 37 | ; 38 | #X text 275 320 <-- these two are the same! sndm~ is basically an abstraction 39 | to snd~ and sndcm~. sndcm~ generates the control values for snd~. keep 40 | this in mind if you want to do something more complex than what sndm~ 41 | allows - it can probably be done with sndcm~ and snd if sndm~ isn't 42 | close enough to the functionality you need.; 43 | #X text 286 39 sndm~ - sound midi note; 44 | #X connect 0 0 8 1; 45 | #X connect 0 0 12 0; 46 | #X connect 1 0 0 0; 47 | #X connect 2 0 1 0; 48 | #X connect 8 0 7 0; 49 | #X connect 8 1 17 0; 50 | #X connect 10 0 12 0; 51 | #X connect 12 0 3 0; 52 | #X connect 12 1 13 0; 53 | #X connect 14 0 12 0; 54 | #X connect 15 0 17 0; 55 | #X connect 16 0 17 0; 56 | #X connect 17 0 8 0; 57 | -------------------------------------------------------------------------------- /seq/remap.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 2560 1566 12; 2 | #X obj 17 77 inlet; 3 | #X obj 17 152 unmap; 4 | #X obj 17 197 map; 5 | #X obj 17 222 outlet; 6 | #X obj 118 52 loadbang; 7 | #X msg 118 77 args; 8 | #X obj 118 102 pdcontrol; 9 | #X text 266 68 remap - Map values to other values.; 10 | #X text 262 103 Specify the mapping as interlaced "FROM TO" pairs. For example \, invoking as [remap foo bar baz qux] will output a "bar" message when "foo" is received \, and a "qux" message when "baz" is received.; 11 | #X text 263 216 The mapping can be provided as arguments or as a list to the 2nd inlet.; 12 | #X text 262 264 The remapped value is output on the 1st outlet. If the input value is not found in the mapping \, it is passed through to the 2nd outlet.; 13 | #X obj 71 222 outlet; 14 | #N canvas 0 0 2560 1566 deinterlace 0; 15 | #X obj 119 22 inlet; 16 | #X obj 119 72 list-drip; 17 | #X obj 119 203 route 0 1; 18 | #X obj 151 121 count 2; 19 | #X obj 119 179 prepent; 20 | #X obj 119 97 t a b; 21 | #X msg 174 98 0; 22 | #X msg 119 250 append \$1; 23 | #X msg 199 250 append \$1; 24 | #X obj 119 275 list store; 25 | #X obj 199 275 list store; 26 | #X obj 119 47 t a b; 27 | #X msg 221 93 list; 28 | #X msg 231 167 bang; 29 | #X obj 119 300 outlet; 30 | #X obj 199 300 outlet; 31 | #X text 170 19 This subpatch deinterlaces the incoming list into its FROM values and its TO values.; 32 | #X text 119 326 FROM; 33 | #X text 202 327 TO; 34 | #X msg 151 153 \$1 append; 35 | #X connect 0 0 11 0; 36 | #X connect 1 0 5 0; 37 | #X connect 1 1 13 0; 38 | #X connect 2 0 7 0; 39 | #X connect 2 1 8 0; 40 | #X connect 3 0 19 0; 41 | #X connect 4 0 2 0; 42 | #X connect 5 0 4 0; 43 | #X connect 5 1 3 0; 44 | #X connect 6 0 3 1; 45 | #X connect 7 0 9 0; 46 | #X connect 8 0 10 0; 47 | #X connect 9 0 14 0; 48 | #X connect 10 0 15 0; 49 | #X connect 11 0 1 0; 50 | #X connect 11 1 6 0; 51 | #X connect 11 1 12 0; 52 | #X connect 12 0 10 1; 53 | #X connect 12 0 9 1; 54 | #X connect 13 0 10 0; 55 | #X connect 13 0 9 0; 56 | #X connect 19 0 4 1; 57 | #X restore 118 126 pd deinterlace; 58 | #X obj 71 77 inlet; 59 | #X text 264 180 Send the value to remap to the 1st inlet.; 60 | #X connect 0 0 1 0; 61 | #X connect 1 0 2 0; 62 | #X connect 1 1 11 0; 63 | #X connect 2 0 3 0; 64 | #X connect 4 0 5 0; 65 | #X connect 5 0 6 0; 66 | #X connect 6 0 12 0; 67 | #X connect 12 0 1 1; 68 | #X connect 12 1 2 1; 69 | #X connect 13 0 12 0; 70 | -------------------------------------------------------------------------------- /fx/isvf~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 2560 1566 10; 2 | #X obj 77 48 inlet~; 3 | #X obj 103 115 hsl 128 13 0 127 0 0 \$0-freq-midinote-s \$0-freq-midinote freq:440 -2 8 0 10 #fcfcfc #000000 #000000 0 1; 4 | #X obj 103 128 hsl 128 13 0.001 1 0 0 \$0-res-s \$0-res resonance:0.567362 -2 8 0 10 #fcfcfc #000000 #000000 0 1; 5 | #X obj 77 474 outlet~; 6 | #X obj 87 186 mtof; 7 | #X obj 207 15 inlet; 8 | #X obj 176 433 *~ 0; 9 | #X obj 143 433 *~ 0; 10 | #X obj 110 433 *~ 0; 11 | #X obj 77 433 *~ 0; 12 | #X obj 77 310 svf~; 13 | #X obj 177 369 f; 14 | #X obj 98 414 == 0; 15 | #X obj 131 414 == 1; 16 | #X obj 164 414 == 2; 17 | #X obj 197 414 == 3; 18 | #X msg 294 422 label \$1; 19 | #X obj 87 285 aline~ 20; 20 | #X obj 148 285 aline~ 20; 21 | #X obj 294 341 r \$0-type-s; 22 | #X obj 173 100 hradio 15 1 0 4 \$0-type-s \$0-type lowpass 1 8 0 12 #fcfcfc #000000 #fc0400 0; 23 | #X obj 294 441 s \$0-type; 24 | #X obj 294 403 map lowpass highpass bandpass notch; 25 | #X obj 285 100 clip 0 1; 26 | #X msg 103 209 label freq:\$1; 27 | #X obj 201 315 lb 0; 28 | #X obj 87 167 r \$0-freq-midinote-s; 29 | #X obj 103 228 s \$0-freq-midinote; 30 | #X obj 378 48 inlet; 31 | #X obj 378 70 s \$0-res; 32 | #X msg 258 261 label resonance:\$1; 33 | #X obj 258 222 r \$0-res-s; 34 | #X obj 258 280 s \$0-res; 35 | #X obj 285 122 s \$0-res; 36 | #X obj 207 34 route float freq res; 37 | #X obj 153 75 ftom; 38 | #X connect 0 0 10 0; 39 | #X connect 4 0 24 0; 40 | #X connect 4 0 17 0; 41 | #X connect 5 0 34 0; 42 | #X connect 6 0 3 0; 43 | #X connect 7 0 3 0; 44 | #X connect 8 0 3 0; 45 | #X connect 9 0 3 0; 46 | #X connect 10 0 9 0; 47 | #X connect 10 1 8 0; 48 | #X connect 10 2 7 0; 49 | #X connect 10 3 6 0; 50 | #X connect 11 0 12 0; 51 | #X connect 11 0 13 0; 52 | #X connect 11 0 14 0; 53 | #X connect 11 0 15 0; 54 | #X connect 12 0 9 1; 55 | #X connect 13 0 8 1; 56 | #X connect 14 0 7 1; 57 | #X connect 15 0 6 1; 58 | #X connect 16 0 21 0; 59 | #X connect 17 0 10 1; 60 | #X connect 18 0 10 2; 61 | #X connect 19 0 11 0; 62 | #X connect 19 0 22 0; 63 | #X connect 22 0 16 0; 64 | #X connect 23 0 33 0; 65 | #X connect 24 0 27 0; 66 | #X connect 25 0 22 0; 67 | #X connect 25 0 11 0; 68 | #X connect 26 0 4 0; 69 | #X connect 28 0 29 0; 70 | #X connect 30 0 32 0; 71 | #X connect 31 0 30 0; 72 | #X connect 31 0 18 0; 73 | #X connect 34 0 35 0; 74 | #X connect 34 1 35 0; 75 | #X connect 34 2 23 0; 76 | #X connect 35 0 1 0; 77 | #X coords 0 -1 1 1 133 41 1 100 100; 78 | -------------------------------------------------------------------------------- /seq/ft.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 1920 1048 10; 2 | #X obj 78 5 inlet; 3 | #X obj 30 5 r ft-\$1; 4 | #X obj 224 79 tabread t-\$1; 5 | #N canvas 0 0 450 300 (subpatch) 0; 6 | #X array t-\$1 16 float 3; 7 | #A 0 85 94 89 98 56 29 83 56 58 56 58 56 91 79 93 87; 8 | #X coords 0 127 16 0 200 140 1; 9 | #X restore 150 265 graph; 10 | #X symbolatom 288 248 10 0 0 0 - - - 0; 11 | #X obj 295 193 loadbang; 12 | #X obj 288 224 symbol ft-\$1; 13 | #X msg 228 221 \$1; 14 | #X obj 224 195 outlet; 15 | #X msg 233 173 size \$1; 16 | #X obj 325 82 loadbang; 17 | #X obj 303 100 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000; 18 | #X obj 313 129 symbol t-\$1; 19 | #X obj 154 130 symbol t-\$1; 20 | #X obj 155 100 loadbang; 21 | #X obj 121 189 pack f s; 22 | #X obj 88 269 pack f s; 23 | #X msg 49 304 \; \$2 resize \$1; 24 | #X msg 177 154 set \$1; 25 | #X obj 262 58 count; 26 | #X obj 233 250 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10 #fcfcfc #000000 #000000 0 256; 27 | #X floatatom 237 104 5 0 0 0 - - - 0; 28 | #X obj 78 24 route arraysize size resize float bang set; 29 | #X obj 387 89 tabwrite t-\$1; 30 | #X obj 361 55 unpack f f; 31 | #X obj 174 60 s \$0-ft-n; 32 | #X obj 442 187 r \$0-ft-n; 33 | #X obj 153 405 hsl 195 8 0 1 0 0 empty empty empty -2 -8 0 10 #fcfcfc #000000 #000000 0 1; 34 | #X obj 449 270 /; 35 | #X obj 313 149 expr size("$s1"); 36 | #X connect 0 0 22 0; 37 | #X connect 1 0 22 0; 38 | #X connect 2 0 8 0; 39 | #X connect 5 0 6 0; 40 | #X connect 6 0 4 0; 41 | #X connect 7 0 20 0; 42 | #X connect 9 0 8 0; 43 | #X connect 10 0 12 0; 44 | #X connect 11 0 12 0; 45 | #X connect 12 0 29 0; 46 | #X connect 13 0 15 1; 47 | #X connect 13 0 16 1; 48 | #X connect 13 0 18 0; 49 | #X connect 14 0 13 0; 50 | #X connect 15 0 7 0; 51 | #X connect 15 0 9 0; 52 | #X connect 15 0 28 1; 53 | #X connect 16 0 17 0; 54 | #X connect 16 0 9 0; 55 | #X connect 18 0 2 0; 56 | #X connect 19 0 2 0; 57 | #X connect 19 0 21 0; 58 | #X connect 19 0 25 0; 59 | #X connect 20 0 16 0; 60 | #X connect 20 0 19 1; 61 | #X connect 20 0 28 1; 62 | #X connect 22 0 15 0; 63 | #X connect 22 1 15 0; 64 | #X connect 22 2 15 0; 65 | #X connect 22 3 2 0; 66 | #X connect 22 3 25 0; 67 | #X connect 22 4 19 0; 68 | #X connect 22 5 24 0; 69 | #X connect 24 0 23 1; 70 | #X connect 24 1 23 0; 71 | #X connect 26 0 28 0; 72 | #X connect 28 0 27 0; 73 | #X connect 29 0 9 0; 74 | #X connect 29 0 20 0; 75 | #X connect 29 0 28 1; 76 | #X coords 0 -1 1 1 200 165 2 150 248; 77 | -------------------------------------------------------------------------------- /math/coin.pd: -------------------------------------------------------------------------------- 1 | #N canvas 1920 30 1920 1048 10; 2 | #X obj 115 492 outlet; 3 | #X obj 131 93 pdcontrol; 4 | #X msg 131 70 args; 5 | #X obj 131 46 loadbang; 6 | #X msg 131 169 0.5; 7 | #X obj 160 259 > 1; 8 | #X obj 115 282 pack f f; 9 | #X obj 115 237 t f f; 10 | #X msg 115 304 \$2 \$1; 11 | #X obj 115 326 route 0 1; 12 | #X obj 140 348 expr 1.0/$f1; 13 | #X obj 115 447 random 100; 14 | #X obj 131 146 route bang float; 15 | #X obj 177 169 moses 0; 16 | #X obj 115 469 < 1; 17 | #X obj 115 397 t b b f; 18 | #X obj 115 376 * 1e+06; 19 | #X msg 134 419 1e+06; 20 | #X text 260 126 The probability of a heads defaults to 50% \, but you can change it by providing a number as an argument \, or by sending a number to the second inlet.; 21 | #X text 261 180 Setting the probability (N) to a number between 0 and 1 means an N/1 probability. i.e. 0.5 is a 50% probability \, 0.25 is a 25% \, etc. Setting the probability above 1 means a 1/N probability \, i.e. 2 is 1/2 probability \, 100 is 1/100.; 22 | #X text 333 320 -1 - Ignored.; 23 | #X text 339 308 0 - 0% chance of heads.; 24 | #X text 339 297 1 - 100% chance of heads.; 25 | #X text 333 286 10 - 1 in 10 chance of heads.; 26 | #X text 339 275 3 - 1 in 3 chance of heads.; 27 | #X text 321 264 0.75 - 75% chance of heads.; 28 | #X text 261 252 examples: 0.5 - 50% chance of heads.; 29 | #X text 261 343 See also: [maybe] - Pass through input if a "coin" (with settable probability) lands on heads \, or discard it if tails.; 30 | #X text 262 83 [coin] - "Flip a coin" with a specific probability of heads. Outputs 1 on heads \, 0 on tails.; 31 | #X obj 18 123 inlet; 32 | #X obj 18 146 route bang float; 33 | #X obj 78 169 t b f; 34 | #X obj 140 122 inlet; 35 | #X obj 115 213 f 0.5; 36 | #X connect 1 0 12 0; 37 | #X connect 2 0 1 0; 38 | #X connect 3 0 2 0; 39 | #X connect 4 0 33 1; 40 | #X connect 5 0 6 1; 41 | #X connect 6 0 8 0; 42 | #X connect 7 0 6 0; 43 | #X connect 7 1 5 0; 44 | #X connect 8 0 9 0; 45 | #X connect 9 0 16 0; 46 | #X connect 9 1 10 0; 47 | #X connect 10 0 16 0; 48 | #X connect 11 0 14 0; 49 | #X connect 12 0 4 0; 50 | #X connect 12 1 13 0; 51 | #X connect 13 1 33 1; 52 | #X connect 14 0 0 0; 53 | #X connect 15 0 11 0; 54 | #X connect 15 1 17 0; 55 | #X connect 15 2 14 1; 56 | #X connect 16 0 15 0; 57 | #X connect 17 0 11 1; 58 | #X connect 29 0 30 0; 59 | #X connect 30 0 33 0; 60 | #X connect 30 1 31 0; 61 | #X connect 31 0 33 0; 62 | #X connect 31 1 12 0; 63 | #X connect 32 0 12 0; 64 | #X connect 33 0 7 0; 65 | -------------------------------------------------------------------------------- /ctrl/mspigot.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 29 2560 1566 10; 2 | #X obj 402 168 tgl 20 0 empty empty empty 17 7 0 10 #f8fc00 #000000 #000000 0 1; 3 | #X obj 422 168 tgl 20 0 empty empty empty 17 7 0 10 #f8fc00 #000000 #000000 0 1; 4 | #X obj 442 168 tgl 20 0 empty empty empty 17 7 0 10 #f8fc00 #000000 #000000 0 1; 5 | #X obj 462 168 tgl 20 0 empty empty empty 17 7 0 10 #f8fc00 #000000 #000000 0 1; 6 | #X obj 482 168 tgl 20 0 empty empty empty 17 7 0 10 #f8fc00 #000000 #000000 0 1; 7 | #X obj 143 167 inlet; 8 | #X obj 143 338 outlet; 9 | #X obj 143 269 spigot; 10 | #X obj 193 167 inlet; 11 | #X obj 193 269 spigot; 12 | #X obj 243 167 inlet; 13 | #X obj 243 269 spigot; 14 | #X obj 293 167 inlet; 15 | #X obj 293 269 spigot; 16 | #X obj 343 167 inlet; 17 | #X obj 343 269 spigot; 18 | #X obj 402 135 route 0 1 2 3 4; 19 | #X obj 432 104 inlet; 20 | #N canvas 0 0 2560 1566 default 0; 21 | #X obj 243 216 outlet; 22 | #X obj 204 57 loadbang; 23 | #X obj 204 114 list-drip; 24 | #X msg 204 76 args; 25 | #X obj 204 95 pdcontrol; 26 | #X msg 243 197 \$1 1; 27 | #X msg 94 172 0 1 \, 1 1 \, 2 1 \, 3 1 \, 4 1; 28 | #X obj 204 133 sel all; 29 | #X connect 1 0 3 0; 30 | #X connect 2 0 7 0; 31 | #X connect 3 0 4 0; 32 | #X connect 4 0 2 0; 33 | #X connect 5 0 0 0; 34 | #X connect 6 0 5 0; 35 | #X connect 7 0 6 0; 36 | #X connect 7 1 5 0; 37 | #X restore 402 85 pd default; 38 | #X text 567 63 Five inlets are "mixed" to the outlet \, passing their input only if their respective toggle is checked.; 39 | #X text 566 165 Aside from clicking the toggleboxes \, the state of the spigots can be set by sending messages to the last (sixth) inlet \, in the format INDEX [STATE]. If STATE is not provided \, the spigot's state is toggled.; 40 | #X text 566 108 The arguments specify the indices (starting from 0) of the inlets whose input should be passed through by default. The argument "all" can be used to enable all spigots.; 41 | #X text 568 38 mspigot - Multi-[spigot].; 42 | #X connect 0 0 7 1; 43 | #X connect 1 0 9 1; 44 | #X connect 2 0 11 1; 45 | #X connect 3 0 13 1; 46 | #X connect 4 0 15 1; 47 | #X connect 5 0 7 0; 48 | #X connect 7 0 6 0; 49 | #X connect 8 0 9 0; 50 | #X connect 9 0 6 0; 51 | #X connect 10 0 11 0; 52 | #X connect 11 0 6 0; 53 | #X connect 12 0 13 0; 54 | #X connect 13 0 6 0; 55 | #X connect 14 0 15 0; 56 | #X connect 15 0 6 0; 57 | #X connect 16 0 0 0; 58 | #X connect 16 1 1 0; 59 | #X connect 16 2 2 0; 60 | #X connect 16 3 3 0; 61 | #X connect 16 4 4 0; 62 | #X connect 17 0 16 0; 63 | #X connect 18 0 16 0; 64 | #X coords 0 -1 1 1 100 36 1 402 154; 65 | -------------------------------------------------------------------------------- /fx/pitchshifter~.pd: -------------------------------------------------------------------------------- 1 | #N canvas 0 0 800 849 10; 2 | #X obj 22 583 outlet~; 3 | #X obj 32 27 inlet~; 4 | #X obj 85 432 *~; 5 | #X obj 208 369 line~; 6 | #X obj 208 343 pack 0 200; 7 | #X obj 22 217 exp; 8 | #X obj 22 333 /; 9 | #X obj 149 263 * 0.001; 10 | #X obj 317 439 line~; 11 | #X obj 317 414 pack 0 200; 12 | #X obj 85 458 +~; 13 | #X obj 22 484 cos~; 14 | #X obj 22 511 *~; 15 | #X obj 22 540 +~; 16 | #X obj 109 391 wrap~; 17 | #X obj 254 434 *~; 18 | #X obj 254 467 +~; 19 | #X obj 191 494 cos~; 20 | #X obj 191 521 *~; 21 | #X obj 149 290 t b f; 22 | #X obj 109 364 +~ 0.5; 23 | #X obj 22 432 -~ 0.5; 24 | #X obj 22 458 *~ 0.5; 25 | #X obj 191 433 -~ 0.5; 26 | #X obj 191 466 *~ 0.5; 27 | #X obj 22 270 - 1; 28 | #X obj 22 191 * 0.05776; 29 | #X obj 22 296 * -1; 30 | #X text 57 326 tape head; 31 | #X obj 22 390 phasor~; 32 | #X obj 317 390 max 1.5; 33 | #X obj 240 213 max 1; 34 | #X text 58 339 rotation freq; 35 | #X obj 85 484 vd~ \$0-del; 36 | #X obj 254 496 vd~ \$0-del; 37 | #X obj 32 69 delwrite~ \$0-del 5000; 38 | #X obj 222 25 inlet; 39 | #X text 203 194 window (msec); 40 | #X text 336 352 delay (msec); 41 | #X text 56 160 transposition (semitones); 42 | #X text 108 584 adapted from pd/doc/3.audio.examples/G09.pitchshift.pd 43 | ; 44 | #X obj 258 6 lb \$1; 45 | #X obj 222 71 route float transpose window delay; 46 | #X msg 258 25 transpose \$1 \, window 100 \, delay 1.5; 47 | #X connect 1 0 35 0; 48 | #X connect 2 0 10 0; 49 | #X connect 3 0 2 1; 50 | #X connect 3 0 15 1; 51 | #X connect 4 0 3 0; 52 | #X connect 5 0 25 0; 53 | #X connect 6 0 29 0; 54 | #X connect 7 0 19 0; 55 | #X connect 8 0 10 1; 56 | #X connect 8 0 16 1; 57 | #X connect 9 0 8 0; 58 | #X connect 10 0 33 0; 59 | #X connect 11 0 12 0; 60 | #X connect 12 0 13 0; 61 | #X connect 13 0 0 0; 62 | #X connect 14 0 15 0; 63 | #X connect 14 0 23 0; 64 | #X connect 15 0 16 0; 65 | #X connect 16 0 34 0; 66 | #X connect 17 0 18 0; 67 | #X connect 18 0 13 1; 68 | #X connect 19 0 6 0; 69 | #X connect 19 1 6 1; 70 | #X connect 20 0 14 0; 71 | #X connect 21 0 22 0; 72 | #X connect 22 0 11 0; 73 | #X connect 23 0 24 0; 74 | #X connect 24 0 17 0; 75 | #X connect 25 0 27 0; 76 | #X connect 26 0 5 0; 77 | #X connect 27 0 6 0; 78 | #X connect 29 0 2 0; 79 | #X connect 29 0 21 0; 80 | #X connect 29 0 20 0; 81 | #X connect 30 0 9 0; 82 | #X connect 31 0 7 0; 83 | #X connect 31 0 4 0; 84 | #X connect 33 0 12 1; 85 | #X connect 34 0 18 1; 86 | #X connect 36 0 42 0; 87 | #X connect 41 0 43 0; 88 | #X connect 42 0 26 0; 89 | #X connect 42 1 26 0; 90 | #X connect 42 2 31 0; 91 | #X connect 42 3 30 0; 92 | #X connect 43 0 42 0; 93 | --------------------------------------------------------------------------------