Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2025-01-05 16:30:45 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.9.1 : SSC, irq & various bugfix

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

BIN
.Floppies/A2OSX.SRC.po
View File

Binary file not shown.

4
INC/COM.6551.I.txt
View File

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

4
SBIN/GETTY.S.txt
View File

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

11
SBIN/SHELL.S.txt
View File

@ -165,7 +165,8 @@ CS.RUN >LDA.G bReadMode READ Command ?
bne .8 bne .8
>LDA.G CSH.hBuf batch mode ? >LDA.G CSH.hBuf batch mode ?
bne CS.RUN.BATCH beq .10
jmp CS.RUN.BATCH
*-------------------------------------- *--------------------------------------
.10 jsr CL.RESET reset CmdBuf .10 jsr CL.RESET reset CmdBuf
@ -174,9 +175,13 @@ CS.RUN >LDA.G bReadMode READ Command ?
.1 >SLEEP .1 >SLEEP
>SYSCALL GetChar >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 ? >LDA.G bCmdBufExec Something to execute ?
bpl .1 bpl .1