diff --git a/extractTexttoDevonthink.scpt b/extractTexttoDevonthink.scpt
new file mode 100644
index 0000000..7b625ca
--- /dev/null
+++ b/extractTexttoDevonthink.scpt
@@ -0,0 +1,16 @@
+tell application id "DNtp"
+	set theSelection to selection
+	if theSelection is {} then
+		display dialog "Please select one or more PDF files first." buttons {"OK"} default button "OK"
+		return
+	end if
+	
+	repeat with theItem in theSelection
+		if type of theItem is PDF document then
+			set pdfText to plain text of theItem
+			add custom meta data pdfText for "Tinderboxtext" to theItem
+		end if
+	end repeat
+	
+	display dialog "Text extraction complete!" buttons {"OK"} default button "OK"
+end tell
\ No newline at end of file