Toxiclibs Color Theme

# ColorTheme demo showing the following:
# - construction of TColor themes via textual descriptions of shades and Colors
# - adding an rand element to the theme
#
# Press SPACE to toggle rendering mode, any other key will re-generate a
# random variation of the color theme
#
# @author Karsten Schmidt <info at postspectacular dot com>
# Copyright (c) 2009 Karsten Schmidt
#
# This demo & library is free software you can redistribute it and/or
# modify it under the terms of the GNU Lesser General Public
# License as published by the Free Software Foundation either
# version 2.1 of the License, or (at your option) any later version.
#
# http://creativecommons.org/licenses/LGPL/2.1/
#
# This library is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
# Lesser General Public License for more details.
#
# You should have received a copy of the GNU Lesser General Public
# License along with this library if not, write to the Free Software
# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

require 'toxiclibs'
include_package 'toxi.color'
include_package 'toxi.util.datatypes'

SWATCH_HEIGHT = 40.0
SWATCH_WIDTH = 5.0
SWATCH_GAP = 1

MAX_SIZE = 150.0
NUM_DISCS = 300
attr_reader :show_discs

def settings
  size(1024, 768)
  # smooth
end

def setup
  sketch_title 'Color Theme'
  @show_discs = true
  noise_detail(2)
  no_loop
end

def draw
  # first define our new theme
  t = ColorTheme.new('test')
  # add different color options, each with their own weight
  t.add_range('soft ivory', 0.5)
  t.add_range('intense goldenrod', 0.25)
  t.add_range('warm saddlebrown', 0.15)
  t.add_range('fresh teal', 0.05)
  t.add_range('bright yellowgreen', 0.05)
  # now add another rand hue which is using only bright shades
  t.add_range(ColorRange::BRIGHT, TColor.new_random, rand(0.02..0.05))
  # use the TColor theme to create a list of 160 Colors
  list = t.get_colors(160)
  if show_discs
    background(list.get_lightest.toARGB)
    discs(list)
  else
    background(0)
    yoff = 32
    list.sort_by_distance(false)
    swatches(list, 32, yoff)
    yoff += SWATCH_HEIGHT + 10
    list.sort_by_criteria(AccessCriteria::LUMINANCE, false)
    swatches(list, 32, yoff)
    yoff += SWATCH_HEIGHT + 10
    list.sort_by_criteria(AccessCriteria::BRIGHTNESS, false)
    swatches(list, 32, yoff)
    yoff += SWATCH_HEIGHT + 10
    list.sort_by_criteria(AccessCriteria::SATURATION, false)
    swatches(list, 32, yoff)
    yoff += SWATCH_HEIGHT + 10
    list.sort_by_criteria(AccessCriteria::HUE, false)
    swatches(list, 32, yoff)
    yoff += SWATCH_HEIGHT + 10
    list.sort_by_proximity_to(NamedColor::WHITE, RGBDistanceProxy.new, false)
    swatches(list, 32, yoff)
  end
  # save_frame(format('theme-%s%s', timestamp, '_##.png'))
end

def timestamp
  Time.now.strftime('%Y%d%m_%H%M%S')
end

def key_pressed
  @show_discs = !show_discs if key == ' '
  redraw
end

def swatches(sorted, x, y)
  no_stroke
  colors = sorted.toARGBArray.to_a
  colors.each do |c|
    fill(c)
    rect(x, y, SWATCH_WIDTH, SWATCH_HEIGHT)
    x += SWATCH_WIDTH + SWATCH_GAP
  end
end

def discs(list)
  no_stroke
  colors = list.toARGBArray.to_a
  colors.shuffle.each do |c|
    fill(c, rand(125.0..255)) # random transparency
    r = rand(MAX_SIZE)
    ellipse(rand(width), rand(height), r, r)
  end
end