git.shiar.nl
/
sheet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
8b8c77d
)
termcol: 256-colour tables (like 88)
author
Mischa POSLAWSKY
<perl@shiar.org>
Tue, 13 Oct 2009 19:20:49 +0000
(19:20 +0000)
committer
Mischa POSLAWSKY
<perl@shiar.org>
Tue, 13 Oct 2009 22:38:42 +0000
(22:38 +0000)
termcol.plp
patch
|
blob
|
history
diff --git
a/termcol.plp
b/termcol.plp
index 446b9c55d1866f04395c65a2b2b8a853849a1b70..c7c74bfb754f3811edd29e7a44b98aa7d6e10930 100644
(file)
--- a/
termcol.plp
+++ b/
termcol.plp
@@
-109,3
+109,24
@@
print "</table>\n\n";
:></li>
</ul>
:></li>
</ul>
+<hr>
+<h2>256-colour space</h2><ul>
+<:
+for my $r (0 .. 5) {
+ print '<li><table>';
+ for my $g (0 .. 5) {
+ print '<tr>';
+ for my $b (0 .. 5) {
+ print colcell($r*6*6 + $g*6 + $b + 16, map { $_ && $_*40 + 55 } $r, $g, $b);
+ }
+ }
+ print "</table>\n";
+}
+print "\n";
+
+print '<li><table><tr>', (map { colcell(232+$_, ($_*10 + 8) x 3) } $_ .. $_+11), "</table>\n"
+ for 0, 12;
+print "\n";
+:></li>
+</ul>
+