GTA RP - помощь в АХК

XomYAK_Zhora

Новичок
Автор темы
2
0
Приветствую всех, такой вопрос, нашел АХК для рыбалки на 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