To randomly generate pairs of colors which guarantee that text in Color A will be readable against background of Color B... hmmm. Since Rev allows colors to be specified as RGB, i.e. a trio of integers in the range 0 to 255, it seems to me that something like this might be suitable:
function ColorPair put random (256) - 1 into RGB_1_1 put random (256) - 1 into RGB_1_2 put random (256) - 1 into RGB_1_3 put 50 into ColorMargin # if 50 isn't enough of a margin, change it to something else put random (256 - ColorMargin) - 1 into RGB_2_1 if RGB_2_1 > (RGB_1_1 - ColorMargin) then add 2*ColorMargin to RGB_2_1 put random (256 - ColorMargin) - 1 into RGB_2_2 if RGB_2_2 > (RGB_1_2 - ColorMargin) then add 2*ColorMargin to RGB_2_2 put random (256 - ColorMargin) - 1 into RGB_2_3 if RGB_2_3 > (RGB_1_3 - ColorMargin) then add 2*ColorMargin to RGB_2_3 return RGB_1_1,RGB_1_2,RGB_1_3,RGB_2_1,RGB_2_2,RGB_2_3 end ColorPair Alternately, perhaps you could use 0-127 for the RGB_1_x values, and 128 -255 for the RGB_2_x values? Hope this helps... _______________________________________________ use-revolution mailing list [EMAIL PROTECTED] http://lists.runrev.com/mailman/listinfo/use-revolution
