Kernel 0.94

This commit is contained in:
Rémy GIBERT 2020-10-29 08:22:39 +01:00
parent 142e85c8a4
commit 31c023e662
4 changed files with 10 additions and 9 deletions

Binary file not shown.

View File

@ -9,8 +9,7 @@ DHCP.INIT lda IPCFG+S.NETCFG.STATUS
ldx #3 ldx #3
.1 lda $C064,x .1 eor A2osX.TIMER16,x
eor A2osX.TIMER16,x
sta DHCP.DISC.XID,x sta DHCP.DISC.XID,x
sta DHCP.REQ.XID,x sta DHCP.REQ.XID,x
dex dex
@ -47,6 +46,8 @@ DHCP.RUN >PUSHBI 0 no protocol
>LIBCALL hLIBTCPIP,LIBTCPIP.Bind >LIBCALL hLIBTCPIP,LIBTCPIP.Bind
bcs .9 bcs .9
>SLEEP
>PUSHWI S.SOCKET.O.BROADCAST >PUSHWI S.SOCKET.O.BROADCAST
lda hSocket lda hSocket
>LIBCALL hLIBTCPIP,LIBTCPIP.setsockopt >LIBCALL hLIBTCPIP,LIBTCPIP.setsockopt
@ -181,7 +182,7 @@ DHCP.RUN.SKT.RECV
DHCP.QUIT lda hSocket DHCP.QUIT lda hSocket
beq .1 beq .1
>LIBCALL hLIBTCPIP,LIBTCPIP.Shutdown * >LIBCALL hLIBTCPIP,LIBTCPIP.Shutdown
.1 clc .1 clc
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -7,25 +7,25 @@ MBAR.New >LDYAI S.MBAR
>SYSCALL2 getmem >SYSCALL2 getmem
bcs .99 bcs .99
>STYA ZPMENUPtr >STYA ZPObjPtr
lda #S.OBJ.T.MBAR lda #S.OBJ.T.MBAR
sta (ZPMENUPtr) S.OBJ.T sta (ZPObjPtr) S.OBJ.T
lda #0 lda #0
ldy #S.MBAR-1 ldy #S.MBAR-1
.1 sta (ZPMENUPtr),y .1 sta (ZPObjPtr),y
dey dey
bne .1 bne .1
>PULLA >PULLA
ldy #S.MBAR.MBITEMS ldy #S.MBAR.MBITEMS
sta (ZPMENUPtr),y sta (ZPObjPtr),y
>PULLA >PULLA
iny iny
sta (ZPMENUPtr),y sta (ZPObjPtr),y
clc clc

View File

@ -58,7 +58,7 @@ CFG.SET >PULLW ZPTmpPtr1 IPCFG
jsr CFG.SET.IOCTL jsr CFG.SET.IOCTL
bcs .9 bcs .9
.5 lda IPCFG+S.IPCFG.IP no IP address yes...so no DNS socket .5 lda IPCFG+S.IPCFG.IP no IP address yet...so no DNS socket
beq .8 beq .8
stz SA.LOCAL+S.SOCKADDR.PORT stz SA.LOCAL+S.SOCKADDR.PORT