NEW
PREFIX /A2OSX.BUILD
AUTO 4,1
				.LIST OFF	
*--------------------------------------
HST.GetByName	>PULLW ZPPtrDNS
				>PULLW ZPPtrIP
				
				lda ZPPtrIP
				clc
				adc #3
				tay
				lda ZPPtrIP+1
				adc #0
				>PUSHYA

				lda ZPPtrIP
				clc
				adc #2
				tay
				lda ZPPtrIP+1
				adc #0
				>PUSHYA

				>LDYA ZPPtrIP
				iny
				bne .1
				inc
.1				>PUSHYA

				>PUSHW ZPPtrIP
				
				>PUSHW L.HST.SScanF			
				>LDYA ZPPtrDNS

				>SYSCALL SScanF.YA
				bcc .9
				jmp DNS.QUERY.I
.9				rts
*--------------------------------------
HST.GetByAddr	>PULLW ZPPtrIP
				>PULLW ZPPtrDNS
				
				
				sec
				rts
*--------------------------------------
MAN
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.HST
LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
ASM