From 5879bc9332a97d74274f79a1b9207928b3f2c11b Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Sat, 29 Sep 2007 21:36:48 +0000 Subject: renamed help files to standard name and removed class_sethelpsymbol since it is unnecessary and gets in the way svn path=/trunk/externals/ekext/; revision=8774 --- maskxor/help-maskxor.pd | 104 ------------------------------------------------ maskxor/maskxor-help.pd | 104 ++++++++++++++++++++++++++++++++++++++++++++++++ maskxor/maskxor.c | 2 +- maskxor/v3/maskxor.c | 2 +- 4 files changed, 106 insertions(+), 106 deletions(-) delete mode 100755 maskxor/help-maskxor.pd create mode 100755 maskxor/maskxor-help.pd (limited to 'maskxor') diff --git a/maskxor/help-maskxor.pd b/maskxor/help-maskxor.pd deleted file mode 100755 index 1276de8..0000000 --- a/maskxor/help-maskxor.pd +++ /dev/null @@ -1,104 +0,0 @@ -#N canvas 0 0 956 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; -#N canvas 0 0 450 300 (subpatch) 0; -#X msg 174 179 0 1 0 0 1 1 2; -#X obj 150 84 loadbang; -#X obj 175 217 outlet; -#X connect 0 0 2 0; -#X connect 1 0 0 0; -#X restore 584 152 pd; -#X obj 568 173 l; -#X obj 534 148 t a b; -#X obj 568 190 prepend listr; -#X obj 473 190 prepend listl; -#X msg 662 97 1 0 0 1 1; -#X msg 678 114 1 1 0 0 0 1; -#X msg 721 131 0 1 1 0 2 1 0; -#X msg 669 190 mode \$1; -#X obj 669 167 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 -1; -#X text 728 191 ... in mode 1 \, floats are only; -#X text 729 204 passed through the left outlet; -#X text 728 217 when the left list contains; -#X text 727 229 fewer non-zero elements than; -#X text 727 241 the right list. CHANGED BEHAVIOUR!; -#X msg 651 65 1 0 0 1 0 0 0 1; -#X msg 638 49 1 0 0 1 0 1 0 1; -#X text 847 123 |; -#X text 847 132 |; -#X text 847 141 |; -#X text 847 150 |; -#X text 847 159 |; -#X text 847 168 |; -#X text 847 177 |; -#X text 761 60 _; -#X text 768 60 _; -#X text 775 60 _; -#X text 782 60 _; -#X text 789 60 _; -#X text 796 60 _; -#X text 803 60 _; -#X text 810 60 _; -#X text 817 60 _; -#X text 824 60 _; -#X text 831 60 _; -#X text 838 60 _; -#X text 845 60 _; -#X text 847 69 |; -#X text 847 78 |; -#X text 847 87 |; -#X text 847 96 |; -#X text 847 105 |; -#X text 847 114 |; -#X text 759 65 <; -#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; -#X connect 21 0 22 1; -#X connect 22 0 24 0; -#X connect 23 0 22 1; -#X connect 23 0 25 0; -#X connect 23 1 22 0; -#X connect 24 0 0 0; -#X connect 25 0 0 0; -#X connect 26 0 23 0; -#X connect 27 0 23 0; -#X connect 28 0 23 0; -#X connect 29 0 0 0; -#X connect 30 0 29 0; -#X connect 36 0 23 0; -#X connect 37 0 23 0; diff --git a/maskxor/maskxor-help.pd b/maskxor/maskxor-help.pd new file mode 100755 index 0000000..1276de8 --- /dev/null +++ b/maskxor/maskxor-help.pd @@ -0,0 +1,104 @@ +#N canvas 0 0 956 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; +#N canvas 0 0 450 300 (subpatch) 0; +#X msg 174 179 0 1 0 0 1 1 2; +#X obj 150 84 loadbang; +#X obj 175 217 outlet; +#X connect 0 0 2 0; +#X connect 1 0 0 0; +#X restore 584 152 pd; +#X obj 568 173 l; +#X obj 534 148 t a b; +#X obj 568 190 prepend listr; +#X obj 473 190 prepend listl; +#X msg 662 97 1 0 0 1 1; +#X msg 678 114 1 1 0 0 0 1; +#X msg 721 131 0 1 1 0 2 1 0; +#X msg 669 190 mode \$1; +#X obj 669 167 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 +1; +#X text 728 191 ... in mode 1 \, floats are only; +#X text 729 204 passed through the left outlet; +#X text 728 217 when the left list contains; +#X text 727 229 fewer non-zero elements than; +#X text 727 241 the right list. CHANGED BEHAVIOUR!; +#X msg 651 65 1 0 0 1 0 0 0 1; +#X msg 638 49 1 0 0 1 0 1 0 1; +#X text 847 123 |; +#X text 847 132 |; +#X text 847 141 |; +#X text 847 150 |; +#X text 847 159 |; +#X text 847 168 |; +#X text 847 177 |; +#X text 761 60 _; +#X text 768 60 _; +#X text 775 60 _; +#X text 782 60 _; +#X text 789 60 _; +#X text 796 60 _; +#X text 803 60 _; +#X text 810 60 _; +#X text 817 60 _; +#X text 824 60 _; +#X text 831 60 _; +#X text 838 60 _; +#X text 845 60 _; +#X text 847 69 |; +#X text 847 78 |; +#X text 847 87 |; +#X text 847 96 |; +#X text 847 105 |; +#X text 847 114 |; +#X text 759 65 <; +#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; +#X connect 21 0 22 1; +#X connect 22 0 24 0; +#X connect 23 0 22 1; +#X connect 23 0 25 0; +#X connect 23 1 22 0; +#X connect 24 0 0 0; +#X connect 25 0 0 0; +#X connect 26 0 23 0; +#X connect 27 0 23 0; +#X connect 28 0 23 0; +#X connect 29 0 0 0; +#X connect 30 0 29 0; +#X connect 36 0 23 0; +#X connect 37 0 23 0; diff --git a/maskxor/maskxor.c b/maskxor/maskxor.c index 6ebd267..bf14560 100755 --- a/maskxor/maskxor.c +++ b/maskxor/maskxor.c @@ -205,7 +205,7 @@ void maskxor_setup(void) post("|..-.--.-..-maskxor.-...--.-..|"); post("| exclusive-or mask-map |"); post("|.--.- Edward Kelly 2006 ---.-|"); - class_sethelpsymbol(maskxor_class, gensym("help-maskxor")); + class_addfloat(maskxor_class, maskxor_float); class_addmethod(maskxor_class, (t_method)maskxor_listl, gensym("listl"), A_GIMME, 0, 0); class_addmethod(maskxor_class, (t_method)maskxor_listr, gensym("listr"), A_GIMME, 0, 0); diff --git a/maskxor/v3/maskxor.c b/maskxor/v3/maskxor.c index 5e1d9d3..9137110 100644 --- a/maskxor/v3/maskxor.c +++ b/maskxor/v3/maskxor.c @@ -248,7 +248,7 @@ void maskxor_setup(void) post("|..-.--.-..-maskxor.-...--.-..|"); post("| exclusive-or mask-map |"); post("|.--.- Edward Kelly 2006 ---.-|"); - class_sethelpsymbol(maskxor_class, gensym("help-maskxor")); + class_addfloat(maskxor_class, maskxor_float); class_addmethod(maskxor_class, (t_method)maskxor_listl, gensym("listl"), A_GIMME, 0, 0); class_addmethod(maskxor_class, (t_method)maskxor_listr, gensym("listr"), A_GIMME, 0, 0); -- cgit v1.2.1