mirror of https://github.com/A2osX/A2osX.git
76 lines
1.4 KiB
Plaintext
76 lines
1.4 KiB
Plaintext
|
NEW
|
|||
|
|
AUTO 3,1
|
|||
|
|
*--------------------------------------
|
|||
|
|
ZIP.IN ldy #S.ZIP.GNI.Cmd
|
|||
|
|
lda (ZPFrameInPtr),y
|
|||
|
|
cmp #S.ZIP.GNI.Cmd.Rep
|
|||
|
|
bne .8
|
|||
|
|
|
|||
|
|
ldy #S.ZIP.GNI.Zone0
|
|||
|
|
lda (ZPFrameInPtr),y
|
|||
|
|
bne .8
|
|||
|
|
|
|||
|
|
ldy #S.DDP2.SRC.NET
|
|||
|
|
lda (ZPFrameInPtr),y
|
|||
|
|
sta ETKCFG+S.ETKCFG.NetID+1
|
|||
|
|
iny
|
|||
|
|
lda (ZPFrameInPtr),y
|
|||
|
|
sta ETKCFG+S.ETKCFG.NetID
|
|||
|
|
|
|||
|
|
ldy #S.DDP2.SRC.NOD
|
|||
|
|
lda (ZPFrameInPtr),y
|
|||
|
|
sta ETKCFG+S.ETKCFG.Router
|
|||
|
|
|
|||
|
|
ldy #S.ZIP.GNI.NetStart
|
|||
|
|
lda (ZPFrameInPtr),y
|
|||
|
|
sta ETKCFG+S.ETKCFG.NetStart+1
|
|||
|
|
iny
|
|||
|
|
lda (ZPFrameInPtr),y
|
|||
|
|
sta ETKCFG+S.ETKCFG.NetStart
|
|||
|
|
iny
|
|||
|
|
lda (ZPFrameInPtr),y
|
|||
|
|
sta ETKCFG+S.ETKCFG.NetEnd+1
|
|||
|
|
iny
|
|||
|
|
lda (ZPFrameInPtr),y
|
|||
|
|
sta ETKCFG+S.ETKCFG.NetEnd
|
|||
|
|
|
|||
|
|
ldy #S.ZIP.GNI.MCAddress
|
|||
|
|
lda (ZPFrameInPtr),y
|
|||
|
|
cmp #6
|
|||
|
|
bne .3
|
|||
|
|
|
|||
|
|
tax
|
|||
|
|
ldy #S.ZIP.GNI.MCAddress+6
|
|||
|
|
|
|||
|
|
.2 lda (ZPFrameInPtr),y
|
|||
|
|
sta ETKCFG+S.ETKCFG.MCAddress,x
|
|||
|
|
dey
|
|||
|
|
dex
|
|||
|
|
bpl .2
|
|||
|
|
|
|||
|
|
.3 ldy #S.ZIP.GNI.DefaultZone
|
|||
|
|
lda (ZPFrameInPtr),y
|
|||
|
|
beq .7
|
|||
|
|
|
|||
|
|
tax
|
|||
|
|
clc
|
|||
|
|
adc #S.ZIP.GNI.DefaultZone
|
|||
|
|
tay
|
|||
|
|
|
|||
|
|
.4 lda (ZPFrameInPtr),y
|
|||
|
|
sta ETKCFG+S.ETKCFG.Zone,x
|
|||
|
|
dey
|
|||
|
|
dex
|
|||
|
|
bpl .4
|
|||
|
|
|
|||
|
|
.7 lda #$80
|
|||
|
|
sta ETKCFG STATUS
|
|||
|
|
|
|||
|
|
.8 clc
|
|||
|
|
rts
|
|||
|
|
*--------------------------------------
|
|||
|
|
MAN
|
|||
|
|
SAVE usr/src/lib/libetalk.s.zip
|
|||
|
|
LOAD usr/src/lib/libetalk.s
|
|||
|
|
ASM
|