From 07d8d05b9543279bab3e3f351d982609b7d88f85 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Mon, 26 Oct 2015 13:19:29 +0100
Subject: [PATCH] termcol: replace msx colours by msx2 rgb values

Reference: <http://www.konamiman.com/msx/msx2th/th-2.txt>
---
 termcol.plp | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/termcol.plp b/termcol.plp
index 4b9f3e4..c7a2573 100644
--- a/termcol.plp
+++ b/termcol.plp
@@ -123,9 +123,9 @@ my %col = (
 	],
 	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 /,
+		map { s{([0-7])}{sprintf '%02X', $1 / 7 * 255}egr }
+		qw/ 000 000 161 373 117 237 511 267
+		    711 733 661 663 141 625 555 777 /,
 	],
 );
 
-- 
2.30.0