tell application "Safari"
	set page to current tab of window 1
	set title to name of page
	set html to source of page
end tell


tell application "BBEdit"
	make new text window with properties {contents:html}
end tell