From 39a436c466dee0f86f18848d5e02da2d4bbaad83 Mon Sep 17 00:00:00 2001
From: cuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Mon, 17 Mar 2003 21:09:27 +0000
Subject: [PATCH] Switch to lower case chars in toggle_videomode

git-svn-id: svn://svn.cc65.org/cc65/trunk@2031 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
 libsrc/c128/toggle_videomode.s | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/libsrc/c128/toggle_videomode.s b/libsrc/c128/toggle_videomode.s
index 098989d7c..873e38eb1 100644
--- a/libsrc/c128/toggle_videomode.s
+++ b/libsrc/c128/toggle_videomode.s
@@ -9,5 +9,11 @@
 
 	.include	"c128.inc"
 
-	_toggle_videomode = SWAPPER
+.proc   _toggle_videomode 
+
+        jsr     SWAPPER                 ; Toggle the mode
+ 	lda     #14
+ 	jmp     BSOUT                   ; Switch to lower case chars
+
+.endproc