SetBatchLines -1
SetMouseDelay 1
SetdefaultMouseSpeed, 0
v::
send, {f down}
Loop
{
Click 1392, 743
Click 2278, 1115
}
h::Reload

#InstallKeybdHook
#InstallMouseHook

isInUse = 0
delay = 80

RepeatPress( key ) {
	global isInUse
	global delay

	loop {
		if not GetKeyState( key, "P" ){
			break
		}

		if not isInUse  {
			Send, {%key%}
		}

		sleep delay
	}
	return
}

RepeatPressCtrl( key ){
	global isInUse = 1
	global delay

	loop {
		if not GetKeyState( key, "P" ) {
			isInUse = 0
			break
		}

		if GetKeyState( "Ctrl", "P" ) {
			Send, ^{%key%}
		}

		sleep delay
	}
	return
}

RepeatPressShift( key ) {
	global isInUse = 1
	global delay

	loop {
		if not GetKeyState( key, "P" ) {
			isInUse = 0
			break
		}

		if GetKeyState( "Shift", "P" ){
			Send, +{%key%}
		}

		sleep delay
	}
	return
}

RepeatPressBlind( key, special_delay ) {
	global delay
	
	loop {
		if not GetKeyState( key, "P" ) {
			break
		}

		Send, {Blind}{%key%}
		;sleep delay
		sleep special_delay
	}
	return
}

RepeatPressRedirect( holdKey, sendKey ) {
	global delay
	
	loop {
		if not GetKeyState( holdKey, "P" ) {
			break
		}

		Send, {Blind}{%sendKey%}
		sleep delay
	}
	return
}


#IfWinActive, World of Warcraft
~Enter::Suspend
#IfWinActive

*Pause::Suspend
;~Enter::Suspend


F1::RepeatPressBlind( "F1", delay )
F2::RepeatPressBlind( "F2", delay )
F3::RepeatPressBlind( "F3", delay )
F4::RepeatPressBlind( "F4", delay )
F5::RepeatPressBlind( "F5", delay )
F6::RepeatPressBlind( "F6", delay )
F7::RepeatPressBlind( "F7", delay )
F8::RepeatPressBlind( "F8", delay )

*1::RepeatPressBlind( "1", delay )
*2::RepeatPressBlind( "2", delay )
*3::RepeatPressBlind( "3", delay )
*4::RepeatPressBlind( "4", 10 )
*5::RepeatPressBlind( "5", delay )
*6::RepeatPressBlind( "6", delay )
*7::RepeatPressBlind( "7", delay )
; *8::RepeatPressBlind( "8", delay )
; *9::RepeatPressBlind( "9", delay )
; *0::RepeatPressBlind( "0", delay )

*q::RepeatPressBlind( "q", delay )
; *s::RepeatPressBlind( "s", delay )
*e::RepeatPressBlind( "e", delay )

*r::RepeatPressBlind( "r", delay )
*t::RepeatPressBlind( "t", 160 )
*y::RepeatPressBlind( "y", delay )

*f::RepeatPressBlind( "f", delay )
*g::RepeatPressBlind( "g", delay )
*h::RepeatPressBlind( "h", delay )

*z::RepeatPressBlind( "z", delay )
*x::RepeatPressBlind( "x", delay )
*c::RepeatPressBlind( "c", delay )
*v::RepeatPressBlind( "v", delay )
*b::RepeatPressBlind( "b", delay )
; *n::RepeatPressBlind( "n", delay )

;Объявление версии
#Requires AutoHotkey v2.0
#SingleInstance Force
;Объявление Глобальный переменных/флагов
global isRunning := false
global IsBusy := false
global LastPick := 0

; Список действий (функции)
global Actions := [Act1, Act2, Act3, Act4, Act5]
;Кнопка включения/выключения бота
F6::ToggleBot()

ToggleBot() {
    global isRunning
    isRunning := !isRunning

    if isRunning {
        ToolTip "GTA Bot: ON"
        ScheduleNext()  ; запускаем планировщик
    } else {
        ToolTip "GTA Bot: OFF"
        SetTimer RunRandomAction, 0  ; выключаем будущий запуск
    }

    SetTimer () => ToolTip(), -1000
}

ScheduleNext() {
    global isRunning
    if !isRunning
        return

    delay := Random(15000, 60000)           ; 15-60 сек
    SetTimer RunRandomAction, -delay        ; один раз
}

RunRandomAction() {
    global Actions, LastPick, IsBusy, isRunning

    if !isRunning
        return

    if IsBusy {
        ScheduleNext()
        return
    }

    IsBusy := true

    count := Actions.Length
    if (count = 1) {
        pick := 1
    } else {
        ; не повторяем предыдущий
        loop {
            pick := Random(1, count)
        } until (pick != LastPick)
    }

    LastPick := pick

    ; выполнить выбранное действие
    Actions[pick].Call()

    IsBusy := false
    ScheduleNext()
}

; ====== ДЕЙСТВИЯ БОТА ======

Act1() {
    Send "w"
    Sleep Random(80, 140)
    Send "s"
    Sleep Random(300, 600)
    Send "a"
    Sleep Random(300, 600)
    Send "d"
    Sleep Random(300, 600)
}

Act2() {
    Send "{Shift}"
    Sleep 200
}

Act3() {
    Click "Left"
}

Act4() {
    Send "i"
    Sleep Random(1000, 1500)
    Send "i"
    Sleep Random(1000, 1500)
}

Act5() {
    Send "w"
    Sleep Random(80, 140)
    Send "s"
    Sleep Random(300, 600)
    Send "a"
    Sleep Random(300, 600)
    Send "d"
    Sleep Random(300, 600)
}

	RunWait, ping.exe %hostname% -n 1,, Hide UseErrorlevel
	If !Errorlevel 
		Msgbox Ой-ей! 

#NoEnv 
~1::
cx := 100
cy := 100
r := 20
s := 16
a := 4
global $Pi := 4 * ATan(1)
Loop, % s * a ;расширение
{
	retx := cx + r * Cos(tmp * 2 * $Pi / s) * tmp / s
	retу := cy + r * Sin(tmp * 2 * $Pi / s) * tmp / s
	MouseMove, retx, retу, 3
	tmp := A_Index
}
Loop, % s * a  ;сужение
{
	retx := cx + r * Sin(tmp * 2 * $Pi / s) * tmp / s
	retу := cy + r * Cos(tmp * 2 * $Pi / s) * tmp / s
	MouseMove, retx, retу, 3
	EnvAdd tmp, -1
}
return

; Укажите время зажатия в миллисекундах (например, 2000ms = 2 секунды)
timeToHold := 2000000

; Начало зажатия клавиши при нажатии F12 
F12::
    Send, {! down} ; Зажать клавишу «!» 
    Sleep, %timeToHold% ; Держать клавишу «!» заданное время 
    Send, {! up} ; Отпустить клавишу «!» 
return

txt = C:\test.txt

Loop, read, %txt%
{
ifinstring, A_LoopReadLine, Очки: 
RegExMatch(A_LoopReadLine, "([0-9]+\.[0-9]+)", a)
ifinstring, A_LoopReadLine, Очки: 
RegExMatch(A_LoopReadLine, "[[0-9]+]", n)
}
Msgbox %n%
Return

z::
SoundBeep
Loop 
{
Send {E}
Sleep 1
Send {Enter}
Sleep 1
}
Return

F5::
ExitApp
Return