Added SetNewMode() to geoslib - #814

diff --git a/include/geos/ggraph.h b/include/geos/ggraph.h
index 35e02c1983968f3cce055c518bb6ee31097ad059..642bd85ce64aac2f335f4407c68a7651418d9856 100644 (file)
--- 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 (file)
index 0000000..58098a2
--- /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