Jag minns inte i detalj hur jag gjorde eftersom jag fick prova mig fram. Klistra in detta i Script editor och kolla så att alla sökvägar stämmer; byt ut kvintus mot ditt användarnamn, kolla så att alla script ligger på plats. Spara som "program" och sedan är det bara att släppa pdf-filer på programmet och de dyker upp på skrivbordet som pdb-filer. Jag lägger upp txt2pdbdoc och PM:ar dig.
on open these_items
repeat with aFile in these_items
set inputFile to (unix_path(aFile))
--get new file name
repeat
display dialog "Enter title of document:" default answer "Title"
set newName to the text returned of the result
if newName is not "" then exit repeat
end repeat
--convert to text
do shell script "/usr/local/bin/pdftotext " & inputFile & ¬
" /Users/kvintus/Desktop/" & unix_path(newName) & ".txt"
--convert to pdb
do shell script "/usr/local/bin/txt2pdbdoc \"" & newName & ¬
"\" /Users/kvintus/Desktop/" & unix_path(newName) & ¬
".txt" & " /Users/kvintus/Desktop/" & unix_path(newName) & ".pdb"
--delete text file
do shell script "rm /Users/kvintus/Desktop/" & ¬
unix_path(newName) & ".txt"
--delete print spool file
do shell script "rm " & inputFile
end repeat
end open
on unix_path(mac_path)
set unixpath to (POSIX path of mac_path)
set chars to every character of unixpath
repeat with i from 1 to length of chars
if " !$&\"'*(){[|;<>?~` \\" contains ¬
(item i of chars as text) then
set item i of chars to "\\" & (item i of chars as text)
end if
end repeat
return every item of chars as string
end unix_path
