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
