-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy patharray.unop.pd
executable file
·122 lines (122 loc) · 3.08 KB
/
array.unop.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
110
111
112
113
114
115
116
117
118
119
120
121
122
#N canvas 124 23 1655 821 12;
#X obj -82 186 array size;
#X obj -84 248 until;
#X obj -84 302 f;
#X obj -56 302 + 1;
#X msg -66 280 0;
#X obj -84 420 array get;
#X msg -54 398 1;
#X obj -52 376 loadbang;
#X obj -82 208 t f f b;
#X obj -82 20 inlet;
#X obj 132 548 outlet;
#X obj -82 119 t b b b b b;
#X obj 44 518 t f f;
#X obj 754 133 pdcontrol;
#X msg 754 111 args 0;
#X obj -15 159 symbol \$1;
#X obj 115 159 symbol \$2;
#X obj 754 154 list trim;
#X obj 824 154 list length;
#X obj 539 5 loadbang;
#X obj 914 337 sel 1;
#X obj 664 22 f \$0;
#X obj 14 548 array set \$0arr;
#X obj 289 85 table \$0arr 2;
#X obj 1003 284 pdcontrol;
#X msg 1003 261 args 0;
#X obj 1003 305 list trim;
#X msg 1010 238 addsemi;
#X msg 1059 259 set;
#X obj 962 336 f \$0;
#X obj 914 414 ls.iter;
#X msg 914 437 add2 \$1;
#X msg 868 455 addsemi;
#X obj 722 22 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj -82 48 route bang array1 array2 array3;
#X obj 866 206 t b f b b b, f 28;
#X obj 744 518 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X text 1076 208 build binop message;
#X obj 664 46 t f b b f;
#X text 1032 30 cleans subpatch and creates inputs;
#X text 942 577 creates outputs and connects everything;
#X obj -117 444 s \$0-unop_in1;
#X obj 44 496 r \$0-unop_out;
#X obj -84 325 t f f;
#X obj 866 176 <= 2;
#X obj 914 386 symbol abs;
#X text 768 517 creates unop obj;
#X msg 962 357 add2 pd-\$1-unop obj 10 40;
#X msg 914 478 \; pd-1185-unop obj 10 40 + 2 \;;
#N canvas 0 23 450 300 \$0-unop 1;
#X obj 10 10 r 1185-binop_in1;
#X obj 10 40 + 2;
#X obj 10 70 s 1185-unop_out;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X restore 289 53 pd \$0-unop;
#X obj 1003 331 list split 2;
#X msg 664 558 \; pd-\$1-unop obj 10 70 s \$1-unop_out \; pd-\$1-unop
connect 0 0 1 0 \; pd-\$1-unop connect 1 0 2 0 \;;
#X msg 753 31 \; pd-\$1-unop clear \; pd-\$1-unop obj 10 10 r \$1-unop_in1
\;;
#X connect 0 0 8 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 0 43 0;
#X connect 3 0 2 1;
#X connect 4 0 2 1;
#X connect 5 0 41 0;
#X connect 6 0 5 1;
#X connect 7 0 6 0;
#X connect 8 0 1 0;
#X connect 8 2 4 0;
#X connect 9 0 34 0;
#X connect 11 0 0 0;
#X connect 11 2 15 0;
#X connect 11 3 16 0;
#X connect 12 0 22 0;
#X connect 12 1 10 0;
#X connect 13 0 17 0;
#X connect 14 0 13 0;
#X connect 15 0 0 1;
#X connect 15 0 5 2;
#X connect 16 0 22 2;
#X connect 17 0 18 0;
#X connect 18 0 44 0;
#X connect 19 0 21 0;
#X connect 20 0 45 0;
#X connect 20 1 25 0;
#X connect 21 0 38 0;
#X connect 24 0 26 0;
#X connect 25 0 24 0;
#X connect 26 0 50 0;
#X connect 27 0 48 0;
#X connect 28 0 48 0;
#X connect 29 0 47 0;
#X connect 30 0 31 0;
#X connect 31 0 48 0;
#X connect 32 0 48 0;
#X connect 33 0 21 0;
#X connect 34 0 11 0;
#X connect 34 1 15 1;
#X connect 34 2 16 1;
#X connect 35 0 32 0;
#X connect 35 1 20 0;
#X connect 35 2 29 0;
#X connect 35 3 27 0;
#X connect 35 4 28 0;
#X connect 36 0 48 0;
#X connect 38 0 51 0;
#X connect 38 1 36 0;
#X connect 38 2 14 0;
#X connect 38 3 52 0;
#X connect 42 0 12 0;
#X connect 43 0 5 0;
#X connect 43 1 22 1;
#X connect 44 0 35 0;
#X connect 45 0 30 0;
#X connect 47 0 48 0;
#X connect 50 1 30 0;