Сделал скрипт который тыкает мышей в окно клиента PW, и юзает горячие клавиши в сторонних программах, таких как PWGTM и PWmp (флайхак и валлхак)
Собственно проблема в неудобности использования сразу нескольких программ.
Хочу написать скрипт который их объединит, но исходников их нету, увы. Также столкнулся с проблемой таргета на НПС - не смог разобраться как работать с памятью. Мышкой кликает нормально, но если угол обзора изменить, то промахивается. необходимые оффсеты и базовые адреса предоставлю.
Собственно проблема в неудобности использования сразу нескольких программ.
Хочу написать скрипт который их объединит, но исходников их нету, увы. Также столкнулся с проблемой таргета на НПС - не смог разобраться как работать с памятью. Мышкой кликает нормально, но если угол обзора изменить, то промахивается. необходимые оффсеты и базовые адреса предоставлю.
Код:
Opt("SendKeyDownDelay",1000)
Opt("MouseClickDelay",1000)
WinActivate ("Element Client","") ;Активация окна PW
While 1=1
MouseClick ("left", 1026, 298) ; Клик на строчку с диалогом
Sleep (1000)
MouseClick ("left", 1026, 298) ; Клик на строчку с диалогом
Sleep (2000)
Send ("{NUMPAD6}") ; Использую валлхак, перемещаемся ко второму НПС
Sleep (4000)
MouseClick ("left", 572, 420, 2) ;Клик на НПС, открытие диалога
Sleep (1000)
MouseClick ("left", 1026, 298) ; Клик на строчку с диалогом
Sleep (1000)
MouseClick ("left", 1026, 298) ; Клик на строчку с диалогом
Sleep (4000)
$var1 = PixelGetColor( 252, 517)
If $var1 = 12505747 Then ; проверка цвета в сообщении о получниие итема
MouseClick ("right", 1028, 843) ; юзать итем
Sleep (4000)
$i = 1
While $i <= 20
Send ("{NUMPAD7}") ; валлхак, поднимаемся на нужную высоту
Sleep (500)
$i = $i + 1
WEnd
Send ("{F11}") ; используем флайхак
Sleep (2000)
MouseClick ("left", 652, 488) ;задаем направление полета
MouseClick ("left", 652, 488) ;задаем направление полета
Sleep (95000) ; ожидание пока долетит
Send ("{s}") ; остановить полет
Sleep (2000)
Send ("{F11}") ; отключить флайхак
Sleep (2000)
Send ("{w}") ;упасть на потолок
Sleep (2000)
Send ("{NUMPAD9}") ;провалиться сквозь потолок
Sleep (2000)
Send ("{w}")
Sleep (2000)
Send ("{w down}") ;добежать до НПС
Sleep (2000)
Send ("{w up}")
MouseClick ("left", 665, 428, 2) ;Клик на НПС, открытие диалога
Sleep (3000)
Else
MouseClick ("right", 1028, 843) ; юзать итем
Sleep (4000)
$k = 1
While $k <= 16
Send ("{NUMPAD6}") ;использую валлхак, проходим через стену
Sleep (500)
$k = $k + 1
Wend
Send ("{a down}") ; перемещаемся к НПС
Sleep (2800)
Send ("{a up}")
MouseClick ("left", 1017, 504, 2) ;Клик на НПС, открытие диалога
Sleep (3000)
MouseClick ("left", 1026, 298) ; Клик на строчку с диалогом
Sleep (1000)
MouseClick ("left", 1026, 298) ; Клик на строчку с диалогом
Sleep (1000)
MouseClick ("left", 1026, 298) ; Клик на строчку с диалогом
Sleep (6000)
$var2 = PixelGetColor( 252, 517) ;проверка сообщения
If $var2 = 12505747 Then
MouseClick ("right", 1028, 843) ; юзать итем
Sleep (4000)
Send ("{NUMPAD2}") ; перемещаемся к НПС
Sleep (500)
Send ("{NUMPAD2}")
Sleep (500)
Send ("{NUMPAD2}")
Sleep (500)
Send ("{NUMPAD2}")
Sleep (500)
Send ("{NUMPAD4}")
Sleep (500)
Send ("{NUMPAD4}")
Sleep (500)
Send ("{NUMPAD4}")
Sleep (500)
Send ("{NUMPAD4}")
Sleep (500)
Send ("{NUMPAD4}")
Sleep (500)
MouseClick ("left", 572, 420, 2) ;Клик на НПС, открытие диалога
Else
MouseClick ("right", 1028, 843) ; юзать итем
Sleep (4000)
$i = 1
While $i <= 20
Send ("{NUMPAD7}") ; валлхак, поднимаемся на нужную высоту
Sleep (500)
$i = $i + 1
WEnd
Send ("{F11}") ; используем флайхак
Sleep (2000)
MouseClick ("left", 652, 488) ;задаем направление полета
MouseClick ("left", 652, 488)
Sleep (92000) ;ожидание полета
Send ("{s}")
Sleep (1000)
Send ("{F11}") ; флайофф
Sleep (1000)
Send ("{w}")
Sleep (1000)
Send ("{NUMPAD9}")
Sleep (2000)
Send ("{w}")
Sleep (4000)
EndIf
EndIf
Wend