From 6116ee51ecb99ac1f5a3b58f5c8bc15ff367d1a7 Mon Sep 17 00:00:00 2001
From: cpg <cpg@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Wed, 27 Nov 2002 15:05:01 +0000
Subject: [PATCH] call setcursur when finished

git-svn-id: svn://svn.cc65.org/cc65/trunk@1662 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
 libsrc/atari/clrscr.s | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/libsrc/atari/clrscr.s b/libsrc/atari/clrscr.s
index 946f3a2da..b352a83de 100644
--- a/libsrc/atari/clrscr.s
+++ b/libsrc/atari/clrscr.s
@@ -7,6 +7,7 @@
 	.export		_clrscr
 	.include	"atari.inc"
 	.importzp	ptr1
+	.import		setcursor
 
 _clrscr:lda	SAVMSC		; screen memory
 	sta	ptr1
@@ -15,6 +16,7 @@ _clrscr:lda	SAVMSC		; screen memory
 	adc	#>(40*24)
 	sta	ptr1+1
 	lda	#0		; screen code of space char
+	sta	OLDCHR
 	ldy	#<(40*24)	; 40x24: size of default atari screen
 	ldx	#>(40*24)
 _clr1:	sta	(ptr1),y
@@ -31,5 +33,4 @@ _clr1:	sta	(ptr1),y
 
 done:	sta	COLCRS
 	sta	ROWCRS
-	rts
-
+	jmp	setcursor
-- 
2.39.5