Kernel 0.93

SYS/KERNEL.S.STDIO.txt

@@ -410,7 +410,7 @@ PrintF.LocalCleanUp.RTS
 PrintF.LocalGetPtr
 				jsr PrintF.LocalGetByte
 				bcs PrintF.LocalCleanUp.RTS
-				tax
+				tay
 *--------------------------------------
 PrintF.LocalGetByte	
 				lda #$FF				SELF MODIFIED LStack Ptr
@@ -591,16 +591,19 @@ PrintF.S		ldy #$ff				CSTR
 				.HS 2C					bit abs
 PrintF.SS		ldy #$00				PSTR
 
+				sty .1+1
+			
 				jsr PrintF.LocalGetPtr
 				bcs .9
-				stx ZPPtr1
+
+				sty ZPPtr1
 				sta ZPPtr1+1
 			
 				lda (ZPPtr1)			if CSTR:last char=0, if PSTR:len=0
 				beq .8
 				
-				sty .1+1
-			
+				ldy .1+1
+				
 .1				lda #$ff				Self Modified
 				bne .11					CSTR
 				
@@ -910,7 +913,7 @@ K.SScanF		jsr MEM.SPtr2PPtr1		ptr2=String to Scan,Ptr1=format
 
 .4				jsr PrintF.LocalGetPtr
 				bcs .9
-				stx ZPPtr3
+				sty ZPPtr3
 				sta ZPPtr3+1
 				
 				jsr .5