-
Notifications
You must be signed in to change notification settings - Fork 0
/
granular-sampler~.pd
86 lines (86 loc) · 2.88 KB
/
granular-sampler~.pd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
#N canvas 184 425 414 602 12;
#X obj 18 162 hsl 128 15 0 127 0 0 \$0-delay-min \$0-delay-min-set
delay_min 137 8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 18 177 hsl 128 15 0 127 0 0 \$0-delay-max \$0-delay-max-set
delay_max 137 8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 18 220 hsl 128 15 0 127 0 0 \$0-duration-max \$0-duration-max-set
duration_max 137 8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 18 198 hsl 128 15 0 127 0 0 \$0-duration-min \$0-duration-min-set
duration_min 137 8 0 10 #fcfcfc #000000 #000000 0 1;
#X floatatom 15 285 5 -64 24 1 pitch_min \$0-pitch-min-set \$0-pitch-min
10;
#X floatatom 116 285 5 -64 24 1 pitch_max \$0-pitch-max-set \$0-pitch-max
10;
#X obj 18 40 hsl 128 15 0 127 0 0 \$0-iot-min \$0-iot-min-set iot_min
137 8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 18 60 hsl 128 15 0 127 0 0 \$0-iot-max \$0-iot-max-set iot_max
137 8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 18 263 hsl 128 15 0 127 0 0 \$0-amplitude-max \$0-amplitude-max-set
amplitude_max 137 8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 18 241 hsl 128 15 0 127 0 0 \$0-amplitude-min \$0-amplitude-min-set
amplitude_min 137 8 0 10 #fcfcfc #000000 #000000 0 1;
#X floatatom 116 308 5 -64 24 1 max-grains \$0-max-grains-set \$0-max-grains
10;
#X obj 225 561 dac~;
#X obj 226 380 granular-generator \$0;
#X listbox 11 465 38 0 0 0 - - - 0;
#X obj 15 310 bng 15 250 50 0 \$0-open empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X text 33 306 open file;
#N canvas 0 50 450 250 (subpatch) 0;
#X array \$0-sample 1.13587e+06 float 2;
#X coords 0 1 1.13587e+06 -1 133 64 1 0 0;
#X restore 15 98 graph;
#N canvas 0 470 450 300 load-sample 0;
#X obj 15 16 r \$0-open;
#X obj 15 41 openpanel;
#X obj 15 66 pack s f;
#X obj 90 40 \$0;
#X obj 90 16 loadbang;
#X obj 15 120 soundfiler;
#X msg 15 93 read -resize \$1 \$2-sample;
#X obj 133 45 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 6 0;
#X connect 3 0 2 1;
#X connect 4 0 3 0;
#X connect 6 0 5 0;
#X connect 7 0 3 0;
#X restore 226 352 pd load-sample;
#X obj 226 521 clone sample-grain~ 64 \$0;
#N canvas 511 40 450 300 time 0;
#X obj 37 27 inlet;
#X obj 37 52 unpack f f f f f;
#X obj 37 235 pack f f f f f, f 16;
#X obj 37 260 outlet;
#X obj 146 86 t f b;
#X obj 224 114 array size \$0-sample;
#X obj 224 139 * 0.001;
#X obj 64 144 *;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 7 0;
#X connect 1 2 2 2;
#X connect 1 3 2 3;
#X connect 1 4 4 0;
#X connect 2 0 3 0;
#X connect 4 0 2 4;
#X connect 4 1 5 0;
#X connect 5 0 6 0;
#X connect 5 0 7 1;
#X connect 7 0 2 1;
#X restore 226 417 pd time;
#X obj 289 467 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X listbox 21 336 20 0 0 0 - - - 0;
#X obj 21 359 s \$0-quantize;
#X connect 12 0 19 0;
#X connect 18 0 11 0;
#X connect 18 0 11 1;
#X connect 19 0 13 0;
#X connect 19 0 20 0;
#X connect 19 0 18 0;
#X connect 21 0 22 0;
#X coords 0 -1 1 1 218 310 1 15 15;