sub pop (id)
	if id.style.display = "" then
		id.style.display = "none"
	else 
		id.style.display = ""
	end if
end sub
sub MouseOver (id)
	
	id.style.fontweight = "normal"
	id.style.color= "#999999"
	
end sub
sub MouseOut (id)
	id.style.fontweight = "normal"
	id.style.color="#000000"
end sub


sub popNP (id)
	if id.style.display = "" then
		id.style.display = "none"
	else 
		id.style.display = ""
	end if
end sub
sub MouseOverNP (id)
	
	id.style.fontweight = "normal"
	id.style.color= "#999999"
	
end sub
sub MouseOutNP (id)
	id.style.fontweight = "normal"
	id.style.color="#000000"
end sub