#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Version=Beta
#AutoIt3Wrapper_Icon=ВАШАИКОНКА.ico
#AutoIt3Wrapper_Outfile=autoshot.exe
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Compile_Both=y
#AutoIt3Wrapper_UseX64=y
#AutoIt3Wrapper_Res_Comment=papkamod
#AutoIt3Wrapper_Res_Description=papkamod
#AutoIt3Wrapper_Res_Fileversion=1.1.1.1
#AutoIt3Wrapper_Res_Language=1049
#AutoIt3Wrapper_Res_requestedExecutionLevel=highestAvailable
#EndRegion
#Include <Resources.au3>
#Include <HotKey.au3>
If WinExists(@ScriptName) Then Exit
AutoItWinSetTitle(@ScriptName)
WinWaitActive ("Warface")
Opt("MouseCoordMode", 0)
Opt("TrayIconHide", 2)
Opt("PixelCoordMode", 2)
Opt("MouseClickDelay", 10)
Opt("MouseClickDownDelay", 10)
Global $Cscript = 1
Global $PAUSARASBROSA = 15
Global Const $VK_OEM_PLUS = 0xBB
Global Const $VK_OEM_MINUS = 0xBD
MsgBox(48, "Autoshot для Warface"," Кнопка Home - запуск/пауза"&@LF&@LF&" Кнопка End - выключение"&@LF&@LF&" Кнопка (INSERT) и (DELETE) - изменение задержки между выстрелами"&@LF&@LF&"Created by Kaban: foxisalt@yandex.ru =)",10)
HotKeySet("{HOME}", "TogglePause")
HotKeySet("{END}", "Terminate")
HotKeySet("{INSERT}", "Zna4eniePLUS")
HotKeySet("{DELETE}", "Zna4enieMINUS")
While 1
While $Cscript = 1
$left='611'
$top='8'
$right='789'
$bottom='186'
$color='0xFF3A3A, 50, 2'
$pos = PixelSearch($left, $top, $right, $bottom, $color)
If Not @error Then
MouseClick("left")
EndIf
If $Cscript <> 1 Then
ToolTip("Autoshot - ПАУЗА", 0, 0)
Beep(500,100)
ToolTip("")
EndIf
WEnd
While $Cscript = 0
sleep(1000)
If $Cscript <> 0 Then
ToolTip("Autoshot - ЗАПУСК", 0, 0)
Beep(500,100)
ToolTip("")
EndIf
WEnd
WEnd
Func Zna4eniePLUS()
$PAUSARASBROSA = $PAUSARASBROSA + "5"
ToolTip("Задержка между выстрелами - "&$PAUSARASBROSA, 0, 0)
sleep(300)
ToolTip("")
EndFunc
Func Zna4enieMINUS()
$PAUSARASBROSA = $PAUSARASBROSA - "5"
ToolTip("Задержка между выстрелами - "&$PAUSARASBROSA, 0, 0)
sleep(300)
ToolTip("")
EndFunc
Func TogglePause()
$Cscript = NOT $Cscript
EndFunc
Func Terminate()
ToolTip("Autoshot - ВЫКЛЮЧЕНИЕ", 0, 0)
Beep(500,500)
Exit 0
EndFunc