poor man's _toascii routine, contributed by Fatih Aygun

[cc65] / libsrc / c128 / toggle_videomode.s

diff --git a/libsrc/c128/toggle_videomode.s b/libsrc/c128/toggle_videomode.s
index 098989d7c58fec5b5dd41590cc694495c94317f8..a94e416eeb1cbd813e80ffb0985839aebec83ab3 100644 (file)
--- a/libsrc/c128/toggle_videomode.s
+++ b/libsrc/c128/toggle_videomode.s
@@ -6,8 +6,18 @@
 ;
 
        .export         _toggle_videomode
+        .import         SWAPPER, BSOUT
 
-       .include        "c128.inc"
+; This function is deprecated
+.assert         0, ldwarning, "toggle_videomode() is deprecated, please use videomode() instead!"
 
-       _toggle_videomode = SWAPPER
+
+
+.proc   _toggle_videomode
+
+        jsr     SWAPPER                 ; Toggle the mode
+       lda     #14
+       jmp     BSOUT                   ; Switch to lower case chars
+
+.endproc