[@olta78]

Привет, пока не прокачано ремсло, камни проклятья приходится очищать вручную. Небольшой скрипт поможет выполнить это безобразие))). Используем AutoIt. Открываем инвентарь где лежат камни проклятья и зелье очищения. Запускаем скрипт, первый камень надо сделать вручную, скрипт запомнит нужные координаты камней проклятья и зелья очищения, а так же кнопку ОК во всплывающем окне. После этого скрипт доделает это нудное дело. В скрипте необходимо указать нужное количество камней минус один тот что сделаете вручную. По умолчанию стоит 149. Така как один сделаете вручну. Итого 150 штук. На квест парта.

Sleep(5000); Ожидание 5 секунд
#include <Misc.au3>
HotKeySet("{ESC}","stop"); Вызов функции Остановка скрипта - ESC

$countStart = 1; Счетчик начало, всегда = 1
$countEnd = 149; Счетчик конец, количество очищаемых камней -1, который будет очищен вручную

$dll = DllOpen("user32.dll"); Подключение библиотеки

While 1; Координаты Зелья Очищения
    Sleep(50)
    If _IsPressed("02", $dll) Then ;Ожидание, в цикле, нажатия ПКМ(Зелье Очищения)
        $aCoord=MouseGetPos()
         ToolTip("Нажата ПКМ"&@CRLF&"Координаты: x="&$aCoord[0]&" y="&$aCoord[1], Default, Default, '_IsPressed', 1)
    Sleep(800)
       ExitLoop
    EndIf
WEnd

While 1; Координаты камня проклятья
	If _IsPressed("01", $dll) Then ;Ожидание, в цикле, нажатия ЛКМ(Камень Проклятья)
        $bCoord=MouseGetPos()
         ToolTip("Нажата ЛКМ"&@CRLF&"Координаты: x="&$bCoord[0]&" y="&$bCoord[1], Default, Default, '_IsPressed', 1)
      Sleep(800)
         ExitLoop
	EndIf
WEnd

While 1; Координтаы кнопки подтверждения - ОК

	If _IsPressed("01", $dll) Then ;Ожидание, в цикле, нажатия ЛКМ(Всплывающее Окно кнопка ОК)
        $cCoord=MouseGetPos()
         ToolTip("Нажата ЛКМ"&@CRLF&"Координаты: x="&$cCoord[0]&" y="&$cCoord[1], Default, Default, '_IsPressed', 1)
      Sleep(800)
		ToolTip("", Default, Default, '_IsPressed', 1)
        ExitLoop
    EndIf
WEnd

Sleep(5000); Ожидание 5 секунд

While $countStart <= $countEnd; Процесс очистки
	$DelayKey = Random(150, 300, 1)
	AutoItSetOption("MouseClickDelay", $DelayKey)
	$DelayKey = Random(150, 300, 1)
	AutoItSetOption("MouseClickDownDelay", $DelayKey)

	MouseClick("right", $aCoord[0], $aCoord[1])
	Sleep(300)
	MouseClick("left", $bCoord[0], $bCoord[1])
	Sleep(300)
	MouseClick("left", $cCoord[0], $cCoord[1])
	Sleep(300)
	$countStart = $countStart + 1
WEnd

Func stop(); Функция Остановка скрипта
    Exit
EndFunc

DllClose($dll); Закрытие библиотеки