X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/0b4be0d5ff71ca539da8e741826d499a5d649004..ba0e12a8401b0da159e17e99fea246b1e3de8378:/termcol.plp diff --git a/termcol.plp b/termcol.plp index 395c208..c564255 100644 --- a/termcol.plp +++ b/termcol.plp @@ -1,85 +1,109 @@ <(common.inc.plp)><: - our $VERSION = 'v1.0'; - use List::Util 'min'; - -:> - - -
- -%s
', "background:$_; color:$css", $minhex
+ for @$sample;
+ return "$out\n";
}
my %col = (
-html => [
+ sprintf('html',
+ 'HTML keywords (inherited by CSSâ¥2.1 and SVG), mostly identical to X11',
+ 'http://www.w3.org/TR/css3-color/#html4',
+ ),
qw/black maroon green olive navy purple cyan silver
gray red lime yellow blue fuchsia aqua white/,
qw/reset bold dim italic underline blink fastblink
reverse hidden/,
],
html => [
- qw/000000 CCCCCC/,
qw/000000 800000 008000 808000 000080 800080 008080 C0C0C0
808080 FF0000 00FF00 FFFF00 0000FF FF00FF 00FFFF FFFFFF/,
],
+# -cga => linux console, kde?
cga => [
- qw/000000 CCCCCC/,
qw/000000 AA0000 00AA00 AA5500 0000AA AA00AA 00AAAA AAAAAA
555555 FF5555 55FF55 FFFF55 5555FF FF55FF 55FFFF FFFFFF/,
],
+# -xterm => rxvt except for blues
xterm => [
- qw/000000 CCCCCC/,
qw/000000 CC0000 00CC00 CCCC00 4682B4 CC00CC 00CCCC E5E5E5
4C4C4C FF0000 00FF00 FFFF00 1E90FF FF00FF 00FFFF FFFFFF/,
],
+# -tango => default Gnome theme
tango => [
- qw/000000 CCCCCC/,
qw/2E3436 CC0000 4E9A06 C4A000 3465A4 75507B 06989A D3D7CF
555753 EF2929 8AE234 FCE94F 729FCF AD7FA8 34E2E2 EEEEEC/,
],
+ -xkcd => [
+ sprintf('xkcd',
+ 'human averages in xkcd survey results',
+ 'http://blog.xkcd.com/2010/05/03/color-survey-results/',
+ ),
+ qw/black maroon green olive navy purple teal silver
+ grey red lime yellow blue fuchsia cyan white/,
+ ],
+ xkcd => [
+ qw/000000 650021 15b01a 6e750e 01153e 7e1e9c 029386 c5c9c7
+ 929591 e50000 aaff32 ffff14 0343df ed0dd9 00ffff ffffff/,
+ ],
+ -android => [
+ sprintf('android',
+ 'http://developer.android.com/guide/practices/ui_guidelines/icon_design.html',
+ 'recommended colour palette for Android icons',
+ ),
+ qw/white light medium dark black blue1 blue2 blue3
+ green1 green2 green3 orange1 orange2 orange3 red /,
+ ],
+ android => [
+ qw/FFFFFF BFBFBF 808080 404040 000000 6699FF 3366CC 003399
+ 99CC33 00CC00 669933 FFCC00 FF9900 FF6600 CC0000 /,
+ ],
);
-for my $term (qw/html cga xterm tango/) {
+for my $term (qw/cga xterm tango html xkcd/) {
print '