From ee0a0ea896eaa3a84035ad1f743961dec3b4002d Mon Sep 17 00:00:00 2001
From: Daniel Loffgren <daniel@loffgren.org>
Date: Thu, 17 Sep 2015 07:27:36 +0000
Subject: [PATCH] Added uppercase force logic back

git-svn-id: svn+ssh://svn.phoenixbox.net/svn/apple1/trunk@31 64f78de7-aa59-e511-a0e8-0002a5492df0
---
 apple1/pia.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/apple1/pia.c b/apple1/pia.c
index e7e3e13..e1d6bf9 100644
--- a/apple1/pia.c
+++ b/apple1/pia.c
@@ -41,6 +41,10 @@ char asciiCharFromA1Char(uint8_t c) {
 }
 
 uint8_t a1CharFromAsciiChar(char c) {
+	if (c >= 'a' && c <= 'z') {
+		c -= 0x20;
+	}
+	
 	return (char)c | 0x80;
 }