Kernel 0.92

SYS/KERNEL.S.INIT.txt

@@ -125,19 +125,16 @@ Kernel.Init3	sta SETALTZP
 				>LDYAI FD.NULL
 				>SYSCALL MKDev
 
-				lda #"S"
-				sta SYS.BASL0+38
-
 				jsr SysScrInit
 				bcs *
-
-				lda #"0"
+				
+				lda #"P"
 				sta SYS.BASL0+38
 
 				jsr PS0.Init
 				bcs *
 
-				lda #"3"
+				lda #"I"
 				sta SYS.BASL0+38
 *--------------------------------------
 				>LDYAI MSG.Init3
@@ -168,10 +165,10 @@ Kernel.Init3	sta SETALTZP
 				>SYSCALL printf
 
 				lda KBD
-				bpl .1
+				bpl .7
 				sta KBDSTROBE
 				cmp #146				CTRL-R for ROOT mode
-				bne .1
+				bne .7
 				
 				>PUSHBI 0
 				>LDYAI MSG.CTRLR
@@ -181,7 +178,7 @@ Kernel.Init3	sta SETALTZP
 				>LDYAI CTRLR.SHELL
 				bra .8
 				
-.1				>PUSHWI ETCINIT.CMDLINE
+.7				>PUSHWI ETCINIT.CMDLINE
 				>PUSHBI 2
 				>LDYAI MSG.EtcInit
 				>SYSCALL printf
@@ -318,7 +315,10 @@ MemMgrInit		>LDYAI Mem.MHiMem
 				
 				rts
 *--------------------------------------
-SysScrInit		>LDYAI Mem.XHiMem
+SysScrInit		lda #"S"
+				sta SYS.BASL0+38
+
+				>LDYAI Mem.XHiMem
 				>STYA FD.TTY+S.FD.DEV.BUFPTR
 
 				jsr SysScrInit.TTYPtrs
@@ -328,10 +328,13 @@ SysScrInit		>LDYAI Mem.XHiMem
 				>SYSCALL MKDev
 				bcs .9
 				
+				lda #"0"
+				sta SYS.BASL0+38
+
 				ldx A2osX.TTYDEVS
 				
 .1				phx
-
+				inc SYS.BASL0+38
 				inc FD.TTY+S.FD.DEV.DEVID
 				inc FD.TTY.NAME+3
 				
@@ -359,17 +362,25 @@ SysScrInit		>LDYAI Mem.XHiMem
 SysScrInit.TTYPtrs
 				lda DevMgr.Free
 				sta FD.TTY+S.FD.DEV.DCBPTR
-
+				sta .1+1
+				
 				clc
 				adc #S.DCB.TTY
 				sta DevMgr.Free
 
 				lda DevMgr.Free+1
 				sta FD.TTY+S.FD.DEV.DCBPTR+1
+				sta .1+2
 
 				adc /S.DCB.TTY
 				sta DevMgr.Free+1
 				
+				ldx #S.DCB.TTY-1
+				
+.1				stz $ffff,x				SELF MODIFIED
+				dex
+				bpl .1
+				
 				lda FD.TTY+S.FD.DEV.BUFPTR
 				sec
 				sbc #TTY.BUF.SIZE
@@ -399,7 +410,7 @@ PS0.Init		>PUSHWI 0				Aux type
 				sta (pPs),y
 				sta CORE.S.PS0+S.PS.hStdErr
 
-				clc
+*				clc
 .9				rts
 *--------------------------------------
 CPU.Init.6502	>PUSHBI 0

SYS/KERNEL.S.TERM.txt

@@ -707,33 +707,37 @@ DRV.TERM.IAC	ldy #S.DCB.TTY.INBUFFER
 				lda (ZPBufPtr)
 				cmp #SE
 				bne Csi.Home.8			wait for ending SE....keep bIACMode
+				bra COUT.IAC.SB
+				
+				ldy #S.DCB.TTY.INBUFFER+1
+				lda (ZPDCBPtr),y		get back CMD
 				
 .1				cmp #IAC
 				beq COUT.IAC.SB.9
 				
 				sec
-				sbc #SB
+				sbc #WILL
 				bcc COUT.IAC.SB.9
 				asl
 				tax
+
 				ldy #S.DCB.TTY.INBUFFER+2
 				lda (ZPDCBPtr),y			Get SUBCMD in A
 
-				cpx #10
-				bcs COUT.IAC.SB.9
-
 				jmp (.8,x)
 
-.8				.DA COUT.IAC.SB
-				.DA COUT.IAC.WILL
+.8				.DA COUT.IAC.WILL
 				.DA COUT.IAC.WONT
 				.DA COUT.IAC.DO
 				.DA COUT.IAC.DONT
 *--------------------------------------
-COUT.IAC.SB		cmp #TELOPT.TTYPE
+COUT.IAC.SB		ldy #S.DCB.TTY.INBUFFER+2
+				lda (ZPDCBPtr),y			Get SUBCMD in A
+
+				cmp #TELOPT.TTYPE
 				bne COUT.IAC.SB.9
 				
-				ldy #S.DCB.TTY.INBUFFER+2
+				iny
 				lda (ZPDCBPtr),y
 				cmp #SB.SEND
 				bne COUT.IAC.SB.9