(Опублікуйте це як окрему відповідь, оскільки занадто довго, щоб вмістити коментар)
Заплачуємо @MatthieuRiegler за оригінальний сценарій.
Це спрацювало 10.12.6 і є незначною модифікацією оригінального сценарію (побачив коментар @ CharlieGorichanaz після того, як я провів власне розслідування):
set textToSearchForInProcessName to "Not Responding"
-- Run Activity Monitor
tell application "Activity Monitor" to activate
tell application "System Events" to tell process "Activity Monitor"
-- Wait for the Activity Monitor window to open
repeat until (exists window 1)
delay 1
end repeat
--display notification "Window appeared"
-- Wait for the Menubar to be present
repeat until (exists menu 1 of menu bar item "View" of menu bar 1)
delay 1
end repeat
--display notification "Menubar appeared"
-- Make sure View -> My Processes is selected
click menu item "My Processes" of menu 1 of menu bar item "View" of menu bar 1
-- Click the 'CPU View' button ( **1 )
click radio button 1 of radio group 1 ¬
of group 2 of toolbar 1 ¬
of window 1
-- Working with the list of processes
tell outline 1 of scroll area 1 of window 1
-- Looking for Not responding process
set notResponding to rows whose value of ¬
first static text contains textToSearchForInProcessName
repeat with aProcess in notResponding
-- For each non responding process retrieve the PID
set pid to value of text field 1 of aProcess -- ( **2 )
-- Kill that process using pid
if pid is not "" then do shell script ("kill -9 " & pid)
end repeat
end tell
end tell
** 1
У macOS 10.12.x на панелі інструментів є додатковапіктограма, завдяки якій набір кнопок (процесор, пам'ять, енергія тощо) знаходяться group 2 of toolbar 1
замістьgroup 1 of toolbar 1
. За відсутності цієї піктограми (я не підтверджував її у старих версіях macOS), я вважаю, що кнопки процесора і т.д.group 1 of toolbar 1
** 2
Це застосовується, якщо ви коли-небудь перетягували стовпець PID у стовпці "Діяльність" в інше місце. Я перетягнув стовпчик PID в крайнє ліве місце, тому в цьому рядку мені довелося змінити індекс на1
:
set pid to value of text field 1 of aProcess
Стовпці нумеруються в крайньому лівому куті, починаючи з 1. Тому відповідно коригуйте виділений індекс у наведеному вище рядку.