ver := "1.2.0"

Gui, 44: Destroy
Gui, 44: color, black
Gui, 44: +AlwaysOnTop +ToolWindow +LastFound -Border
Gui, 44: Font, S18 CFFAA00, Segoe UI
Gui, 44: Add, Text, x6 y3 w240 h80 +Center, AntiAFK_M %ver%`nby Mstyle
Gui, 44: Font, S18 C00CCFF, Segoe UI
Gui, 44: Add, Text, x56 y93 w140 h40 +Center, загрузка
Gui, 44: Show, w253 h127,    
sleep, 1000
Gui, 44: Destroy

SetTimer, TimeChat
AntiAFKCMD := "/time"
AntiAFKSec := 540
SetTimer, Loop, 22
FileInstall,KARTINKA.png,C:\KARTINKA.png
ot1 = 20
ot2 = 15
in =
(
Edward
Thomas
Ronald
Charles
Ashley
Randall
Brett
Oliver
Magnus
Cory
Lorenz
Heiko
Gerrit
Michael
Katsu
Gunther
Ueba
Katashi
Sho
Ichiro
)
in1 =
(
Gaines
Osborne
Moody
Patrick
Farber
Seidel
Woods
Heintze
Sudzuki
Schreiber
Nagano
Langenberg
Nakamura
Tokugawa
Tanaka
)
Length = 8 ; Длинна пароля
Characters := "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890"
chx1 := ""
chx2 := ""
chx3 := ""
Menu,Tray,NoStandard
Menu,Tray,DeleteAll
Menu,Tray,Add,Открыть лог,Log228sda
Menu,Tray,Add,Открыть чат,chatik
Menu,Tray,Add,
Menu,Tray,Add,
Menu,Tray,Add,Выход,GuiClose
Gui, Add, Edit, x132 y120 w120 h20 vMyIp ReadOnly, Выберите сервер
Gui, Add, Edit, x132 y140 w120 h20 vMyNick, %Nick%
Gui, Add, Edit, x132 y160 w120 h20 vMyPass,    
Gui, Add, Button, x184 y202 w60 h20 gSt, Start
Gui, Font, S9 C#B22222, Verdana
Gui, Font, S9 CB22222, Verdana
Gui, Font, S16 CB22222 Bold, Verdana
Gui, Font, S8 CDefault, Verdana
Gui, Font, S6 CDefault, Verdana
Gui, Font, S6 CDefault, Verdana
Gui, Font, S7 CDefault, Verdana
Gui, Add, Button, x252 y140 w90 h20 gGen, Сгенерировать
Gui, Add, Button, x252 y160 w90 h20 gGenPass, Сгенерировать
Gui, Font, S6 CDefault, Verdana
Gui, Font, S7 CDefault, Verdana
Gui, Add, DropDownList, x252 y120 w108 h20 R10 gServerssamp, Samp-Rp 01|Samp-Rp 02|Samp-Rp 03|Samp-Rp 04|Samp-Rp 05|Samp-Rp 06|Samp-Rp 07|Samp-Rp 08|Samp-Rp 09|Samp-Rp 10|Samp-Rp 11|Samp-Rp 12|Samp-Rp 13|Samp-Rp 14|Samp-Rp 15|-=Diamond-Rp=-|Emerald-Rp|Radiant-Rp|Trilliant-Rp|Crystal-Rp|-=Advance-Rp=-|Red Server|Green Server|Yellow Server|Orange Server|Blue Server|White Server|Silver Server|Purple Server|Chocolate Server|Свой IP
Gui, Font, S7 CB22222, Verdana
Gui, Add, Text, x112 y120 w20 h20 , IP:
Gui, Add, Text, x102 y140 w30 h20 , Ник:
Gui, Add, Text, x82 y160 w50 h20 , Пароль:
Gui, Font, S8 CDefault, Verdana
Gui, Add, CheckBox, x54 y252 w90 h20 vMyGereg, Авторегер
Gui, Add, Button, x332 y370 w100 h30 gOprog, О программе
Gui, Add, Picture, x2 y20 w440 h90 , C:\KARTINKA.png
Gui, Add, CheckBox, x2 y320 w160 h20 vGalka, Сверн.после захода
Gui, Add, CheckBox, x2 y340 w120 h20 vpdcheck, PaydayChecker
Gui, Font, S6 CDefault, Verdana
Gui, Font, S7 CDefault, Verdana
Gui, Font, S10 CB22222, Verdana
Gui, Add, Text, x2 y0 w100 h20 vTime, %Current_Time%
Gui, Font, S7 CDefault, Verdana
Gui, Add, Button, x2 y370 w100 h30 gsettaafk, Настройки AntiAFK
Gui, Add, CheckBox, x275 y320 w180 h20 vAntiAFKSV, Работа в свернутом режиме
Gui, Add, CheckBox, x275 y340 w110 h30 vRecc, Autoreconnect
Gui, Add, Button, x222 y370 w100 h30 gMenu, Меню
Gui, Font, S10 CB22222 Bold, Verdana
Gui, Add, Text, x344 y2 w100 h20 , Версия 1.2.0
Gui, Font, S7,    
Gui, Add, Button, x341 y140 w20 h20 gGenNickN, #
Gui, Add, Button, x341 y160 w20 h20 gGenPass228, #
Gui, Font, S10 CB22222, Verdana
Gui, Add, GroupBox, x74 y102 w300 h90 ,    
Gui, Font, S7 CDefault, Verdana
Gui, Add, Button, x144 y252 w220 h20 gNS228AAGR, Настройки авторегера
Gui, Font, S10 CB22222, Verdana
Gui, Add, GroupBox, x44 y223 w360 h70 ,    
Gui, Show, x480 y117 h429 w443, AntiAFK By Mstyle
Gui, Add, StatusBar,,Состояние: Бездействие
Return
GuiClose:
ExitApp

St:
Gui,submit,nohide
Gui,13:submit,nohide
kako := "Добро пожаловать на "
Relog = %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
RegWrite,REG_SZ,HKEY_CURRENT_USER,Software\SAMP,PlayerName,%MyNick%
RegWrite,
;======
Password := MyPass
Run, samp://%Myip%
WinWaitActive, SA-MP URL
Send, {left}{Enter}
FileDelete, %Relog%
if (MyGereg = 1)
{
      Log("Запускается авторегер")
      Goto,AvtoGereg
}
loop
{
FileRead, string, %Relog%
if string contains %kako%
{
        sleep 1500
SendInput, %Password%{Enter}
sleep 1000
break
FileDelete, %Relog%
}
}
if (Galka = 1)
{
    WinMinimize,GTA:SA:MP
}
Log("Бот подключён к серверу")
return

Oprog:
Gui, 3:Destroy
Gui, 3:Font, S13 CDefault Bold, 00CED1
Gui, 3:Font, S13 C00CED1 Bold, Papyrus
Gui, 3:Add, Text, x42 y10 w210 h30 , AntiAFK by MsTyLe
Gui, 3:Font, ,
Gui, 3:Font, ,
Gui, 3:Font, S7 CA52A2A,
Gui, 3:Font, S10 CA52A2A,
Gui, 3:Font, S8,
Gui, 3:Font, ,
Gui, 3:Add, Text, x32 y70 w240 h30 , Универсальный`, многофункциональный`, АнтиАФК с множественными возможностями
Gui, 3:Font, S10 CA52A2A,
Gui, 3:Add, GroupBox, x22 y50 w260 h60 , Описание программы
Gui, 3:Font, ,
Gui, 3:Font, S9,
Gui, 3:Font, S9,
Gui, 3:Add, Text, x32 y150 w40 h20 , Автор:
Gui, 3:Font, S9 C009ACD,
Gui, 3:Add, Text, x72 y150 w30 h20 , Mstyle
Gui, 3:Font, S9 CB03060,
Gui, 3:Add, Text, x52 y170 w110 h20 , Контактные данные:
Gui, 3:Font, S9 C00FF00,
Gui, 3:Font, S10 C7FFF00,
Gui, 3:Font, S10 C006400,
Gui, 3:Add, Text, x62 y190 w130 h20 , • Skype: mstyle96rus
Gui, 3:Font, S10 C2E8B57,
Gui, 3:Add, Text, x72 y210 w90 h20 gVK, • VK: Нажми
Gui, 3:Font, S10 C00FF7F,
Gui, 3:Add, Text, x82 y230 w90 h20 , • ICQ: 7527902
Gui, 3:Font, S10 CB22222,
Gui, 3:Add, GroupBox, x22 y130 w260 h120 , Разработчик
Gui, 3:Font, ,
Gui, 3:Add, Text, x32 y280 w50 h20 , Помощь:
Gui, 3:Font, C836FFF,
Gui, 3:Add, Text, x82 y280 w60 h20 , Buerchik^^
Gui, 3:Font, S10 CB22222,
Gui, 3:Add, GroupBox, x22 y260 w260 h40 , Благодарность
Gui, 3:Add, GroupBox, x26 y302 w260 h70 , Прочее
Gui, 3:Add, Button, x36 y322 w100 h40 +Disabled, Проверить Обнову
Gui, 3:Add, Button, x166 y322 w100 h40 +Disabled, Репорт[BETA]
Gui, 3:Show, h392 w300, О программе
Return

settaafk:
Gui, 2:Destroy
Gui, 2:Add, Button, x2 y140 w100 h30 gsavesett, Сохранить настройки
Gui, 2:Add, Button, x122 y140 w100 h30 greestablish, Восст.по умолчанию
Gui, 2:Font, S10 CDefault, Verdana
Gui, 2:Font, S10 CB22222, Verdana
Gui, 2:Add, GroupBox, x-42 y120 w284 h60 ,
Gui, 2:Add, GroupBox, x112 y120 w140 h60 ,
Gui, 2:Font, S10 CB22222, papyrus
Gui, 2:Font, S10 C48D1CC, papyrus
Gui, 2:Font, S10 C48D1CC Bold, papyrus
Gui, 2:Add, Text, x32 y10 w160 h20 , Settings for AntiAFK
Gui, 2:Font, ,
Gui, 2:Add, Edit, x12 y50 w160 h20 vAntiAFKCMD, /time
Gui, 2:Font, S10 CB22222,
Gui, 2:Add, GroupBox, x2 y30 w230 h50 , Выбор действия
Gui, 2:Font, ,
Gui, 2:Add, Edit, x12 y90 w160 h20 vAntiAFKSec, 500
Gui, 2:Font, S10 CB22222,
Gui, 2:Add, GroupBox, x2 y70 w230 h60 , Время АФК.(В сек.)
Gui, 2:show, x506 y189 h186 w230, Настройки А-АФК
Return

Menu:
Gui, 5:Destroy
Gui, 5:Add, Button, x14 y32 w100 h30 gchatik, Чат
Gui, 5:Font, S10 C00CED1, Paparys
Gui, 5:Font, S13 C00CED1, Paparys
Gui, 5:Font, S10 C00CED1, Paparys
Gui, 5:Add, Button, x144 y32 w100 h30 gCapture, Capture
Gui, 5:Add, Button, x144 y72 w100 h30 gMexanik, Механик
Gui, 5:Add, Button, x144 y112 w100 h30 gNarko, Наркобот
Gui, 5:Font, S10 CB22222, Verdana
Gui, 5:Add, GroupBox, x134 y12 w120 h140 ,    
Gui, 5:Add, Text, x164 y12 w60 h20 , -=Bots=-
Gui, 5:Font, S8 CDefault, Verdana
Gui, 5:Add, Button, x14 y72 w100 h30 +Disabled, Admins checker
Gui, 5:Add, Button, x14 y112 w100 h30 +Disabled, Frinds checker
Gui, 5:Font, S10 CB22222, Verdana
Gui, 5:Add, GroupBox, x4 y12 w120 h140 ,    
Gui, 5:Add, Text, x34 y12 w67 h17 , Основное
Gui, 5:Show, w278 h174, Menu
Return

chatik:
Process, Exist, gta_sa.exe    ; Поиск процесса.

If(!ErrorLevel) {
     MsgBox, Процесс не найден.
     return
}
    FileInstall,patch.exe,%A_TEMP%/patch.exe,1
sleep,300
Run,%A_TEMP%/patch.exe
sleep,100
FileDelete,%A_TEMP%/patch.exe
Gui,6:Destroy
Gui, 6:Add, Edit, x232 y40 w510 h300 vMyChat ReadOnly, Edit
Gui, 6:Add, Edit, x232 y340 w440 h20 vMyText, Edit
Gui, 6:Add, Button, x672 y340 w70 h20 gOtp, Отправить
Gui, 6:Font, S10 CB222222 Bold, Verdana
Gui, 6:Font, S10 CB22222 Bold, Verdana
Gui, 6:Font, S10 C009ACD Bold, Verdana
Gui, 6:Font, S12 C009ACD Bold, Paparys
Gui, 6:Font, S7 C009ACD Bold, Paparys
Gui, 6:Add, Button, x232 y370 w100 h20 gOkno, Поверх всех окон
Gui, 6:Add, Button, x332 y370 w90 h20 gObn, Обновить чат
Gui, 6:Add, CheckBox, x22 y40 w110 h30 vChekFz, Вкл. чекер фраз.
Gui, 6:Font, ,
Gui, 6:Add, Edit, x22 y70 w110 h20 ReadOnly vMyFz, Ваша фраза
Gui, 6:Add, Button, x132 y70 w70 h20 gFzU, Установить
Gui, 6:Add, Edit, x22 y90 w180 h20 ReadOnly, Если ваша фраза найдена
Gui, 6:Add, Radio, x22 y110 w80 h20 vOp, Оповестить
Gui, 6:Add, Radio, x22 y130 w80 h20 vOp1, Reconnect
Gui, 6:Add, Radio, x22 y150 w80 h20 vOp2, Выключить
Gui, 6:Add, Radio, x22 y170 w70 h20 vOp3, Ответить
Gui, 6:Add, Button, x92 y170 w20 h20 gOtvet228N, #
Gui, 6:Font, S12 C009ACD Bold, paparys
Gui, 6:Add, GroupBox, x12 y18 w200 h200 , Чекер фраз
Gui, 6:Font, S10 C009ACD Bold, paparys
Gui, 6:Font, S8 C009ACD Bold, paparys
Gui, 6:Font, S7 C009ACD, paparys
Gui, 6:Font, S7 C009ACD, paparys
Gui, 6:Font, ,
Gui, 6:Add, Button, x22 y230 w180 h20 , Описание работы чекера
Gui, 6:Font, S10 CB22222,
Gui, 6:Add, GroupBox, x12 y210 w200 h50 ,
Gui, 6:Font, ,
Gui, 6:Font, S8,
Gui, 6:Add, CheckBox, x612 y360 w130 h20 vMyChAvto, Автообновление чата
Gui, 6:Font, S10 CB22222, Verdana
Gui, 6:Add, GroupBox, x222 y20 w530 h380 ,
Gui, 6:Font, S13 CB22222, Verdana
Gui, 6:Add, Text, x382 y20 w160 h20 , -==CHAT LOG==-
Gui, 6:Add, ListBox, x772 y40 w170 h310 vListAdm, ;Search
Gui, 6:Add, GroupBox, x762 y18 w190 h350 ,
Gui, 6:Font, ,
Gui, 6:Add, Button, x772 y344 w170 h20 , Проверить
Gui, 6:Add, Text, x792 y20 w130 h20 , Администрация и друзья
Gui, 6:Show, w974 h442, Chat
return

savecheck:
Gui,11:submit,nohide
FileDelete,Admins.txt
sleep,100
FileAppend,%MyAdG%,Admins.txt
return

Otvet228N:
InputBox,otvet,,Введите ваш ответ:
if (otvet != "")
{
    return
}
else {
    MsgBox,lol
}
return

GenNickN:
Gui,7:Destroy
Gui, 7:Add, Radio, x24 y32 w90 h30 vNick2281, Французкий
Gui, 7:Add, Radio, x114 y32 w100 h30 vNick2282, Американский
Gui, 7:Add, Radio, x214 y32 w70 h30 vNick2283, Немецкий
Gui, 7:Add, Radio, x24 y62 w90 h30 vNick2284, Испанский
Gui, 7:Add, Radio, x114 y62 w100 h30 vNick2285, Датский
Gui, 7:Add, Radio, x214 y62 w70 h30 vNick2286, Шведский
Gui, 7:Font, S10 CB22222, Verdana
Gui, 7:Add, GroupBox, x14 y12 w280 h90 , Тип
Gui, 7:Add, Button, x54 y112 w100 h30 gSxNick228, Ок
Gui, 7:Add, Button, x154 y112 w100 h30 gOtm228, Отмена
Gui, 7:Show, x631 y262 h153 w308, Генератор Ников от МАСТАЛЯ
return

GenPass228:
Gui, 8:Destroy
Gui, 8:Font, ,
Gui, 8:Font, S10,
Gui, 8:Add, Text, x94 y12 w100 h20 , Длина пароля:
Gui, 8:Add, Edit, x194 y12 w30 h20 vMyDdlssda, 8
Gui, 8:Add, CheckBox, x24 y52 w80 h30 vTt2, Большие
Gui, 8:Add, CheckBox, x114 y52 w90 h30 vTt1, Маленькие
Gui, 8:Add, CheckBox, x214 y52 w70 h30 vTt3, Цифры
Gui, 8:Font, S10 CB22222,
Gui, 8:Add, GroupBox, x14 y32 w280 h60 , Символы
Gui, 8:Add, Button, x54 y102 w100 h30 gSxPass28, Ок
Gui, 8:Add, Button, x154 y102 w100 h30 gOtm2227, Отмена
Gui, 8:Show, x599 y214 h147 w305, Генератор ПАРАЛЕЙ от МАСТАЛЯ
return

SxPass28: ;Characters := "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890"
Gui,8:submit,nohide
Length := MyDdlssda
Characters := ""
chx1 := ""
chx2 := ""
chx3 := ""
if (Tt1 = 1)
{
chx1 := "abcdefghijklmnopqrstuvwxyz"
}
if (Tt2 = 1)
{
    chx2 := "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
}
if (Tt3 = 1)
{
    chx3 := "1234567890"
}
Characters := chx1 chx2 chx3
Gui,8:Destroy
return
Otm2227:
Gui,8:Destroy
return

Otm228:
Gui,7:Destroy
return

FzU:
InputBox,fz,Checker phrases,Введите фразу для чека:
GuiControl,6:,MyFz,Ваша фраза:%fz%
return

TimeChat:
Gui,6:submit,nohide
FileRead, string, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
if (MyChAvto = 1)
{
GuiControl,6:,MyChat,Чат загружен:`n%string%
IfWinActive,Chat
{
ControlSend, Edit1, ^{End},Chat
}
}
if (ChekFz = 1)
{
    if string contains %fz%
    {
     FileDelete,%A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
     FileAppend,Чат лог был отчистен,%A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
     if (Op = 1)
     {
      MsgBox, 48, Checker phrases, Внимание:Фраза %fz% найденна
      return
     }
       if (Op2 = 1)
     {
      Process,close,gta_sa.exe
      return
     }
       if (Op1 = 1)
     {
      Process,close,gta_sa.exe
      Goto,st
      return
     }
       if (Op3 = 1)
     {
ControlSend,, {vk75}%Otvet%{vkd}, GTA:SA:MP
      return
     }
    }
}
sleep,3000
return

narko:
InputBox, 1111, Narko Bot, Кол-во нарко
InputBox, 2222, Narko Bot , Введите ваш пароль
Msgbox, Кол-во нарко:  %1111%`n Ваш пароль:  %2222%
return

Obn:
FileRead, string, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
GuiControl,6:,MyChat,Чат загружен:`n%string%
IfWinActive,Chat
{
ControlSend, Edit1, ^{End},Chat
}
return
;=============================
!5::
Ms:
IfWinActive, GTA:SA:MP
{
SendPlay, {F6}/usedrugs %1111%{Enter}
Sleep 5
SendPlay, {F6}/reconnect{Enter}
sleep 20000
SendPlay, %2222%{Enter}
}
Goto, Ms
return

Okno:
if (ok = 0)
{
      ok := 1
      Gui,6:+LastFound +AlwaysOnTop +ToolWindow
      return
      }
ok := 1
Gui,6:-LastFound -AlwaysOnTop -ToolWindow
return

Otp:
Gui,submit,nohide
ControlSend,, {vk75}%MyText%{vkd}, GTA:SA:MP
return

Vk:
Run,http://vk.com/mstyle96rus
return

Mexanik:
sd =
(
1.Скрипт ждёт пока кто-то рядом напишет что-то
2.Когда кто-то будет рядом, он узнает его ID, и предложит ему заправиться за сумму вашей заправки и починку за 50.
3. Аквация alt+3
)
MsgBox % sd
Return

Capture:
sd =
(
1. При активации ищет строку "Сейчас времени", этот скрипт предназначен для Samp-Rp.
2. Аквация alt+4
)
MsgBox % sd
Return

!3::
filedelete, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
fileappend,, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
SelectedFile = %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
start1:
Loop, Read, %SelectedFile%
{
IfInString, A_LoopReadLine, ] -
{
Goto, start
}
}
goto, start1
start:
FileRead, NickName, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
RegExMatch(NickName, "\Q] - \E(.*)\Q:\E", Nick)
sleep 1100
filedelete, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
fileappend,, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
Sendinput, {f6}/id %Nick1%{enter}
sleep 400
FileRead, file, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
foundpos:=RegExMatch(file, "\[([0-9.]*)\]", code, -400)
sleep 700
sendinput, {F6}/repair %code1% 50{enter}
sleep 1100
sendinput, {F6}/refill %code1%{enter}
filedelete, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
fileappend,, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
goto, start1
Return

!4::
SelectedFile = %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
start3:
Loop, Read, %SelectedFile%
{
IfInString, A_LoopReadLine, Сейчас времени:
{
Goto, start5
}
}
goto, start3
start5:
filedelete, %SelectedFile%
fileappend, , %SelectedFile%
loop 5
{
sendinput, {F6}/capture{enter}
sleep 1100
}
return

SaveSett:
Gui,2:submit,nohide
AntiAFKCMD := AntiAFKCMD
AntiAFKSec := AntiAFKSec
Traytip, Настройки, Настройки сохранены.
Gui,2:Destroy
return

reestablish:
AntiAFKCMD := "/time"
AntiAFKSec := 540
return

Loop:
Gui,submit,nohide
FormatTime, Current_Time, , HH:mm:ss tt
GuiControl, , Time, %Current_Time%
if (Recc = 1)
{
kick := "Server closed the connection"
kick1 :=  "You are banned from this server"
FileRead, string, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
if string contains %kick%
{
      FileDelete,%A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
      Process,close,gta_sa.exe
      sleep,300
      Goto,St
}
if string contains %kick1%
{
      FileDelete,%A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
      Process,close,gta_sa.exe
      sleep,300
      Goto,St
}
}
If (A_Min = 59)
{
    If (pdcheck = 1)
    {
     WinMaximize,GTA:SA:MP
     sleep,140000
     WinMinimize,GTA:SA:MP
    }
}
Return

CleoAntiAFK:
RegRead, Game, HKEY_CURRENT_USER, SoftWare\SAMP, gta_sa_exe
Loop,%Game%
{
putt:=A_LoopFileDir
}
FileInstall,aafk.cs,%putt%\CLEO\aafk.cs
return

!1::
AntiAFK:
Process, Exist, gta_sa.exe    ; Поиск процесса.
Log("Проверка процесса")
If(!ErrorLevel) {
     MsgBox, Процесс не найден. =(
     Log("Ошибка AntiAFK")
     return
}
Gui,submit,nohide
if (AntiAFKSV = 1)
{
    FileInstall,patch.exe,%A_TEMP%/patch.exe,1
sleep,300
Run,%A_TEMP%/patch.exe
sleep,100
FileDelete,%A_TEMP%/patch.exe
ControlSend,,{up down},GTA:SA:MP
sleep,100
ControlSend,,{up up},GTA:SA:MP
Sleep, 1000
ControlSend,,{up down},GTA:SA:MP
sleep,100
ControlSend,,{up up},GTA:SA:MP
Sleep, 1000
ControlSend,,{up down},GTA:SA:MP
sleep,100
ControlSend,,{left up},GTA:SA:MP
Sleep, 1000
ControlSend,,{vk75}%AntiAFKCMD%{vkd}, GTA:SA:MP
Log("AAFK в свёрнутом подвинула бота")
}
else
{
WinMaximize,GTA:SA:MP
WinWait,GTA:SA:MP
Sleep, 4000
Random,dvig,1,3
if (dvig = 1)
{
    Send,{up down}
    sleep,100
    Send,{up up}
    Sleep,100
    Send, {Up Down}
    Sleep, 1100
    Send, {Up Up}
    Sleep, 100
    Send,{left down}
    sleep,100
    Send,{left up}
    Sleep, 1000
}
if (dvig = 2)
{
    Send,{left down}
    sleep,100
    Send,{left up}
    sleep,100
    Send,{down down}
    sleep,100
    Send,{down up}
    Sleep, 100
    Send, {Up Down}
    Sleep, 1100
    Send, {Up Up}
    sleep 1000
}
if (dvig = 3)
{
Send, {Up Down}
Sleep, 1100
Send, {Up Up}
sleep 1000
Send, {Up Down}
Sleep, 1100
Send, {Up Up}
Sleep, 1100
}
SendInput,{F6}%AntiAFKCMD%{ENTER}
Sleep, 3500
WinMinimize,GTA:SA:MP
}
Log("AAFK сдвинула бота`nРандом координаты №:" dvig)
loop %AntiAFKSec%
{
    SB_SetText("Состояние:Бот стоит в афк " A_INDEX " секунд")
    sleep,990
}
Goto,AntiAFK
return
!2::Pause

Cleoanticrasher:
RegRead, Game, HKEY_CURRENT_USER, SoftWare\SAMP, gta_sa_exe
Loop,%Game%
{
putt:=A_LoopFileDir
}
FileInstall,gcrshr.cs,%putt%\CLEO\gcrshr.cs
Log("Cleo AntiCrasher Install")
return

Cleodhider:
RegRead, Game, HKEY_CURRENT_USER, SoftWare\SAMP, gta_sa_exe
Loop,%Game%
{
putt:=A_LoopFileDir
}
FileInstall,DialogHider.cs,%putt%\CLEO\DialogHider.cs
Log("Cleo DialogHider Install")
return

SF:
RegRead, Game, HKEY_CURRENT_USER, SoftWare\SAMP, gta_sa_exe
Loop,%Game%
{
putt:=A_LoopFileDir
}
FileInstall,SAMPFUNCS v3.1.2.asi,%putt%\SAMPFUNCS v3.1.2.asi
return

Serverssamp:
if A_GUICONTROL = Samp-Rp 01
{
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.105.122:7777
   }
if A_GUICONTROL = Samp-Rp 02
{
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.105.123:7777
   }
if A_GUICONTROL = Samp-Rp 03
{
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.105.124:7777
   }
if A_GUICONTROL = Samp-Rp 04
{
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.104.114:7777
   }
if A_GUICONTROL = Samp-Rp 05
{
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.104.115:7777
   }
if A_GUICONTROL = Samp-Rp 06
{
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.104.116:7777
   }
if A_GUICONTROL = Samp-Rp 07
{
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.104.117:7777
   }
if A_GUICONTROL = Samp-Rp 08
{
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.104.118:7777
   }
if A_GUICONTROL = Samp-Rp 09
{
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.104.119:7777
   }
if A_GUICONTROL = Samp-Rp 10
{
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.104.120:7777
   }
if A_GUICONTROL = Samp-Rp 11
{
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.104.121:7777
   }
if A_GUICONTROL = Samp-Rp 12
{
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.104.122:7777
   }
if A_GUICONTROL = Samp-Rp 13
{
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.104.123:7777
   }
if A_GUICONTROL = Samp-Rp 14
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.104.124:7777
   }
if A_GUICONTROL = Samp-Rp 15
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,5.254.104.125:7777
   }
   if A_GUICONTROL = Emerald-Rp
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,188.127.238.129:7777
   }
   if A_GUICONTROL = Radiant-Rp
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,188.127.238.129:7776
   }
   if A_GUICONTROL = Trilliant-Rp
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,188.127.238.129:7775
   }
   if A_GUICONTROL = Crystal-Rp
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,188.127.238.153:7774
   }
   if A_GUICONTROL = Red Server
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,188.127.238.25:7771
   }
   if A_GUICONTROL = Green Server
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,188.127.238.25:7772
   }
   if A_GUICONTROL = Yellow Server
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,188.127.238.25:7773
   }
   if A_GUICONTROL = Orange Server
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,188.127.238.25:7774
   }
   if A_GUICONTROL = Blue Server
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,188.127.238.25:7775
   }
   if A_GUICONTROL = White Server
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,188.127.238.57:7776
   }
   if A_GUICONTROL = Silver Server
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,188.127.238.57:7777
   }
   if A_GUICONTROL = Purple Server
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,188.127.238.57:7778
   }
   if A_GUICONTROL = Chocolate Server
   {
     GuiControl,+ReadOnly,MyIp,
     GuiControl,,MyIp,188.127.238.57:7779
   }
if A_GUICONTROL = Свой IP
{
    GuiControl,-ReadOnly,MyIp,
    GuiControl,,MyIp,
}
return

Gen:
FileDelete,imena.txt
FileDelete,famili.txt
FileAppend,%in%,imena.txt
FileAppend,%in1%,famili.txt
Random,var,1,%ot1%
Random,var1,1,%ot2%
FileReadLine,nick,imena.txt,%var%
FileReadLine,nick1,famili.txt,%var1%

GuiControl,,MyNick,%Nick%_%Nick1%
FileDelete,imena.txt
FileDelete,famili.txt
Return

GenPass:
Passwords := ""
UsedRandomNumbers := ""
Loop %Length%
{
GetNewRandomNumber:
Random, RandomNumber, 1, % StrLen(Characters)
if RandomNumber in %UsedRandomNumbers%
Goto, GetNewRandomNumber
UsedRandomNumbers := ((UsedRandomNumbers)(RandomNumber)",")
Passwords .= SubStr(Characters, RandomNumber, 1)
}
GuiControl,,MyPass, % Passwords
Log("GenPass:" MyPass)
return

AvtoGereg:
Gui,13:submit,nohide
Gui,submit,nohide
kako := "Добро пожаловать на Samp Role Play"
Relog = %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
loop
{
FileRead, string, %Relog%
if string contains %kako%
{
sleep 1000
SendInput, %Password%{Enter}
sleep 1000
break
FileDelete, %Relog%
}
}
SendInput,{ENTER}
sleep,800
SendInput,{ENTER}
sleep,800
if Mail =
     Mail := "Aafk@mail.ru"
Send,%Mail%{ENTER}
sleep,800
if Ref =
      Ref := "AAfk"
SendInput,%Ref%{ENTER}
sleep,1000
if (Pol1 = 1)
{
     SendInput,{ENTER}
}
else
{
SendInput,{LEFT}{ENTER}
}
sleep, 500
Send, {VK53 Down}
Sleep, 400
Send, {VK53 Up}
Sleep, 400
Send, {VK53 Down}
Sleep, 400
Send, {VK53 Up}
Sleep, 200
Send, {Lshift Down}
Sleep, 200
Send, {Lshift Up}
if (Galka = 1)
{
   WinMinimize,GTA:SA:MP
}
Log("Бот зареган авторгерером")
Return

SxNick228:
Gui,7:submit,nohide
if (Nick2281 = 1)
     {
      in =
      (
Marcel
Theophile
Benjamin
Gustave
Adam
Eric
Joel
Bernard
Julien
Lucien
Gregoire
Gabin
Hubert
Aubin
Bertrand
Noel
Remy
Maxence
      )
      in1 =
      (
Lefevre
Patel
Beausoleil
Bouffard
Audet
Rancourt
Briand
Bonnet
Crevier
Martin
Labbe
Ducharme
Bonneau
Lavoie
      )
      ot1 = 18
      ot2 = 14
     }
   if (Nick2282 = 1)
   {
    in =
    (
    Stuart
Edward
Dennis
Matthew
Peter
Joel
Paul
Oliver
Miles
Oliver
Henry
Harry
William
James
Stewart
Buck
Gregory
Daniel
Kenneth
    )
    in1 =
    (
    Ferguson
Marsh
Anthony
Farmer
Price
Rice
Hicks
Booker
Stevens
Heath
Boone
Barton
Potter
Flynn
Sharp
Cummings
Harrell
    )
    ot1 = 19
    ot2 = 17
   }
   if (Nick2283 = 3)
   {
    in =
    (
Willi
Maximilian
Leon
Karl
Marcus
Jorg
Emil
Klemens
Adrian
Heinz
Gabriel
Adolf
Jurgen
Eugen
Gunter
Manfred
    )
    in1 =
    (
    Ziegler
Bayer
Dieter
Geier
Waltz
Fried
Linden
Beutel
Hummel
Gerber
Franke
Kruger
Melsbach
)
ot1 = 16
ot2 = 13
   }
   if (Nick2284 = 1)
   {
    in =
    (
    Angel
Santiago
Jaime
Valentin
Rafael
Carlos
Hector
Mariano
Eugenio
Miguel
Nicolas
Tomas
Luis
Antonio
Lucas
Hugo
    )
    in1 =
    (
    Valenzuela
SanMartin
Escobar
Ramirez
Olivera
Martinez
Fuentes
Roldan
Navarro
Parra
Poblete
Fidalgo
Moya
Chavez
    )
    ot1 = 16
    ot2 = 14
   }
   if (Nick2285 = 1)
   {
    in =
    (
    Magnus
Stig
Flemming
Lars
Svend
Georg
Andreas
Torben
Gustav
Laurits
Kaare
Tobias
Christen
Alexander
Claus
Vilhelm
Gabriel
Gustav
    )
    in1 =
    (
    Eriksen
Bak
Andresen
Eskildsen
Overgaard
Juhl
Lindegaard
Danielsen
Damgaard
Nissen
Michelsen
Nielsen
Mork
Jakobsen
    )
    ot1 = 18
    ot2 = 13
   }
    if (Nick2286 = 1)
   {
    in =
    (
    Axel
Bo
Christian
Hans
Martin
Bjorn
Robert
Kjell
Johan
Mikael
Rickard
Alexander
Stefan
Ake
Per
Anton
Patrik
    )
    in1 =
    (
    Ivarsson
Mattsson
Strom
Andreasson
Lund
Eliasson
Arvidsson
Eriksson
Isaksson
Eklund
Bergqvist
Abrahamsson
    )
    ot1 = 16
    ot2 = 12
   }
   Gui,7:Destroy
return

NS228AAGR:
Gui, 13:Destroy
Gui, 13:Font, S10 CDefault, Verdana
Gui, 13:Add, Edit, x114 y22 w170 h20 vMail, Aafk@mail.ru
Gui, 13:Add, Edit, x114 y42 w170 h20 vRef, Aafk
Gui, 13:Add, Text, x64 y22 w50 h20 , E-Mail:
Gui, 13:Add, Text, x4 y42 w110 h20 , Пригласивший:
Gui, 13:Add, Radio, x114 y72 w80 h30 vPol1, Мужской
Gui, 13:Add, Radio, x204 y72 w80 h30 vPol2, Женский
Gui, 13:Add, Text, x64 y72 w40 h20 , Пол:
Gui, 13:Add, Button, x54 y102 w100 h30 gOK22844, Ок
Gui, 13:Add, Button, x154 y102 w100 h30 gsdassadas22, Отменить
Gui, 13:Show, h146 w299, Настройки авторегера
Return

OK22844:
Traytip, Авторегер, настройки сохранены
ToolTip,***Great***`nНажмите "Отмена" что-бы закрыть окно
sleep,500
ToolTip,
Gui,13:Destroy
return

sdassadas22:
Gui, 13:Destroy
return

frdcheck:
Gui, 14:Destroy
Gui, 14:Add, Edit, x14 y12 w160 h300 vMyAdG1, Edit
Gui, 14:Font, S8 CDefault, Verdana
Gui, 14:Add, Button, x24 y322 w70 h30 gsavecheck1, Сохранить
Gui, 14:Add, Edit, x204 y12 w160 h300 vMyAdmm1 ReadOnly, Edit
Gui, 14:Add, Button, x94 y322 w70 h30 gproveka1, Проверить
Gui, 14:Show, x434 y138 h360 w377, Админы.
IfExist,friend.txt
{
     FileRead,aa,friend.txt
     GuiControl,14:,MyAdG1,%aa%

}
return

savecheck1:
Gui,14:submit,nohide
FileDelete,friend.txt
sleep,100
FileAppend,%MyAdG1%,friend.txt
return

proveka1:
gui,14:submit,nohide
gui,submit,nohide
IfNotExist,friend.txt
{
     MsgBox, 16, friendCheker, Файл friend.txt не найдён `nДобавьте файл и список друзей
     return
}
Process, Exist, gta_sa.exe    ; Поиск процесса.

If(!ErrorLevel) {
    MsgBox, Включите GTA
    return
}
WinMaximize,GTA:SA:MP
sleep,3000
FileRead,Var,friend.txt ;Читаем файл с никами
StringReplace, Var, Var, `n, `n, UseErrorLevel
StrCount := ErrorLevel + 1
Pes := StrCount ;Тут записываем кол-во строк в файле в переменную Pes
loop, %Pes% ;Цикл
{
FileReadLine,pik,friend.txt,%A_Index% ;Читаем одну строчку
SendInput,{F6}/id %pik%{ENTER}
sleep, 1200 ;Ждём
FileRead, string, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt ;Читаем чат лог
If string contains %pik%  ;Если ник админа найден
{
       FileAppend,%pik%`n,badadmin.ini ;Записываем его в файл
       FileDelete,%A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
}
}
FileRead,adminu,badadmin.ini ;Читаем файл
FileDelete,badadmin.ini
WinMinimize,GTA:SA:MP
GuiControl,14:,MyAdmm1,Админы в сети:`n%adminu% ;Показываем админов
return

GuiClose22:
return

ff288:
URLDownloadToFile,http://mstyle.bos.ru/FAQ.txt,%TEMP%\fack228.ini
FileRead,fack228,%TEMP%\fack228.ini
sleep,1000
FileDelete,%TEMP%\fack228.ini
MsgBox, 32, FAQ,% fack228
return

PolOtv2281:
sd := "html"
Gui,22:submit,nohide
URLDownloadToFile,http://mstyle.bos.ru/otvet/%MyIdReport1%.txt,%a_temp%\otv22.ini
sleep,2000
FileRead,test233,%a_temp%\otv22.ini
if (test233 = "")
{
     MsgBox,Вам пока не ответили или на этот ид небыло вопроса
     FileDelete,%a_temp%\otv22.ini
     return
}
if test233 contains %sd%
{
MsgBox,Вам пока не ответили или на этот ид небыло вопроса
     FileDelete,%a_temp%\otv22.ini
     return
}
GuiControl,22:,MyOtv228Report,%test233%
FileDelete,%a_temp%\otv22.ini
FileDelete,%a_temp%\gladiolus.288
return

Log228sda:
Gui,23:Destroy
Gui, 23:Add, GroupBox, x6 y2 w490 h320 , Лог
Gui, 23:Add, Edit, x16 y22 w470 h290 +ReadOnly vLog hwndhLog1, *********************************AntiAFK_M by Mstyle started*********************************`n
Gui, 23:Add, Button, x506 y22 w100 h30 gSxLogAntiAFK, Сохранить
Gui, 23:Add, Button, x506 y72 w100 h30 gOtch2312, Очистить
Gui, 23:Add, GroupBox, x496 y112 w120 h110 , Поиск
Gui, 23:Add, Edit, x506 y132 w100 h20 , Что ищем?
Gui, 23:Add, Button, x506 y172 w100 h30  +Disabled, Искать
Gui, 23:Show, x131 y91 h335 w627, AntiAKF_M Log
Return

SxLogAntiAFK:
Gui,23:submit,nohide
Log("Лог сохранён`nФайл AAFKLog.txt")
FileDelete,AAFKLog.txt
FileAppend,%AntiAFKLog%,AAFKLog.txt
return