AppleScript to OCR a PDF using PDFPenPro

gistfile1.txt

tell application "PDFpenPro"
	
	open theFile as alias
	
	-- Does the document need to be OCR'd?
	get the needs ocr of document 1
	
	if result is true then
		tell document 1
			ocr
			repeat while performing ocr
				delay 1
			end repeat
			delay 1
			close with saving
		end tell
	else
		-- Document was previously OCR'd or is already a text type PDF.
		tell document 1
			close without saving
		end tell
	end if
	
	
	-- In PDFpen, when no documents are open, window 1 is "Preferences"
	-- If other documents are open, do not close the App.
	if name of window 1 is "Preferences" then
		tell application "PDFpenPro"
			quit
		end tell
	end if
end tell