Although I support the notion that you have to give code to get code, I've always wanted to be a patron of the arts.

#!/usr/bin/perl
use strict;
use warnings;

my @backgrounds  = qw/aqua barnred butter cream gold grey ivory lavend
+er mint mushroom parchment pink sage skyblue tan/;
my @accents      = qw/aqua barnred black burgundy butter chocolate cre
+am gold grey ivory lavender mint mushroom parchment pink sage skyblue
+ tan terracotta turqouise violet/;
my @focuses      = qw/black burgundy chocolate terracotta turquoise vi
+olet/;

for my $background (@backgrounds)  {
   for my $accent (@accents) {
      for my $focus (@focuses)  {
      print "$background $accent $focus\n" unless $accent eq $focus;
      }
   }
}
[download]

I'll spare my fellow monks the 41k of output, but Bard Judith could have gotten it from my Scratch Pad for a limited time.