diff --git a/.Floppies/A2OSX.BUILD.po b/.Floppies/A2OSX.BUILD.po index a474f060..f3ceae33 100644 Binary files a/.Floppies/A2OSX.BUILD.po and b/.Floppies/A2OSX.BUILD.po differ diff --git a/.Floppies/A2OSX.TEST.po b/.Floppies/A2OSX.TEST.po index 7a514761..9b4dff78 100644 Binary files a/.Floppies/A2OSX.TEST.po and b/.Floppies/A2OSX.TEST.po differ diff --git a/SYS/KERNEL.S.DEV.txt b/SYS/KERNEL.S.DEV.txt index f5dab7ba..bf103ad9 100644 --- a/SYS/KERNEL.S.DEV.txt +++ b/SYS/KERNEL.S.DEV.txt @@ -72,7 +72,7 @@ K.GetDev.9 rts * ## ASM * `>PUSHB DevID` * `>PUSHW S.DIB` -* `>SYSCALL GetDevStatus` +* `>SYSCALL MkFD` * ## RETURN VALUE *\-------------------------------------- K.MkFD @@ -202,7 +202,7 @@ K.IOCTL ldy #3 hFD jmp (pDrv) *-------------------------------------- DEV.OPEN ldx #IOCTL.OPEN - lda IO.hFD +* lda IO.hFD jsr DEV.pDrvJmp bcs .9 @@ -225,7 +225,6 @@ DEV.WRITE ldx #IOCTL.WRITE inc pStack pop hFD - >LDYAI K.S.IOCTL jsr DEV.pDrvJmp bcs .9 @@ -237,14 +236,13 @@ DEV.EOF lda #S.IOCTL.S.EOF *-------------------------------------- DEV.GetStatus sta K.S.IOCTL+S.IOCTL.S - ldy #S.FD.DEV.DEVID - lda (pFD),y - sta K.S.IOCTL+S.IOCTL.UNITNUM - ldx #IOCTL.STATUS - >LDYAI K.S.IOCTL +* ldy #S.FD.DEV.DEVID +* lda (pFD),y +* sta K.S.IOCTL+S.IOCTL.UNITNUM *-------------------------------------- -DEV.pDrvJmp jmp (pDrv) +DEV.pDrvJmp >LDYAI K.S.IOCTL + jmp (pDrv) *-------------------------------------- DEV.GetPFD sta IO.hFD diff --git a/SYS/KERNEL.S.TERM.txt b/SYS/KERNEL.S.TERM.txt index fe08e4a1..cade8480 100644 --- a/SYS/KERNEL.S.TERM.txt +++ b/SYS/KERNEL.S.TERM.txt @@ -2,7 +2,6 @@ NEW AUTO 3,1 *-------------------------------------- DRV.TERM cld - jmp (.1,x) .1 .DA TERM.STATUS @@ -23,7 +22,8 @@ TERM.STATUS jsr TERM.GetIOCTLBufCntDCB tay bra TERM.TOAUX *-------------------------------------- -TERM.OPEN sta ZPhFD hFD in A for OPEN +TERM.OPEN +* sta ZPhFD hFD in A for OPEN TERM.CONTROL TERM.CLOSE jsr TERM.GetDCB diff --git a/SYS/KERNEL.S.TERMX.txt b/SYS/KERNEL.S.TERMX.txt index af29138d..564f35ac 100644 --- a/SYS/KERNEL.S.TERMX.txt +++ b/SYS/KERNEL.S.TERMX.txt @@ -16,7 +16,7 @@ ZPScrBL1 .BS 2 ZPScrBL2 .BS 2 *-------------------------------------- bActive .BS 1 -ZPhFD .BS 1 +*ZPhFD .BS 1 ZPTmpBool .BS 1 ZPTmpChar .BS 1 @@ -100,8 +100,9 @@ TERMX.OPEN jsr TERMX.ISOPENED lda (ZPDCBPtr) #S.DCB.TTY.DEVID tax - lda ZPhFD - +* lda ZPhFD + lda IO.hFD in ZPTMP + sta CLRWRITEAUX sta A2osX.SCRNDEVS,x sta SETWRITEAUX