Set WshShell = WScript.CreateObject("WScript.Shell")
Set objShell = CreateObject("Shell.Application")
' Задаем начальные значения координат
x = 100
y = 100
While True
' Ждем нажатия клавиши F1
Do While WshShell.AppActivate("Your Application Title") <> True
WScript.Sleep 100
Loop
' Эмулируем клик левой кнопки мыши по сохраненным координатам
objShell.Namespace(0).MoveSelection x, y
' Ждем 10 секунд перед следующим кликом
WScript.Sleep 10000
Loop
import psutil
# Получаем объект процесса по идентификатору
pid = <идентификатор процесса>
process = psutil.Process(pid)
# Устанавливаем новое имя процесса
new_name = <новое имя процесса>
process.name(new_name)
import psutil
# Получаем объект текущего процесса
p = psutil.Process()
# Устанавливаем новое имя для процесса
new_name = "My New Process Name"
p.name(new_name)