RavdonikaS
Новичок
- Сообщения
- 68
- Репутация
- 4
Друзья помогите пытаюсь в бою сделать наведение на танк по цвету пикселя иконки через MouseMove() но получается указатель мыши как будто резко дергается на нужные координаты и сразу так же резко возвращается назад с небольшим сдвигом
Пробовал и скорости движения мыши менять и вычислять расстояние до нужного пикселя и делить его на /2 /3 /4 но дергания мыши с небольшим смещением повторяются
Замерял через MouseGetPos() координаты движения мыши получается при движении позиция мыши отклоняется от центральной позиции на 1-5 пикселей в зависимости от скорости движения мыши
Пробовал через MouseMove() добавлять эти 1-5 пикселей к центральной позиции но все равно происходит рывок как бы в нужное место и резко возвращается назад
Что это защита игры или в WoT это реализуется другими средствами и какие есть подводные камни в наведении прицелов в подобных играх?
В ангаре или на миникарте при зажатом ctrl все MouseMove() обрабатываются корректно ставят курсор в нужное место
Пробовал и скорости движения мыши менять и вычислять расстояние до нужного пикселя и делить его на /2 /3 /4 но дергания мыши с небольшим смещением повторяются
Замерял через MouseGetPos() координаты движения мыши получается при движении позиция мыши отклоняется от центральной позиции на 1-5 пикселей в зависимости от скорости движения мыши
Пробовал через MouseMove() добавлять эти 1-5 пикселей к центральной позиции но все равно происходит рывок как бы в нужное место и резко возвращается назад
Что это защита игры или в WoT это реализуется другими средствами и какие есть подводные камни в наведении прицелов в подобных играх?
В ангаре или на миникарте при зажатом ctrl все MouseMove() обрабатываются корректно ставят курсор в нужное место
Код:
#include <GuiConstants.au3>
#include <ComboConstants.au3>
#include <TabConstants.au3>
#include <StaticConstants.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("MouseClickDownDelay", 400)
Opt("SendKeyDelay", 400)
HotKeySet("{numpad0}","pausa")
HotKeySet("{end}","eksit")
HotKeySet("{numpad5}","srzuboi")
GUICreate("Form1", 142, 105, 1762, 496, $WS_POPUP ,$WS_EX_TOPMOST)
$_Vboi = GUICtrlCreateLabel("Состояние датчиков", 16, 8, 142, 17)
$_s4etboi = GUICtrlCreateLabel("Счётчик боёв ", 16, 32, 142, 17)
$_HP = GUICtrlCreateLabel("ХП танка ", 16, 56, 142, 17)
$pausa = GUICtrlCreateLabel("Запуск скрипта", 16, 80, 142, 17)
GUISetState(@SW_SHOW)
Beep(500,200)
Global $ps, $s4etboi, $svet, $navodka, $kart, $Dist, $DistX, $DistY, $TposX,$TposY
Global $HP, $BOI
WinActivate("WoT Client")
While 1
If $ps=1 Then
dat4ik()
If $HP=1 Then
If $svet=1 Then
If $kart=1 Then
$coord=PixelSearch(571, 170, 1340, 913, 0x7E75E2,5);Поиск танка на карте
If not @error Then
MouseClick("right",$coord[0],$coord[1])
cttrl("up")
MouseWheel("down",10)
$navodka=TimerInit()
EndIf
ElseIf $kart=0 Then
$Mpos=MouseGetPos()
$coord=PixelSearch(571, 170, 1340, 913, 0x7E75E2,10) ;Поиск танка
If not @error Then
If $coord[0]>$Mpos[0] Then
$DistX=$coord[0]-$Mpos[0]
Dist()
$TmovX=($Mpos[0]-4)
ElseIf $coord[0]<$Mpos[0] Then
$DistX=$Mpos[0]-$coord[0]
Dist()
$TmovX=($Mpos[0]+4)
EndIf
If $coord[1]<$Mpos[1] Then
$DistY=$Mpos[1]-$coord[1]
Dist()
$TmovY=($Mpos[1]+4)
ElseIf $coord[1]>$Mpos[1] Then
$DistY=$coord[1]-$Mpos[1]
Dist()
$TmovY=($Mpos[1]-4)
EndIf
If $Dist > 10 Then
MouseMove($TmovX,$TmovY,5)
EndIf
EndIf
If TimerDiff($navodka)>10000 Then
MouseClick("left")
$svet=0
EndIf
EndIf
Else
$svet=1
cttrl("dn")
EndIf
ElseIf $BOI=1 Then
cttrl("up")
Send("{PRINTSCREEN}")
MouseClick("",1456,173)
Sleep(2500)
MouseClick("",951,31)
Sleep(2500)
MouseMove(@DesktopWidth/2,@DesktopHeight/2)
$s4etboi+=1
GUICtrlSetData($_s4etboi,"Счётчик боёв "&$s4etboi)
EndIf
EndIf
WEnd
Func Dist()
$Dist = sqrt($DistX^2+$DistY^2)
GUICtrlSetData($_Vboi, "Расстояние="&Round($Dist))
EndFunc
Func Dat4ik()
PixelSearch(731, 1022,731, 1022,0x006F00);Поиск зеленой полоски ХП
If Not @error Then
GUICtrlSetData($_HP,"[||||||||||||||||||||||||||||||||||||||||||||]")
$HP=1
Else
GUICtrlSetData($_HP,"[ ]")
$HP=0
EndIf
PixelSearch(951, 33,951, 33,0xFF7818);В оконном режиме кнопка "В бой"
If Not @error Then
GUICtrlSetData($_Vboi, "ДА В БОЙ")
$BOI=1
Else
GUICtrlSetData($_Vboi, "НЕТ В БОЙ")
$BOI=0
EndIf
EndFunc
Func cttrl($updn)
Switch $updn
Case "dn"
Send("{CTRLDOWN}")
$kart=1
GUICtrlSetData($_Vboi, "Карта зажата")
Case "up"
$kart=0
Opt("MouseClickDownDelay", 400)
Send("{CTRLUP}")
GUICtrlSetData($_Vboi, "Карта отжата")
EndSwitch
EndFunc
Func pausa()
Beep(500,200)
cttrl("up")
$ps+=1
If $ps=1 Then
GUICtrlSetData($pausa, ">>>>>>>>>>>>>>>>>>")
ElseIf $ps<>1 Then
GUICtrlSetData($pausa, " || ||")
$ps=0
EndIf
EndFunc
Func eksit()
cttrl("up")
Beep(500,200)
Exit
EndFunc
