#N canvas 499 79 568 531 10; #X obj 0 779 cnv 15 552 21 empty empty empty 20 12 0 14 -233017 -33289 0; #X obj 0 531 cnv 3 550 3 empty empty inlets 8 12 0 13 -228856 -1 0 ; #N canvas 621 318 349 250 META 0; #X text 0 19 LICENSE SIBSD; #X text 0 133 LIBRARY cyclone; #X text 0 114 OUTLET_0 signal; #X text 0 0 KEYWORDS signal read write sample record; #X text 0 38 DESCRIPTION read and write sample values; #X text 0 57 INLET_0 signal toggle set; #X text 0 95 INLET_2 float; #X text 0 76 INLET_1 float; #X text 0 154 VERSION 0.1-alpha57; #X text 0 172 AUTHOR Krzysztof Czaja; #X text 1 190 RELEASE_DATE 2002; #X text 2 209 WEBSITE http://suita.chopin.edu.pl/~czaja/miXed/externs/cyclone.html ; #X text 2 241 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 502 781 pd META; #X obj 0 680 cnv 3 550 3 empty empty outlets 8 12 0 13 -228856 -1 0 ; #X obj 0 717 cnv 3 550 3 empty empty arguments 8 12 0 13 -228856 -1 0; #N canvas 299 459 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 14 30 tabwrite~; #X restore 193 781 pd Related_objects; #X obj 81 542 cnv 17 3 65 empty empty n 5 9 0 16 -228856 -162280 0 ; #X obj 81 621 cnv 17 3 17 empty empty n+1 5 9 0 16 -228856 -162280 0; #X obj 0 0 cnv 15 552 40 empty empty record~ 3 12 0 18 -204280 -1 0 ; #X obj 491 10 record~; #X text 11 23 read and write sample values; #X text 124 575 toggle; #X text 209 575 - start/stop recording; #X text 111 689 signal; #X text 196 689 - recorded signal; #X text 124 557 signal; #X text 209 557 - signal to record; #X text 124 594 set ; #X text 209 594 - change buffer for recording values; #X obj 81 652 cnv 17 3 17 empty empty n+2 5 9 0 16 -228856 -162280 0; #X text 124 621 float; #X text 209 621 - startpoint in the table in msec; #X obj 81 689 cnv 17 3 17 empty empty 0 5 9 0 16 -228856 -162280 0 ; #X text 124 652 float; #X text 209 652 - endpoint in the table in msec; #X text 106 726 1) table; #X text 196 726 - buffer to hold recorded date; #X text 106 746 2) float; #X text 196 746 - enable multichannel ( can be 1 \, 2 \, 4); #X obj 264 57 tgl 15 0 record empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 283 466 metro 10; #X floatatom 264 509 5 0 0 0 - - -; #X obj 283 425 r record; #X msg 294 112 append \$1; #X obj 294 89 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 ; #X obj 283 446 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X msg 312 160 loop \$1; #X obj 312 137 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X msg 334 189 set table; #X floatatom 352 296 5 0 0 0 - - -; #X floatatom 441 296 5 0 0 0 - - -; #X text 123 540 n = number of channels given by argument (1 \, 2 \, or 4); #N canvas 589 450 296 326 More... 0; #X obj 55 122 adc~; #X obj 38 93 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X text 24 71 optional int arg is nr of channels:; #X text 172 165 can be 1 \, 2 or 4; #X text 24 197 table naming convention is; #X text 25 210 0...4-tablename:; #X text 23 58 enable multichannel by using an; #X obj 3 4 cnv 15 425 20 empty empty empty 3 12 0 14 -204280 -1 0; #X obj 151 248 hsl 75 60 0 127 0 0 eliminate_outlet eliminate_inlet empty -2 -8 0 10 -262144 -262144 -262144 0 1; #X obj 53 247 hsl 75 60 0 127 0 0 eliminate_outlet eliminate_inlet empty -2 -8 0 10 -262144 -262144 -262144 0 1; #N canvas 0 0 450 300 (subpatch) 0; #X array 1-smp 22050 float 0; #X coords 0 1 22049 -1 80 60 1 0 0; #X restore 148 248 graph; #N canvas 0 0 450 300 (subpatch) 0; #X array 0-smp 22050 float 0; #X coords 0 1 22049 -1 80 60 1; #X restore 50 247 graph; #X text 134 241 1; #X text 129 291 -1; #X obj 38 166 cyclone/record~ smp 2; #X text 6 5 multi channel; #X connect 0 0 14 0; #X connect 0 1 14 1; #X connect 1 0 14 0; #X restore 459 447 pd More...; #X obj 264 487 cyclone/Snapshot~; #X obj 264 381 cyclone/record~ \$0-recordTable; #X obj 340 216 f \$0; #X msg 339 239 set \$1-recordTable; #X obj 373 217 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 176 241 osc~ 11; #X obj 158 219 phasor~ 11; #N canvas 1159 487 450 300 mux 0; #X obj 194 67 inlet~; #X obj 242 68 inlet~; #X obj 126 69 inlet; #X obj 195 232 outlet~; #X obj 195 175 *~ 1; #X obj 241 175 *~ 0; #X obj 126 105 == 0; #X obj 0 0 cnv 15 425 20 empty empty empty 3 12 0 14 -204280 -1 0; #X text 1 1 signal selector; #X connect 0 0 4 0; #X connect 1 0 5 0; #X connect 2 0 6 0; #X connect 2 0 5 1; #X connect 4 0 3 0; #X connect 5 0 3 0; #X connect 6 0 4 1; #X restore 142 288 pd mux; #X obj 142 253 vradio 15 1 0 2 empty empty empty 0 -8 0 10 -262144 -1 -1 1; #X text 100 250 phasor; #X text 118 266 osc; #X obj 519 495 dspSwitch~; #X obj 29 385 hsl 195 140 0 127 0 0 eliminate_outlet eliminate_inlet empty -2 -8 0 10 -262144 -262144 -262144 8100 1; #X text 7 379 1; #X text 0 508 -1; #N canvas 1 80 450 300 (subpatch) 0; #X array \$0-recordTable 44100 float 0; #X coords 0 1 44099 -1 200 140 1; #X restore 26 385 graph; #X connect 29 0 44 0; #X connect 30 0 43 0; #X connect 32 0 35 0; #X connect 33 0 44 0; #X connect 34 0 33 0; #X connect 35 0 30 0; #X connect 36 0 44 0; #X connect 37 0 36 0; #X connect 38 0 44 0; #X connect 39 0 44 1; #X connect 40 0 44 2; #X connect 43 0 31 0; #X connect 44 0 43 0; #X connect 45 0 46 0; #X connect 46 0 44 0; #X connect 47 0 45 0; #X connect 48 0 50 2; #X connect 49 0 50 1; #X connect 50 0 44 0; #X connect 51 0 50 0;