-
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathhelp-randomsample.pd
109 lines (109 loc) · 2.83 KB
/
help-randomsample.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
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
#N canvas 106 101 725 560 10;
#X text 209 498 copyright 2015 version 0.1 by Jeremy Muller;
#X text 184 25 - Returns a list that is a randomized sample of the
input population.;
#X msg 103 143 1 2 3 4 5;
#X obj 103 258 randomsample 3;
#X floatatom 184 239 5 0 0 0 - - -;
#X text 71 90 The left inlet take a list of a population to sample.
A population is a list of floats or symbols. The sample size must be
no greater than the size of the population.;
#X text 222 240 sample size (must not exceed population size);
#X text 195 259 argument is sample size;
#X text 184 302 print list to console;
#X obj 103 301 print SAMPLE;
#X msg 113 163 3.14 2.718 1 0 1.618;
#X text 342 193 < must proceed symbols with keyword "symbols"!!;
#X msg 123 193 symbols dog.aiff cat.aiff bird.aiff;
#X obj 80 25 randomsample 3;
#X msg 110 387 60 62 64 65 67 69 71 72;
#X obj 110 409 randomsample 3;
#X obj 130 431 print chord;
#N canvas 62 72 479 202 poly 0;
#X obj 200 35 inlet;
#N canvas 0 22 252 306 synth 0;
#X obj 97 35 inlet;
#X obj 97 57 mtof;
#X obj 97 79 t f b;
#X obj 97 141 osc~;
#X obj 82 230 *~;
#X obj 82 201 vline~;
#X obj 82 262 outlet~;
#X msg 82 179 0 \, 0.3 100 \, 0 300 100;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 1 7 0;
#X connect 3 0 4 1;
#X connect 4 0 6 0;
#X connect 5 0 4 0;
#X connect 7 0 5 0;
#X restore 174 79 pd synth;
#X obj 200 57 unpack f f f;
#N canvas 0 22 252 306 synth 0;
#X obj 97 35 inlet;
#X obj 97 57 mtof;
#X obj 97 79 t f b;
#X obj 97 141 osc~;
#X obj 82 230 *~;
#X obj 82 201 vline~;
#X obj 82 262 outlet~;
#X msg 82 179 0 \, 0.3 100 \, 0 300 100;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 1 7 0;
#X connect 3 0 4 1;
#X connect 4 0 6 0;
#X connect 5 0 4 0;
#X connect 7 0 5 0;
#X restore 234 79 pd synth;
#N canvas 0 22 252 306 synth 0;
#X obj 97 35 inlet;
#X obj 97 57 mtof;
#X obj 97 79 t f b;
#X obj 97 141 osc~;
#X obj 82 230 *~;
#X obj 82 201 vline~;
#X obj 82 262 outlet~;
#X msg 82 179 0 \, 0.3 100 \, 0 300 100;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 1 7 0;
#X connect 3 0 4 1;
#X connect 4 0 6 0;
#X connect 5 0 4 0;
#X connect 7 0 5 0;
#X restore 294 79 pd synth;
#X obj 294 112 rev3~ 90 90 5000 95;
#X obj 197 166 dac~;
#X obj 197 144 *~ 0.8;
#X connect 0 0 2 0;
#X connect 1 0 5 0;
#X connect 1 0 7 0;
#X connect 2 0 1 0;
#X connect 2 1 3 0;
#X connect 2 2 4 0;
#X connect 3 0 5 0;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 4 0 7 0;
#X connect 5 0 7 0;
#X connect 5 1 7 0;
#X connect 7 0 6 0;
#X connect 7 0 6 1;
#X restore 110 452 pd poly;
#X obj 549 76 loadbang;
#X msg 549 98 \; pd dsp 1 \;;
#X text 263 384 < try it out with MIDI notes;
#X text 27 155 click these;
#X connect 2 0 3 0;
#X connect 3 0 9 0;
#X connect 4 0 3 1;
#X connect 10 0 3 0;
#X connect 12 0 3 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 15 0 17 0;
#X connect 18 0 19 0;