Kernel 0.92

This commit is contained in:
Rémy GIBERT 2019-01-15 07:36:21 +00:00
parent 1c9fbd7f10
commit a39eb17109
4 changed files with 15 additions and 17 deletions

Binary file not shown.

View File

@ -7,22 +7,15 @@ DHCP.INIT lda (pIPCFG)
and #S.IPCFG.STATUS.OK
bne .99 Already Configured, exit
ldy #S.IPCFG-1
.1 lda (pIPCFG),y
sta IPCFG,y
dey
bne .1
stz IPCFG+S.IPCFG.STATUS
ldx #3
.11 lda A2osX.TIMER16,x
.1 lda A2osX.TIMER16,x
sta DHCP.DISC.XID,x
sta DHCP.REQ.XID,x
dex
bpl .11
bpl .1
ldx #5

View File

@ -368,8 +368,11 @@ CFG.Read.GetS >PUSHWI 255
>PUSHW ZPTmpPtr1
lda CFG.hCfgFile
>SYSCALL fgets
rts
bcs .9
>LDYA ZPTmpPtr1
>SYSCALL puts
.9 rts
*--------------------------------------
MAN
SAVE USR/SRC/SBIN/IPCONFIG.S.ETC

View File

@ -166,13 +166,15 @@ CS.RUN >LIBCALL hLIBTCPIP,LIBTCPIP.GETCFG
jsr CFG.EtcFiles
jsr DHCP.INIT
bcs .8
jsr DHCP.RUN
jsr DHCP.QUIT
* jsr DHCP.INIT
* bcs .8
* jsr DHCP.RUN
* jsr DHCP.QUIT
.8 >PUSHW L.IPCFG
>DEBUG
>LIBCALL hLIBTCPIP,LIBTCPIP.SETCFG
* lda #0