Kernel 0.94

This commit is contained in:
Rémy GIBERT 2020-07-09 22:05:28 +02:00
parent 563205dab0
commit a171b75a89
2 changed files with 24 additions and 3 deletions

Binary file not shown.

View File

@ -276,6 +276,7 @@ CS.RUN.LOOP >SLEEP
jsr CS.RUN.GetMsg
bcs .9
beq .2
jsr CS.RUN.REQ
bcs .9
@ -453,6 +454,7 @@ CS.RUN.NICK >LDYA L.MSG.NICK
jsr CS.RUN.GetMsg
bcs .9
beq .1
jsr CS.RUN.SplitMsg
jsr CS.RUN.DUMPMSG
@ -492,6 +494,7 @@ CS.RUN.USER >LDYA L.MSG.USER
jsr CS.RUN.GetMsg
bcs .9
beq .1
.2 jsr CS.RUN.SplitMsg
jsr CS.RUN.DUMPMSG
@ -641,7 +644,12 @@ CS.RUN.GetMsg >PUSHWI MSGSIZE
>PUSHW ZPMsgPtr
lda hFile
>SYSCALL fgets
rts
bcs .9
lda (ZPMsgPtr)
* clc
.9 rts
*--------------------------------------
CS.RUN.SplitMsg >LDYA pData
>STYA ZPMsgPfxPtr
@ -840,7 +848,9 @@ CS.RUN.CHARIN.INS
>SYSCALL PutChar
rts
.8 clc
.8
CS.RUN.CHARIN.INS.8
clc
rts
*--------------------------------------
CS.RUN.CHARIN.CTRL
@ -848,7 +858,7 @@ CS.RUN.CHARIN.CTRL
bne .1
bit bJoin
bpl .8
bpl CS.RUN.CHARIN.INS.8
>PUSHB hFile
>PUSHW L.IRC.PRIVMSG
@ -862,6 +872,17 @@ CS.RUN.CHARIN.CTRL
>SYSCALL FPrintF
bcs .9
>PUSHW L.SEQ.PRIVMSG
lda #4 channel
>SYSCALL ArgV
>PUSHYA
>PUSHW ZPTextPtr
>PUSHBI 4
>SYSCALL PrintF
bcs .9
jmp CS.RUN.TXTCLR
.1 cmp #$14 Ctrl-T