AIMBOT

[†PrEDok†]

Люди у меня жесткая проблема решил написать AIM на AutoIt но сталкнулся с проблемой при наводке на нужный цвет тоесть бота мыш улитает куданить в бок!
Помагати будьте так добры!Я просто уже незнаю что и делать!

; Declare Variables
$atk = 0

; ToolTip displaying function keys
Tooltip("HOME = On/Off Attack Fallens, F10 = Exit", 0, 0)


; List of command keys
If Not WinActive("Point Blank", "") Then WinActivate("Point Blank", "")
WinWaitActive("Point Blank", "")
HotKeySet("{HOME}", "atkFallens")
HotKeySet("{F10}", "exitNow")


While True
If $atk = 1 Then
$coord = PixelSearch( 158, 86, 1128, 797, 0xFF0000, 40 )
If not @Error then
MouseMove ( $coord [ 0 ] , $coord [ 0 ] , 0)
MouseClick("left",$coord[0],$coord[1] , 0 )
EndIf
EndIf
WEnd


; Functions
; On/Off atkFallens():
Func atkFallens()
If $atk = 0 Then
$atk = 1
Tooltip("Auto attacking Fallens (HOME to disable)", 0, 0)
Else
$atk = 0
Tooltip("HOME = On/Off Attack Fallens, F10 = Exit", 0, 0)
EndIf
EndFunc

; Exit
Func exitNow()
Exit
EndFunc

ИЛИ ПОДСКАЖИТЕ КАКОЙНИТЬ СПОСОБ ЕЩЕ!

[*_*.CoRNeL.*_*]

лутще так
MouseClick("Left","дистанция с права","дистанция с верху","Сколько раз кликнуть ")

Такои тип не будт рубити в игрк надо както по другому
HotKeySet("{HOME}", "atkFallens")
HotKeySet("{F10}", "exitNow")

[Auto_IT_Uses^.^]

Привет,я поменял и у меня работает!!!:d
игрушка тут Nobuyuki Forces ([Ссылки могут видеть только зарегистрированные и активированные пользователи])
; Declare Variables
$atk = 0

; ToolTip displaying function keys
Tooltip("HOME = On/Off Attack Fallens, F10 = Exit", 0, 0)


; List of command keys
If Not WinActive("Nobuyuki Forces - Gioca Giochi Online Gratuiti su Gioco.it - Mozilla Firefox", "") Then WinActivate("Nobuyuki Forces - Gioca Giochi Online Gratuiti su Gioco.it - Mozilla Firefox", "")
WinWaitActive("Nobuyuki Forces - Gioca Giochi Online Gratuiti su Gioco.it - Mozilla Firefox", "")
HotKeySet("{HOME}", "atkFallens")
HotKeySet("{F10}", "exitNow")
$left = 386
$top = 378
$right = 986
$bottom = 775
$colour = 0x04A594A
While True
If $atk = 1 Then
$func = PixelSearch( $left, $top, $right, $bottom, $colour)
If not @Error then
MouseClick ("left" , $func[0], $func[1], 1, 0)
MouseClick ("left")
EndIf
EndIf
WEnd


; Functions
; On/Off atkFallens():
Func atkFallens()
If $atk = 0 Then
$atk = 1
Tooltip("Auto attacking Fallens (HOME to disable)", 0, 0)
Else
$atk = 0
Tooltip("HOME = On/Off Attack Fallens, F10 = Exit", 0, 0)
EndIf
EndFunc

; Exit
Func exitNow()
Exit
EndFunc
$left = 386
$top = 378
$right = 986
$bottom = 775
Если не роботает иши с помоши Au3Info сможеш наити.....
А да у тебя там адрес стоял на черный цвет если хочешь чтобы не был черный цвет делай и игру в окно...