Fix_Play123
Заглянувший
Заглянувший
F
Fix_Play123
Заглянувший
Заглянувший
- Сообщения
- 2
- Реакции
- 0
Данный бот на рыбалку для гта 5. Нужен ahk
Код:
; <COMPILER:
#NoEnv
#SingleInstance force
#MaxHotkeysPerInterval 86400000
#HotkeyInterval 86400000
#KeyHistory 0
#NoTrayIcon
ListLines Off
SetBatchLines, -1
SetKeyDelay, -1
SetMouseDelay, -1
SetDefaultMouseSpeed, 0
SetControlDelay, -1
SetWinDelay, -1, -1, -1
SendMode Input
CoordMode, ToolTip, Screen
Menu, Tray, NoStandard
if !A_IsAdmin
{
Gui, IsAdmin:+AlwaysOnTop +ReSize -SysMenu
Gui, IsAdmin:Color, EDEEF0
Gui, IsAdmin:Font, cBlack s10 Norm, Arial
Gui, IsAdmin:Add, Text, , Для правильной работы скрипта нужны права Администратора.`n`nЗакройте скрипт, далее нажмите правой кнопкой мыши по скрипту и выберите пункт "Запуск от имени администратора"
Gui, IsAdmin:Add, Button, gContinue, Все равно продолжить работу
Gui, IsAdmin:Add, Button, gClose xp+615, Закрыть скрипт
Gui, IsAdmin:Show, Center, Для работы в GTA V нужны права Администратора
return
}
Continue:
Gui, IsAdmin:Destroy
License := true
URL = https://gist.githubusercontent.com/Das1k/aac99d119441c88b0a3fd04d07e8aeea/raw/c5f9fef22ef60fce4f7b3de828853574d8f925d2/HW9K7QZG
Key = 373803370
DriveGet, Drive, Serial, C:\
ComObjError(false)
HTTP := ComObjCreate("WinHTTP.WinHTTPRequest.5.1")
HTTP.Open("GET", URL, false)
HTTP.Send()
if ( HTTP.ResponseText == Key ) and ( Drive == Key )
License := true
if ( License == false )
{
Menu, Tray, Icon
TrayTip, Ошибка, Бот не запущен. Обратитесь к продавцу., 3, 3
SoundPlay, %A_WinDir%\Media\Windows Error.wav, 1
Run, https://funpay.ru/users/2249431/
ExitApp
}
Menu, Tray, Icon
Menu, Tray, Tip, Fishing Bot [v.1.3.2 BETA] by DASIK
Menu, Settings, Add, Настройка задержки, Delay
Menu, Settings, Add
Menu, SettingsFF, Add, Быстрая рыбалка, FastFishing
Menu, SettingsFF, Add
Menu, SettingsFF, Add, Проверка инвентаря, CheckInv
Menu, Settings, Add, Настройки быстрой рыбалки, :SettingsFF
Menu, Settings, Add
Menu, Settings, Add, Ловить рыбу на червя, Worm
Menu, Settings, Add
Menu, Settings, Add, Сумка/Рюкзак, Rucksack
Menu, Settings, Add
Menu, Settings, Add, Нажимать "Я робот", bypass
Menu, Settings, Add
Menu, Settings, Add, Подсказки, Hint
Menu, Tray, Add, Настройки бота, :Settings
Menu, Tray, Add
Menu, Links, Add, FunPay, FunPay
Menu, Links, Add
Menu, Links, Add, Группа VK, VK
Menu, Tray, Add, Ссылки, :Links
Menu, Tray, Add
Menu, Tray, Add, Помощь, FAQ
Menu, Tray, Add
Menu, Tray, Add, Перезагрузить скрипт, Reload
Menu, Tray, Add
Menu, Tray, Add, Закрыть скрипт, Close
Menu, Tray, Color, FFFFFF
WinGetPos, , , ResX, ResY, ahk_exe GTA5.exe
CenterX := ResX // 2
CenterY := ResY // 2
cordspixIx := 72
cordspixIy := CenterY + 102
cordspix97kg1x := ResX - 278
cordspix97kg1y := CenterY - 228
cordspix97kg2x := ResX - 279
cordspix97kg2y := CenterY - 222
cordspix97kg3x := ResX - 267
cordspix97kg3y := CenterY - 228
cordspix97kg4x := ResX - 261
cordspix97kg4y := CenterY - 228
cordspix98kg1x := ResX - 280
cordspix98kg1y := CenterY - 228
cordspix98kg2x := ResX - 281
cordspix98kg2y := CenterY - 222
cordspix98kg3x := ResX - 265
cordspix98kg3y := CenterY - 223
cordspix98kg4x := ResX - 265
cordspix98kg4y := CenterY - 217
cordspix99kg1x := ResX - 279
cordspix99kg1y := CenterY - 228
cordspix99kg2x := ResX - 280
cordspix99kg2y := CenterY - 222
cordspix99kg3x := ResX - 266
cordspix99kg3y := CenterY - 217
cordspix99kg4x := ResX - 261
cordspix99kg4y := CenterY - 224
cordspix10kg1x := ResX - 290
cordspix10kg1y := CenterY - 228
cordspix10kg2x := ResX - 280
cordspix10kg2y := CenterY - 228
cordsrodx := ResX - 245
cordsrody := CenterY - 68
cordsrodusex := ResX - 245
cordsrodusey := CenterY + 2
cordspixgglx := CenterX - 145
cordspixggly := CenterY - 87
cordscheckx := CenterX - 126
cordschecky := CenterY - 59
cordsrobotx := CenterX
cordsroboty := CenterY + 78
cordsmousex := CenterX + 92
if ( ResY = 1440 )
cordsmousey := CenterY + ResY // 3 - 7
else
cordsmousey := CenterY + ResY // 3 + 7
cordspixnoticex := CenterX - 303
cordspixnoticey := ResY - 62
IniRead, Width, %A_ScriptDir%\cfg\config.ini, Resolution, Width, %ResX%
IniRead, Height, %A_ScriptDir%\cfg\config.ini, Resolution, Height, %ResY%
IniRead, cordspixIx, %A_ScriptDir%\cfg\config.ini, Inv, cordspixIx, %cordspixIx%
IniRead, cordspixIy, %A_ScriptDir%\cfg\config.ini, Inv, cordspixIy, %cordspixIy%
IniRead, cordspix97kg1x, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg1x, %cordspix97kg1x%
IniRead, cordspix97kg1y, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg1y, %cordspix97kg1y%
IniRead, cordspix97kg2x, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg2x, %cordspix97kg2x%
IniRead, cordspix97kg2y, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg2y, %cordspix97kg2y%
IniRead, cordspix97kg3x, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg3x, %cordspix97kg3x%
IniRead, cordspix97kg3y, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg3y, %cordspix97kg3y%
IniRead, cordspix97kg4x, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg4x, %cordspix97kg4x%
IniRead, cordspix97kg4y, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg4y, %cordspix97kg4y%
IniRead, cordspix98kg1x, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg1x, %cordspix98kg1x%
IniRead, cordspix98kg1y, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg1y, %cordspix98kg1y%
IniRead, cordspix98kg2x, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg2x, %cordspix98kg2x%
IniRead, cordspix98kg2y, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg2y, %cordspix98kg2y%
IniRead, cordspix98kg3x, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg3x, %cordspix98kg3x%
IniRead, cordspix98kg3y, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg3y, %cordspix98kg3y%
IniRead, cordspix98kg4x, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg4x, %cordspix98kg4x%
IniRead, cordspix98kg4y, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg4y, %cordspix98kg4y%
IniRead, cordspix99kg1x, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg1x, %cordspix99kg1x%
IniRead, cordspix99kg1y, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg1y, %cordspix99kg1y%
IniRead, cordspix99kg2x, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg2x, %cordspix99kg2x%
IniRead, cordspix99kg2y, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg2y, %cordspix99kg2y%
IniRead, cordspix99kg3x, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg3x, %cordspix99kg3x%
IniRead, cordspix99kg3y, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg3y, %cordspix99kg3y%
IniRead, cordspix99kg4x, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg4x, %cordspix99kg4x%
IniRead, cordspix99kg4y, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg4y, %cordspix99kg4y%
IniRead, cordspix10kg1x, %A_ScriptDir%\cfg\config.ini, Inv, cordspix10kg1x, %cordspix10kg1x%
IniRead, cordspix10kg1y, %A_ScriptDir%\cfg\config.ini, Inv, cordspix10kg1y, %cordspix10kg1y%
IniRead, cordspix10kg2x, %A_ScriptDir%\cfg\config.ini, Inv, cordspix10kg2x, %cordspix10kg2x%
IniRead, cordspix10kg2y, %A_ScriptDir%\cfg\config.ini, Inv, cordspix10kg2y, %cordspix10kg2y%
IniRead, cordsrodx, %A_ScriptDir%\cfg\config.ini, Rod, cordsrodx, %cordsrodx%
IniRead, cordsrody, %A_ScriptDir%\cfg\config.ini, Rod, cordsrody, %cordsrody%
IniRead, cordsrodusex, %A_ScriptDir%\cfg\config.ini, Rod, cordsrodusex, %cordsrodusex%
IniRead, cordsrodusey, %A_ScriptDir%\cfg\config.ini, Rod, cordsrodusey, %cordsrodusey%
IniRead, cordspixgglx, %A_ScriptDir%\cfg\config.ini, Google, cordspixgglx, %cordspixgglx%
IniRead, cordspixggly, %A_ScriptDir%\cfg\config.ini, Google, cordspixggly, %cordspixggly%
IniRead, cordscheckx, %A_ScriptDir%\cfg\config.ini, Google, cordscheckx, %cordscheckx%
IniRead, cordschecky, %A_ScriptDir%\cfg\config.ini, Google, cordschecky, %cordschecky%
IniRead, cordsrobotx, %A_ScriptDir%\cfg\config.ini, Google, cordsrobotx, %cordsrobotx%
IniRead, cordsroboty, %A_ScriptDir%\cfg\config.ini, Google, cordsroboty, %cordsroboty%
IniRead, cordsmousex, %A_ScriptDir%\cfg\config.ini, Mouse, cordsmousex, %cordsmousex%
IniRead, cordsmousey, %A_ScriptDir%\cfg\config.ini, Mouse, cordsmousey, %cordsmousey%
IniRead, cordspixnoticex, %A_ScriptDir%\cfg\config.ini, PixNotice, cordspixnoticex, %cordspixnoticex%
IniRead, cordspixnoticey, %A_ScriptDir%\cfg\config.ini, PixNotice, cordspixnoticey, %cordspixnoticey%
IniRead, delaymin, %A_ScriptDir%\cfg\config.ini, DASIK, DelayMin, 80
IniRead, delaymax, %A_ScriptDir%\cfg\config.ini, DASIK, DelayMax, 140
IniRead, FastFishing, %A_ScriptDir%\cfg\config.ini, DASIK, FastFishing, 0
IniRead, CheckInv, %A_ScriptDir%\cfg\config.ini, DASIK, CheckInv, 0
IniRead, Worm, %A_ScriptDir%\cfg\config.ini, DASIK, Worm, 0
IniRead, Rucksack, %A_ScriptDir%\cfg\config.ini, DASIK, Rucksack, 0
IniRead, Bypass, %A_ScriptDir%\cfg\config.ini, DASIK, bypass, 0
IniRead, Hint, %A_ScriptDir%\cfg\config.ini, DASIK, Hint, 1
FileCreateDir, %A_ScriptDir%\cfg
FileCreateDir, %A_MyDocuments%\ahkdev
if ProcessExist("GTA5.exe")
{
if (ResX = 160) || (ResY = 28)
{
SoundPlay, %A_WinDir%\Media\Windows Error.wav
MsgBox, 262160, Fishing Bot, Неправильные настройки графики. (Тип экрана. Формат)`n`nВнимательно прочитайте ReadMe.txt, 5
ExitApp
}
}
IfNotExist, %A_ScriptDir%\cfg\config.ini
{
if ProcessExist("GTA5.exe")
{
MsgBox, 262208, Fishing Bot, Загружена версия под разрешение экрана %ResX%x%ResY%., 3
UrlDownloadToFile, https://drive.google.com/u/0/uc?id=1Hy9Mi5T2J9YhZ0oFlxxJ3DXks9tgr_fV&export=download, %A_MyDocuments%\ahkdev\ahkdev.png
IniWrite, %ResX%, %A_ScriptDir%\cfg\config.ini, Resolution, Width
IniWrite, %ResY%, %A_ScriptDir%\cfg\config.ini, Resolution, Height
IniWrite, %cordspixIx%, %A_ScriptDir%\cfg\config.ini, Inv, cordspixIx
IniWrite, %cordspixIy%, %A_ScriptDir%\cfg\config.ini, Inv, cordspixIy
IniWrite, %cordspix97kg1x%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg1x
IniWrite, %cordspix97kg1y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg1y
IniWrite, %cordspix97kg2x%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg2x
IniWrite, %cordspix97kg2y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg2y
IniWrite, %cordspix97kg3x%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg3x
IniWrite, %cordspix97kg3y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg3y
IniWrite, %cordspix97kg4x%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg4x
IniWrite, %cordspix97kg4y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg4y
IniWrite, %cordspix98kg1x%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg1x
IniWrite, %cordspix98kg1y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg1y
IniWrite, %cordspix98kg2x%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg2x
IniWrite, %cordspix98kg2y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg2y
IniWrite, %cordspix98kg3x%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg3x
IniWrite, %cordspix98kg3y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg3y
IniWrite, %cordspix98kg4x%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg4x
IniWrite, %cordspix98kg4y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg4y
IniWrite, %cordspix99kg1x%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg1x
IniWrite, %cordspix99kg1y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg1y
IniWrite, %cordspix99kg2x%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg2x
IniWrite, %cordspix99kg2y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg2y
IniWrite, %cordspix99kg3x%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg3x
IniWrite, %cordspix99kg3y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg3y
IniWrite, %cordspix99kg4x%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg4x
IniWrite, %cordspix99kg4y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg4y
IniWrite, %cordspix10kg1x%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix10kg1x
IniWrite, %cordspix10kg1y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix10kg1y
IniWrite, %cordspix10kg2x%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix10kg2x
IniWrite, %cordspix10kg2y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix10kg2y
IniWrite, %cordsrodx%, %A_ScriptDir%\cfg\config.ini, Rod, cordsrodx
IniWrite, %cordsrody%, %A_ScriptDir%\cfg\config.ini, Rod, cordsrody
IniWrite, %cordsrodusex%, %A_ScriptDir%\cfg\config.ini, Rod, cordsrodusex
IniWrite, %cordsrodusey%, %A_ScriptDir%\cfg\config.ini, Rod, cordsrodusey
IniWrite, %cordspixgglx%, %A_ScriptDir%\cfg\config.ini, Google, cordspixgglx
IniWrite, %cordspixggly%, %A_ScriptDir%\cfg\config.ini, Google, cordspixggly
IniWrite, %cordscheckx%, %A_ScriptDir%\cfg\config.ini, Google, cordscheckx
IniWrite, %cordschecky%, %A_ScriptDir%\cfg\config.ini, Google, cordschecky
IniWrite, %cordsrobotx%, %A_ScriptDir%\cfg\config.ini, Google, cordsrobotx
IniWrite, %cordsroboty%, %A_ScriptDir%\cfg\config.ini, Google, cordsroboty
IniWrite, %cordsmousex%, %A_ScriptDir%\cfg\config.ini, Mouse, cordsmousex
IniWrite, %cordsmousey%, %A_ScriptDir%\cfg\config.ini, Mouse, cordsmousey
IniWrite, %cordspixnoticex%, %A_ScriptDir%\cfg\config.ini, PixNotice, cordspixnoticex
IniWrite, %cordspixnoticey%, %A_ScriptDir%\cfg\config.ini, PixNotice, cordspixnoticey
IniWrite, %delaymin%, %A_ScriptDir%\cfg\config.ini, DASIK, DelayMin
IniWrite, %delaymax%, %A_ScriptDir%\cfg\config.ini, DASIK, DelayMax
IniWrite, %fastfishing%, %A_ScriptDir%\cfg\config.ini, DASIK, FastFishing
IniWrite, %checkinv%, %A_ScriptDir%\cfg\config.ini, DASIK, CheckInv
IniWrite, %worm%, %A_ScriptDir%\cfg\config.ini, DASIK, Worm
IniWrite, %rucksack%, %A_ScriptDir%\cfg\config.ini, DASIK, Rucksack
IniWrite, %bypass%, %A_ScriptDir%\cfg\config.ini, DASIK, bypass
IniWrite, %hint%, %A_ScriptDir%\cfg\config.ini, DASIK, Hint
}
}
if !ProcessExist("GTA5.exe")
{
SoundPlay, %A_WinDir%\Media\Windows Error.wav
MsgBox, 262160, Fishing Bot, GTA должна быть запущена., 5
ExitApp
}
ProcessExist(Name)
{
Process, Exist, %Name%
return Errorlevel
}
if (ResX != Width) || (ResY != Height) and ProcessExist("GTA5.exe")
{
MsgBox, 262196, Fishing Bot, Разрешение экрана игры (%ResX%x%ResY%)`nНе совпадает с настройками бота (%Width%x%Height%)`n`nИзменить настройки под разрешение экрана игры?
IfMsgBox Yes
{
FileDelete, %A_ScriptDir%\cfg\config.ini
Reload
}
}
if FastFishing
Menu, SettingsFF, Check, Быстрая рыбалка
else
Menu, SettingsFF, UnCheck, Быстрая рыбалка
if CheckInv
Menu, SettingsFF, Check, Проверка инвентаря
else
Menu, SettingsFF, UnCheck, Проверка инвентаря
if Worm
Menu, Settings, Check, Ловить рыбу на червя
else
Menu, Settings, UnCheck, Ловить рыбу на червя
if Rucksack
Menu, Settings, Check, Сумка/Рюкзак
else
Menu, Settings, UnCheck, Сумка/Рюкзак
if bypass
Menu, Settings, Check, Нажимать "Я робот"
else
Menu, Settings, UnCheck, Нажимать "Я робот"
if Hint
Menu, Settings, Check, Подсказки
else
Menu, Settings, UnCheck, Подсказки
if Hint
{
ToolTip, Fishing Bot [v.1.3.2 BETA] by DASIK, 0, 0
SetTimer, RemoveToolTip, -3000
}
return
FastFishing:
if FastFishing
{
FastFishing := 0
if Hint
{
ToolTip, Быстрая рыбалка выключена, 0, 0
SetTimer, RemoveToolTip, -1000
}
IniWrite, %fastfishing%, %A_ScriptDir%\cfg\config.ini, DASIK, FastFishing
Menu, SettingsFF, UnCheck, Быстрая рыбалка
}
else
{
FastFishing := 1
if Hint
{
ToolTip, Быстрая рыбалка включена, 0, 0
SetTimer, RemoveToolTip, -1000
}
IniWrite, %fastfishing%, %A_ScriptDir%\cfg\config.ini, DASIK, FastFishing
Menu, SettingsFF, Check, Быстрая рыбалка
}
return
CheckInv:
if CheckInv
{
CheckInv := 0
if Hint
{
ToolTip, Проверка инвентаря выключена, 0, 0
SetTimer, RemoveToolTip, -1000
}
IniWrite, %checkinv%, %A_ScriptDir%\cfg\config.ini, DASIK, CheckInv
Menu, SettingsFF, UnCheck, Проверка инвентаря
}
else
{
CheckInv := 1
if Hint
{
ToolTip, Проверка инвентаря включена, 0, 0
SetTimer, RemoveToolTip, -1000
}
IniWrite, %checkinv%, %A_ScriptDir%\cfg\config.ini, DASIK, CheckInv
Menu, SettingsFF, Check, Проверка инвентаря
}
return
Worm:
if Worm
{
if Rucksack
{
Worm := 0
cordsrodusey := CenterY - 113
if Hint
{
ToolTip, Ловить рыбу на приманку с сумкой/рюкзаком, 0, 0
SetTimer, RemoveToolTip, -3000
}
IniWrite, %cordsrodusey%, %A_ScriptDir%\cfg\config.ini, Rod, cordsrodusey
IniWrite, %worm%, %A_ScriptDir%\cfg\config.ini, DASIK, Worm
Menu, Settings, UnCheck, Ловить рыбу на червя
}
else
{
Worm := 0
cordsrodusey := CenterY + 2
if Hint
{
ToolTip, Ловить рыбу на приманку без сумки/рюкзака, 0, 0
SetTimer, RemoveToolTip, -3000
}
IniWrite, %cordsrodusey%, %A_ScriptDir%\cfg\config.ini, Rod, cordsrodusey
IniWrite, %worm%, %A_ScriptDir%\cfg\config.ini, DASIK, Worm
Menu, Settings, UnCheck, Ловить рыбу на червя
}
}
else
{
if Rucksack
{
Worm := 1
cordsrodusey := CenterY - 69
if Hint
{
ToolTip, Ловить рыбу на червя с сумкой/рюкзаком, 0, 0
SetTimer, RemoveToolTip, -3000
}
IniWrite, %cordsrodusey%, %A_ScriptDir%\cfg\config.ini, Rod, cordsrodusey
IniWrite, %worm%, %A_ScriptDir%\cfg\config.ini, DASIK, Worm
Menu, Settings, Check, Ловить рыбу на червя
}
else
{
Worm := 1
cordsrodusey := CenterY + 46
if Hint
{
ToolTip, Ловить рыбу на червя без сумки/рюкзака, 0, 0
SetTimer, RemoveToolTip, -3000
}
IniWrite, %cordsrodusey%, %A_ScriptDir%\cfg\config.ini, Rod, cordsrodusey
IniWrite, %worm%, %A_ScriptDir%\cfg\config.ini, DASIK, Worm
Menu, Settings, Check, Ловить рыбу на червя
}
}
return
Rucksack:
if Rucksack
{
Rucksack := 0
cordspix97kg1y := CenterY - 228
cordspix97kg2y := CenterY - 222
cordspix97kg3y := CenterY - 228
cordspix97kg4y := CenterY - 228
cordspix98kg1y := CenterY - 228
cordspix98kg2y := CenterY - 222
cordspix98kg3y := CenterY - 223
cordspix98kg4y := CenterY - 217
cordspix99kg1y := CenterY - 228
cordspix99kg2y := CenterY - 222
cordspix99kg3y := CenterY - 217
cordspix99kg4y := CenterY - 224
cordspix10kg1y := CenterY - 228
cordspix10kg2y := CenterY - 228
cordsrody := CenterY - 68
if Worm
cordsrodusey := CenterY + 46
else
cordsrodusey := CenterY + 2
if Hint
{
ToolTip, Сумка не надета, 0, 0
SetTimer, RemoveToolTip, -3000
}
IniWrite, %cordspix97kg1y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg1y
IniWrite, %cordspix97kg2y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg2y
IniWrite, %cordspix97kg3y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg3y
IniWrite, %cordspix97kg4y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg4y
IniWrite, %cordspix98kg1y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg1y
IniWrite, %cordspix98kg2y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg2y
IniWrite, %cordspix98kg3y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg3y
IniWrite, %cordspix98kg4y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg4y
IniWrite, %cordspix99kg1y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg1y
IniWrite, %cordspix99kg2y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg2y
IniWrite, %cordspix99kg3y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg3y
IniWrite, %cordspix99kg4y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg4y
IniWrite, %cordspix10kg1y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix10kg1y
IniWrite, %cordspix10kg2y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix10kg2y
IniWrite, %cordsrody%, %A_ScriptDir%\cfg\config.ini, Rod, cordsrody
IniWrite, %cordsrodusey%, %A_ScriptDir%\cfg\config.ini, Rod, cordsrodusey
IniWrite, %rucksack%, %A_ScriptDir%\cfg\config.ini, DASIK, Rucksack
Menu, Settings, UnCheck, Сумка/Рюкзак
}
else
{
Rucksack := 1
cordspix97kg1y := CenterY - 343
cordspix97kg2y := CenterY - 337
cordspix97kg3y := CenterY - 343
cordspix97kg4y := CenterY - 343
cordspix98kg1y := CenterY - 343
cordspix98kg2y := CenterY - 337
cordspix98kg3y := CenterY - 338
cordspix98kg4y := CenterY - 332
cordspix99kg1y := CenterY - 343
cordspix99kg2y := CenterY - 337
cordspix99kg3y := CenterY - 332
cordspix99kg4y := CenterY - 339
cordspix10kg1y := CenterY - 343
cordspix10kg2y := CenterY - 343
cordsrody := CenterY - 183
if Worm
cordsrodusey := CenterY - 69
else
cordsrodusey := CenterY - 113
if Hint
{
ToolTip, Сумка надета, 0, 0
SetTimer, RemoveToolTip, -3000
}
IniWrite, %cordspix97kg1y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg1y
IniWrite, %cordspix97kg2y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg2y
IniWrite, %cordspix97kg3y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg3y
IniWrite, %cordspix97kg4y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix97kg4y
IniWrite, %cordspix98kg1y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg1y
IniWrite, %cordspix98kg2y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg2y
IniWrite, %cordspix98kg3y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg3y
IniWrite, %cordspix98kg4y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix98kg4y
IniWrite, %cordspix99kg1y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg1y
IniWrite, %cordspix99kg2y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg2y
IniWrite, %cordspix99kg3y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg3y
IniWrite, %cordspix99kg4y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix99kg4y
IniWrite, %cordspix10kg1y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix10kg1y
IniWrite, %cordspix10kg2y%, %A_ScriptDir%\cfg\config.ini, Inv, cordspix10kg2y
IniWrite, %cordsrody%, %A_ScriptDir%\cfg\config.ini, Rod, cordsrody
IniWrite, %cordsrodusey%, %A_ScriptDir%\cfg\config.ini, Rod, cordsrodusey
IniWrite, %rucksack%, %A_ScriptDir%\cfg\config.ini, DASIK, Rucksack
Menu, Settings, Check, Сумка/Рюкзак
}
return
bypass:
if bypass
{
bypass := 0
if Hint
{
ToolTip, Не нажимать "Я робот" автоматически, 0, 0
SetTimer, RemoveToolTip, -3000
}
IniWrite, %bypass%, %A_ScriptDir%\cfg\config.ini, DASIK, bypass
Menu, Settings, UnCheck, Нажимать "Я робот"
}
else
{
bypass := 1
if Hint
{
ToolTip, Нажимать "Я робот" автоматически, 0, 0
SetTimer, RemoveToolTip, -3000
}
IniWrite, %bypass%, %A_ScriptDir%\cfg\config.ini, DASIK, bypass
Menu, Settings, Check, Нажимать "Я робот"
}
return
Hint:
if Hint
{
Hint := 0
if Hint
{
ToolTip, Подсказки выключены, 0, 0
SetTimer, RemoveToolTip, -1000
}
IniWrite, %hint%, %A_ScriptDir%\cfg\config.ini, DASIK, Hint
Menu, Settings, UnCheck, Подсказки
}
else
{
Hint := 1
if Hint
{
ToolTip, Подсказки включены, 0, 0
SetTimer, RemoveToolTip, -1000
}
IniWrite, %hint%, %A_ScriptDir%\cfg\config.ini, DASIK, Hint
Menu, Settings, Check, Подсказки
}
return
Delay:
Gui, Delay:+ReSize +AlwaysOnTop -SysMenu
Gui, Delay:Color, EDEEF0
Gui, Delay:Font, cA3A3A3 s8 Norm
Gui, Delay:Add, Text, x25 y5, мин.
Gui, Delay:Add, Text, x81 y5, макс.
Gui, Delay:Font, cBlack s10 Norm, Arial
Gui, Delay:Add, Edit, x13 y20 w45 h20 Center vDelayMin, %delaymin%
Gui, Delay:Add, Edit, x72 y20 w45 h20 Center vDelayMax, %delaymax%
Gui, Delay:Add, Button, x12 y45 w106 h25 gSave, Сохранить
Gui, Delay:Show, Center w130 h75, Настройка задержки
return
*F8::
if Hint
ToolTip, Бот перезагружается, 0, 0
Sleep, 100
Reload
return
*F7::
Fish:
if Hint
{
ToolTip, Бот запущен, 0, 0
SetTimer, RemoveToolTip, -1000
}
SoundPlay, %A_WinDir%\Media\Windows Startup.wav
hWnd := WinExist("ahk_exe GTA5.exe")
WinPos := WinGetP(hWnd)
Window_CreateCapture(hWnd)
{
return DllCall("user32.dll\GetDCEx", "UInt", hWnd, "UInt", 0, "UInt", 1|2)
}
Client_GetPixel(hDC, x, y, WinPos)
{
return DllCall("gdi32.dll\GetPixel", "UInt", hDC, "Int", x+WinPos.Client2Win.x, "Int", y+WinPos.Client2Win.y, "UInt")
}
Window_DeleteWindowCapture(hWnd, hDC)
{
return DllCall("user32.dll\ReleaseDC", "UInt", hWnd, "UInt", hDC)
}
WinGetP(hWnd)
{
WinGetPos, x_W, y_W, w_W, h_W, % "ahk_id " hWnd
VarSetCapacity(pt, 16)
NumPut(x, pt, 0) || NumPut(y, pt, 4) || NumPut(w, pt, 8) || NumPut(h, pt, 12)
if (!DllCall("GetClientRect", UInt, hWnd, UInt, &pt)) || (!DllCall("ClientToScreen", UInt, hWnd, UInt, &pt))
return
x := NumGet(pt, 0, Int), y := NumGet(pt, 4, Int)
w := NumGet(pt, 8, Int), h := NumGet(pt, 12, Int)
Client := {x:x, y:y, w:w, h:h}, Client2Win := {x:x-x_W, y:y-y_W, w:w, h:h}
return WinP := {x:x_W, y:y_W, w:w_W, h:h_W, Client2Win:Client2Win, Client:Client}
}
Loop
{
Label1:
Random, rands, 500, 750
if FastFishing and CheckInv
{
ControlClick, , ahk_exe GTA5.exe, , Left
hDC := Window_CreateCapture(hWnd)
pixI := Client_GetPixel(hDC, cordspixIx, cordspixIy, WinPos)
Window_DeleteWindowCapture(hWnd, hDC)
if ( pixI != 0xff00bd )
ControlSend, , {i}, ahk_exe GTA5.exe
Sleep, rands
}
else
{
ControlClick, , ahk_exe GTA5.exe, , Left
hDC := Window_CreateCapture(hWnd)
pixI := Client_GetPixel(hDC, cordspixIx, cordspixIy, WinPos)
Window_DeleteWindowCapture(hWnd, hDC)
if ( pixI != 0xff00bd )
ControlSend, , {i}, ahk_exe GTA5.exe
Sleep, rands
}
hDC := Window_CreateCapture(hWnd)
pix97kg1 := Client_GetPixel(hDC, cordspix97kg1x, cordspix97kg1y, WinPos)
pix97kg2 := Client_GetPixel(hDC, cordspix97kg2x, cordspix97kg2y, WinPos)
pix97kg3 := Client_GetPixel(hDC, cordspix97kg3x, cordspix97kg3y, WinPos)
pix97kg4 := Client_GetPixel(hDC, cordspix97kg4x, cordspix97kg4y, WinPos)
pix98kg1 := Client_GetPixel(hDC, cordspix98kg1x, cordspix98kg1y, WinPos)
pix98kg2 := Client_GetPixel(hDC, cordspix98kg2x, cordspix98kg2y, WinPos)
pix98kg3 := Client_GetPixel(hDC, cordspix98kg3x, cordspix98kg3y, WinPos)
pix98kg4 := Client_GetPixel(hDC, cordspix98kg4x, cordspix98kg4y, WinPos)
pix99kg1 := Client_GetPixel(hDC, cordspix99kg1x, cordspix99kg1y, WinPos)
pix99kg2 := Client_GetPixel(hDC, cordspix99kg2x, cordspix99kg2y, WinPos)
pix99kg3 := Client_GetPixel(hDC, cordspix99kg3x, cordspix99kg3y, WinPos)
pix99kg4 := Client_GetPixel(hDC, cordspix99kg4x, cordspix99kg4y, WinPos)
pix10kg1 := Client_GetPixel(hDC, cordspix10kg1x, cordspix10kg1y, WinPos)
pix10kg2 := Client_GetPixel(hDC, cordspix10kg2x, cordspix10kg2y, WinPos)
Window_DeleteWindowCapture(hWnd, hDC)
if ( pix97kg1 = 0xFFFFFF ) and ( pix97kg2 = 0xFFFFFF ) and ( pix97kg3 = 0xFFFFFF ) and ( pix97kg4 = 0xFFFFFF )
{
if Hint
{
ToolTip, У вас 9.70 кг в инвентаре, 0, 0
SetTimer, RemoveToolTip, -3000
}
SoundPlay, %A_WinDir%\Media\Windows Error.wav
break
}
else if ( pix98kg1 = 0xFFFFFF ) and ( pix98kg2 = 0xFFFFFF ) and ( pix98kg3 = 0xFFFFFF ) and ( pix98kg4 = 0xFFFFFF )
{
if Hint
{
ToolTip, У вас 9.80 кг в инвентаре, 0, 0
SetTimer, RemoveToolTip, -3000
}
SoundPlay, %A_WinDir%\Media\Windows Error.wav
break
}
else if ( pix99kg1 = 0xFFFFFF ) and ( pix99kg2 = 0xFFFFFF ) and ( pix99kg3 = 0xFFFFFF ) and ( pix99kg4 = 0xFFFFFF )
{
if Hint
{
ToolTip, У вас 9.90 кг в инвентаре, 0, 0
SetTimer, RemoveToolTip, -3000
}
SoundPlay, %A_WinDir%\Media\Windows Error.wav
break
}
else if ( pix10kg1 = 0xFFFFFF ) and ( pix10kg2 = 0xFFFFFF )
{
if Hint
{
ToolTip, У вас 10.00 кг в инвентаре, 0, 0
SetTimer, RemoveToolTip, -3000
}
SoundPlay, %A_WinDir%\Media\Windows Error.wav
break
}
if FastFishing
{
Sleep, 250
ControlClick, , ahk_exe GTA5.exe, , Left
if CheckInv
{
hDC := Window_CreateCapture(hWnd)
pixI := Client_GetPixel(hDC, cordspixIx, cordspixIy, WinPos)
Window_DeleteWindowCapture(hWnd, hDC)
if ( pixI = 0xff00bd )
ControlSend, , {i}, ahk_exe GTA5.exe
}
ControlSend, , {p}, ahk_exe GTA5.exe
}
else
{
ControlClick, , ahk_exe GTA5.exe, , Left
Sleep, rands
ControlClick, x%cordsrodx% y%cordsrody%, ahk_exe GTA5.exe, , Left
Sleep, rands
ControlClick, x%cordsrodusex% y%cordsrodusey%, ahk_exe GTA5.exe, , Left
}
if Hint
{
ToolTip, Ловлю рыбу, 0, 0
SetTimer, RemoveToolTip, -3000
}
Sleep, 1500
hDC := Window_CreateCapture(hWnd)
pixnotice := Client_GetPixel(hDC, cordspixnoticex, cordspixnoticey, WinPos)
Window_DeleteWindowCapture(hWnd, hDC)
if ( pixnotice = 0x520090 ) | ( pixnotice = 0x550393 )
{
if Hint
{
ToolTip, У Вас нет приманки для рыб / Тут нельзя рыбачить / Нельзя делать это в воде, 0, 0
SetTimer, RemoveToolTip, -3000
}
SoundPlay, %A_WinDir%\Media\Windows Error.wav
break
}
Sleep, 1500
if bypass
{
hDC := Window_CreateCapture(hWnd)
pixggl := Client_GetPixel(hDC, cordspixgglx, cordspixggly, WinPos)
Window_DeleteWindowCapture(hWnd, hDC)
if ( pixggl = 0xF9F9F9 )
{
if Hint
{
ToolTip, Я робот, 0, 0
SetTimer, RemoveToolTip, -2000
}
SoundPlay, %A_WinDir%\Media\Windows Notify.wav
ControlClick, x%cordsrobotx% y%cordsroboty%, ahk_exe GTA5.exe, , Left
Goto, Timer
}
}
else
{
hDC := Window_CreateCapture(hWnd)
pixggl := Client_GetPixel(hDC, cordspixgglx, cordspixggly, WinPos)
Window_DeleteWindowCapture(hWnd, hDC)
if ( pixggl = 0xF9F9F9 )
{
WinActivate, ahk_exe GTA5.exe
if Hint
{
ToolTip, Капча, 0, 0
SetTimer, RemoveToolTip, -3000
}
SoundPlay, %A_WinDir%\Media\Windows Notify.wav
MouseMove, %cordscheckx%, %cordschecky%
}
}
Sleep, 5000
Label2:
hDC := Window_CreateCapture(hWnd)
pixmouse := Client_GetPixel(hDC, cordsmousex, cordsmousey, WinPos)
Window_DeleteWindowCapture(hWnd, hDC)
if ( pixmouse = 0x0000FF ) | ( pixmouse = 0x0000FD )
{
if Hint
ToolTip, Клюет, 0, 0
ControlClick, , ahk_exe GTA5.exe, , Left
Random, rand, %delaymin%, %delaymax%
Sleep, rand
Goto, Label2
}
else
{
hDC := Window_CreateCapture(hWnd)
pixnotice := Client_GetPixel(hDC, cordspixnoticex, cordspixnoticey, WinPos)
Window_DeleteWindowCapture(hWnd, hDC)
if ( pixnotice = 0x04fa97 ) | ( pixnotice = 0x4fb98 ) | ( pixnotice = 0x11ffa4 )
{
if Hint
{
ToolTip, Рыба поймана, 0, 0
SetTimer, RemoveToolTip, -1500
}
Goto, Label1
}
else
{
hDC := Window_CreateCapture(hWnd)
pixnotice := Client_GetPixel(hDC, cordspixnoticex, cordspixnoticey, WinPos)
Window_DeleteWindowCapture(hWnd, hDC)
if ( pixnotice = 0x520090 ) | ( pixnotice = 0x550393 )
{
if Hint
{
ToolTip, У Вас не получилось поймать рыбу. Бот начнет рыбачить через 3 секунды., 0, 0
SetTimer, RemoveToolTip, -3000
}
SoundPlay, %A_WinDir%\Media\Windows Balloon.wav
Sleep, 3000
Goto, Label1
}
else
{
Goto, Label2
}
}
}
}
return
Save:
Gui, Delay:Submit, NoHide
IniWrite, %delaymin%, %A_ScriptDir%\cfg\config.ini, DASIK, DelayMin
IniWrite, %delaymax%, %A_ScriptDir%\cfg\config.ini, DASIK, DelayMax
if Hint
{
ToolTip, Сохранено., 0, 0
SetTimer, RemoveToolTip, -1000
}
Gui, Delay:Destroy
return
RemoveToolTip:
ToolTip
return
Timer:
var += 1
if ( var = 1 )
duration := 600
if ( var = 2 )
duration := 1200
if ( var = 3 )
{
duration := 2400
var := 0
}
SetTimer, Countdown, 1000
return
Countdown:
minutes := SubStr("0" . (duration // 60), -1)
seconds := SubStr("0" . (Mod(duration, 60)), -1)
if !duration
{
ToolTip
SetTimer, Countdown, Off
Goto, Fish
}
else
{
duration--
if !minutes
ToolTip, % seconds . " сек", 0, 0
else
ToolTip, % minutes . ":" . seconds " мин", 0, 0
}
return
FAQ:
Run, open "ReadMe.txt"
return
FunPay:
Run, https://funpay.ru/users/2249431/
return
VK:
Run, https://vk.com/ahkdev
return
Reload:
Reload
return
Close:
ExitApp