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

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 <jmmmpais@googlemail.com>;

 #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;