X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/2731d4a4ad07e1ed10b7b36d70f6abe64af6664d..ddd5f9146c58ba38f16d2e525273b83076c4f93a:/termcol.plp diff --git a/termcol.plp b/termcol.plp index 96f9b75..4b9f3e4 100644 --- a/termcol.plp +++ b/termcol.plp @@ -18,7 +18,7 @@ Html({
<: -use Shiar_Sheet::Colour; +use Shiar_Sheet::Colour '1.01'; sub colcell { my $name = shift; @@ -105,6 +105,28 @@ my %col = ( qw/000000 9C1D1D 6C9446 AC9A47 335786 8F6496 486768 E0DCDC 2F2F2F CD5757 8FC35B D1C45E 5C81A9 BC95B7 76CBCB EEEEEC /, ], + mac2 => [ + 'MacII', + qw/FFFFFF FBF305 FF6403 DD0907 F20884 4700A5 0000D3 02ABEA + 1FB714 006412 562C05 90713A C0C0C0 808080 404040 000000 /, + ], + risc => [ + 'RISC', # v2/3 + qw/FFFFFF DDDDDD BBBBBB 999999 777777 555555 333333 000000 + 004499 EEEE00 00CC00 DD0000 EEEEBB 558800 FFBB00 00BBFF /, + ], + c64 => [ + 'C=64', # commodore 64/128 + map { Shiar_Sheet::Colour->newyuv($_)->rgb48 } + qw/008080 FF8080 4F4FF5 9FB00A 5FDADA 7F2525 3FFF80 BF0080 + 5F25DA 3F0AB0 7F4FF5 4F8080 778080 BF2525 77FF80 9F8080 / + ], + msx => [ + 'MSX', + map { Shiar_Sheet::Colour->newyuv($_)->rgb48 } + qw/008080 008080 873F1F AA4F37 66FF6F 87EE76 7757D6 BAB70E + 874FEE AA4FEE BA1F98 CC3798 77462E 87B0BE CC8080 FF8080 /, + ], ); for my $term (qw/cga xterm tango app html xkcd/) {