I have written this little AppleScript Quick Action that can paste bible verses from Accordance into any application without having to leave that application. From any application (eg Mail, Microsoft Word, Page etc) simply hit Command-7 and you will get this dialog box:
Enter in the verses you want, press OK (or hit return) and the verses will appear automatically, pasted into the document where your cursor was. Read on to download the installer.
There are 2 versions. The first one is for most people. The second is for if you want to edit the Script or use it in Keyboard Maestro.
This is the easiest. Click on it and it will install and then you can assign it to a hotkey using System Preferences.
2. Double click on the downloaded file and you should see a dialog like this:
3. Now go to System Preferences: Keyboard and go to the ‘Shortcuts’ Tab. Select Services and look for the new ‘Paste Bible Verses’ option. Click on ‘Add Shortcut’ and press Apple-7 to assign it to the Apple-7 key.
4. That’s it. Now from any application select Apple-7 and you can paste in Bible verses from Accordance.
If you want another version (not NIV) let me know and I can make another version.
NOTE: Each time you run the ‘Paste Bible Verses’ in a new application (e.g. Word, Pages, Mail) it will ask for permission to run. You may also be taken to System Preferences and asked to allow that program to control your computer. This is to make sure that you have allowed the script to run. e.g.
If you are taken to the “Security and Privacy” section of System Preferences you need to click on the little Lock icon down the bottom left, then find the Application you want to paste into (e.g. Pages or Word) and then select the tick box next to that app under “Allow the Apps below to control your computer.”
Use this version if you have Keyboard Maestro. You can assign it to any key you want with Keyboard Maestro and drop the AppleScript in. You can also customise it to paste from GNT, ESV etc.
The advantages of the Applescript Keyboard Maestro version over the Automator version are:
Click here to download the Apple Script version of Paste bible verses
And here’s what it looks like in Keyboard Maestro:
Awesome! Thank you for your hard work on this!
There’s a discussion thread about this script on the Accordance blog here:
https://www.accordancebible.com/forums/topic/24727-paste-into-any-app-without-opening-accordance/#entry121897
Hello. I would love it if you would do this for NKJV and KJV for us Majority Text guys. Thanks! — Ray
Here’s an updated applescript for Accardance 2020:
# Applescript to paste verses from Accordance into the frontmost application
# by Wayne Connor – https://macintoshhowto.com
#
# You can access this from any app (Word, Pages, mail etc)
# Press Apple-7, type the verse you want, and it will be pasted into you app.
#
# I like to paste from the NIV bible but you can set the version here: (eg GNT, NRSV)
set theModulename to “NIV”
# set this variable below to true to have the verses in quotation marks with the reference at the end.
set theCitationformat to false
# There are a few options on how to access this script easily
# 1. Assign it to a kotkey (I use Command – 7) usign Keyboard Maestro
# 2. Use the automator workflow Quick Action and assign it to Command 7 hotkey using
# System Preferences: Keyboard: Shortcuts: Services
# and assign a shortcut key to Paste Bible Verses
# 3. Use it as a Moicrosoft Word add-on
#
property theVerseref : “Genesis 1:1”
try
tell application “System Events” to display dialog “Verse Reference (eg John 1:1)” default answer theVerseref with icon path to resource “AppIcon.icns” in bundle (path to application “Accordance”)
set theVerseref to text returned of result
if theVerseref is not “” then
tell application “Accordance” to set theText to «event AccdTxRf» {theModulename, theVerseref, theCitationformat}
else
set theText to “”
end if
if text 1 thru 3 of theText is “Err” then
tell me to activate
display dialog “Sorry I don’t recognise that verse format.
Please use format your verse like this:
John 3
John 3-5
John 3:16
John 3:16-18
1 John 2
” & theText with icon caution
set theText to “”
end if
set the clipboard to theText
activate application (path to frontmost application as text)
tell application “System Events” to tell (1st process whose frontmost is true) to keystroke “v” using {shift down, option down, command down}
end try