create markdown list of Safari tabs

Safari Tab links to markdown list

tell application "Safari"
	set themax to number of tabs of window 1
	set titlelist to ""
	set thelist to ""
	repeat with x from 1 to themax
		set titlelist to titlelist & "[" & name of tab x of window 1 & "][" & x & "]" & return
		set thelist to thelist & "[" & x & "]:" & (URL of tab x of window 1) & return
		
	end repeat
	set the clipboard to titlelist & return & return & thelist
	--[This link](http://example.net/) 
end tell