From f25e8113b2b800754cc5bf5b6680d4638d422810 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Jo=C3=A3o=20Pais?= Date: Wed, 1 Dec 2010 19:38:48 +0000 Subject: svn path=/trunk/abstractions/jmmmp/; revision=14546 --- bezier-help.pd | 818 +++++++++------------------------------------------------ 1 file changed, 126 insertions(+), 692 deletions(-) (limited to 'bezier-help.pd') diff --git a/bezier-help.pd b/bezier-help.pd index 76157d7..cc6f5c3 100644 --- a/bezier-help.pd +++ b/bezier-help.pd @@ -1,692 +1,126 @@ -#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; +#N struct bez-array float x float y array bez-c-arr 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. float rpx float rpy float rpx. float rpy.; +#N struct bez-c float x float y; +#N canvas 280 17 921 908 10; +#X floatatom 415 741 5 0 0 0 - - -; +#X obj 418 727 hsl 50 10 0 1 0 0 empty empty empty -2 -8 0 10 -228856 +-1 -1 4900 0; +#X floatatom 135 195 5 0 0 0 - - -; +#X msg 125 134 canvas \$1; +#X floatatom 135 114 5 0 0 0 - - -; +#X obj 415 707 line; +#X msg 415 687 0 \, 1 3000; +#X obj 135 504 pack; +#X obj 145 484 t b f; +#X obj 125 820 unpack; +#X msg 228 820 p0 0.142857 0.244898 \, p1 0.34 0.88 \, p2 0.9 0.4 \, +p3 0.85 0.73; +#X text 543 84 Arguments; +#X obj 148 457 hsl 50 10 0 1 0 0 empty empty X -16 6 0 12 -228856 -1 +-1 700 1; +#X obj 148 471 hsl 50 10 0 1 0 0 empty empty Y -16 6 0 12 -228856 -1 +-1 1200 1; +#X obj 128 840 hsl 50 10 0 1 0 0 empty empty X -16 6 0 12 -228856 -1 +-1 4165 1; +#X obj 128 854 hsl 50 10 0 1 0 0 empty empty Y -16 6 0 12 -228856 -1 +-1 3577 1; +#X text 135 297 default values; +#X text 135 337 also first and last points can take any value; +#X text 222 154 Two values define x and y coordinates; +#X text 131 265 p[0-3] \$1 \$2 - Control one handle point's coordinates +between 0 and 1 Send either a message with all points...; +#X text 115 80 canvas \$1 [\$2] - Change canvas size. One value creates +a square ...; +#X text 172 194 size \$1 - Define array size (minimum 2 points); +#X text 240 789 Dump outlet: connect to a message box \, which you +can later copy-paste.; +#X text 105 869 Output: list with scaled x and y values; +#X text 545 163 If no arguments are given \, the default values are +110 100 100 When no y argument is present \, a square with dimensions +of x is created.; +#X text 542 385 But \, even with the points outside of the box \, the +calculations will still work. You only loose mouse control of the graphic +handles.; +#X obj 135 564 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 +1; +#X obj 125 697 bezier; +#X text 165 624 dump - Dump the coordinates of the control points through +the right outlet. Connect the outlet to a message box \, and it will +get formatted.; +#X text 541 465 Released under the BSD License; +#X text 541 445 (C) 2010 Joăo Pais - jmmmpais@googlemail.com; +#X text 20 84 Object size:; +#X text 20 194 Array size:; +#X text 20 264 Control points:; +#X text 20 564 Readpoint:; +#X text 20 624 Dump parameters:; +#X text 546 102 - Array size; +#X text 546 122 - Canvas size x (+ y); +#X text 546 142 - Canvas size y; +#X text 543 214 Inlets; +#X text 543 254 Outlets; +#X text 546 272 - float pair with x / y values; +#X text 546 292 - control point dump; +#X text 21 9 [bezier] - Transfer function with one cubic bézier curve +; +#X text 153 554 readpoint \$1 - Turn readpoint (red) display on or +off. Readpoint shows the curent place in the buffer.; +#X text 543 536 READPOINT NAO FUNCIONA COM VARIOS OBJECTOS \, ENVIA +PARA BEZIER CRIADO PRIMEIRO \; TIRAR TODOS OS SENDS \, OU FAZER UM +LOCAL SEND; +#X text 22 29 Create a transfer function between 0 and 1 \, using the +four control points of a cubic bézier curve.; +#X text 546 232 - floats [0 to 1] / commands (with parameters); +#X text 542 326 BUG ALERT: if the control points get out of the GOP +box \, these won't react when you click on them. You'll have to right-click +\, open \, and then inside the abstraction place the points again inside +the red boundaries. Or send pX coordinates.; +#X text 20 64 CONTROL OPTIONS; +#X text 70 694 INPUT; +#X text 70 814 OUTPUT; +#X obj 415 761 s \$0-input; +#X obj 135 677 r \$0-input; +#X text 320 667 Send your input values between 0 and 1 here:; +#X msg 125 317 p0 0 0 \, p1 0.1 0.6 \, p2 0.9 0.4 \, p3 1 1; +#X msg 125 357 p0 0.25 0.34 \, p1 0.34 0.88 \, p2 0.9 0.4 \, p3 0.85 +0.73; +#X msg 125 417 p0 0 0 \, p1 0.34 1.3 \, p2 1.4 0.4 \, p3 1 1; +#X msg 125 524 p0 \$1 \$2; +#X text 144 436 Or move the points separately:; +#X msg 125 214 size \$1; +#X msg 125 235 size 100; +#X msg 125 154 canvas 300 100; +#X text 135 377 values outside the 0-1 boundaries will be outside of +the box - you won't be able to grab the graphic (see bug description) +; +#X msg 125 583 readpoint \$1; +#X msg 125 624 dump; +#X connect 0 0 52 0; +#X connect 1 0 0 0; +#X connect 2 0 60 0; +#X connect 3 0 27 0; +#X connect 4 0 3 0; +#X connect 5 0 1 0; +#X connect 6 0 5 0; +#X connect 7 0 58 0; +#X connect 8 0 7 0; +#X connect 8 1 7 1; +#X connect 9 0 14 0; +#X connect 9 1 15 0; +#X connect 12 0 7 0; +#X connect 13 0 8 0; +#X connect 26 0 64 0; +#X connect 27 0 9 0; +#X connect 27 1 10 0; +#X connect 53 0 27 0; +#X connect 55 0 27 0; +#X connect 56 0 27 0; +#X connect 57 0 27 0; +#X connect 58 0 27 0; +#X connect 60 0 27 0; +#X connect 61 0 27 0; +#X connect 62 0 27 0; +#X connect 64 0 27 0; +#X connect 65 0 27 0; -- cgit v1.2.1