move.l	4.w,a6			; get execbase
		move.l	322(a6),a0		; get memlist ptr

find_adr:	tst.l	(a0)			; no memory at this ptr??
		beq.s	adr_zero		; exit..
		move.w	14(a0),d0		; extract memory ptr
		andi.w	#2,d0			; is it chip ?
		bne.s	nom8
		move.l	(a0),a0			; grab pointer
		bra.s	find_adr		; get next adr


noM8:		move.l	20(a0),d0		; get start of memory region
		move.l	24(a0),d1		; get end of memory region
		add.l	#$FFFF,d1		;
		clr.w	d0			;
		move.w	d0,d1			;
		sub.l	d0,d1			; mask off crap..
adr_zero					; d0=start of chip region
						; d1=end of chip region
		rts