blob: 9c7663622d1361cf0d3fe2760cbabe843f258c51 (
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
|
#N canvas 510 79 569 532 10;
#X obj 0 878 cnv 15 552 21 empty empty empty 20 12 0 14 -233017 -33289
0;
#X obj 0 543 cnv 3 550 3 empty empty inlets 8 12 0 13 -228856 -1 0
;
#N canvas 594 349 381 238 META 0;
#X text 0 19 LICENSE SIBSD;
#X text 0 114 LIBRARY cyclone;
#X text 0 57 INLET_0 signal set x;
#X text 0 0 KEYWORDS signal write table sample index;
#X text 0 38 DESCRIPTION write into a table using a signal sample index
;
#X text 0 76 INLET_1 float;
#X text 0 95 INLET_2 float;
#X text 0 134 VERSION 0.1-alpha57;
#X text 0 152 AUTHOR Krzysztof Czaja;
#X text 1 170 RELEASE_DATE 2002;
#X text 2 189 WEBSITE http://suita.chopin.edu.pl/~czaja/miXed/externs/cyclone.html
;
#X text 2 221 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 501 880 pd META;
#X obj 0 673 cnv 3 550 3 empty empty outlets 8 12 0 13 -228856 -1 0
;
#X obj 0 710 cnv 3 550 3 empty empty arguments 8 12 0 13 -228856 -1
0;
#X obj 0 770 cnv 3 550 3 empty empty more_info 8 12 0 13 -228856 -1
0;
#N canvas 317 478 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 restore 204 880 pd Related_objects;
#X obj 79 552 cnv 17 3 55 empty empty 0 5 9 0 16 -228856 -162280 0
;
#X obj 79 620 cnv 17 3 17 empty empty 1 5 9 0 16 -228856 -162280 0
;
#X obj 0 0 cnv 15 552 40 empty empty poke~ 3 12 0 18 -204280 -1 0;
#X obj 503 9 poke~;
#X text 12 23 Write into a table using a signal sample index;
#X text 103 551 signal;
#X text 187 551 - signal to sample;
#X text 103 572 set x;
#X text 187 572 - change buffer to x;
#X text 103 620 float;
#X text 187 620 - index of value being recorded;
#X text 85 722 1) table;
#X text 187 722 - buffer to write to (required);
#X text 85 741 2) float;
#X text 187 741 - initial channel (optional \, default 1);
#X text 116 783 poke~ allows you to write samples into a buffer~ at
sample locations specified by a signal. Typically \, the signal will
increase in value by 1 with each sample to write successive values
into successive samples (like record~). If the index signal is negative
or larger than the size of the buffer~ \, no data is recorded.;
#X obj 79 645 cnv 17 3 17 empty empty 2 5 9 0 16 -228856 -162280 0
;
#X text 103 645 float;
#X text 187 645 - set channel of value being recorded;
#X text 103 682 remotely sent to table;
#X obj 34 217 soundfiler;
#X floatatom 34 240 8 0 0 0 - - -;
#X msg 34 262 range 0 \$1;
#X obj 34 285 s sliders;
#X obj 294 265 cyclone/count~ 25000 40000;
#X msg 306 149 bang;
#X msg 294 185 stop;
#X obj 284 416 cyclone/count~ 0 62079;
#X obj 284 477 output~;
#X msg 284 376 bang;
#X msg 323 376 stop;
#X obj 348 214 hsl 128 15 0 62079 0 0 empty sliders empty -2 -8 0 10
-262144 -1 -1 4092 1;
#X obj 348 234 hsl 128 15 0 62079 0 0 empty sliders empty -2 -8 0 10
-262144 -1 -1 7692 1;
#X msg 345 192 20000;
#X msg 408 193 37600;
#X text 52 150 reload wav;
#X text 460 194 start;
#X text 462 247 stop;
#X obj 267 70 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#N canvas 585 367 450 300 beep 0;
#X obj 164 161 outlet~;
#X obj 164 103 cyclone/cycle~ 200;
#X obj 165 126 *~ 0.2;
#X obj 1 2 cnv 15 425 20 empty empty empty 3 12 0 14 -204280 -1 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X restore 213 270 pd beep;
#X obj 267 149 t b b;
#X obj 267 91 t b b;
#X obj 267 119 delay 500;
#X obj 345 150 loadbang;
#X text 103 593 bang;
#X text 187 593 - redraw array;
#X text 347 172 values to beep out 'soft and';
#X text 286 68 beep out selected range;
#X obj 34 152 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X msg 34 190 read -resize voice.wav \$1-voice;
#X obj 267 318 cyclone/poke~ \$0-voice;
#X obj 285 445 tabread~ \$0-voice;
#X obj 34 170 f \$0;
#X obj 34 130 loadbang;
#X obj 63 375 hsl 195 140 0 127 0 0 eliminate_outlet eliminate_inlet
empty -2 -8 0 10 -262144 -262144 -262144 0 1;
#X text 41 369 1;
#X text 34 498 -1;
#N canvas 1 79 450 300 (subpatch) 0;
#X array \$0-voice 62079 float 2;
#X coords 0 1 62079 -1 200 140 1 0 0;
#X restore 60 375 graph;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 31 0 57 1;
#X connect 32 0 31 0;
#X connect 33 0 31 0;
#X connect 34 0 58 0;
#X connect 36 0 34 0;
#X connect 37 0 34 0;
#X connect 38 0 31 0;
#X connect 39 0 31 1;
#X connect 40 0 38 0;
#X connect 41 0 39 0;
#X connect 45 0 48 0;
#X connect 46 0 57 0;
#X connect 47 0 57 0;
#X connect 47 1 33 0;
#X connect 48 0 49 0;
#X connect 48 1 32 0;
#X connect 49 0 47 0;
#X connect 50 0 40 0;
#X connect 50 0 41 0;
#X connect 55 0 59 0;
#X connect 56 0 27 0;
#X connect 58 0 35 0;
#X connect 58 0 35 1;
#X connect 59 0 56 0;
#X connect 60 0 55 0;
|
