From: cuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Wed, 19 Sep 2001 09:53:04 +0000 (+0000)
Subject: Disable the mouse sprite on exit
X-Git-Tag: V2.12.0~2635
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=c1ea31d24ce9a0ef0f2b8b4a5192619f9cee4ab7;p=cc65

Disable the mouse sprite on exit


git-svn-id: svn://svn.cc65.org/cc65/trunk@949 b7a2c559-68d2-44c3-8de9-860c34a00d81
---

diff --git a/libsrc/c128/mouse.s b/libsrc/c128/mouse.s
index 50ebc54fe..7f2dea918 100644
--- a/libsrc/c128/mouse.s
+++ b/libsrc/c128/mouse.s
@@ -14,7 +14,7 @@
 
 	.import		_readjoy
        	.import	       	popax, addysp1
-   	.importzp   	ptr1, sp, sreg
+   	.importzp   	ptr1, sp
 
    	.include    	"c128.inc"
 
@@ -107,8 +107,13 @@ AlreadyInitialized:
        	sta    	Initialized		; Reset the initialized flag
    	lda    	OldInitStatus		; Load the old BASIC int bit
    	and	#$01			; Mask it
+  	sei 				; Disable interrupts
    	ora	INIT_STATUS		; Restore the old state
    	sta	INIT_STATUS
+	lda    	#$FE			; Clear bit for sprite #0
+	and 	VIC_SPR_ENA
+	sta 	VIC_SPR_ENA	     	; Disable sprite
+      	cli 				; Enable interrupts
 @L1: 	rts
 
 .endproc