Does anyone know the correct syntax to Address Book to add an
existing person to a specific group?
tell application "Address Book"
set the_contact to item 1 of (get the selection)
set theGroup to item 1 of (choose from list ((name of groups) as list))
add the_contact to group theGroup
save addressbook
end tell