Приветствую всех, такой вопрос, нашел АХК для рыбалки на GTA RP, но при его работе нажимается только Num 4, координаты настроены под монитор.
КОД:
; Powered by RolePlay AutoHotKey.
; (vk.com/rpahk)
::
x_min := xpos := 6753
x_max := 1000
y_min := ypos := 350
y_max := 1000
IniRead, uns, numbotset.ini, ruu, ru
if (uns!=1)
{
IniWrite, 1, numbotset.ini, ruu, ru
IniWrite, -1, numbotset.ini, coord, coordX
IniWrite, -1, numbotset.ini, coord, coordY
msgbox, 64, RPAHK, Открыть меню - F11. Перезагрузка скрипта - NumPad 2. Если скрипт у Вас не в папке "binders" (актуально для GTA RP), то с файлом numbotset.ini перебросьте его туда
}
return
F11::
st:
IniRead, Ox, numbotset.ini, coord, coordX
IniRead, Oy, numbotset.ini, coord, coordY
if Ox=ERROR
Ox=-1
if Oy=ERROR
Oy=-1
Gui, color, white
Gui, Font, S12 CDefault, Verdana
Gui, Add, Text, x12 y19 w90 h20 , По оси Х:
Gui, Add, Text, x12 y49 w90 h20 , По оси Y:
Gui, Add, Edit, vX x102 y19 w60 h20 , %Ox%
Gui, Add, Edit, vY x102 y49 w60 h20 , %Oy%
Gui, Add, Button, gSave x2 y79 w163 h40 , Сохранить
Gui, Add, Button, gGet x2 y119 w163 h70 , Определить координаты пикселя
Gui, Font, S9 Cblue Italic Underline, Verdana
Gui, Add, Text, gVK x62 y189 w100 h20 , RPAHK (c) 2019
Gui, Show, h211 w168, NumBot
Return
VK:
Run, https://vk.com/rpahk
return
Get:
Gui, Destroy
a=0
x=001
y=001
Gui,+AlwaysOnTop
PixelGetColor, col, 1, 1
Gui, add, text, vXX, по оси Х: %x%
Gui, add, text, vyY, по оси Y: %y%
Gui, add, text, vC, цвет: %col%
gui, add, text,, при нахождении нужного`nцвета нажмите Alt + NumPad4
Gui, show, NA x1 y1, NUMBOT
while (a=0)
{
MouseGetPos, x, y
PixelGetColor, col, %x%, %y%
GuiControl,, XX, по оси X: %x%
GuiControl,, yY, по оси Y: %y%
GuiControl,, C, цвет: %col%
}
Gui, destroy
MsgBox, 68, NUMBOT, Ваши координаты: Х - %x%, Y - %y%. Сохранить их?
IfMsgBox Yes
{
IniWrite, %x%, numbotset.ini, coord, coordX
IniWrite, %y%, numbotset.ini, coord, coordY
}
goto st
;a=0
;MsgBox, 64, Numbot, Для правильной работы скрипта Вам нужно найти координаты пикселей. Чтобы скрипт работал нужно добиться результата 0x000000.`nНажимайте NumPad3 для того, чтобы увидеть координаты пикселя, на который Вы навели курсор. Жмите NumPad5 для того, чтобы остановить процесс поиска пикселя.AtEOF
;while (a=0)
;{
; KeyWait, NumPad3, D
; MouseGetPos, MouseX, MouseY
; PixelGetColor, color, %MouseX%, %MouseY%
; if (color=0x000000)
; {
; msgbox, 64, NumBot, Вы нашли пиксель правильного цвета! Его координаты: OX: %MouseX%; OY: %MouseY% - скопированы в буфер обмена
; Clipboard = %MouseX%; %MouseY%
;}
;else
;{
; msgbox, 16, Numbot, Вы выбрали пиксель с неправильным цветом (%color% вместо 0x000000)! Попробуйте еще раз.
;}
;}
return
!NumpadLeft::
!NumPad4::
if (col=0x000000)
a=1
else
MsgBox, 16, NUMBOT, Цвет не совпадает с нужным!
return
Save:
Gui, submit
IniWrite, %X%, numbotset.ini, coord, coordX
IniWrite, %Y%, numbotset.ini, coord, coordY
Msgbox, 64, Numbot, Успешно сохранено!
return
GuiClose:
ExitApp
Numpad1::
IniRead, Oox, numbotset.ini, coord, coordX
IniRead, Ooy, numbotset.ini, coord, coordY
if (Oox=-1)
{
msgbox, 16, Ошибка!, Вы не указали координаты!
return
}
if (Ooy=-1)
{
msgbox, 16, Ошибка!, Вы не указали координаты!
return
}
Loop,
{
xpos+=10
if (xpos >= x_max) {
xpos := x_min
ypos+=10
}
if (ypos >= y_max)
break
PixelGetColor, color, %Oox%, %Ooy% ; <------ Координаты нужно заменить на свои
; Координаты для экрана 1920 * 1080: 1115, 833
if (color == 0x000000)
{
SendInput, {vk66 down}
Sleep, 10 ;
SendInput, {vk66 up}
Sleep, 1500 ; <------ Интервал времени нажатия Num-ов. (Добавляйте если ошибается скрипт, а так можно уменьшить)
}
else
SendInput, {vk64 down}
Sleep, 10 ;
SendInput, {vk64 up}
Sleep, 1500 ; <------ Интервал времени нажатия Num-ов. (Добавляйте если ошибается скрипт, а так можно уменьшить)
}
return
NumPad2::reload
