From ee348ccf83f414cbe3943fb8cc6970657b1fa8e9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Jo=C3=A3o=20Pais?= Date: Sat, 12 Apr 2014 08:56:48 +0000 Subject: svn path=/trunk/abstractions/jmmmp/; revision=17292 --- swatch-gui-help.pd | 53 ++-- swatch-gui.pd | 820 ++++++++++++++++++++++++++++------------------------- 2 files changed, 470 insertions(+), 403 deletions(-) diff --git a/swatch-gui-help.pd b/swatch-gui-help.pd index 5d35868..79a695c 100644 --- a/swatch-gui-help.pd +++ b/swatch-gui-help.pd @@ -1,38 +1,43 @@ -#N struct 1181-rgb-sel float x float y float p1x float p1y float p2x +#N struct 1007-ds-show float x float y float colour; +#N struct 1007-rgb-sel float x float y float p1x float p1y float p2x float p2y float p3x float p3y float p4x float p4y float p5x float p5y float p0x float p0y float p0x. float p0y.; -#N canvas 44 109 411 398 10; -#X text 12 367 Released under the BSD License; -#X text 228 230 Inlets; -#X text 227 280 Outlets; -#X text 227 250 - Bang; -#X text 227 300 - "color \$1 \$2 \$3" command; -#X text 227 320 - number with current color; -#X text 11 347 (C) 2010 Joćo Pais - jmmmpais@googlemail.com; +#N canvas 44 109 411 442 10; +#X text 12 407 Released under the BSD License; +#X text 228 250 Inlets; +#X text 227 300 Outlets; +#X text 227 270 - Bang; +#X text 227 320 - "color \$1 \$2 \$3" command; +#X text 227 340 - number with current color; #X obj 13 101 swatch-gui; #X obj 28 284 hsl 128 15 0 127 0 0 empty \$0-slider Label -2 -8 0 10 --3648 -262144 -262144 0 1; +-139073 -22721 -78208 0 1; #X obj 13 246 s \$0-slider; -#X floatatom 127 255 10 0 0 0 - - -; -#X text 21 41 To choose a color \, grab the circle and move it around. -In case the circle disappears \, clicking in the swatch will make it -appear again.; +#X floatatom 149 226 10 0 0 0 - - -; #X msg 13 226 color \$1 \$2 \$3; -#N canvas 504 106 494 344 META 0; +#N canvas 504 106 383 254 META 0; #X text 12 55 AUTHOR Joćo Pais ; #X text 12 95 LICENSE BSD; #X text 12 75 LIBRARY jmmmp; #X text 13 115 WEBSITE http://puredata.info/Members/jmmmp; -#X text 13 6 DESCRIPTION Pick a color using the hue-saturation chart -; #X text 12 36 KEYWORDS color GUI data structures; -#X text 12 135 VERSION 2010; #X text 14 165 INLET_0 - bang; #X text 14 185 OUTLET_0 - "color \$1 \$2 \$3" command; #X text 14 205 OUTLET_1 - number with current color; -#X restore 352 366 pd META; -#X text 23 11 [swatch-gui] - Pick a color for your GUI using the hue-saturation -chart; -#X connect 7 0 12 0; -#X connect 7 1 10 0; -#X connect 12 0 9 0; +#X text 12 135 VERSION 2014; +#X text 14 225 OUTLET_2 - color for data structures; +#X text 13 6 DESCRIPTION Color chooser using the hue-saturation chart +; +#X restore 352 406 pd META; +#X text 227 360 - color for data structures; +#X floatatom 285 226 4 0 0 0 - - -; +#X text 13 11 [swatch-gui] - Pick a color for your GUI using the hue-saturation +chart \, for IEM or data structures colours.; +#X text 11 387 (C) 2014 Joćo Pais - jmmmpais@googlemail.com; +#X text 11 41 To choose a color \, click the circle and drag it around. +In case the circle disappears \, clicking in the swatch will make it +appear again.; +#X connect 6 0 10 0; +#X connect 6 1 9 0; +#X connect 6 2 13 0; +#X connect 10 0 8 0; diff --git a/swatch-gui.pd b/swatch-gui.pd index 30f41cc..d10cd00 100644 --- a/swatch-gui.pd +++ b/swatch-gui.pd @@ -1,379 +1,441 @@ -#N canvas 69 167 450 300 10; -#X obj 150 53 image /home/jmmmp/elektronik/pd-jmp/jmmmp-ext/svn/jmmmp/examples/rgb.ppm -; -#N canvas 580 67 474 761 inside 0; -#N canvas 400 377 705 549 selector-data 0; -#X obj 203 53 route change click; -#X obj 222 83 unpack p f; -#X obj 119 25 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 --1; -#X obj 9 59 t b b; -#X obj 64 130 pointer; -#X msg 64 110 traverse \$1 \, bang; -#X obj 222 333 t p p p p; -#X obj 222 403 list-add; -#X obj 222 363 get \$0-rgb-sel p0x; -#X msg 347 363 -8 0 8; -#X msg 222 383 \$1 \$1 \$1; -#X obj 222 423 set \$0-rgb-sel p1x p2x p3x; -#X obj 256 493 list-add; -#X msg 256 473 \$1 \$1 \$1; -#X obj 256 453 get \$0-rgb-sel p0y; -#X obj 256 513 set \$0-rgb-sel p1y p2y p3y; -#X text 378 104 drawcurve 0 2 -8 0 0 8 8 0 0 -8 -8 0; -#X obj 239 183 t p p p p; -#X obj 273 263 get \$0-rgb-sel p0y; -#X obj 273 303 set \$0-rgb-sel p0y.; -#X obj 256 153 outlet; -#X obj 273 283 + 0; -#X obj 239 223 + 0; -#X obj 352 63 drawpolygon 0 1 0 0 259 0 259 66 0 66 0 0; -#X obj 352 83 drawpolygon 0 2 p0x(0:258) p0y(0:65) p0x. p0y.; -#X obj 352 123 drawcurve 0 2 p1x p2y p2x p3y p3x p2y p2x p1y p1x p2y -; -#X obj 64 90 symbol \$0-swatch; -#X obj 9 9 loadbang; -#X obj 203 7 struct \$0-rgb-sel float x float y float p1x float p1y -float p2x float p2y float p3x float p3y float p4x float p4y float p5x -float p5y float p0x float p0y float p0x. float p0y.; -#X obj 9 160 append \$0-rgb-sel x y; -#X obj 239 203 get \$0-rgb-sel p0x; -#X obj 239 243 set \$0-rgb-sel p0x.; -#X msg 9 140 10 10; -#X obj 482 342 pointer; -#X obj 509 302 set \$0-rgb-sel p0x p0y; -#X obj 222 113 t p p p p; -#X obj 521 322 t p p; -#X msg 496 260 \$1 \$2; -#X obj 482 282 t b l; -#X text 443 213 mecanismo para gravar posicoes; -#X obj 473 239 r \$0-list-speicher; -#X obj 9 29 t b b; -#X connect 0 0 1 0; -#X connect 0 1 1 0; -#X connect 1 0 35 0; -#X connect 2 0 3 0; -#X connect 3 0 32 0; -#X connect 3 1 26 0; -#X connect 4 0 29 2; -#X connect 5 0 4 0; -#X connect 6 0 8 0; -#X connect 6 1 11 3; -#X connect 6 2 14 0; -#X connect 6 3 15 3; -#X connect 7 0 11 0; -#X connect 8 0 10 0; -#X connect 9 0 7 1; -#X connect 9 0 12 1; -#X connect 10 0 7 0; -#X connect 12 0 15 0; -#X connect 13 0 12 0; -#X connect 14 0 13 0; -#X connect 17 0 30 0; -#X connect 17 1 31 1; -#X connect 17 2 18 0; -#X connect 17 3 19 1; -#X connect 18 0 21 0; -#X connect 21 0 19 0; -#X connect 22 0 31 0; -#X connect 26 0 5 0; -#X connect 27 0 41 0; -#X connect 28 0 0 0; -#X connect 29 0 35 0; -#X connect 30 0 22 0; -#X connect 32 0 29 0; -#X connect 33 0 35 0; -#X connect 35 0 6 0; -#X connect 35 1 17 0; -#X connect 35 2 20 0; -#X connect 35 3 36 0; -#X connect 36 0 33 1; -#X connect 36 1 34 2; -#X connect 37 0 38 0; -#X connect 38 0 33 0; -#X connect 38 1 34 0; -#X connect 40 0 38 0; -#X connect 41 0 3 0; -#X connect 41 1 9 0; -#X restore 82 11 pd selector-data; -#X obj 82 31 get \$0-rgb-sel p0x p0y; -#X obj 82 151 tabread \$0-table; -#X obj 101 171 tabread \$0-table; -#X obj 82 51 t f f f; -#X msg 173 567 \$1 \$2 \$3; -#X obj 82 201 pack f f f; -#X obj 121 111 tabread \$0-table; -#N canvas 0 0 450 300 (subpatch) 0; -#X array \$0-table 258 float 1; -#A 0 0 0.0232558 0.0465116 0.0697674 0.0930233 0.116279 0.139535 0.162791 -0.186047 0.209302 0.232558 0.255814 0.27907 0.302326 0.325581 0.348837 -0.372093 0.395349 0.418605 0.44186 0.465116 0.488372 0.511628 0.534884 -0.55814 0.581395 0.604651 0.627907 0.651163 0.674419 0.697674 0.72093 -0.744186 0.767442 0.790698 0.813954 0.837209 0.860465 0.883721 0.906977 -0.930233 0.953488 0.976744 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 -1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 -1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0.976744 -0.953488 0.930233 0.906977 0.883721 0.860465 0.837209 0.813954 0.790698 -0.767442 0.744186 0.72093 0.697674 0.674419 0.651163 0.627907 0.604651 -0.581395 0.55814 0.534884 0.511628 0.488372 0.465116 0.44186 0.418605 -0.395349 0.372093 0.348837 0.325581 0.302326 0.27907 0.255814 0.232558 -0.209302 0.186046 0.162791 0.139535 0.116279 0.0930232 0.0697674 0.0465117 -0.0232558 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 -0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 -0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; -#X coords 0 1 257 0 258 50 1; -#X restore 202 359 graph; -#X text 217 426 43 por cada segmento; -#X text 209 411 0 0 \, 1 43 \, 1 129 \, 0 172 \, 0 258; -#X obj 82 111 + 86; -#X obj 82 131 zexy/wrap 257; -#X obj 121 91 zexy/wrap 257; -#X obj 121 71 + 172; -#X obj 173 647 outlet; -#X obj 233 90 moses 0; -#X obj 233 70 expr $f1-33; -#X obj 272 110 expr 1-$f1/32; -#X obj 173 281 list-mult; -#X msg 224 261 \$1 \$1 \$1; -#X text 360 107 opacidade; -#X obj 173 527 list-mult; -#X msg 224 507 255 255 255; -#X obj 173 547 l2i; -#X obj 224 487 loadbang; -#X obj 173 587 expr ($f1*(-65536)+$f2*(-256)+$f3*(-1))-1; -#X text 206 317 converter entradas rgb e iem; -#X text 362 151 brilho; -#X obj 82 251 demux 0 1; -#X obj 272 130 t b f; -#X obj 233 170 t b f; -#X obj 113 231 0; -#X obj 143 231 1; -#X obj 12 281 unpack f f f; -#X obj 12 311 pack f f 0 1; -#X obj 12 331 list-rot 1; -#X obj 233 150 expr ($f1+1)/32*(-1); -#X obj 12 351 maxlib/scale 0 1 0 1; -#X obj 12 491 pack f f f; -#X obj 46 371 pack f f 0 1; -#X obj 46 391 list-rot 1; -#X obj 46 411 maxlib/scale 0 1 0 1; -#X obj 102 281 t f f f; -#X obj 81 431 pack f f 0 1; -#X obj 81 451 list-rot 1; -#X obj 81 471 maxlib/scale 0 1 0 1; -#X obj 342 34 inlet; -#N canvas 0 0 376 407 license 0; -#X text 8 47 All rights reserved.; -#X text 8 227 The names of its contributors may not be used to endorse -or promote products derived from this software without specific prior -written permission.; -#X text 8 87 Redistribution and use in source and binary forms \, with -or without modification \, are permitted provided that the following -conditions are met:; -#X text 8 127 Redistributions of source code must retain the above -copyright notice \, this list of conditions and the following disclaimer. -; -#X text 8 297 THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND -CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES \, INCLUDING -\, BUT NOT LIMITED TO \, THE IMPLIED WARRANTIES OF MERCHANTABILITY -AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL -THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT \, INDIRECT -\, INCIDENTAL \, SPECIAL \, EXEMPLARY \, OR CONSEQUENTIAL DAMAGES (INCLUDING -\, BUT NOT LIMITED TO \, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES -; -#X text 8 167 Redistributions in binary form must reproduce the above -copyright notice \, this list of conditions and the following disclaimer -in the documentation and/or other materials provided with the distribution. -; -#X text 8 27 jmmmpais@googlemail.com; -#X text 8 7 Copyright 2010 \, Joćo Pais; -#X restore 15 742 pd license; -#X text 14 723 (C) 2010 Joćo Pais - jmmmpais@googlemail.com; -#X obj 143 697 outlet; -#N canvas 874 158 450 429 rgb-speicher 0; -#X obj 281 229 route back front label; -#X obj 350 49 sel 0 1 2; -#X msg 350 89 back; -#X msg 374 129 front; -#X msg 368 169 label; -#X obj 281 189 list prepend; -#X obj 281 209 list trim; -#X obj 260 259 list; -#X obj 303 259 list; -#X obj 346 259 list; -#X obj 350 69 t b b; -#X obj 367 109 t b b; -#X obj 384 149 t b b; -#X obj 350 29 r \$0-lab; -#X obj 21 359 outlet; -#X msg 21 339 color \$1 \$2 \$3; -#X obj 21 179 route back front label; -#X obj 90 59 sel 0 1 2; -#X msg 90 79 back; -#X msg 107 99 front; -#X msg 124 119 label; -#X obj 21 139 list prepend; -#X obj 21 159 list trim; -#X msg 64 239 color \$1; -#X msg 117 199 color \$1; -#X obj 117 219 s \$0-cnv-label; -#X msg 31 199 color \$1; -#X obj 31 219 s \$0-cnv-back; -#X obj 64 259 s \$0-cnv-front; -#X obj 35 289 t b f; -#X obj 77 289 t b f; -#X obj 21 319 pack f f f; -#X obj 90 39 r \$0-lab; -#X obj 21 99 inlet; -#X text 27 12 color Befehl; -#X obj 281 149 inlet; -#X text 232 104 swatch speicher; -#X obj 260 289 s \$0-list-speicher; -#X msg 295 342 134 33; -#X obj 350 356 loadbang; -#X connect 0 0 7 1; -#X connect 0 1 8 1; -#X connect 0 2 9 1; -#X connect 1 0 10 0; -#X connect 1 1 11 0; -#X connect 1 2 12 0; -#X connect 2 0 5 1; -#X connect 3 0 5 1; -#X connect 4 0 5 1; -#X connect 5 0 6 0; -#X connect 6 0 0 0; -#X connect 7 0 37 0; -#X connect 8 0 37 0; -#X connect 9 0 37 0; -#X connect 10 0 2 0; -#X connect 10 1 7 0; -#X connect 11 0 3 0; -#X connect 11 1 8 0; -#X connect 12 0 4 0; -#X connect 12 1 9 0; -#X connect 13 0 1 0; -#X connect 15 0 14 0; -#X connect 16 0 26 0; -#X connect 16 0 31 0; -#X connect 16 1 23 0; -#X connect 16 1 29 0; -#X connect 16 2 24 0; -#X connect 16 2 30 0; -#X connect 17 0 18 0; -#X connect 17 1 19 0; -#X connect 17 2 20 0; -#X connect 18 0 21 1; -#X connect 19 0 21 1; -#X connect 20 0 21 1; -#X connect 21 0 22 0; -#X connect 22 0 16 0; -#X connect 23 0 28 0; -#X connect 24 0 25 0; -#X connect 26 0 27 0; -#X connect 29 0 31 0; -#X connect 29 1 31 1; -#X connect 30 0 31 0; -#X connect 30 1 31 2; -#X connect 31 0 15 0; -#X connect 32 0 17 0; -#X connect 33 0 21 0; -#X connect 35 0 5 0; -#X connect 38 0 7 1; -#X connect 38 0 8 1; -#X connect 38 0 9 1; -#X connect 39 0 38 0; -#X restore 143 677 pd rgb-speicher; -#X obj 193 627 s \$0-cnv; -#X msg 193 607 color \$1; -#X text 242 234 FALTA MECANISMO PARA GRAVAR POSICOES; -#X obj 253 648 pack f f; -#X text 208 204 HA UM ERRO COM A MEMORIA. O VALOR INICIAL Č ENVIADO -PARA CADA LISTA; -#X connect 0 0 1 0; -#X connect 1 0 4 0; -#X connect 1 1 17 0; -#X connect 1 1 55 1; -#X connect 2 0 6 0; -#X connect 3 0 6 1; -#X connect 4 0 11 0; -#X connect 4 1 3 0; -#X connect 4 2 14 0; -#X connect 4 2 55 0; -#X connect 5 0 26 0; -#X connect 6 0 29 0; -#X connect 7 0 6 2; -#X connect 11 0 12 0; -#X connect 12 0 2 0; -#X connect 13 0 7 0; -#X connect 14 0 13 0; -#X connect 16 0 37 0; -#X connect 16 1 18 0; -#X connect 17 0 16 0; -#X connect 18 0 30 0; -#X connect 19 0 22 0; -#X connect 20 0 19 1; -#X connect 22 0 24 0; -#X connect 23 0 22 1; -#X connect 24 0 5 0; -#X connect 25 0 23 0; -#X connect 26 0 15 0; -#X connect 26 0 53 0; -#X connect 26 0 51 0; -#X connect 29 0 34 0; -#X connect 29 1 19 0; -#X connect 30 0 33 0; -#X connect 30 1 20 0; -#X connect 31 0 32 0; -#X connect 31 1 43 0; -#X connect 32 0 29 1; -#X connect 33 0 29 1; -#X connect 34 0 35 0; -#X connect 34 1 40 0; -#X connect 34 2 44 0; -#X connect 35 0 36 0; -#X connect 36 0 38 0; -#X connect 37 0 31 0; -#X connect 38 0 39 0; -#X connect 39 0 22 0; -#X connect 40 0 41 0; -#X connect 41 0 42 0; -#X connect 42 0 39 1; -#X connect 43 0 35 1; -#X connect 43 1 40 1; -#X connect 43 2 44 1; -#X connect 44 0 45 0; -#X connect 45 0 46 0; -#X connect 46 0 39 2; -#X connect 51 0 50 0; -#X connect 53 0 52 0; -#X connect 55 0 51 1; -#X restore 10 211 pd inside; -#X obj 10 231 outlet; -#X obj 10 261 namecanvas \$0-swatch; -#X obj 10 191 inlet; -#X obj 80 92 cnv 34 34 34 empty \$0-cnv empty 20 12 0 14 -1124 -262144 -0; -#X obj 141 91 vradio 12 1 0 3 \$0-lab \$0-lab-i empty 0 -8 0 10 -228856 --1 -1 2; -#X text 156 88 Background; -#X text 156 100 Front; -#X text 156 112 Label; -#X obj 128 92 cnv 10 10 10 empty \$0-cnv-back empty 20 12 0 14 -76865 --262144 0; -#X obj 128 104 cnv 10 10 10 empty \$0-cnv-front empty 20 12 0 14 -261497 --262144 0; -#X obj 128 116 cnv 10 10 10 empty \$0-cnv-label empty 20 12 0 14 -1124 --262144 0; -#X obj 141 201 init 0; -#X obj 61 231 outlet; -#X obj 227 230 getdir; -#X obj 227 210 loadbang; -#X msg 227 250 open \$1/examples/rgb.ppm; -#X connect 1 0 2 0; -#X connect 1 1 14 0; -#X connect 4 0 1 0; -#X connect 13 0 6 0; -#X connect 15 0 17 0; -#X connect 16 0 15 0; -#X connect 17 0 0 0; -#X coords 0 0 279 122 279 122 2 10 10; +#N canvas 302 139 450 314 10; +#X obj 150 53 image E:/jmmmp/elektronik/pd-jmp/jmmmp-ext/svn/jmmmp/examples/rgb.ppm +; +#N canvas 580 67 575 780 inside 0; +#N canvas 187 386 705 549 selector-data 0; +#X obj 203 53 route change click; +#X obj 222 83 unpack p f; +#X obj 119 25 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X obj 9 59 t b b; +#X obj 64 130 pointer; +#X msg 64 110 traverse \$1 \, bang; +#X obj 222 333 t p p p p; +#X obj 222 403 list-add; +#X obj 222 363 get \$0-rgb-sel p0x; +#X msg 347 363 -8 0 8; +#X msg 222 383 \$1 \$1 \$1; +#X obj 222 423 set \$0-rgb-sel p1x p2x p3x; +#X obj 256 493 list-add; +#X msg 256 473 \$1 \$1 \$1; +#X obj 256 453 get \$0-rgb-sel p0y; +#X obj 256 513 set \$0-rgb-sel p1y p2y p3y; +#X text 378 104 drawcurve 0 2 -8 0 0 8 8 0 0 -8 -8 0; +#X obj 239 183 t p p p p; +#X obj 273 263 get \$0-rgb-sel p0y; +#X obj 273 303 set \$0-rgb-sel p0y.; +#X obj 256 153 outlet; +#X obj 273 283 + 0; +#X obj 239 223 + 0; +#X obj 352 63 drawpolygon 0 1 0 0 259 0 259 66 0 66 0 0; +#X obj 352 83 drawpolygon 0 2 p0x(0:258) p0y(0:65) p0x. p0y.; +#X obj 352 123 drawcurve 0 2 p1x p2y p2x p3y p3x p2y p2x p1y p1x p2y +; +#X obj 64 90 symbol \$0-swatch; +#X obj 9 9 loadbang; +#X obj 203 7 struct \$0-rgb-sel float x float y float p1x float p1y +float p2x float p2y float p3x float p3y float p4x float p4y float p5x +float p5y float p0x float p0y float p0x. float p0y.; +#X obj 9 160 append \$0-rgb-sel x y; +#X obj 239 203 get \$0-rgb-sel p0x; +#X obj 239 243 set \$0-rgb-sel p0x.; +#X msg 9 140 10 10; +#X obj 482 342 pointer; +#X obj 509 302 set \$0-rgb-sel p0x p0y; +#X obj 222 113 t p p p p; +#X obj 521 322 t p p; +#X msg 496 260 \$1 \$2; +#X obj 482 282 t b l; +#X text 443 213 mecanismo para gravar posicoes; +#X obj 473 239 r \$0-list-speicher; +#X obj 9 29 t b b; +#X connect 0 0 1 0; +#X connect 0 1 1 0; +#X connect 1 0 35 0; +#X connect 2 0 3 0; +#X connect 3 0 32 0; +#X connect 3 1 26 0; +#X connect 4 0 29 2; +#X connect 5 0 4 0; +#X connect 6 0 8 0; +#X connect 6 1 11 3; +#X connect 6 2 14 0; +#X connect 6 3 15 3; +#X connect 7 0 11 0; +#X connect 8 0 10 0; +#X connect 9 0 7 1; +#X connect 9 0 12 1; +#X connect 10 0 7 0; +#X connect 12 0 15 0; +#X connect 13 0 12 0; +#X connect 14 0 13 0; +#X connect 17 0 30 0; +#X connect 17 1 31 1; +#X connect 17 2 18 0; +#X connect 17 3 19 1; +#X connect 18 0 21 0; +#X connect 21 0 19 0; +#X connect 22 0 31 0; +#X connect 26 0 5 0; +#X connect 27 0 41 0; +#X connect 28 0 0 0; +#X connect 29 0 35 0; +#X connect 30 0 22 0; +#X connect 32 0 29 0; +#X connect 33 0 35 0; +#X connect 35 0 6 0; +#X connect 35 1 17 0; +#X connect 35 2 20 0; +#X connect 35 3 36 0; +#X connect 36 0 33 1; +#X connect 36 1 34 2; +#X connect 37 0 38 0; +#X connect 38 0 33 0; +#X connect 38 1 34 0; +#X connect 40 0 38 0; +#X connect 41 0 3 0; +#X connect 41 1 9 0; +#X restore 92 11 pd selector-data; +#X obj 92 31 get \$0-rgb-sel p0x p0y; +#X obj 92 151 tabread \$0-table; +#X obj 111 171 tabread \$0-table; +#X obj 92 51 t f f f; +#X msg 183 577 \$1 \$2 \$3; +#X obj 92 201 pack f f f; +#X obj 131 111 tabread \$0-table; +#N canvas 0 0 450 300 (subpatch) 0; +#X array \$0-table 258 float 1; +#A 0 0 0.0232558 0.0465116 0.0697674 0.0930233 0.116279 0.139535 0.162791 +0.186047 0.209302 0.232558 0.255814 0.27907 0.302326 0.325581 0.348837 +0.372093 0.395349 0.418605 0.44186 0.465116 0.488372 0.511628 0.534884 +0.55814 0.581395 0.604651 0.627907 0.651163 0.674419 0.697674 0.72093 +0.744186 0.767442 0.790698 0.813954 0.837209 0.860465 0.883721 0.906977 +0.930233 0.953488 0.976744 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 +1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 +1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0.976744 +0.953488 0.930233 0.906977 0.883721 0.860465 0.837209 0.813954 0.790698 +0.767442 0.744186 0.72093 0.697674 0.674419 0.651163 0.627907 0.604651 +0.581395 0.55814 0.534884 0.511628 0.488372 0.465116 0.44186 0.418605 +0.395349 0.372093 0.348837 0.325581 0.302326 0.27907 0.255814 0.232558 +0.209302 0.186046 0.162791 0.139535 0.116279 0.0930232 0.0697674 0.0465117 +0.0232558 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; +#X coords 0 1 257 0 258 50 1; +#X restore 212 359 graph; +#X text 227 426 43 por cada segmento; +#X text 219 411 0 0 \, 1 43 \, 1 129 \, 0 172 \, 0 258; +#X obj 92 111 + 86; +#X obj 92 131 zexy/wrap 257; +#X obj 131 91 zexy/wrap 257; +#X obj 131 71 + 172; +#X obj 183 657 outlet; +#X obj 243 90 moses 0; +#X obj 243 70 expr $f1-33; +#X obj 282 110 expr 1-$f1/32; +#X obj 183 281 list-mult; +#X msg 234 261 \$1 \$1 \$1; +#X text 370 107 opacidade; +#X obj 183 537 list-mult; +#X msg 234 517 255 255 255; +#X obj 183 557 l2i; +#X obj 234 497 loadbang; +#X obj 183 597 expr ($f1*(-65536)+$f2*(-256)+$f3*(-1))-1; +#X text 216 317 converter entradas rgb e iem; +#X text 372 151 brilho; +#X obj 92 251 demux 0 1; +#X obj 282 130 t b f; +#X obj 243 170 t b f; +#X obj 123 231 0; +#X obj 153 231 1; +#X obj 22 281 unpack f f f; +#X obj 22 311 pack f f 0 1; +#X obj 22 331 list-rot 1; +#X obj 243 150 expr ($f1+1)/32*(-1); +#X obj 22 351 maxlib/scale 0 1 0 1; +#X obj 22 491 pack f f f; +#X obj 56 371 pack f f 0 1; +#X obj 56 391 list-rot 1; +#X obj 56 411 maxlib/scale 0 1 0 1; +#X obj 112 281 t f f f; +#X obj 91 431 pack f f 0 1; +#X obj 91 451 list-rot 1; +#X obj 91 471 maxlib/scale 0 1 0 1; +#X obj 352 34 inlet; +#N canvas 0 0 376 407 license 0; +#X text 8 47 All rights reserved.; +#X text 8 227 The names of its contributors may not be used to endorse +or promote products derived from this software without specific prior +written permission.; +#X text 8 87 Redistribution and use in source and binary forms \, with +or without modification \, are permitted provided that the following +conditions are met:; +#X text 8 127 Redistributions of source code must retain the above +copyright notice \, this list of conditions and the following disclaimer. +; +#X text 8 297 THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND +CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES \, INCLUDING +\, BUT NOT LIMITED TO \, THE IMPLIED WARRANTIES OF MERCHANTABILITY +AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL +THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT \, INDIRECT +\, INCIDENTAL \, SPECIAL \, EXEMPLARY \, OR CONSEQUENTIAL DAMAGES (INCLUDING +\, BUT NOT LIMITED TO \, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES +; +#X text 8 167 Redistributions in binary form must reproduce the above +copyright notice \, this list of conditions and the following disclaimer +in the documentation and/or other materials provided with the distribution. +; +#X text 8 27 jmmmpais@googlemail.com; +#X text 8 7 Copyright 2010 \, Joćo Pais; +#X restore 15 752 pd license; +#X obj 163 707 outlet; +#N canvas 874 158 450 429 rgb-speicher 0; +#X obj 281 229 route back front label; +#X obj 350 49 sel 0 1 2; +#X msg 350 89 back; +#X msg 374 129 front; +#X msg 368 169 label; +#X obj 281 189 list prepend; +#X obj 281 209 list trim; +#X obj 260 259 list; +#X obj 303 259 list; +#X obj 346 259 list; +#X obj 350 69 t b b; +#X obj 367 109 t b b; +#X obj 384 149 t b b; +#X obj 350 29 r \$0-lab; +#X obj 21 359 outlet; +#X msg 21 339 color \$1 \$2 \$3; +#X obj 21 179 route back front label; +#X obj 90 59 sel 0 1 2; +#X msg 90 79 back; +#X msg 107 99 front; +#X msg 124 119 label; +#X obj 21 139 list prepend; +#X obj 21 159 list trim; +#X msg 64 239 color \$1; +#X msg 117 199 color \$1; +#X obj 117 219 s \$0-cnv-label; +#X msg 31 199 color \$1; +#X obj 31 219 s \$0-cnv-back; +#X obj 64 259 s \$0-cnv-front; +#X obj 35 289 t b f; +#X obj 77 289 t b f; +#X obj 21 319 pack f f f; +#X obj 90 39 r \$0-lab; +#X obj 21 99 inlet; +#X text 27 12 color Befehl; +#X obj 281 149 inlet; +#X text 232 104 swatch speicher; +#X obj 260 289 s \$0-list-speicher; +#X msg 295 342 134 33; +#X obj 350 356 loadbang; +#X connect 0 0 7 1; +#X connect 0 1 8 1; +#X connect 0 2 9 1; +#X connect 1 0 10 0; +#X connect 1 1 11 0; +#X connect 1 2 12 0; +#X connect 2 0 5 1; +#X connect 3 0 5 1; +#X connect 4 0 5 1; +#X connect 5 0 6 0; +#X connect 6 0 0 0; +#X connect 7 0 37 0; +#X connect 8 0 37 0; +#X connect 9 0 37 0; +#X connect 10 0 2 0; +#X connect 10 1 7 0; +#X connect 11 0 3 0; +#X connect 11 1 8 0; +#X connect 12 0 4 0; +#X connect 12 1 9 0; +#X connect 13 0 1 0; +#X connect 15 0 14 0; +#X connect 16 0 26 0; +#X connect 16 0 31 0; +#X connect 16 1 23 0; +#X connect 16 1 29 0; +#X connect 16 2 24 0; +#X connect 16 2 30 0; +#X connect 17 0 18 0; +#X connect 17 1 19 0; +#X connect 17 2 20 0; +#X connect 18 0 21 1; +#X connect 19 0 21 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 16 0; +#X connect 23 0 28 0; +#X connect 24 0 25 0; +#X connect 26 0 27 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 31 0; +#X connect 30 1 31 2; +#X connect 31 0 15 0; +#X connect 32 0 17 0; +#X connect 33 0 21 0; +#X connect 35 0 5 0; +#X connect 38 0 7 1; +#X connect 38 0 8 1; +#X connect 38 0 9 1; +#X connect 39 0 38 0; +#X restore 163 687 pd rgb-speicher; +#X obj 203 637 s \$0-cnv; +#X msg 203 617 color \$1; +#X text 252 234 FALTA MECANISMO PARA GRAVAR POSICOES; +#X obj 273 658 pack f f; +#X text 218 204 HA UM ERRO COM A MEMORIA. O VALOR INICIAL Č ENVIADO +PARA CADA LISTA; +#X obj 183 517 list; +#X text 14 733 (C) 2014 Joćo Pais - jmmmpais@googlemail.com; +#X obj 53 577 outlet; +#N canvas 671 566 538 359 data-struct-conv 0; +#X obj 54 198 outlet; +#X obj 44 138 pack f f f; +#X msg 137 138 symbol; +#X obj 20 62 t l b; +#X obj 20 82 expr int($f1 * 9) \; int($f2 * 9) \; int($f3 * 9); +#X obj 44 178 zexy/symbol2list; +#X obj 44 158 zexy/list2symbol; +#X text 33 43 data structures format; +#X obj 20 22 inlet; +#X obj 199 91 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X obj 224 111 t b b; +#X obj 279 151 pointer; +#X msg 279 131 traverse \$1 \, bang; +#X obj 279 111 symbol \$0-swatch; +#X obj 224 91 loadbang; +#X obj 224 181 append \$0-ds-show x y; +#X obj 224 21 struct \$0-ds-show float x float y float colour; +#X obj 44 318 set \$0-ds-show colour; +#X msg 91 248 traverse \$1 \, bang; +#X obj 91 228 symbol \$0-swatch; +#X obj 91 268 pointer \$0-ds-show; +#X obj 44 228 t f b; +#X obj 224 51 filledpolygon colour colour 1 0 0 0 35 32 35 32 0; +#X msg 224 161 235 81; +#X msg 143 288 next; +#X connect 1 0 6 0; +#X connect 2 0 6 1; +#X connect 3 0 4 0; +#X connect 3 1 2 0; +#X connect 4 0 1 0; +#X connect 4 1 1 1; +#X connect 4 2 1 2; +#X connect 5 0 0 0; +#X connect 5 0 21 0; +#X connect 6 0 5 0; +#X connect 8 0 3 0; +#X connect 9 0 10 0; +#X connect 10 0 23 0; +#X connect 10 1 13 0; +#X connect 11 0 15 2; +#X connect 12 0 11 0; +#X connect 13 0 12 0; +#X connect 14 0 10 0; +#X connect 18 0 20 0; +#X connect 19 0 18 0; +#X connect 20 0 17 1; +#X connect 20 1 24 0; +#X connect 21 0 17 0; +#X connect 21 1 19 0; +#X connect 23 0 15 0; +#X connect 24 0 20 0; +#X restore 53 557 pd data-struct-conv; +#X connect 0 0 1 0; +#X connect 1 0 4 0; +#X connect 1 1 17 0; +#X connect 1 1 54 1; +#X connect 2 0 6 0; +#X connect 3 0 6 1; +#X connect 4 0 11 0; +#X connect 4 1 3 0; +#X connect 4 2 14 0; +#X connect 4 2 54 0; +#X connect 5 0 26 0; +#X connect 6 0 29 0; +#X connect 7 0 6 2; +#X connect 11 0 12 0; +#X connect 12 0 2 0; +#X connect 13 0 7 0; +#X connect 14 0 13 0; +#X connect 16 0 37 0; +#X connect 16 1 18 0; +#X connect 17 0 16 0; +#X connect 18 0 30 0; +#X connect 19 0 56 0; +#X connect 20 0 19 1; +#X connect 22 0 24 0; +#X connect 23 0 22 1; +#X connect 24 0 5 0; +#X connect 25 0 23 0; +#X connect 26 0 15 0; +#X connect 26 0 52 0; +#X connect 26 0 50 0; +#X connect 29 0 34 0; +#X connect 29 1 19 0; +#X connect 30 0 33 0; +#X connect 30 1 20 0; +#X connect 31 0 32 0; +#X connect 31 1 43 0; +#X connect 32 0 29 1; +#X connect 33 0 29 1; +#X connect 34 0 35 0; +#X connect 34 1 40 0; +#X connect 34 2 44 0; +#X connect 35 0 36 0; +#X connect 36 0 38 0; +#X connect 37 0 31 0; +#X connect 38 0 39 0; +#X connect 39 0 56 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 39 1; +#X connect 43 0 35 1; +#X connect 43 1 40 1; +#X connect 43 2 44 1; +#X connect 44 0 45 0; +#X connect 45 0 46 0; +#X connect 46 0 39 2; +#X connect 50 0 49 0; +#X connect 52 0 51 0; +#X connect 54 0 50 1; +#X connect 56 0 22 0; +#X connect 56 0 59 0; +#X connect 59 0 58 0; +#X restore 10 211 pd inside; +#X obj 35 251 outlet; +#X obj 10 291 namecanvas \$0-swatch; +#X obj 10 191 inlet; +#X obj 21 92 cnv 34 34 34 empty \$0-cnv empty 20 12 0 14 -8254 -262144 +0; +#X obj 82 91 vradio 12 1 0 3 \$0-lab \$0-lab-i empty 0 -8 0 10 -228856 +-1 -1 0; +#X text 97 88 Background; +#X text 97 100 Front; +#X text 97 112 Label; +#X obj 69 92 cnv 10 10 10 empty \$0-cnv-back empty 20 12 0 14 -8254 +-262144 0; +#X obj 69 104 cnv 10 10 10 empty \$0-cnv-front empty 20 12 0 14 -65217 +-262144 0; +#X obj 69 116 cnv 10 10 10 empty \$0-cnv-label empty 20 12 0 14 -260110 +-262144 0; +#X obj 141 201 init 0; +#X obj 61 231 outlet; +#X obj 227 230 getdir; +#X obj 227 210 loadbang; +#X msg 227 250 open \$1/examples/rgb.ppm; +#X obj 81 261 outlet; +#X text 163 112 Data structs:; +#X connect 1 0 18 0; +#X connect 1 1 2 0; +#X connect 1 2 14 0; +#X connect 4 0 1 0; +#X connect 13 0 6 0; +#X connect 15 0 17 0; +#X connect 16 0 15 0; +#X connect 17 0 0 0; +#X coords 0 0 279 122 279 122 2 10 10; -- cgit v1.2.1