aboutsummaryrefslogtreecommitdiff
path: root/semento/sft.commun.sc.pd
blob: ab7e29d8d912cde85b265a8f7d5f2714acea4285 (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
#N canvas 268 124 938 618 10;
#X obj 12 11 inlet;
#X obj 76 584 outlet;
#X text 5 93 RRADICAL_MEMENTO is also in originator;
#X obj 76 557 list;
#X obj 670 372 spigot 1;
#X msg 800 355 0;
#X obj 520 166 unpack f f;
#X obj 191 315 expr_scale 0 1 \$3 \$4;
#X obj 318 315 expr_scale 0 1 \$3 \$4;
#X obj 221 373 hotpack f f;
#X obj 766 26 loadbang;
#X msg 766 127 1;
#X obj 13 453 demultiplex;
#X obj 76 478 round;
#X obj 13 389 expr_scale 0 1 \$3 \$4;
#X obj 156 11 inlet;
#X obj 286 11 inlet;
#X text 513 486 Use to constrain input to a smaller subset of the full
range. Input as relative to 0-1. Reports back what the result will
be when scaled fully;
#X obj 156 59 s \$0boundLowFull;
#X obj 286 59 s \$0boundHighFull;
#X obj 520 210 s \$0constrainLow;
#X obj 577 188 s \$0constrainHigh;
#X obj 191 229 r \$0boundLowFull;
#X obj 318 229 r \$0boundHighFull;
#X obj 191 294 r \$0constrainLow;
#X obj 318 294 r \$0constrainHigh;
#X obj 456 30 loadbang;
#X msg 456 55 0 1;
#X obj 318 254 t b a;
#X obj 191 256 t b a;
#X obj 520 125 list;
#X obj 571 125 t a a;
#X obj 520 97 route get;
#X obj 221 397 t a a;
#X text 277 394 Allows one to replace the scaled output with something
prettier;
#X text 502 274 Used to recall the 0-1 ranged constraint;
#X obj 766 102 sel round hide;
#X obj 766 149 s \$0round?;
#X obj 37 427 r \$0round?;
#X obj 13 478 t a;
#X obj 766 78 list-drip;
#X obj 835 149 s \$0hide?;
#X obj 766 53 list append \$5 \$6;
#X obj 800 332 r \$0hide?;
#X text 145 512 Read \$1-OSC (== \$0-OSC) \, filter by argument \$2
;
#X obj 13 257 deeprouteOSC \$2-normalized;
#X obj 125 477 deeprouteOSC \$2;
#X obj 125 453 r \$1-RRADICAL-OSC;
#X obj 13 234 r \$1-RRADICAL-OSC;
#X obj 12 42 prepent \$2;
#X obj 12 69 s \$1-RRADICAL-MEMENTO;
#X obj 520 30 r \$1-RRADICAL-OSC;
#X obj 504 255 s \$1-COMMUN-RESPONSE;
#X obj 670 342 r \$1/listParams;
#X obj 670 429 s \$1/returnParams;
#X obj 275 427 s \$1\$2/constraint/lookup/call;
#X obj 275 447 r \$1\$2/constraint/lookup/response;
#X obj 248 490 s \$1-COMMUN-RESPONSE;
#X obj 76 532 route \$2;
#X obj 76 508 r \$1-in;
#X obj 520 53 deeprouteOSC \$2-constrain;
#X obj 248 469 prepent \$2-constrained-to;
#X obj 504 234 prepent \$2-constrained-to-0-1;
#X text 585 78 Save the constraints;
#X obj 587 97 commun \$2-constraints \$1;
#X obj 670 399 list append \$2-normalized;
#X text 151 499 ^;
#X connect 0 0 49 0;
#X connect 3 0 1 0;
#X connect 4 0 65 0;
#X connect 5 0 4 1;
#X connect 6 0 20 0;
#X connect 6 1 21 0;
#X connect 7 0 9 0;
#X connect 7 0 14 3;
#X connect 8 0 9 1;
#X connect 8 0 14 4;
#X connect 9 0 33 0;
#X connect 10 0 42 0;
#X connect 11 0 37 0;
#X connect 12 0 39 0;
#X connect 12 1 13 0;
#X connect 13 0 39 0;
#X connect 14 0 12 0;
#X connect 15 0 18 0;
#X connect 16 0 19 0;
#X connect 22 0 29 0;
#X connect 23 0 28 0;
#X connect 24 0 7 0;
#X connect 25 0 8 0;
#X connect 26 0 27 0;
#X connect 27 0 6 0;
#X connect 28 0 8 0;
#X connect 28 1 8 4;
#X connect 28 1 7 4;
#X connect 29 0 7 0;
#X connect 29 1 8 3;
#X connect 29 1 7 3;
#X connect 30 0 6 0;
#X connect 30 0 62 0;
#X connect 31 0 6 0;
#X connect 31 1 30 1;
#X connect 32 0 30 0;
#X connect 32 1 31 0;
#X connect 32 1 64 0;
#X connect 33 0 55 0;
#X connect 33 1 61 0;
#X connect 36 0 11 0;
#X connect 36 1 41 0;
#X connect 38 0 12 1;
#X connect 39 0 3 0;
#X connect 40 0 36 0;
#X connect 42 0 40 0;
#X connect 43 0 5 0;
#X connect 45 0 14 0;
#X connect 46 0 3 0;
#X connect 47 0 46 0;
#X connect 48 0 45 0;
#X connect 49 0 50 0;
#X connect 51 0 60 0;
#X connect 53 0 4 0;
#X connect 56 0 61 0;
#X connect 58 0 3 0;
#X connect 59 0 58 0;
#X connect 60 0 32 0;
#X connect 61 0 57 0;
#X connect 62 0 52 0;
#X connect 64 0 31 0;
#X connect 65 0 54 0;