Kernel 0.93+

This commit is contained in:
Rémy GIBERT 2019-10-05 23:07:53 +02:00
parent 06f901b121
commit aee22a2832
2 changed files with 4 additions and 2 deletions

Binary file not shown.

View File

@ -166,7 +166,7 @@ CS.RUN.OPENSKT >PUSHBI 0 no protocol
>PUSHW L.SA.REMOTE >PUSHW L.SA.REMOTE
lda hSocket lda hSocket
>LIBCALL hLIBTCPIP,LIBTCPIP.Connect >LIBCALL hLIBTCPIP,LIBTCPIP.Connect
bcc CS.RUN.LOOP bcc .4
cmp #ERR.SKT.NOCONN cmp #ERR.SKT.NOCONN
bne .9 bne .9
@ -177,7 +177,7 @@ CS.RUN.OPENSKT >PUSHBI 0 no protocol
lda #ERR.SKT.NOCONN lda #ERR.SKT.NOCONN
bra .9 bra .9
>PUSHBI 0 .4 >PUSHBI 0
>LDYA L.MSG.SKTOK >LDYA L.MSG.SKTOK
>SYSCALL printf >SYSCALL printf
>LDYAI BUFSIZE >LDYAI BUFSIZE
@ -199,6 +199,7 @@ CS.RUN.LOOP >SLEEP
>PUSHW ZPBufPtr >PUSHW ZPBufPtr
lda hSocket lda hSocket
>LIBCALL hLIBTCPIP,LIBTCPIP.Read >LIBCALL hLIBTCPIP,LIBTCPIP.Read
.99 bcs .9 .99 bcs .9
>PUSHYA len >PUSHYA len
>PUSHW ZPBufPtr >PUSHW ZPBufPtr
@ -206,6 +207,7 @@ CS.RUN.LOOP >SLEEP
lda (pPs),y lda (pPs),y
>SYSCALL fwrite >SYSCALL fwrite
bcs .11 bcs .11
.2 ldy #S.PS.hStdIn .2 ldy #S.PS.hStdIn
lda (pPs),y lda (pPs),y