svn path=/trunk/abstractions/jmmmp/; revision=13700

1 files changed, 692 insertions, 0 deletions

diff --git a/bezier-help.pd b/bezier-help.pd
new file mode 100644
index 0000000..76157d7
--- /dev/null
+++ b/bezier-help.pd
@@ -0,0 +1,692 @@
+#N struct 1076-bez-array float x float y array 1076-bez-c-arr 1076-bez-c
+float p0x float p0y float p0x. float p0y. float p1x float p1y float
+p1x. float p1y. float p2x float p2y float p2x. float p2y. float p3x
+float p3y float p3x. float p3y.;
+#N struct 1076-bez-c float x float y;
+#N struct 1055-bez-array float x float y array 1055-bez-c-arr 1055-bez-c
+float p0x float p0y float p0x. float p0y. float p1x float p1y float
+p1x. float p1y. float p2x float p2y float p2x. float p2y. float p3x
+float p3y float p3x. float p3y.;
+#N struct 1055-bez-c float x float y;
+#N canvas 367 58 811 625 10;
+#X floatatom 23 285 5 0 0 0 - - -;
+#X floatatom 57 157 5 0 0 0 - - -;
+#X msg 158 126 p0 0 0 \, p1 0.2 0.4 \, p2 0.8 0.6 \, p3 1 1;
+#X text 420 184 ha demasiada accao a passar no patch \, optimizar;
+#X msg 104 88 dump;
+#N canvas 0 0 539 313 save 0;
+#X obj 151 42 inlet;
+#X obj 151 152 list prepend add2;
+#X obj 151 192 list trim;
+#X obj 151 172 t l b;
+#X msg 178 212 addcomma;
+#X msg 151 242 \, p0 0 0 \, p1 -0.100666 1.1 \, p2 1.078 -0.012 \,
+p3 0.99 0.99;
+#X msg 178 122 set;
+#X obj 151 62 t l l;
+#X obj 178 102 route p0;
+#X obj 178 82 route list;
+#X connect 0 0 7 0;
+#X connect 1 0 3 0;
+#X connect 2 0 5 0;
+#X connect 3 0 2 0;
+#X connect 3 1 4 0;
+#X connect 4 0 5 0;
+#X connect 6 0 5 0;
+#X connect 7 0 1 0;
+#X connect 7 1 9 0;
+#X connect 8 0 6 0;
+#X connect 9 0 8 0;
+#X restore 400 492 pd save points;
+#X text 416 215 botao para adicionar x curvas (p3 da anterior == p0
+da seguinte) \, criando uma mega-curva \; tornar tudo variavel \, nr
+pontos do array... \; ajustar tamanha dos pontos kr de acordo com o
+tamanho do display;
+#X obj 42 186 hsl 50 10 0 1 0 0 empty empty empty -2 -8 0 10 -228856
+-1 -1 4900 1;
+#X obj 42 204 hsl 50 10 0 1 0 0 empty empty empty -2 -8 0 10 -228856
+-1 -1 4900 1;
+#X text 369 35 DCCoY4HuLhg9Aj;
+#X msg 163 57 size \$1;
+#X floatatom 163 38 5 0 0 0 - - -;
+#X text 422 346 argumentos;
+#X text 425 364 - tamanho do array;
+#X text 429 381 - canvas size (x + y);
+#X msg 37 23 canvas 300 100;
+#X text 418 148 so funciona depois de clickar nele? o arraypoint do
+append nao funciona?;
+#X msg 76 64 canvas \$1;
+#X floatatom 76 44 5 0 0 0 - - -;
+#X msg 163 78 size 100;
+#X text 417 305 y - esta fixo em 99 como mudar para a mesma resolucao
+de x?;
+#X obj 19 131 line;
+#X msg 19 111 0 \, 1 3000;
+#X text 415 122 opcao para mostrar ponto de leitura;
+#X text 423 93 sair os dois eixos \, x e y.;
+#X msg 250 91 p0 \$1 \$2;
+#X obj 250 71 pack;
+#X floatatom 225 32 5 0 0 0 - - -;
+#X floatatom 260 32 5 0 0 0 - - -;
+#X obj 260 51 t b f;
+#N canvas 535 50 842 885 bezier-a 0;
+#X scalar 1076-bez-array 0 0 -2 -2 3 3 36.7999 111.4 41.7999 116.4
+58.4001 -16.2 63.4001 -11.2 98 98 103 103 \; 0 0 \; 1.09947 3.27078
+\; 2.19004 6.40106 \; 3.2719 9.39374 \; 4.34529 12.2517 \; 5.41039
+14.9778 \; 6.46743 17.5751 \; 7.51662 20.0463 \; 8.55817 22.3944 \;
+9.59229 24.6223 \; 10.6192 26.7328 \; 11.6391 28.7289 \; 12.6522 30.6135
+\; 13.6587 32.3894 \; 14.6588 34.0596 \; 15.6528 35.6269 \; 16.6408
+37.0943 \; 17.6231 38.4647 \; 18.5998 39.7409 \; 19.5713 40.9258 \;
+20.5376 42.0224 \; 21.499 43.0335 \; 22.4558 43.9621 \; 23.408 44.8109
+\; 24.356 45.583 \; 25.3 46.2813 \; 26.2401 46.9085 \; 27.1766 47.4677
+\; 28.1097 47.9616 \; 29.0395 48.3933 \; 29.9664 48.7656 \; 30.8905
+49.0814 \; 31.812 49.3436 \; 32.7311 49.5551 \; 33.6481 49.7188 \;
+34.5632 49.8376 \; 35.4765 49.9143 \; 36.3883 49.952 \; 37.2988 49.9534
+\; 38.2083 49.9215 \; 39.1168 49.8592 \; 40.0247 49.7694 \; 40.932
+49.6549 \; 41.8392 49.5187 \; 42.7463 49.3636 \; 43.6536 49.1927 \;
+44.5613 49.0086 \; 45.4695 48.8145 \; 46.3786 48.613 \; 47.2887 48.4072
+\; 48.2 48.2 \; 49.1128 47.9942 \; 50.0272 47.7927 \; 50.9434 47.5985
+\; 51.8618 47.4144 \; 52.7824 47.2434 \; 53.7055 47.0882 \; 54.6314
+46.9519 \; 55.5601 46.8373 \; 56.492 46.7473 \; 57.4272 46.6848 \;
+58.366 46.6527 \; 59.3085 46.654 \; 60.255 46.6914 \; 61.2057 46.7679
+\; 62.1608 46.8865 \; 63.1205 47.0499 \; 64.085 47.2611 \; 65.0546
+47.523 \; 66.0294 47.8385 \; 67.0096 48.2104 \; 67.9955 48.6418 \;
+68.9873 49.1353 \; 69.9852 49.6941 \; 70.9893 50.321 \; 72 51.0188
+\; 73.0174 51.7904 \; 74.0417 52.6389 \; 75.0732 53.5669 \; 76.112
+54.5776 \; 77.1584 55.6736 \; 78.2126 56.8581 \; 79.2747 58.1337 \;
+80.3451 59.5035 \; 81.4238 60.9703 \; 82.5112 62.537 \; 83.6074 64.2066
+\; 84.7127 65.9819 \; 85.8272 67.8659 \; 86.9512 69.8614 \; 88.0848
+71.9712 \; 89.2283 74.1984 \; 90.382 76.5458 \; 91.5459 79.0163 \;
+92.7204 81.6128 \; 93.9056 84.3382 \; 95.1018 87.1954 \; 96.3091 90.1872
+\; 97.5277 93.3167 \; 100 100 \; \;;
+#X scalar 1055-bez-array 0 0 -2 -2 3 3 19.2727 73.6361 24.2727 78.6361
+92 3.27309 97 8.27309 98 98 103 103 \; 0 0 \; 0.5941 2.1662 \; 1.21956
+4.24786 \; 1.87568 6.24685 \; 2.56174 8.16505 \; 3.27704 10.0043 \;
+4.02087 11.7665 \; 4.79252 13.4535 \; 5.59127 15.0672 \; 6.41643 16.6094
+\; 7.26727 18.082 \; 8.1431 19.4868 \; 9.0432 20.8258 \; 9.96686 22.1008
+\; 10.9134 23.3137 \; 11.882 24.4662 \; 12.8721 25.5604 \; 13.883 26.5981
+\; 14.9138 27.5811 \; 15.964 28.5112 \; 17.0327 29.3905 \; 18.1194
+30.2207 \; 19.2232 31.0036 \; 20.3435 31.7413 \; 21.4796 32.4355 \;
+22.6307 33.088 \; 23.7961 33.7009 \; 24.9752 34.2758 \; 26.1673 34.8148
+\; 27.3715 35.3196 \; 28.5873 35.7922 \; 29.8138 36.2343 \; 31.0505
+36.6479 \; 32.2965 37.0349 \; 33.5512 37.397 \; 34.8139 37.7362 \;
+36.0838 38.0543 \; 37.3602 38.3532 \; 38.6425 38.6348 \; 39.93 38.9009
+\; 41.2218 39.1535 \; 42.5174 39.3942 \; 43.8159 39.6251 \; 45.1168
+39.848 \; 46.4192 40.0648 \; 47.7225 40.2773 \; 49.0259 40.4874 \;
+50.3289 40.6969 \; 51.6305 40.9078 \; 52.9302 41.1218 \; 54.2273 41.341
+\; 55.5209 41.567 \; 56.8105 41.8018 \; 58.0952 42.0474 \; 59.3745
+42.3054 \; 60.6475 42.5778 \; 61.9136 42.8665 \; 63.172 43.1733 \;
+64.4222 43.5001 \; 65.6632 43.8488 \; 66.8945 44.2212 \; 68.1154 44.6192
+\; 69.325 45.0446 \; 70.5228 45.4994 \; 71.7079 45.9853 \; 72.8797
+46.5044 \; 74.0376 47.0583 \; 75.1807 47.649 \; 76.3083 48.2784 \;
+77.4199 48.9483 \; 78.5145 49.6607 \; 79.5916 50.4172 \; 80.6505 51.2199
+\; 81.6903 52.0706 \; 82.7105 52.9712 \; 83.7102 53.9234 \; 84.6889
+54.9293 \; 85.6457 55.9906 \; 86.58 57.1092 \; 87.491 58.2871 \; 88.3782
+59.5259 \; 89.2406 60.8278 \; 90.0777 62.1943 \; 90.8888 63.6276 \;
+91.673 65.1294 \; 92.4298 66.7015 \; 93.1583 68.3459 \; 93.858 70.0645
+\; 94.528 71.8591 \; 95.1677 73.7314 \; 95.7764 75.6835 \; 96.3533
+77.7172 \; 96.8977 79.8344 \; 97.409 82.0368 \; 97.8865 84.3265 \;
+98.3293 86.7052 \; 98.7369 89.1749 \; 99.1084 91.7373 \; 99.4433 94.3944
+\; 100 100 \; \;;
+#X obj 217 10 inlet;
+#N canvas 752 125 572 401 inside 0;
+#X obj 20 52 inlet;
+#X obj 260 272 s \$0-bezier-a;
+#X obj 220 132 sel 0;
+#N canvas 0 0 450 300 element 0;
+#X obj 52 46 struct \$0-bez-c float x float y;
+#X restore 6 322 pd element;
+#N canvas 113 250 606 425 array 0;
+#X obj 58 96 route change click;
+#X obj 78 130 unpack p f;
+#X obj 58 24 struct \$0-bez-array float x float y array \$0-bez-c-arr
+\$0-bez-c float p0x float p0y float p0x. float p0y. float p1x float
+p1y float p1x. float p1y. float p2x float p2y float p2x. float p2y.
+float p3x float p3y float p3x. float p3y.;
+#X obj 31 312 filledpolygon 0 0 1 p1x p1y p1x. p1y p1x. p1y. p1x p1y.
+p1x p1y;
+#X obj 31 345 filledpolygon 0 0 1 p2x p2y p2x. p2y p2x. p2y. p2x p2y.
+p2x p2y;
+#X obj 78 150 t b p;
+#X obj 78 210 outlet;
+#X obj 105 170 s \$0-arrpoint;
+#X obj 78 190 speedlim 150;
+#X obj 213 160 drawpolygon 0 1 0 0 0 100 100 100 100 0 0 0;
+#X obj 31 378 filledpolygon 0 0 1 p3x(-2:97)(-2:97) p3y(-2:97)(-2:97)
+p3x. p3y p3x. p3y. p3x p3y. p3x p3y;
+#X obj 31 279 filledpolygon 0 0 1 p0x(-2:97)(-2:97) p0y(-2:97)(-2:97)
+p0x. p0y p0x. p0y. p0x p0y. p0x p0y;
+#X obj 213 130 plot \$0-bez-c-arr 9 2 0 0;
+#X text 37 243 4 control points \, 2 extremos nao saem da caixa. fronteiras
+desfazadas em 2pt \, para desenhar o quadrado;
+#X connect 0 0 1 0;
+#X connect 0 1 1 0;
+#X connect 1 0 5 0;
+#X connect 2 0 0 0;
+#X connect 5 0 8 0;
+#X connect 5 1 7 0;
+#X connect 8 0 6 0;
+#X restore 6 342 pd array;
+#N canvas 257 223 482 660 calculate 0;
+#X obj 27 42 inlet;
+#X obj 27 202 until;
+#X obj 27 222 f+ 0;
+#X obj 27 352 expr (-$f2+3*$f3-3*$f4+$f5)*pow($f1 \, 3) + (3*$f2-6*$f3+3*$f4)*pow($f1
+\, 2) + (3*$f3-3*$f2)*$f1 + $f2;
+#X obj 46 425 expr (-$f2+3*$f3-3*$f4+$f5)*pow($f1 \, 3) + (3*$f2-6*$f3+3*$f4)*pow($f1
+\, 2) + (3*$f3-3*$f2)*$f1 + $f2;
+#X obj 27 332 pack f f f f f;
+#X obj 46 405 pack f f f f f;
+#X obj 228 468 r \$0-arrpoint;
+#X obj 108 498 element \$0-bez-array \$0-bez-c-arr;
+#X obj 46 558 set \$0-bez-c y;
+#X obj 27 538 set \$0-bez-c x;
+#X obj 108 518 t p p;
+#X obj 27 242 t f f f;
+#X text 142 11 array com 100 pontos. fazer 200? \; e necessario estar
+a escalonar tudo? talvez nao;
+#X obj 141 190 get \$0-bez-array p0x;
+#X obj 311 190 get \$0-bez-array p0y;
+#X obj 341 250 get \$0-bez-array p3y;
+#X obj 171 250 get \$0-bez-array p3x;
+#X obj 161 230 get \$0-bez-array p2x;
+#X obj 331 230 get \$0-bez-array p2y;
+#X obj 320 210 get \$0-bez-array p1y;
+#X obj 151 210 get \$0-bez-array p1x;
+#X obj 27 72 t b b;
+#X obj 77 32 inlet;
+#X obj 141 80 r \$0-arrpoint;
+#X obj 141 150 pointer;
+#X obj 77 52 t b b;
+#X obj 141 270 + 2;
+#X obj 171 270 + 2;
+#X obj 311 270 + 2;
+#X obj 341 270 + 2;
+#X obj 47 102 r \$0-size;
+#X obj 42 162 + 1;
+#X obj 27 182 f;
+#X obj 86 242 inv;
+#X obj 47 122 t b f f;
+#X obj 27 272 *;
+#X obj 46 292 *;
+#X connect 0 0 22 0;
+#X connect 1 0 2 0;
+#X connect 2 0 12 0;
+#X connect 3 0 10 0;
+#X connect 4 0 9 0;
+#X connect 5 0 3 0;
+#X connect 6 0 4 0;
+#X connect 7 0 8 1;
+#X connect 8 0 11 0;
+#X connect 11 0 10 1;
+#X connect 11 1 9 1;
+#X connect 12 0 36 0;
+#X connect 12 1 37 0;
+#X connect 12 2 8 0;
+#X connect 14 0 27 0;
+#X connect 15 0 29 0;
+#X connect 16 0 30 0;
+#X connect 17 0 28 0;
+#X connect 18 0 5 3;
+#X connect 19 0 6 3;
+#X connect 20 0 6 2;
+#X connect 21 0 5 2;
+#X connect 22 0 33 0;
+#X connect 22 1 2 1;
+#X connect 23 0 26 0;
+#X connect 24 0 25 0;
+#X connect 25 0 14 0;
+#X connect 25 0 15 0;
+#X connect 25 0 20 0;
+#X connect 25 0 19 0;
+#X connect 25 0 16 0;
+#X connect 25 0 21 0;
+#X connect 25 0 18 0;
+#X connect 25 0 17 0;
+#X connect 26 0 22 0;
+#X connect 26 1 25 0;
+#X connect 27 0 5 1;
+#X connect 28 0 5 4;
+#X connect 29 0 6 1;
+#X connect 30 0 6 4;
+#X connect 31 0 35 0;
+#X connect 32 0 33 1;
+#X connect 33 0 1 0;
+#X connect 34 0 36 1;
+#X connect 34 0 37 1;
+#X connect 35 0 22 0;
+#X connect 35 1 32 0;
+#X connect 35 2 34 0;
+#X connect 36 0 5 0;
+#X connect 37 0 6 0;
+#X restore 6 362 pd calculate;
+#X obj 65 132 outlet;
+#X obj 230 12 loadbang;
+#N canvas 0 0 450 363 index 0;
+#X obj 63 212 outlet;
+#X obj 258 132 r \$0-arrpoint;
+#X obj 63 172 get \$0-bez-c y;
+#X obj 63 152 element \$0-bez-array \$0-bez-c-arr;
+#X obj 63 72 inlet;
+#X obj 156 52 r \$0-arrpoint;
+#X obj 156 72 getsize \$0-bez-array \$0-bez-c-arr;
+#X obj 63 112 maxlib/scale 0 1 0 0;
+#X obj 156 92 - 1;
+#X obj 63 192 / 99;
+#X connect 1 0 3 1;
+#X connect 2 0 9 0;
+#X connect 3 0 2 0;
+#X connect 4 0 7 0;
+#X connect 5 0 6 0;
+#X connect 6 0 8 0;
+#X connect 7 0 3 0;
+#X connect 8 0 7 4;
+#X connect 9 0 0 0;
+#X restore 65 112 pd index;
+#N canvas 0 0 450 300 size 0;
+#X obj 99 89 inlet;
+#X obj 294 149 r \$0-arrpoint;
+#X obj 99 169 setsize \$0-bez-array \$0-bez-c-arr;
+#X obj 99 109 s \$0-size;
+#X obj 99 149 r \$0-size;
+#X connect 0 0 3 0;
+#X connect 1 0 2 1;
+#X connect 4 0 2 0;
+#X restore 16 112 pd size;
+#N canvas 564 290 668 593 point-befehle 0;
+#X obj 228 58 route p0 p1 p2 p3;
+#X obj 189 18 inlet;
+#X obj 60 166 unpack;
+#X obj 150 86 r \$0-arrpoint;
+#X obj 150 116 t p p p p;
+#X obj 60 236 set \$0-bez-array p0x;
+#X obj 60 256 set \$0-bez-array p0y;
+#X obj 200 236 set \$0-bez-array p1x;
+#X obj 200 256 set \$0-bez-array p1y;
+#X obj 340 236 set \$0-bez-array p2x;
+#X obj 480 236 set \$0-bez-array p3x;
+#X obj 480 256 set \$0-bez-array p3y;
+#X obj 340 256 set \$0-bez-array p2y;
+#X obj 47 116 pointer;
+#X obj 47 362 get \$0-bez-array p0x;
+#X obj 57 402 set \$0-bez-array p0x.;
+#X obj 77 432 get \$0-bez-array p0y;
+#X obj 57 472 set \$0-bez-array p0y.;
+#X obj 47 332 t p p p p;
+#X obj 47 292 t p p p p;
+#X obj 197 332 t p p p p;
+#X obj 347 332 t p p p p;
+#X obj 496 332 t p p p p;
+#X obj 197 362 get \$0-bez-array p1x;
+#X obj 207 402 set \$0-bez-array p1x.;
+#X obj 227 432 get \$0-bez-array p1y;
+#X obj 207 472 set \$0-bez-array p1y.;
+#X obj 347 362 get \$0-bez-array p2x;
+#X obj 357 402 set \$0-bez-array p2x.;
+#X obj 377 432 get \$0-bez-array p2y;
+#X obj 357 472 set \$0-bez-array p2y.;
+#X obj 496 362 get \$0-bez-array p3x;
+#X obj 506 402 set \$0-bez-array p3x.;
+#X obj 526 432 get \$0-bez-array p3y;
+#X obj 506 472 set \$0-bez-array p3y.;
+#X obj 47 382 + 5;
+#X obj 77 452 + 5;
+#X obj 200 166 unpack;
+#X obj 340 166 unpack;
+#X obj 480 166 unpack;
+#X obj 23 82 outlet;
+#X obj 189 38 t b b a;
+#X obj 197 382 + 5;
+#X obj 227 452 + 5;
+#X obj 377 452 + 5;
+#X obj 347 382 + 5;
+#X obj 496 382 + 5;
+#X obj 526 452 + 5;
+#X obj 150 216 t p p;
+#X obj 291 216 t p p;
+#X obj 430 216 t p p;
+#X obj 570 216 t p p;
+#X obj 303 568 outlet;
+#N canvas 118 276 450 300 convert 0;
+#X obj 192 68 inlet;
+#X obj 164 188 outlet;
+#X obj 192 108 - 5;
+#X obj 192 128 * 0.01;
+#X obj 192 88 + 2;
+#X obj 242 68 inlet;
+#X obj 242 108 - 5;
+#X obj 242 128 * 0.01;
+#X obj 242 88 + 2;
+#X obj 164 158 pack f f f;
+#X obj 99 121 r \$0-dump;
+#X obj 282 68 r \$0-size;
+#X obj 282 88 inv;
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 9 1;
+#X connect 4 0 2 0;
+#X connect 5 0 8 0;
+#X connect 6 0 7 0;
+#X connect 7 0 9 2;
+#X connect 8 0 6 0;
+#X connect 9 0 1 0;
+#X connect 10 0 9 0;
+#X connect 11 0 12 0;
+#X connect 12 0 7 1;
+#X connect 12 0 3 1;
+#X restore 497 502 pd convert;
+#N canvas 118 276 450 300 convert 0;
+#X obj 192 68 inlet;
+#X obj 164 188 outlet;
+#X obj 192 108 - 5;
+#X obj 192 128 * 0.01;
+#X obj 192 88 + 2;
+#X obj 242 68 inlet;
+#X obj 242 108 - 5;
+#X obj 242 128 * 0.01;
+#X obj 242 88 + 2;
+#X obj 99 121 r \$0-dump;
+#X obj 164 158 pack f f f;
+#X obj 282 68 r \$0-size;
+#X obj 282 88 inv;
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 10 1;
+#X connect 4 0 2 0;
+#X connect 5 0 8 0;
+#X connect 6 0 7 0;
+#X connect 7 0 10 2;
+#X connect 8 0 6 0;
+#X connect 9 0 10 0;
+#X connect 10 0 1 0;
+#X connect 11 0 12 0;
+#X connect 12 0 7 1;
+#X connect 12 0 3 1;
+#X restore 347 502 pd convert;
+#N canvas 118 276 450 300 convert 0;
+#X obj 192 68 inlet;
+#X obj 164 188 outlet;
+#X obj 192 108 - 5;
+#X obj 192 128 * 0.01;
+#X obj 192 88 + 2;
+#X obj 242 68 inlet;
+#X obj 242 108 - 5;
+#X obj 242 128 * 0.01;
+#X obj 242 88 + 2;
+#X obj 164 158 pack f f f;
+#X obj 99 121 r \$0-dump;
+#X obj 282 68 r \$0-size;
+#X obj 282 88 inv;
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 9 1;
+#X connect 4 0 2 0;
+#X connect 5 0 8 0;
+#X connect 6 0 7 0;
+#X connect 7 0 9 2;
+#X connect 8 0 6 0;
+#X connect 9 0 1 0;
+#X connect 10 0 9 0;
+#X connect 11 0 12 0;
+#X connect 12 0 7 1;
+#X connect 12 0 3 1;
+#X restore 197 502 pd convert;
+#N canvas 118 276 450 300 convert 0;
+#X obj 192 68 inlet;
+#X obj 164 188 outlet;
+#X obj 192 108 - 5;
+#X obj 192 128 * 0.01;
+#X obj 192 88 + 2;
+#X obj 242 68 inlet;
+#X obj 242 108 - 5;
+#X obj 242 128 * 0.01;
+#X obj 242 88 + 2;
+#X obj 164 158 pack f f f;
+#X obj 99 121 r \$0-dump;
+#X obj 282 68 r \$0-size;
+#X obj 282 88 inv;
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 9 1;
+#X connect 4 0 2 0;
+#X connect 5 0 8 0;
+#X connect 6 0 7 0;
+#X connect 7 0 9 2;
+#X connect 8 0 6 0;
+#X connect 9 0 1 0;
+#X connect 10 0 9 0;
+#X connect 11 0 12 0;
+#X connect 12 0 7 1;
+#X connect 12 0 3 1;
+#X restore 47 502 pd convert;
+#X obj 233 186 * 100;
+#X obj 93 186 * 100;
+#X obj 373 186 * 100;
+#X obj 513 186 * 100;
+#X obj 513 206 - 2;
+#X obj 373 206 - 2;
+#X obj 233 206 - 2;
+#X obj 93 206 - 2;
+#X obj 60 206 - 2;
+#X obj 200 206 - 2;
+#X obj 340 206 - 2;
+#X obj 480 206 - 2;
+#X obj 480 186 * 100;
+#X obj 340 186 * 100;
+#X obj 200 186 * 100;
+#X obj 60 186 * 100;
+#X obj 491 61 r \$0-size;
+#X msg 47 522 list p0 \$2 \$3;
+#X msg 197 522 list p1 \$2 \$3;
+#X msg 347 522 list p2 \$2 \$3;
+#X msg 497 522 list p3 \$2 \$3;
+#X connect 0 0 2 0;
+#X connect 0 1 37 0;
+#X connect 0 2 38 0;
+#X connect 0 3 39 0;
+#X connect 1 0 41 0;
+#X connect 2 0 72 0;
+#X connect 2 1 58 0;
+#X connect 3 0 4 0;
+#X connect 3 0 13 0;
+#X connect 4 0 48 0;
+#X connect 4 1 49 0;
+#X connect 4 2 50 0;
+#X connect 4 3 51 0;
+#X connect 13 0 19 0;
+#X connect 14 0 35 0;
+#X connect 16 0 36 0;
+#X connect 18 0 14 0;
+#X connect 18 1 15 1;
+#X connect 18 2 16 0;
+#X connect 18 3 17 1;
+#X connect 19 0 18 0;
+#X connect 19 1 20 0;
+#X connect 19 2 21 0;
+#X connect 19 3 22 0;
+#X connect 20 0 23 0;
+#X connect 20 1 24 1;
+#X connect 20 2 25 0;
+#X connect 20 3 26 1;
+#X connect 21 0 27 0;
+#X connect 21 1 28 1;
+#X connect 21 2 29 0;
+#X connect 21 3 30 1;
+#X connect 22 0 31 0;
+#X connect 22 1 32 1;
+#X connect 22 2 33 0;
+#X connect 22 3 34 1;
+#X connect 23 0 42 0;
+#X connect 25 0 43 0;
+#X connect 27 0 45 0;
+#X connect 29 0 44 0;
+#X connect 31 0 46 0;
+#X connect 33 0 47 0;
+#X connect 35 0 15 0;
+#X connect 35 0 56 0;
+#X connect 36 0 17 0;
+#X connect 36 0 56 1;
+#X connect 37 0 71 0;
+#X connect 37 1 57 0;
+#X connect 38 0 70 0;
+#X connect 38 1 59 0;
+#X connect 39 0 69 0;
+#X connect 39 1 60 0;
+#X connect 41 0 40 0;
+#X connect 41 1 13 0;
+#X connect 41 2 0 0;
+#X connect 42 0 24 0;
+#X connect 42 0 55 0;
+#X connect 43 0 26 0;
+#X connect 43 0 55 1;
+#X connect 44 0 30 0;
+#X connect 44 0 54 1;
+#X connect 45 0 28 0;
+#X connect 45 0 54 0;
+#X connect 46 0 32 0;
+#X connect 46 0 53 0;
+#X connect 47 0 34 0;
+#X connect 47 0 53 1;
+#X connect 48 0 6 1;
+#X connect 48 1 5 1;
+#X connect 49 0 8 1;
+#X connect 49 1 7 1;
+#X connect 50 0 12 1;
+#X connect 50 1 9 1;
+#X connect 51 0 11 1;
+#X connect 51 1 10 1;
+#X connect 53 0 77 0;
+#X connect 54 0 76 0;
+#X connect 55 0 75 0;
+#X connect 56 0 74 0;
+#X connect 57 0 63 0;
+#X connect 58 0 64 0;
+#X connect 59 0 62 0;
+#X connect 60 0 61 0;
+#X connect 61 0 11 0;
+#X connect 62 0 12 0;
+#X connect 63 0 8 0;
+#X connect 64 0 6 0;
+#X connect 65 0 5 0;
+#X connect 66 0 7 0;
+#X connect 67 0 9 0;
+#X connect 68 0 10 0;
+#X connect 69 0 68 0;
+#X connect 70 0 67 0;
+#X connect 71 0 66 0;
+#X connect 72 0 65 0;
+#X connect 73 0 60 1;
+#X connect 73 0 69 1;
+#X connect 73 0 59 1;
+#X connect 73 0 70 1;
+#X connect 73 0 57 1;
+#X connect 73 0 71 1;
+#X connect 73 0 58 1;
+#X connect 73 0 72 1;
+#X connect 74 0 52 0;
+#X connect 75 0 52 0;
+#X connect 76 0 52 0;
+#X connect 77 0 52 0;
+#X restore 75 342 pd point-befehle;
+#X obj 240 32 t b b b;
+#X msg 115 312 p0 0 0 \, p1 0.2 0.4 \, p2 0.8 0.6 \, p3 1 1;
+#X obj 168 362 outlet;
+#X obj 20 72 route size float canvas dump;
+#X obj 143 132 s \$0-dump;
+#X obj 143 112 0;
+#X obj 220 152 110;
+#N canvas 0 0 450 300 size-init 0;
+#X obj 154 93 inlet;
+#X obj 154 133 sel 0;
+#X obj 154 113 \$1;
+#X obj 154 153 100;
+#X obj 154 183 s \$0-size;
+#X connect 0 0 2 0;
+#X connect 1 0 3 0;
+#X connect 1 1 4 0;
+#X connect 2 0 1 0;
+#X connect 3 0 4 0;
+#X restore 259 72 pd size-init;
+#N canvas 0 0 450 300 create-init 0;
+#X obj 129 118 pointer;
+#X obj 129 78 symbol \$0-bezier-a;
+#X obj 129 198 s \$0-arrpoint;
+#X obj 129 178 append \$0-bez-array x y;
+#X msg 129 158 0 0;
+#X msg 129 98 traverse \$1 \, bang;
+#X obj 129 138 t b p;
+#X obj 129 58 inlet;
+#X connect 0 0 6 0;
+#X connect 1 0 5 0;
+#X connect 3 0 2 0;
+#X connect 4 0 3 0;
+#X connect 5 0 0 0;
+#X connect 6 0 4 0;
+#X connect 6 1 3 2;
+#X connect 7 0 1 0;
+#X restore 279 52 pd create-init;
+#X text 258 111 canvas init;
+#X obj 230 112 \$2;
+#X obj 220 202 t f f;
+#X obj 220 222 pack;
+#X obj 220 182 route float list;
+#X msg 260 252 donecanvasdialog 1 -1 2 -20 120 120 -20 \$1 \$2 0 0
+;
+#X connect 0 0 14 0;
+#X connect 2 0 17 0;
+#X connect 2 1 25 0;
+#X connect 4 0 5 0;
+#X connect 7 0 11 0;
+#X connect 7 0 21 0;
+#X connect 8 0 6 0;
+#X connect 10 0 5 1;
+#X connect 10 1 13 0;
+#X connect 11 0 12 0;
+#X connect 11 1 18 0;
+#X connect 11 2 19 0;
+#X connect 12 0 10 0;
+#X connect 14 0 9 0;
+#X connect 14 1 8 0;
+#X connect 14 2 24 0;
+#X connect 14 3 16 0;
+#X connect 14 4 10 0;
+#X connect 16 0 15 0;
+#X connect 17 0 24 0;
+#X connect 21 0 2 0;
+#X connect 22 0 23 0;
+#X connect 22 1 23 1;
+#X connect 23 0 25 0;
+#X connect 24 0 22 0;
+#X connect 24 1 25 0;
+#X connect 25 0 1 0;
+#X restore 217 30 pd inside;
+#X obj 287 10 namecanvas \$0-bezier-a;
+#X obj 217 50 outlet;
+#X obj 268 50 outlet;
+#X connect 2 0 3 0;
+#X connect 3 0 5 0;
+#X connect 3 1 6 0;
+#X coords -20 120 120 -20 100 100 2 0 0;
+#X restore 115 156 pd bezier-a;
+#X text 415 67 o resultado ainda nao funciona bem;
+#X connect 1 0 30 0;
+#X connect 2 0 30 0;
+#X connect 4 0 30 0;
+#X connect 7 0 1 0;
+#X connect 10 0 30 0;
+#X connect 11 0 10 0;
+#X connect 15 0 30 0;
+#X connect 17 0 30 0;
+#X connect 18 0 17 0;
+#X connect 19 0 30 0;
+#X connect 21 0 7 0;
+#X connect 22 0 21 0;
+#X connect 25 0 30 0;
+#X connect 26 0 25 0;
+#X connect 27 0 26 0;
+#X connect 28 0 29 0;
+#X connect 29 0 26 0;
+#X connect 29 1 26 1;
+#X connect 30 0 0 0;
+#X connect 30 0 8 0;
+#X connect 30 1 5 0;