-
Notifications
You must be signed in to change notification settings - Fork 0
/
scope~.pd
40 lines (40 loc) · 1.09 KB
/
scope~.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
#N canvas 0 0 1680 1020 12;
#X obj 227 386 inlet~;
#N canvas 0 50 450 250 (subpatch) 0;
#X array \$0-scope 1024 float 4;
#X coords 0 1 1023 -1 200 140 2 0 0;
#X restore 100 120 graph;
#X obj 583 324 array size \$0-scope;
#X obj 432 322 switch~ 64 1 1;
#X floatatom 256 281 6 0 0 0 size\ (pow\ of\ 2\ samp) - - 0;
#X floatatom 256 260 6 0 0 0 rate\ (hz) - - 0;
#X obj 439 163 loadbang;
#X obj 325 376 metro;
#X obj 285 100 tgl 15 0 empty empty power\ switch -75 7 0 10 #fcfcfc
#000000 #000000 0 1;
#X msg 358 280 1 \$1;
#X obj 358 305 /;
#X obj 583 235 expr pow(2 \, $f1);
#X msg 463 276 set \$1 1 1;
#X obj 227 411 tabwrite~ \$0-scope;
#X obj 357 341 * 1000;
#X msg 439 188 1 1 18 10;
#X obj 439 213 unpack f f f f;
#X connect 0 0 13 0;
#X connect 4 0 11 0;
#X connect 5 0 9 0;
#X connect 6 0 15 0;
#X connect 7 0 13 0;
#X connect 8 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 14 0;
#X connect 11 0 2 0;
#X connect 11 0 12 0;
#X connect 12 0 3 0;
#X connect 14 0 7 1;
#X connect 15 0 16 0;
#X connect 16 0 8 0;
#X connect 16 1 3 0;
#X connect 16 2 5 0;
#X connect 16 3 4 0;
#X coords 0 -1 1 1 200 200 2 100 100;