all functions returning char in A now have X cleared

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

libsrc/geos/mousesprite/getnextchar.s

@@ -1,8 +1,8 @@
 
 ;
-; Maciej 'YTM/Alliance' Witkowiak
+; Maciej 'YTM/Elysium' Witkowiak
 ;
-; 21.12.99
+; 21.12.1999, 2.1.2003
 
 ; char GetNextChar (void);
 ;	note that if it returns 0 (FALSE) then no characters are available
@@ -11,4 +11,8 @@
 
 	    .include "../inc/jumptab.inc"
 
-_GetNextChar = GetNextChar
+_GetNextChar:
+	    jsr GetNextChar
+	    ldx #0
+	    tay			; preserve Z flag
+	    rts

libsrc/geos/mousesprite/ismseinregion.s

@@ -1,12 +1,13 @@
 
 ;
-; Maciej 'YTM/Alliance' Witkowiak
+; Maciej 'YTM/Elysium' Witkowiak
 ;
-; 21.12.99
+; 21.12.1999, 2.1.2003
 
 ; char IsMseInRegion (struct window *mywindow);
 
 	    .import RectRegs
+	    .import return0, return1
 
 	    .export _IsMseInRegion
 	    
@@ -14,4 +15,7 @@
 
 _IsMseInRegion:
 	    jsr RectRegs
-	    jmp IsMseInRegion
+	    jsr IsMseInRegion
+	    bne L1
+	    jmp return0
+L1:	    jmp return1

libsrc/geos/mousesprite/mouse.s

@@ -51,6 +51,7 @@ _mse_storex:
 	stx	mouseRight+1
 _mse_initend:
 	lda 	#0
+	tax
 ; --------------------------------------------------------------------------
 ;
 ; void mouse_done (void);
@@ -178,6 +179,7 @@ _mouse_move:
 ;
 
 _mouse_buttons:
+	ldx	#0
 	lda	pressFlag
 	and	#SET_MOUSE
 	lsr