fopen:	mov	dptr,#fileaddr
	mov	fpl,dpl
	mov	fph,dph
	ret
;
; write Ptr bytes from PKTDAT to FPTR
fwrite:	mov	p2,#high pktdat
	mov	r0,#low pktdat
	mov	dpl,fpl
	mov	dph,fph
	mov	r2,Ptr		; pktdat length
fw1:	movx	a,@r0		; get byte from pktdat
	movx	@dptr,a		; put byte to fptr
	inc	r0
	inc	dptr
	djnz	r2,fw1
	mov	fpl,dpl
	mov	fph,dph
	ret
;
fread:	mov	a,fpl		; file pointer lo
	cjne	a,fel,gnc1	; file end lo
	mov	a,fph		; file pointer hi
	cjne	a,feh,gnc1	; file end hi
	setb	c
	ret
gnc1:	mov	dpl,fpl
	mov	dph,fph
	movx	a,@dptr	
	inc	dptr
	mov	fpl,dpl
	mov	fph,dph
	clr	c
	ret
	
fclose:	ret
;