
rem  reffile button include file

	goto reffileskip  :rem  only called from DO or GOSUB

/reffile:
	parameter reffilex,reffiley
	dim reffiletab[20,5],2
	reffiletab[1,1]=2,1,68,22,-1
	reffiletab[2,1]=73,1,68,22,-1
	reffiletab[3,1]=144,1,68,22,-1
	reffiletab[4,1]=215,1,68,22,-1
	reffiletab[5,1]=286,1,68,22,-1
	reffiletab[6,1]=357,1,68,22,-1
	reffiletab[7,1]=428,1,68,22,-1
	reffiletab[8,1]=499,1,68,22,-1
	reffiletab[9,1]=569,1,69,22,-1
	reffiletab[10,1]=1,201,58,19,-1
	reffiletab[11,1]=63,201,58,19,-1
	reffiletab[12,1]=1,221,58,19,-1
	reffiletab[13,1]=63,221,58,18,-1
	reffiletab[14,1]=1,241,58,18,-1
	reffiletab[15,1]=63,241,58,18,-1
	reffiletab[16,1]=200,270,20,41,-1
	reffiletab[17,1]=200,326,20,41,-1
	reffiletab[18,1]=23,375,79,17,-1
	reffiletab[19,1]=139,375,79,17,-1
	reffiletab[20,1]=-1

	button reffileb,reffilex,reffiley,reffiletab
	if reffileb=0 then return
	pop    :rem  don't return if valid button number

	on reffileb goto Nor,Cen,Sou
	on reffileb-3 goto Eur,Nea,Afr
	on reffileb-6 goto Asi,Far,Pac
	on reffileb-9 goto Alf,Clf,Glf
	on reffileb-12 goto Llf,Olf,Tlf
	on reffileb-15 goto Up,Down,Quitpart
	on reffileb-18 goto Sel
	note "reffile include file error"
	end

/reffileskip:
