blob: ef237818f4b272f722ffdd2b37a253624b987c58 (
plain)
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
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
|
#N canvas 496 104 572 531 10;
#X obj 0 692 cnv 15 552 21 empty empty empty 20 12 0 14 -233017 -33289
0;
#X obj 2 369 cnv 3 550 3 empty empty inlets 8 12 0 13 -228856 -1 0
;
#N canvas 555 430 410 251 META 0;
#X text 1 18 LICENSE SIBSD;
#X text 1 108 LIBRARY cyclone;
#X text 1 0 KEYWORDS signal count dsp;
#X text 1 36 DESCRIPTION sample counter for dsp;
#X text 1 90 OUTLET_0 float;
#X text 1 54 INLET_0 bang stop float autoreset;
#X text 1 72 INLET_1 float;
#X text 0 128 VERSION 0.1-alpha57;
#X text 0 146 AUTHOR Krzysztof Czaja;
#X text 1 164 RELEASE_DATE 2002;
#X text 2 183 WEBSITE http://suita.chopin.edu.pl/~czaja/miXed/externs/cyclone.html
;
#X text 2 215 HELP_PATCH_AUTHORS Christoph Kummerer. Revised by Jonathan
Wilkes for Pd-extended 0.42 to conform to the PDDP template. Alex Cleveland
updated this patch for Pd-l2ork version 2013.05.28. Fred Jan Kraan
adapted the patch to pd-extended 2015-02-02;
#X restore 500 694 pd META;
#X obj 0 518 cnv 3 550 3 empty empty outlets 8 12 0 13 -228856 -1 0
;
#X obj 0 555 cnv 3 550 3 empty empty arguments 8 12 0 13 -228856 -1
0;
#N canvas 308 573 428 109 Related_objects 0;
#X obj 0 0 cnv 15 425 20 empty empty empty 3 12 0 14 -204280 -1 0;
#X text 6 1 Related Objects;
#X obj 9 31 count;
#X obj 50 31 counter;
#X obj 121 31 phasor~;
#X restore 202 694 pd Related_objects;
#X obj 80 378 cnv 17 3 95 empty empty 0 5 9 0 16 -228856 -162280 0
;
#X obj 80 487 cnv 17 3 17 empty empty 1 5 9 0 16 -228856 -162280 0
;
#X obj 0 0 cnv 15 552 40 empty empty count~ 3 12 0 18 -204280 -1 0
;
#X text 12 23 sample counter for dsp;
#X text 110 377 bang;
#X text 178 377 - start counting;
#X text 110 416 stop;
#X text 178 416 - stop the counter;
#X text 110 397 float;
#X obj 80 527 cnv 17 3 17 empty empty 0 5 9 0 16 -228856 -162280 0
;
#X text 110 487 float;
#X text 178 487 - set a maximum value;
#X text 110 436 autoreset;
#X text 178 526 - the current count;
#X text 92 563 1) float;
#X text 92 580 2) float;
#X text 92 597 3) float;
#X text 178 596 - 0 or 1 for counter on/off;
#X text 178 564 - the minimum value;
#X text 92 612 4) float;
#X text 178 612 - 0 or 1 \, autoreset counter if dsp goes off and back
on;
#X obj 504 2 count~;
#X text 178 579 - the maximum value;
#X text 110 528 signal;
#X text 110 456 set;
#X text 178 456 - sets minimum (and optional maximum) value;
#X text 178 436 - reset counter to minimum if dsp is turned off and
on again;
#X text 178 397 - set a minimum value. counter is reset to this value
;
#X obj 0 637 cnv 3 550 3 empty empty more_info 8 12 0 13 -228856 -1
0;
#N canvas 524 335 500 458 all 0;
#X msg 103 58 stop;
#X msg 78 29 bang;
#X text 111 27 start counting;
#X text 136 56 stop \, you guessed it;
#X obj 97 409 snapshot~;
#X obj 97 385 metro 20;
#X obj 97 365 tgl 15 0 empty start empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X floatatom 97 433 15 0 0 0 - - -;
#X text 192 432 samples counted;
#X text 212 243 set a max value \, counter restarts at min;
#X obj 127 93 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X msg 127 116 autoreset \$1;
#X text 144 90 reset counter to min if dsp is turned off and on again
;
#X text 184 206 set a min value (immediately);
#X msg 442 163 min \$1;
#X floatatom 442 142 5 0 0 0 - - -;
#X msg 187 312 10 100000 1 1;
#X msg 187 290 min max on/off? autoreset?;
#X text 183 162 set a min value for the next loop. same as;
#X text 181 272 you can also use a list like:;
#X msg 138 163 set 0;
#X text 250 185 sets minimum and maximum;
#X msg 154 209 0;
#X msg 141 185 set -20000 40000;
#X msg 12 159 -10000 30000;
#X obj 0 3 cnv 15 425 20 empty empty empty 3 12 0 14 -204280 -1 0;
#X text 2 4 All the options;
#X obj 78 342 cyclone/count~;
#X msg 159 243 99999;
#X connect 0 0 27 0;
#X connect 1 0 27 0;
#X connect 4 0 7 0;
#X connect 5 0 4 0;
#X connect 6 0 5 0;
#X connect 10 0 11 0;
#X connect 11 0 27 0;
#X connect 15 0 14 0;
#X connect 16 0 27 0;
#X connect 20 0 27 0;
#X connect 22 0 27 0;
#X connect 23 0 27 0;
#X connect 24 0 27 0;
#X connect 27 0 4 0;
#X connect 28 0 27 1;
#X restore 436 334 pd all the options;
#X obj 99 320 output~;
#X msg 118 96 set 0 62079;
#X msg 98 51 bang;
#X msg 108 74 stop;
#X obj 98 223 cyclone/count~ 0 62079 0 0;
#X msg 126 119 set 10000 40000;
#X obj 154 167 hsl 165 15 0 62079 0 0 stop-slider stop-slider-R empty
-2 -8 0 10 -262144 -1 -1 16400 1;
#X obj 153 141 hsl 165 15 0 62079 0 0 start-slider start-slider-R empty
-2 -8 0 10 -262144 -1 -1 0 1;
#X text 287 122 start;
#X text 293 180 stop;
#X obj 435 256 table \$0-voice;
#X obj 98 287 cyclone/index~ \$0-voice;
#X text 138 50 start playback;
#N canvas 527 566 434 300 load 0;
#X obj 17 128 soundfiler;
#X floatatom 17 151 8 0 0 0 - - -;
#X msg 44 206 range 0 \$1;
#X obj 17 57 loadbang;
#X obj 17 81 f \$0;
#X msg 17 104 read -resize voice.wav \$1-voice;
#X obj 21 34 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 17 176 t f f;
#X obj 44 229 s start-slider-R;
#X obj 17 250 s stop-slider-R;
#X floatatom 225 160 8 0 0 0 - - -;
#X floatatom 323 161 8 0 0 0 - - -;
#X obj 225 128 moses 0;
#X obj 323 131 moses 0;
#X floatatom 264 181 5 0 0 0 - - -;
#X floatatom 362 182 8 0 0 0 - - -;
#X obj 276 100 + 1;
#X text 243 255 keeps start before end;
#X text 243 270 and end after start;
#X obj 225 37 r start-slider;
#X obj 323 37 r stop-slider;
#X obj 327 229 s stop-slider-R;
#X obj 222 230 s start-slider-R;
#X obj 0 2 cnv 15 425 20 empty empty empty 3 12 0 14 -204280 -1 0;
#X text 7 2 Load and play the voice wav and keep sliders meaningful
;
#X connect 0 0 1 0;
#X connect 1 0 7 0;
#X connect 2 0 8 0;
#X connect 2 0 9 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 5 0 0 0;
#X connect 6 0 3 0;
#X connect 7 0 9 0;
#X connect 7 1 2 0;
#X connect 11 0 22 0;
#X connect 12 0 10 0;
#X connect 12 1 14 0;
#X connect 13 0 11 0;
#X connect 13 1 15 0;
#X connect 14 0 21 0;
#X connect 16 0 12 1;
#X connect 19 0 12 0;
#X connect 19 0 13 1;
#X connect 20 0 13 0;
#X connect 20 0 16 0;
#X restore 434 234 pd load voice;
#X text 149 151 continuous soft and relaxing;
#X text 92 647 The [count~] object does not support the signal-in to
control the counter (zero = stop counter \, non-zero = start counter)
;
#X connect 37 0 40 0;
#X connect 38 0 40 0;
#X connect 39 0 40 0;
#X connect 40 0 47 0;
#X connect 41 0 40 0;
#X connect 42 0 40 1;
#X connect 43 0 40 0;
#X connect 47 0 36 0;
#X connect 47 0 36 1;
|
