From ef0b85ca2352af6412f0d18e246d97f958b9cc84 Mon Sep 17 00:00:00 2001
From: dwsJason <JGAndersen@gmail.com>
Date: Sun, 19 Aug 2018 13:26:04 -0400
Subject: [PATCH] basic keyboard input, mapping to ingame controls

---
 src/sysevt.c | 77 +++++++++++++++++++++++++++++++++++++++++++++++++---
 src/sysvid.c |  3 +-
 2 files changed, 74 insertions(+), 6 deletions(-)

diff --git a/src/sysevt.c b/src/sysevt.c
index ab8d9e0..374f77e 100644
--- a/src/sysevt.c
+++ b/src/sysevt.c
@@ -40,6 +40,18 @@ static SDL_Event event;
 #ifdef IIGS
 segment "system";
 #pragma noroot
+
+#define LARROW 0x3B
+#define RARROW 0x3C
+#define DARROW 0x3D
+#define UARROW 0x3E
+
+#define SPACEBAR 0x31
+
+#define ESC 0x35
+#define Z_KEY 0x07
+#define Q_KEY 0x0C
+
 #endif
 
 /*
@@ -48,6 +60,66 @@ segment "system";
 static void
 processEvent()
 {
+#ifdef IIGS
+#if 0
+	int x;
+
+	for (x = 0; x < 128; ++x)
+	{
+		if (KeyArray[ x ])
+		{
+			printf("Key %d\n", x);
+		}
+	}
+#endif
+#if 0
+	U8* pScreen = (U8*)0x400;
+	int idx;
+
+	while (1)
+	{
+		for (idx = 0; idx < 128; ++idx)
+		{
+			pScreen[idx] = KeyArray[idx];
+		}
+	}
+#endif
+
+	control_status = 0;
+
+	// ADB Keyboard Driver
+	if (KeyArray[ LARROW ])
+	{
+		control_status |= CONTROL_LEFT;
+	}
+	if (KeyArray[ RARROW ])
+	{
+		control_status |= CONTROL_RIGHT;
+	}
+	if (KeyArray[ DARROW ])
+	{
+		control_status |= CONTROL_DOWN;
+	}
+	if (KeyArray[ UARROW ])
+	{
+		control_status |= CONTROL_UP;
+	}
+	if (KeyArray[ SPACEBAR ])
+	{
+		control_status |= CONTROL_FIRE;
+	}
+	if (KeyArray[ ESC ])
+	{
+		control_status |= CONTROL_END;
+	}
+	if (KeyArray[ Q_KEY ])
+	{
+		control_status |= CONTROL_EXIT;
+	}
+
+
+#endif
+
 #ifndef IIGS
 	U16 key;
 #ifdef ENABLE_FOCUS
@@ -225,13 +297,10 @@ processEvent()
 void
 sysevt_poll(void)
 {
-#ifdef IIGS
-	printf("sysevt_poll\n");
-#endif
 #ifndef IIGS
   while (SDL_PollEvent(&event))
-    processEvent();
 #endif
+    processEvent();
 }
 
 /*
diff --git a/src/sysvid.c b/src/sysvid.c
index e8c7c69..b61fe57 100644
--- a/src/sysvid.c
+++ b/src/sysvid.c
@@ -337,11 +337,10 @@ sysvid_init(void)
 	sysvid_fb = (U8*)0x12000;
 
 	// SHR ON
-	//*VIDEO_REGISTER|=0xC0;
+	*VIDEO_REGISTER|=0xC0;
 
 	// ENABLE Shadowing of SHR
 	*SHADOW_REGISTER&=~0x08; // Shadow Enable
-
 #endif
 #ifndef IIGS
   SDL_Surface *s;