Open in Marked

gistfile1.applescript

try
	tell application "BBEdit"
		if front window exists then
			if class of front window is not in {shell window, scratchpad_window} then
				tell front text document of front window
					if its file ≠ missing value then
						set frontTextDoc to its file as alias
					else
						error "The Front Text Document Is Unsaved!"
					end if
				end tell
			else
				error "Front Window Is NOT A Text Document!"
			end if
		else
			error "No Windows Are Open!"
		end if
	end tell
	
	tell application "Marked"
		activate
		open frontTextDoc
	end tell
	
on error errMsg number errNum
	set sep to "=============================="
	set e to sep & return & "Error: " & errMsg & return & sep & return ¬
		& "Error Number: " & errNum & return & sep
	beep
	display dialog e
end try