Complementary RGB Color Pairs

[Luis]

Just spotted this on the net, reminded me of this thread:

http://www.colorjack.com/sphere/

Cheers,

Luis.


Stephen Barncard wrote:
> Thanks to all who responded.
> I was turned onto a lot of information about color.
> 
> I guess the upshot is that a simple compliment - literally - will do 
> what I wanted - subtracting 255 from each part of the color array. This 
> is what I came up with:
> 
> FUNCTION complimentColor pTrio
>          REPEAT for each item tITEM in pTrio
>                   put abs(tITEM - 255) & comma after tOut
>          END REPEAT
>          delete last char of tOut
>          return tOut
> END complimentColor
> 
> 
> Obviously there are many color reference systems out there that can 
> provide great color combinations... especially the one at
> 
> http://wellstyled.com/tools/colorscheme2/index-en.html
> 
> 
> 
> 
> 
> 
> 
> 
>>
>> For those who do not want to bother to download a big stack just for 
>> the matter of a few script lines
>> here is the script of btn "complementary colors" that at least gives 
>> you a hint how to proceed to find out
>> complementary color triplets:
>>
>> "on mouseUp
>>  set the cursor to watch
>>  put the milliseconds into Start
>>  put the imageData of image 2 into iData
>>  put 0 into counter
>>  repeat for each char C in idata
>>    add 1 to counter
>>    put numtochar(255 - chartonum(C)) into char counter of idata
>>  end repeat
>>  set the imageData of image 2 to iData
>>  put the milliseconds - Start into fld "test"
>> end mouseUp"
>>
>> Regards,
>>
>> Wilhelm Sanke
>