Регистрация Главная Пользователи Все разделы прочитаны
Сообщения за день Справка Регистрация
Старый 21.09.2010, 16:39   #1
Заблокирован
 Старший сержант
Аватар для †PrEDok†
 
†PrEDok† гордость нации†PrEDok† гордость нации†PrEDok† гордость нации†PrEDok† гордость нации†PrEDok† гордость нации†PrEDok† гордость нации†PrEDok† гордость нации†PrEDok† гордость нации†PrEDok† гордость нации†PrEDok† гордость нации†PrEDok† гордость нации
Регистрация: 09.06.2010
Сообщений: 182
Популярность: 2611
Сказал(а) спасибо: 354
Поблагодарили 1,228 раз(а) в 218 сообщениях
 
По умолчанию AIMBOT

Люди у меня жесткая проблема решил написать 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


ИЛИ ПОДСКАЖИТЕ КАКОЙНИТЬ СПОСОБ ЕЩЕ!
 
2 пользователя(ей) сказали cпасибо:
EguHopoG (07.06.2014), reraider (13.03.2011)
Старый 16.10.2010, 17:25   #2
 Пехотинец
Аватар для *_*.CoRNeL.*_*
 
*_*.CoRNeL.*_* лучик света в грозовом небе*_*.CoRNeL.*_* лучик света в грозовом небе*_*.CoRNeL.*_* лучик света в грозовом небе*_*.CoRNeL.*_* лучик света в грозовом небе*_*.CoRNeL.*_* лучик света в грозовом небе*_*.CoRNeL.*_* лучик света в грозовом небе*_*.CoRNeL.*_* лучик света в грозовом небе
Регистрация: 14.09.2010
Сообщений: 81
Популярность: 846
Сказал(а) спасибо: 27
Поблагодарили 205 раз(а) в 64 сообщениях
 
По умолчанию Re: AIMBOT HELP!

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

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

Последний раз редактировалось *_*.CoRNeL.*_*; 19.10.2010 в 23:54.
 
Старый 03.07.2011, 13:09   #3
 Разведчик
Аватар для Auto_IT_Uses^.^
 
Auto_IT_Uses^.^ набедокурил в прошлом
Регистрация: 28.09.2010
Сообщений: 8
Популярность: -6
Сказал(а) спасибо: 6
Поблагодарили 6 раз(а) в 6 сообщениях
Отправить сообщение для Auto_IT_Uses^.^ с помощью Skype™
 
Talking Re: AIMBOT HELP!

Привет,я поменял и у меня работает!!!
игрушка тут [Ссылки могут видеть только зарегистрированные пользователи. ]
Код:
; 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 сможеш наити.....
А да у тебя там адрес стоял на черный цвет если хочешь чтобы не был черный цвет делай и игру в окно...
________________
Учусь на Autoit >_> Достала тебя уже знаю сукцко

Последний раз редактировалось Auto_IT_Uses^.^; 04.07.2011 в 10:42.
 
Пользователь сказал cпасибо:
†PrEDok† (26.07.2012)
Закрытая тема

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Заявление об ответственности / Список мошенников

Часовой пояс GMT +4, время: 18:17.

Пишите нам: [email protected]
Copyright © 2024 vBulletin Solutions, Inc.
Translate: zCarot. Webdesign by DevArt (Fox)
G-gaMe! Team production | Since 2008
Hosted by GShost.net