Kernel 0.9.1 : SSC, irq & various bugfix

This commit is contained in:
Rémy GIBERT 2018-04-16 06:53:19 +01:00
parent 842ea803de
commit b2a0584f9d
5 changed files with 12 additions and 7 deletions

Binary file not shown.

Binary file not shown.

View File

@ -11,8 +11,8 @@ SSC.DATA .EQ $C088 R,W
SSC.RESET .EQ $C089 W
SSC.STATUS .EQ $C089 R
SSC.STATUS.IRQ .EQ %10000000
SSC.STATUS.DSR .EQ %01000000
SSC.STATUS.DCD .EQ %00100000
SSC.STATUS.nDSR .EQ %01000000
SSC.STATUS.nDCD .EQ %00100000
SSC.STATUS.TDRE .EQ %00010000
SSC.STATUS.RDRF .EQ %00001000
SSC.STATUS.OE .EQ %00000100

View File

@ -42,7 +42,7 @@ L.HEX2 .DA HEX2
CS.INIT ldy #S.PS.ARGC
lda (pPs),y
cmp #2
bne .9
bne .90
lda #1
>SYSCALL GetArg.A
@ -75,7 +75,7 @@ CS.INIT ldy #S.PS.ARGC
clc
rts
>LDYA L.MSG.USAGE
.90 >LDYA L.MSG.USAGE
>SYSCALL PrintF.YA
lda #0
sec

View File

@ -165,7 +165,8 @@ CS.RUN >LDA.G bReadMode READ Command ?
bne .8
>LDA.G CSH.hBuf batch mode ?
bne CS.RUN.BATCH
beq .10
jmp CS.RUN.BATCH
*--------------------------------------
.10 jsr CL.RESET reset CmdBuf
@ -174,9 +175,13 @@ CS.RUN >LDA.G bReadMode READ Command ?
.1 >SLEEP
>SYSCALL GetChar
bcs .1 no char
bcc .3
cmp #26 EOF
beq .9
jsr CL.CHARIN
bne .1 no char
.3 jsr CL.CHARIN
>LDA.G bCmdBufExec Something to execute ?
bpl .1