[PD] composing a color message

[chris clepper]

I think you might want to check out the [pack] object.  Feed the three 
numbers into [pack 0 0 0] and the output of that into a 'color $1 $2 
$3' message and it will change the color of the background whenever the 
left inlet of the [pack] gets a bang.  I use a [t b] and attach the 
rest of them numbers to that and feed it into the [pack], that way each 
number will trigger the [pack] to spit out the list.  I really should 
write an [autopack] object that updates whenever any inlet receives a 
message.

cgc


On Jun 20, 2004, at 9:41 AM, andreithomaz wrote:

> hello list,
>
> I am trying to animate the color of GemWin. But I have a problem: I 
> tried the color and colorRGB objects and GemWin doesn't accept them; 
> it is possible to use "color R G B" messages only. So, my problem is 
> in composing the message using variable values for R, G and B (it 
> would be easy if I could use some color object). It is a very basic 
> question, I know, but I haven't found very much documentation about 
> the logic of Pure Data (I work well with programming languages like C, 
> but I still don't know how to make a lot of things in patches...).
>
> I am sending the patch. If somebody could take a look at it, i would 
> thank you a lot.
>
> bye,
> andrei
>
> -- 
> RGB Design Digital
> www.rgbdesigndigital.com.br
>
>
>
> #N canvas 184 100 628 493 10;
> #X obj 37 294 gemwin;
> #X msg 53 37 create;
> #X msg 101 74 destroy;
> #X msg 138 102 1;
> #X msg 137 126 0;
> #X msg 101 74 destroy;
> #X msg 132 219 color 0 0 1;
> #X msg 127 248 color 1 0 0;
> #X msg 341 108 0;
> #X floatatom 222 262 5 0 0 0 - - -;
> #X floatatom 269 262 5 0 0 0 - - -;
> #X floatatom 312 261 5 0 0 0 - - -;
> #X obj 244 344 print \$1;
> #X obj 314 195 - 1;
> #X obj 297 235 * -1;
> #X obj 247 154 / 100;
> #X msg 218 296 color \$1 \$2 \$3;
> #X obj 200 110 counter 3 100 0;
> #X obj 293 62 metro 250;
> #X msg 292 21 1;
> #X msg 328 24 0;
> #X text 362 262 for debug;
> #X text 354 197 inverts the value. so \, the B value is the inverse
> of the R value;
> #X connect 1 0 0 0;
> #X connect 2 0 0 0;
> #X connect 3 0 0 0;
> #X connect 4 0 0 0;
> #X connect 5 0 0 0;
> #X connect 6 0 0 0;
> #X connect 7 0 0 0;
> #X connect 8 0 10 0;
> #X connect 9 0 16 0;
> #X connect 10 0 16 0;
> #X connect 11 0 16 0;
> #X connect 13 0 14 0;
> #X connect 14 0 11 0;
> #X connect 15 0 9 0;
> #X connect 15 0 13 0;
> #X connect 16 0 0 0;
> #X connect 16 0 12 0;
> #X connect 17 0 15 0;
> #X connect 18 0 17 0;
> #X connect 18 0 8 0;
> #X connect 19 0 18 0;
> #X connect 20 0 18 0;