termcol: parent attribute to inherit common palette order
[sheet.git] / termcol.inc.pl
index ac21a9cca43171da14331063909a37588a5318b4..168894f8a53fe79c9ea8a3847e20a27c31f6bacd 100644 (file)
@@ -2,8 +2,6 @@ use strict;
 use 5.010;
 use Shiar_Sheet::Colour '1.02';
 
-my @msxorder = ( 0,6,12,10,4,13,7,14 , 1,8,2,11,5,9,3,15 );
-
 +{
        html => {
                title => 'HTML keywords (inherited by CSSā‰„2.1 and SVG), mostly identical to X11',
@@ -160,7 +158,7 @@ my @msxorder = ( 0,6,12,10,4,13,7,14 , 1,8,2,11,5,9,3,15 );
                        0.53;0.27;0.93 0.67;0.27;0.93 0.73;0.07;0.57 0.80;0.17;0.57
                        0.47;0.23;0.13 0.53;0.67;0.73 0.80;0.47;0.47 1.00;0.47;0.47
                )],
-               ansiorder => \@msxorder,
+               ansiorder => [ 0,6,12,10,4,13,7,14 , 1,8,2,11,5,9,3,15 ],
        },
        msx2 => {
                name => 'MSX2',
@@ -169,7 +167,7 @@ my @msxorder = ( 0,6,12,10,4,13,7,14 , 1,8,2,11,5,9,3,15 );
                        000 000 161 373 117 237 511 267
                        711 733 661 663 141 625 555 777
                )],
-               ansiorder => \@msxorder,
+               parent => 'msx1',
        },
        arnejmp => {
                href => 'http://androidarts.com/palette/16pal.htm',
@@ -179,7 +177,7 @@ my @msxorder = ( 0,6,12,10,4,13,7,14 , 1,8,2,11,5,9,3,15 );
                        000000 191028 46AF45 A1D685 453E78 7664FE 833129 9EC2E8
                        DC534B E18D79 D6B97B E9D8A1 216C4B D365C8 AFAAB9 F5F4EB
                )],
-               ansiorder => \@msxorder,
+               parent => 'msx1',
        },
        arnegame => {
                href => 'http://androidarts.com/palette/16pal.htm',
@@ -222,6 +220,7 @@ my @msxorder = ( 0,6,12,10,4,13,7,14 , 1,8,2,11,5,9,3,15 );
                                qw( F2EFE7 BAC375 859550 485D48 293941 )
                        ],
                ],
+               parent => 'cpc',
        },
        ansi88 => {
                name => 'rxvt 88 colour extension',