From b86bbb8de10c94737088dbc8b3c8c2fd9d7d0770 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Mon, 27 Mar 2023 17:49:48 +0200
Subject: [PATCH] termcol: dosbox colour emulation presets

Copied from DosBox include src/ints/int10_modes.cpp last changed in
v0.81.0-alpha-120-g81265bfbc8 (2023-01-15).
---
 termcol.inc.pl | 48 +++++++++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 47 insertions(+), 1 deletion(-)

diff --git a/termcol.inc.pl b/termcol.inc.pl
index eba0330..86fbb7f 100644
--- a/termcol.inc.pl
+++ b/termcol.inc.pl
@@ -39,13 +39,59 @@ use Shiar_Sheet::Colour 1.05;
 	},
 	cgatrue => {
 		href => 'https://int10h.org/blog/2022/06/ibm-5153-color-true-cga-palette/',
-		title => 'IBM 5153 "true" CGA',
+		title => 'CGA on an IBM 5153 monitor',
 		list => [qw(
 			000000 0000C4 00C400 00C4C4 C40000 C400C4 C47E00 C4C4C4
 			4E4E4E 4E4EDC 4EDC4E 4EF3F3 DC4E4E F34EF3 F3F34E FFFFFF
 		)],
+		parent => 'ansi',
+		ansiorder => [ 0,4,2,6,1,5,3,7, 8,12,10,14,9,13,11,15 ],
+	},
+
+	ibm5153 => {
+		list => [qw( 000000 0000A5 00A500 00A5A5 A50000 A500A5 A56900 A5A5A5 4C4C4C 4C4CDE 4CDE4C 4CF2F2 DE4C4C F24CF2 F2F24C FFFFFF)],
+		parent => 'cga',
+	},
+	scumm_amiga => {
+		parent => 'cga',
+		list => [qw( 000000 0000BA 00BA00 00BABA BA0000 BA00BA BA7500 BABABA 757575 7575FF 00FF00 00FFFF FF8989 FF00FF FFFF00 FFFFFF)],
+	},
+	agi_amiga_v1 => {
 		parent => 'cga',
+		list => [qw( 000000 0000FF 008100 00D6BE C20000 BE7DD6 815500 BEBEBE 7D7D7D 00BEFF 00EA00 00FFD6 FF9581 FF7D00 EAEA00 FFFFFF)],
 	},
+	agi_amiga_v2 => {
+		parent => 'cga',
+		list => [qw( 000000 0000FF 008100 00D6BE C20000 BE7DD6 815500 BEBEBE 7D7D7D 00BEFF 00EA00 00FFD6 FF9581 D600FF EAEA00 FFFFFF)],
+	},
+	agi_amiga_v3 => {
+		parent => 'cga',
+		list => [qw( 000000 0000BE 00BE00 00BEBE BE0000 BE00BE C27D00 BEBEBE 7D7D7D 0000FF 00FF00 00FFFF FF0000 FF00FF FFFF00 FFFFFF)],
+	},
+	agi_amigaish => {
+		title => 'Amiga-ish CGA for AGI ports',
+		parent => 'cga',
+		list => [qw( 000000 0000FF 00AA00 00AAAA CE0000 BE71DE 8D5000 BEBEBE 555555 00BEFF 00CE55 55FFFF FF9D8D FF55FF EEEE00 FFFFFF)],
+	},
+	colodore_sat50 => {
+		title => 'DOSBox Colodore',
+		list => [qw( 000000 2C2C99 55AE4C 388985 813038 8D3C99 8D5028 B2B2B2 484848 716DEE AAFFA1 75CECA C66D71 D68DE2 EEF271 FFFFFF)],
+		parent => 'cga',
+	},
+	colodore_sat60 => {
+		title => 'Colodore (C64-ish CGA)',
+		list => [qw( 000000 2C28B2 4CB640 309189 8D2C34 9934A5 994C20 B2B2B2 484848 6D69FF 9DFF91 69D6CE D2656D DE89EA F2F65D FFFFFF)],
+		parent => 'cga',
+	},
+	tandy_warm => {
+		list => [qw( 0C0C0C 000C9D 087514 308D9D AA1800 AE309D B26124 AAAAAA 505050 5969F2 44BE50 40DEFA FF7150 FF85F6 F6E248 F2F2FA)],
+		parent => 'cga',
+	},
+	dga16 => {
+		list => [qw( 000000 001875 108D00 14BAD2 710C08 6D1C9D B25014 BAB2AA 484840 0861C6 99CE00 71F6D6 EA9D00 FF79DA FFF255 FFFFFF )],
+		parent => 'cga',
+	},
+
 	ubuntu => {
 		title => 'setvtrgb defaults for Ubuntu kbd',
 		list => [qw(
-- 
2.30.0