From: Ben Harris <bjh21@bjh21.me.uk>
Date: Thu, 20 Jun 2024 22:06:14 +0000 (+0100)
Subject: Improvements to SAA5051 and SAA5052 characters
X-Git-Tag: bedstead-002.007~31
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~bjharris/git?a=commitdiff_plain;h=1d7a9aa1641fb3d8bb67ec0a112525d66ca11b94;p=bedstead.git

Improvements to SAA5051 and SAA5052 characters

In addition to their obviously distinctive national characters, the
SAA5051 and SAA5052 also change the shape of some standard characters
compared to the SAA5050.  I had spotted some of these, but noticed
several more when using an actual SAA5051 in my Acorn System 3.  The
unusual characters are apparently much easier to spot on screen than
in a datasheet.

Now, I think, we actually have the correct characters for each of
these chips.  In many cases, they're the same as one another, and in
those cases I've aliased the glyphs.
---

diff --git a/bedstead.c b/bedstead.c
index 5634c95..db65ec8 100644
--- a/bedstead.c
+++ b/bedstead.c
@@ -372,10 +372,15 @@ static struct glyph {
  {{000,000,000,010,000,000,010,000,000}, 0xf1d2, "colon.saa5051" },
  {{000,000,010,000,000,010,010,020,000}, 0xf1d3, "semicolon.saa5051" },
  {{016,021,020,016,021,016,001,021,016}, 0x00a7, "section" },
+ {{036,011,011,011,011,011,036,000,000}, -1, "D.saa5051" },
+ {{002,002,002,002,002,022,014,000,000}, -1, "J.saa5051" },
+ {{010,010,010,010,010,010,017,000,000}, 0xf1d5, "L.saa5051" },
  {{012,000,016,021,037,021,021,000,000}, 0x00c4, "Adieresis" },
  {{012,000,016,021,021,021,016,000,000}, 0x00d6, "Odieresis" },
  {{012,000,021,021,021,021,016,000,000}, 0x00dc, "Udieresis" },
  {{006,011,006,000,000,000,000,000,000}, 0x00b0, "degree" },
+ {{004,000,014,004,004,004,004,004,010}, -1, "j.saa5051" },
+ {{000,004,016,004,004,004,002,000,000}, -1, "t.saa5051" },
  {{012,000,016,001,017,021,017,000,000}, 0x00e4, "adieresis" },
  {{000,012,000,016,021,021,016,000,000}, 0x00f6, "odieresis" },
  {{000,012,000,021,021,021,017,000,000}, 0x00fc, "udieresis" },
@@ -383,10 +388,17 @@ static struct glyph {
 
  /* Extra characters found in the Swedish (SAA5052) character set */
  {{000,000,021,016,012,016,021,000,000}, 0x00a4, "currency" },
+ ALIAS("comma.saa5052", "comma.saa5051"),
+ ALIAS("period.saa5052", "period.saa5051"),
+ ALIAS("colon.saa5052", "colon.saa5051"),
+ ALIAS("semicolon.saa5052", "semicolon.saa5051"),
  {{002,004,037,020,036,020,037,000,000}, 0x00c9, "Eacute" },
  {{016,011,011,011,011,011,016,000,000}, 0xf1d4, "D.saa5052" },
- {{010,010,010,010,010,010,017,000,000}, 0xf1d5, "L.saa5052" },
+ ALIAS("J.saa5052", "J.saa5051"),
+ ALIAS("L.saa5052", "L.saa5051"),
  {{004,000,016,021,037,021,021,000,000}, 0x00c5, "Aring" },
+ ALIAS("j.saa5052", "j.saa5051"),
+ ALIAS("t.saa5052", "t.saa5051"),
  {{002,004,016,021,037,020,016,000,000}, 0x00e9, "eacute" },
  {{004,000,016,001,017,021,017,000,000}, 0x00e5, "aring" },