mirror of
https://github.com/A2osX/A2osX.git
synced 2025-02-16 18:30:26 +00:00
Kernel 0.94
This commit is contained in:
parent
563205dab0
commit
a171b75a89
Binary file not shown.
@ -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
|
||||
|
Loading…
x
Reference in New Issue
Block a user