Rearranged nettles as independent library object and created help patch

svn path=/trunk/externals/miXed/; revision=17485

2 files changed, 299 insertions, 1 deletions

diff --git a/cyclone/shadow/nettles.c b/cyclone/shadow/nettles.c
index dbcb28f..b1df43f 100644
--- a/cyclone/shadow/nettles.c
+++ b/cyclone/shadow/nettles.c
@@ -483,7 +483,7 @@ static void *sigaccum_new(t_floatarg f)
     return (x);
 }
 
-void allnettles_setup(void)
+void nettles_setup(void)
 {
     rminus_class = class_new(gensym("!-"),
 			     (t_newmethod)rminus_new, 0,
@@ -546,4 +546,11 @@ void allnettles_setup(void)
     class_addbang(sigaccum_class, sigaccum_bang);
     class_addmethod(sigaccum_class, (t_method)sigaccum_set,
 		    gensym("set"), A_FLOAT, 0);
+    logpost(NULL, 4, "this is cyclone/nettles %s, %dth %s build",
+	 CYCLONE_VERSION, CYCLONE_BUILD, CYCLONE_RELEASE);  
+}
+
+void allnettles_setup(void)
+{
+    nettles_setup();
 }
diff --git a/doc/help/cyclone/nettles-help.pd b/doc/help/cyclone/nettles-help.pd
new file mode 100644
index 0000000..c152df6
--- /dev/null
+++ b/doc/help/cyclone/nettles-help.pd
@@ -0,0 +1,291 @@
+#N canvas 584 81 570 594 10;
+#X obj 414 44 import cyclone/nettles;
+#X obj 23 165 ==~;
+#X obj 23 240 !=~;
+#X obj 23 265 <~;
+#X obj 23 290 >~;
+#X obj 23 321 <=~;
+#X obj 23 350 >=~;
+#X obj 23 409 !/~;
+#X obj 23 443 %~;
+#X obj 22 523 +=~;
+#X obj 23 190 _==1~;
+#X obj 23 215 _==2~;
+#X obj 23 91 !-;
+#X obj 23 115 !/;
+#X obj 23 380 !-~;
+#X text 71 190 sigeq - outlet is 1 when inlets are equal as floats
+;
+#X text 72 214 sigeq - compare more (8?) samples in block;
+#X text 72 164 sigeq - outlet is 1 when inlets are equal as ints?;
+#X msg 23 140 _algo n;
+#X text 85 141 switch mode: 0 \, 1 \, 2;
+#X text 71 114 rdiv : output = right inlet / left inlet;
+#X text 70 91 rminus : output = right inlet - left inlet;
+#X text 72 241 signeq : output = 1 when inlets are unequal;
+#X text 72 266 siglt : output = 1 when left inlet is larger than right
+;
+#X text 68 521 sigaccum : is the accumulation of all previous samples
+;
+#X text 74 409 sigrover : outlet is the remainder of the left inlet
+divided by the right inlet;
+#X text 74 442 sigmod : outlet is the right inlet divided through the
+left inlet;
+#X text 73 379 sigrminus : outlet = 1 when inlets are unequal;
+#X text 73 350 siggeq : outlet = 1 when left inlet is greater or equal
+than right;
+#X text 73 321 sigleq : outlet = 1 when left inlet is less or equal
+than right;
+#X text 72 289 siggt : outlet = 1 when left inlet is greater than right
+;
+#X obj 22 503 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X msg 21 482 set 0;
+#X text 67 481 set sum to a value;
+#X text 69 502 set sum to 0;
+#X obj 0 557 cnv 15 552 21 empty empty empty 20 12 0 14 -233017 -33289
+0;
+#N canvas 616 258 377 299 META 0;
+#X text 0 20 LICENSE SIBSD;
+#X text 0 100 LIBRARY cyclone;
+#X text 0 80 OUTLET_0 signal;
+#X text 1 121 VERSION 0.1-alpha57;
+#X text 1 139 AUTHOR Krzysztof Czaja;
+#X text 2 157 RELEASE_DATE 2002;
+#X text 3 176 WEBSITE http://suita.chopin.edu.pl/~czaja/miXed/externs/cyclone.html
+;
+#X text 3 208 HELP_PATCH_AUTHORS Christoph Kummerer. Revised by Jonathan
+Wilkes for Pd-extended 0.42 to conform to the PDDP template. Alex Cleveland
+updated this patch for Pd-l2ork version 2013.05.28. Fred Jan Kraan
+adapted the patch to pd-extended 2015-02-02;
+#X text 0 40 DESCRIPTION apply binary operations;
+#X text 0 60 INLET_0 float signal message;
+#X text 0 0 KEYWORDS bin ops for control messages and signals;
+#X restore 503 559 pd META;
+#N canvas 319 385 428 109 Related_objects 0;
+#X obj 0 0 cnv 15 425 20 empty empty empty 3 12 0 14 -204280 -1 0;
+#X text 6 1 Related Objects;
+#X restore 205 559 pd Related_objects;
+#N canvas 1 81 1114 741 signal 0;
+#X obj 391 134 !=~;
+#X obj 390 103 sig~;
+#X obj 438 103 sig~;
+#X obj 392 159 Snapshot~ 100;
+#X obj 392 183 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 390 75 hradio 15 1 0 3 empty empty empty 0 -8 0 10 -262144 -1
+-1 2;
+#X obj 438 75 hradio 15 1 0 3 empty empty empty 0 -8 0 10 -262144 -1
+-1 2;
+#X obj 22 273 sig~;
+#X obj 70 273 sig~;
+#X obj 24 329 Snapshot~ 100;
+#X obj 24 353 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 22 245 hradio 15 1 0 3 empty empty empty 0 -8 0 10 -262144 -1
+-1 0;
+#X obj 70 245 hradio 15 1 0 3 empty empty empty 0 -8 0 10 -262144 -1
+-1 1;
+#X obj 23 304 <~;
+#X obj 394 273 sig~;
+#X obj 442 273 sig~;
+#X obj 396 329 Snapshot~ 100;
+#X obj 396 353 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 394 245 hradio 15 1 0 3 empty empty empty 0 -8 0 10 -262144
+-1 -1 1;
+#X obj 442 245 hradio 15 1 0 3 empty empty empty 0 -8 0 10 -262144
+-1 -1 0;
+#X obj 395 304 >~;
+#X obj 14 436 sig~;
+#X obj 62 436 sig~;
+#X obj 16 492 Snapshot~ 100;
+#X obj 16 517 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 14 408 hradio 15 1 0 3 empty empty empty 0 -8 0 10 -262144 -1
+-1 2;
+#X obj 62 408 hradio 15 1 0 3 empty empty empty 0 -8 0 10 -262144 -1
+-1 0;
+#X obj 15 467 <=~;
+#X obj 394 434 sig~;
+#X obj 442 434 sig~;
+#X obj 396 490 Snapshot~ 100;
+#X obj 396 515 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 394 406 hradio 15 1 0 3 empty empty empty 0 -8 0 10 -262144
+-1 -1 1;
+#X obj 442 406 hradio 15 1 0 3 empty empty empty 0 -8 0 10 -262144
+-1 -1 2;
+#X obj 395 465 >=~;
+#X obj 763 103 sig~;
+#X obj 811 103 sig~;
+#X obj 765 159 Snapshot~ 100;
+#X obj 763 75 hradio 15 1 0 3 empty empty empty 0 -8 0 10 -262144 -1
+-1 2;
+#X obj 811 75 hradio 15 1 0 3 empty empty empty 0 -8 0 10 -262144 -1
+-1 0;
+#X obj 764 134 !-~;
+#X text 389 53 signeq : outlet = 1 when inlets are unequal;
+#X text 20 219 siglt : outlet = 1 when left inlet is less than right
+;
+#X text 391 214 siggt : outlet = 1 when left inlet is greater than
+right;
+#X text 9 377 sigleq : outlet = 1 when left inlet is less or equal
+than right;
+#X text 389 376 siggeq : outlet = 1 when left inlet is greater or equal
+than right;
+#X obj 394 603 sig~;
+#X obj 442 603 sig~;
+#X obj 396 659 Snapshot~ 100;
+#X obj 395 634 %~;
+#X floatatom 442 582 5 0 0 0 - - -, f 5;
+#X floatatom 394 582 5 0 0 0 - - -, f 5;
+#X text 390 543 sigrover : outlet is the remainder of the left inlet
+divided by the right inlet;
+#X floatatom 396 686 5 0 0 0 - - -, f 5;
+#X obj 10 603 sig~;
+#X obj 58 603 sig~;
+#X obj 12 659 Snapshot~ 100;
+#X floatatom 58 582 5 0 0 0 - - -, f 5;
+#X floatatom 10 582 5 0 0 0 - - -, f 5;
+#X floatatom 12 686 5 0 0 0 - - -, f 5;
+#X obj 11 634 !/~;
+#X text 4 542 sigmod : outlet is the right inlet divided through the
+left inlet;
+#X obj 777 621 sig~;
+#X obj 779 677 Snapshot~ 100;
+#X floatatom 779 704 8 0 0 0 - - -, f 8;
+#X obj 778 652 +=~;
+#X obj 777 571 hradio 15 1 1 5 empty empty empty 0 -8 0 10 -262144
+-1 -1 2;
+#X obj 777 591 - 2;
+#X text 856 570 2;
+#X text 760 570 -2;
+#X text 772 545 sigaccum : is the accumulation of all previous samples
+;
+#X obj 819 625 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X msg 842 625 set 42;
+#X obj 0 0 cnv 15 552 40 empty empty signal_operations 3 12 0 18 -204280
+-1 0;
+#X floatatom 765 183 5 0 0 0 - - -, f 5;
+#X text 759 52 sigrminus : outlet = left inlet minus right inlet;
+#X obj 777 467 dspSwitch~;
+#X obj 86 115 sig~;
+#X obj 134 115 sig~;
+#X obj 88 171 Snapshot~ 100;
+#X floatatom 134 94 5 0 0 0 - - -, f 5;
+#X floatatom 86 94 5 0 0 0 - - -, f 5;
+#X obj 87 146 ==~;
+#X msg 17 74 _algo 0;
+#X msg 18 94 _algo 1;
+#X msg 18 117 _algo 2;
+#X obj 88 195 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X text 13 52 sigeq : outlet = 1 when inlets are equal;
+#X obj 223 117 _==1~;
+#X obj 223 139 _==2~;
+#X text 200 98 alternate objects:;
+#X connect 0 0 3 0;
+#X connect 1 0 0 0;
+#X connect 2 0 0 1;
+#X connect 3 0 4 0;
+#X connect 5 0 1 0;
+#X connect 6 0 2 0;
+#X connect 7 0 13 0;
+#X connect 8 0 13 1;
+#X connect 9 0 10 0;
+#X connect 11 0 7 0;
+#X connect 12 0 8 0;
+#X connect 13 0 9 0;
+#X connect 14 0 20 0;
+#X connect 15 0 20 1;
+#X connect 16 0 17 0;
+#X connect 18 0 14 0;
+#X connect 19 0 15 0;
+#X connect 20 0 16 0;
+#X connect 21 0 27 0;
+#X connect 22 0 27 1;
+#X connect 23 0 24 0;
+#X connect 25 0 21 0;
+#X connect 26 0 22 0;
+#X connect 27 0 23 0;
+#X connect 28 0 34 0;
+#X connect 29 0 34 1;
+#X connect 30 0 31 0;
+#X connect 32 0 28 0;
+#X connect 33 0 29 0;
+#X connect 34 0 30 0;
+#X connect 35 0 40 0;
+#X connect 36 0 40 1;
+#X connect 37 0 74 0;
+#X connect 38 0 35 0;
+#X connect 39 0 36 0;
+#X connect 40 0 37 0;
+#X connect 46 0 49 0;
+#X connect 47 0 49 1;
+#X connect 48 0 53 0;
+#X connect 49 0 48 0;
+#X connect 50 0 47 0;
+#X connect 51 0 46 0;
+#X connect 54 0 60 0;
+#X connect 55 0 60 1;
+#X connect 56 0 59 0;
+#X connect 57 0 55 0;
+#X connect 58 0 54 0;
+#X connect 60 0 56 0;
+#X connect 62 0 65 0;
+#X connect 63 0 64 0;
+#X connect 65 0 63 0;
+#X connect 66 0 67 0;
+#X connect 67 0 62 0;
+#X connect 71 0 65 0;
+#X connect 72 0 65 0;
+#X connect 77 0 82 0;
+#X connect 78 0 82 1;
+#X connect 79 0 86 0;
+#X connect 80 0 78 0;
+#X connect 81 0 77 0;
+#X connect 82 0 79 0;
+#X connect 83 0 82 0;
+#X connect 84 0 82 0;
+#X connect 85 0 82 0;
+#X restore 425 177 pd signal ops;
+#N canvas 1 80 450 414 control 0;
+#X obj 0 0 cnv 15 552 40 empty empty empty 3 12 0 18 -204280 -1 0;
+#X text 8 19 control message operators;
+#X obj 59 149 !-;
+#X msg 35 106 1;
+#X msg 84 105 1;
+#X msg 94 126 2;
+#X msg 74 84 0;
+#X msg 51 277 1;
+#X msg 100 276 1;
+#X msg 110 297 2;
+#X obj 75 320 !/;
+#X msg 90 255 -1;
+#X msg 51 253 2;
+#X msg 33 80 -1;
+#X text 28 55 rminus : output = right inlet - left inlet;
+#X text 25 219 rdiv : output = right inlet / left inlet;
+#X floatatom 59 176 5 0 0 0 - - -, f 5;
+#X floatatom 75 347 5 0 0 0 - - -, f 5;
+#X connect 2 0 16 0;
+#X connect 3 0 2 0;
+#X connect 4 0 2 1;
+#X connect 5 0 2 1;
+#X connect 6 0 2 1;
+#X connect 7 0 10 0;
+#X connect 8 0 10 1;
+#X connect 9 0 10 1;
+#X connect 10 0 17 0;
+#X connect 11 0 10 1;
+#X connect 12 0 10 0;
+#X connect 13 0 2 0;
+#X restore 424 103 pd control ops;
+#X text 12 23 Nettles: bin-ops;
+#X obj 0 0 cnv 15 552 40 empty empty nettles 3 12 0 18 -204280 -1 0
+;
+#X connect 18 0 1 0;
+#X connect 31 0 9 0;
+#X connect 32 0 9 0;