From 2f6f468aad0606b0cd89f447ef7d853d119e4473 Mon Sep 17 00:00:00 2001
From: Scott Hutter <scott.hutter@gmail.com>
Date: Tue, 18 Dec 2018 11:09:06 -0600
Subject: [PATCH] Added SetNewMode() to geoslib  - #814

---
 include/geos/ggraph.h        |  5 ++++-
 libsrc/geos-cbm/setnewmode.s | 18 ++++++++++++++++++
 2 files changed, 22 insertions(+), 1 deletion(-)
 create mode 100644 libsrc/geos-cbm/setnewmode.s

diff --git a/include/geos/ggraph.h b/include/geos/ggraph.h
index 35e02c198..642bd85ce 100644
--- a/include/geos/ggraph.h
+++ b/include/geos/ggraph.h
@@ -45,6 +45,10 @@ void __fastcall__ BitOtherClip(void *proc1, void *proc2, char skipl,
 
 void __fastcall__ GraphicsString(char *myGfxString);
 
+#ifdef __GEOS_CBM__
+void __fastcall__ SetNewMode(void);
+#endif
+
 /* VIC colour constants */
 #define BLACK           0
 #define WHITE           1
@@ -172,5 +176,4 @@ typedef void graphicStr;
 /* ESC_PUTSTRING can't be implemented - it needs text, not pointer to it
    #define ESC_PUTSTRING(x,y,text) (char)6, (unsigned)(x), (char)(y), (text), (char)NULL
 */
-
 #endif
diff --git a/libsrc/geos-cbm/setnewmode.s b/libsrc/geos-cbm/setnewmode.s
new file mode 100644
index 000000000..58098a299
--- /dev/null
+++ b/libsrc/geos-cbm/setnewmode.s
@@ -0,0 +1,18 @@
+;
+; Scott Hutter
+;
+; 18.12.18
+
+; void SetNewMode(void);
+
+            .export _SetNewMode
+
+            .include "jumptab.inc"
+            .include "geossym.inc"
+        
+_SetNewMode:
+			lda graphMode
+			eor #$80
+			sta graphMode
+			jsr SetNewMode
+			rts
-- 
2.39.5