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
|
#N canvas 439 25 595 461 10;
#X obj 94 346 sieve;
#X msg 147 276 set 2 1;
#X msg 198 276 set 7 0.86;
#X msg 148 198 map 0 1 0 0 0 3 0 2 0 0.7;
#X msg 147 229 get 0;
#X msg 147 250 get 1;
#X floatatom 37 384 5 0 0 0 - - -;
#X floatatom 81 382 5 0 0 0 - - -;
#X obj 129 379 print MAPOUT;
#X obj 218 379 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 218 397 print EXACT;
#X obj 37 419 print MAPPED;
#X obj 81 399 print VALUE;
#X msg 147 324 clear;
#X text 189 228 get map;
#X text 189 249 get inverted map;
#X floatatom 309 406 5 0 0 0 - - -;
#X floatatom 350 406 5 0 0 0 - - -;
#X obj 341 363 prepend map;
#X obj 395 405 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X text 189 323 clear object;
#X text 277 277 set [location \, value];
#X msg 147 297 set 2 0;
#X text 201 297 unset location;
#X text 332 196 set map;
#X floatatom 35 318 5 0 0 0 - - -;
#X obj 29 184 vradio 15 1 0 4 empty empty mode 0 -6 0 10 -262144 -1
-1 0;
#X msg 29 248 mode \$1;
#X text 62 170 : 0=exact \, 1=nearest \, 2=shunt up \, 3=shunt down
;
#X obj 341 383 sieve;
#X obj 22 19 sieve;
#X text 62 19 takes integers and maps them to floats if they are set.
;
#X text 63 32 in the default mode (mode 0) integers without an associated
float are blocked \, so a map will sieve the input.;
#X text 64 60 mode 1 forces the sieve to choose the nearest index \,
so that inputs are sent to alternative outputs. The rightmost output
bangs only if the input is exact.;
#X text 64 101 In modes 2 and 3 the sieve chooses the next map up or
the next map down. If the input is higher than the highest mapped integer
in mode 2 \, or lower than the lowest in mode 3 \, then the shunting
is wrapped and the lowest or highest is chosen respectively.;
#X text 294 330 when the inverted map is sent to another;
#X text 298 344 sieve object \, the input is segregated.;
#X text 38 440 Polyphony control objects by Ed Kelly \, November 2006
;
#X text 411 439 See also;
#X obj 476 438 polymap;
#X obj 476 417 polystat;
#X obj 532 438 maskxor;
#X obj 410 181 loadbang;
#X obj 410 233 delay 50;
#N canvas 0 0 596 300 register_functions 0;
#X obj 99 208 sieve;
#X msg 99 83 map 0 1 2 4 5 6 7 9 10 11 12;
#X obj 99 47 loadbang;
#X msg 157 166 get 0;
#X msg 254 125 delete 8;
#X msg 255 167 shunt 5;
#X obj 194 166 delay 0;
#X msg 194 149 bang;
#X msg 254 241 insert 7 100;
#X msg 256 203 shift 5;
#X obj 125 269 print REGMAP;
#X floatatom 38 166 5 0 0 0 - - -;
#X floatatom 35 257 5 0 0 0 - - -;
#X msg 160 57 map 1 1 1 1 1 1 1 1 1 1 1 1;
#X text 324 124 removes an element from the array;
#X text 318 166 removes an element from the array and;
#X text 319 178 subtracts 1 from subsequent elements;
#X text 320 201 shifts elements downstream \, adding 1;
#X text 319 213 to each element \, from a specific point;
#X text 349 242 inserts an element into the array;
#X connect 0 0 12 0;
#X connect 0 2 10 0;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 0 0;
#X connect 4 0 0 0;
#X connect 4 0 7 0;
#X connect 5 0 0 0;
#X connect 5 0 7 0;
#X connect 6 0 3 0;
#X connect 7 0 6 0;
#X connect 8 0 0 0;
#X connect 8 0 7 0;
#X connect 9 0 0 0;
#X connect 9 0 7 0;
#X connect 11 0 0 0;
#X connect 13 0 0 0;
#X restore 325 298 pd register_functions;
#X connect 0 0 6 0;
#X connect 0 1 7 0;
#X connect 0 2 8 0;
#X connect 0 2 18 0;
#X connect 0 3 9 0;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 3 0 0 0;
#X connect 4 0 0 0;
#X connect 5 0 0 0;
#X connect 6 0 11 0;
#X connect 7 0 12 0;
#X connect 9 0 10 0;
#X connect 13 0 0 0;
#X connect 13 0 18 0;
#X connect 18 0 29 0;
#X connect 22 0 0 0;
#X connect 25 0 0 0;
#X connect 25 0 29 0;
#X connect 26 0 27 0;
#X connect 27 0 0 0;
#X connect 29 0 16 0;
#X connect 29 1 17 0;
#X connect 29 3 19 0;
#X connect 42 0 3 0;
#X connect 42 0 43 0;
#X connect 43 0 5 0;
|
