From 94d5bffe57acfa0718e1ef14347641543fc59401 Mon Sep 17 00:00:00 2001
From: Shamus Hammons <jlhamm@acm.org>
Date: Fri, 11 Sep 2020 19:30:22 -0500
Subject: [PATCH] Added new palette from pic on the xapple2 color page.

It looks terrible, but put in as a point of comparison to the others, to
basically show just how awesome the ApplePC palette actually is.  :-)
---
 src/video.cpp | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)

diff --git a/src/video.cpp b/src/video.cpp
index cc5805c..1245308 100644
--- a/src/video.cpp
+++ b/src/video.cpp
@@ -189,6 +189,28 @@ static uint8_t robColors[16 * 4] = {
 	0xFF, 0xFF, 0xFF, 0xFF  // White
 };
 
+// This palette comes from the picture posted on website from robColors. It
+// also looks worse than all the others.  :-P
+
+static uint8_t picColors[16 * 4] = {
+	0x00, 0x00, 0x00, 0xFF,
+	0xB0, 0x01, 0x68, 0xFF,
+	0x01, 0x19, 0xEB, 0xFF,
+	0xC9, 0x00, 0xEF, 0xFF,
+	0x25, 0x99, 0x00, 0xFF,
+	0x71, 0x70, 0x6E, 0xFF,
+	0x18, 0xB3, 0xE9, 0xFF,
+	0x8A, 0x88, 0xEB, 0xFF,
+	0x54, 0x5A, 0x02, 0xFF,
+	0xDF, 0x34, 0x00, 0xFF,
+	0x70, 0x6E, 0x6F, 0xFF,
+	0xE1, 0x49, 0xE9, 0xFF,
+	0x38, 0xFF, 0x00, 0xFF,
+	0xD5, 0xD8, 0x01, 0xFF,
+	0x45, 0xFF, 0x75, 0xFF,
+	0xED, 0xEB, 0xEE, 0xFF
+};
+
 // Lo-res starting line addresses
 
 static uint16_t lineAddrLoRes[24] = {
@@ -366,6 +388,11 @@ void TogglePalette(void)
 		SpawnMessage("ApplePC Color TV palette");
 	}
 	else if (palette == (uint32_t *)altColors)
+	{
+		palette = (uint32_t *)picColors;
+		SpawnMessage("Picture Color TV palette");
+	}
+	else if (palette == (uint32_t *)picColors)
 	{
 		palette = (uint32_t *)robColors;
 		SpawnMessage("Rob's Color TV palette");