mirror of
https://github.com/A2osX/A2osX.git
synced 2024-10-21 05:24:15 +00:00
Kernel 0.93+
This commit is contained in:
parent
06f901b121
commit
aee22a2832
Binary file not shown.
@ -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
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user