Kernel version 0.9 : EDIT, fixed Status bar flashing

BIN/EDIT.S.SCRN.txt

@@ -208,9 +208,19 @@ SCRN.UpdateAttrC
 .9				jmp Ctrl.Q				
 *--------------------------------------
 SCRN.UpdateStatusBar 
+				lda #1
+				>PUSHA
 				ldy #ScreenH
 				lda (pData),y
-				jsr SCRN.InvLineA
+				>PUSHA
+
+				>LDYA L.MSG.GOTOXY
+				>SYSCALL CPrintFYA
+				bcs .9
+				
+				>LDYA L.SEQ.INV
+				>SYSCALL CPrintFYA
+				bcs .9
 
 				ldy #PromptMode
 				lda (pData),y
@@ -240,7 +250,16 @@ SCRN.UpdateStatusBar
 				>SYSCALL CPrintFYA
 				bcs .9
 				
+				lda #58
+				jsr SCRN.ClearEOLA
+				bcs .9
+				
+				>LDYA L.SEQ.NORM
+				>SYSCALL CPrintFYA
+				bcs .9
+
 				jmp SCRN.GotoCurXCurY
+.9				jmp Ctrl.Q				
 				
 .2				cmp #PromptModeHelp
 				beq .3
@@ -259,7 +278,6 @@ SCRN.UpdateStatusBar
 				>SYSCALL CPrintFYA
 				bcs .9
 				rts
-.9				jmp Ctrl.Q				
 *--------------------------------------
 SCRN.UpdateStatusBarErrA
 				sta .1+1
@@ -277,6 +295,24 @@ SCRN.UpdateStatusBarErrA
 				rts
 .9				jmp Ctrl.Q				
 *--------------------------------------
+SCRN.ClearEOLA	pha
+
+.1				pla
+				ldy #ScreenW
+				cmp (pData),y
+				bcs .8
+				inc
+				pha
+				
+				lda #' '
+				>SYSCALL PutCA
+				bcc .1
+				plx
+				rts
+				
+.8				clc
+.9				rts
+*--------------------------------------
 SCRN.InvLineA	sta .2+1
 				lda #1
 				>PUSHA

BIN/EDIT.S.txt

@@ -460,7 +460,7 @@ SEQ.INV			>CSTR "\e[7m"
 SEQ.NORM		>CSTR "\e[0m"
 SEQ.CEOL		>CSTR "\e[K"
 MSG.TOPBAR		>CSTR "\e[1;1HA2osX Edit:%S\e[0m"
-MSG.STATUSBAR	>CSTR "Press Ctrl-A For Help           Length:%D Col:%d Line:%D\e[0m"
+MSG.STATUSBAR	>CSTR "Press Ctrl-A For Help      Length:%5D,Col:%3d,Line:%5D"
 MSG.STATUSBAR.H	>CSTR "Press any key to exit this screen:\e[0m"
 MSG.STATUSBAR.F	>CSTR "Find:%S\e[0m"
 MSG.STATUSBAR.R	>CSTR "Replace:%S\e[0m"