From 0c0b07d3bff68484d554b33d7693117863404d2a Mon Sep 17 00:00:00 2001 From: Ed Kelly Date: Fri, 24 Nov 2006 13:45:33 +0000 Subject: This commit was generated by cvs2svn to compensate for changes in r6421, which included commits to RCS files with non-trunk default branches. svn path=/trunk/externals/ekext/; revision=6422 --- maskxor/help-maskxor.pd | 39 +++++++++++++++++++++++++++++++++++++++ 1 file changed, 39 insertions(+) create mode 100755 maskxor/help-maskxor.pd (limited to 'maskxor/help-maskxor.pd') diff --git a/maskxor/help-maskxor.pd b/maskxor/help-maskxor.pd new file mode 100755 index 0000000..23fd1b7 --- /dev/null +++ b/maskxor/help-maskxor.pd @@ -0,0 +1,39 @@ +#N canvas 0 0 665 304 10; +#X obj 368 207 maskxor; +#X obj 457 63 t b b; +#X msg 38 157 bang; +#X floatatom 390 247 5 0 0 0 - - -; +#X floatatom 368 264 5 0 0 0 - - -; +#X floatatom 254 122 5 0 0 0 - - -; +#X msg 457 46 bang; +#X msg 457 80 listl 1 1 0 0 0 1 1; +#X msg 500 97 listr 0 1 1 0 2 1 0; +#X text 39 56 Maskxor takes two lists - listr and listl \, to set up +a map where map = listl ^ listr.; +#X text 37 93 Floats will only pass through if map[(int)float] > 0 +\, so if the corresponding element is greater than zero in either listl +\, or listr \, but not both.; +#X text 76 148 outputs the map \, the xor-ed element and (if this is +greater than zero) the last float in.; +#X obj 412 227 print MASK; +#X text 41 22 Maskxor - exclusive-OR mask map by Edward Kelly. This +is GNU software.; +#X msg 39 193 clear; +#X text 79 192 resets the object; +#X text 29 283 Polyphony control objects by Ed Kelly November 2006 +; +#X text 397 282 See also; +#X obj 458 280 sieve; +#X obj 501 280 polymap; +#X obj 558 280 polystat; +#X connect 0 0 4 0; +#X connect 0 1 3 0; +#X connect 0 2 12 0; +#X connect 1 0 7 0; +#X connect 1 1 8 0; +#X connect 2 0 0 0; +#X connect 5 0 0 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 8 0 0 0; +#X connect 14 0 0 0; -- cgit v1.2.1