Логотип игрового форума RF-Cheats.ru    
Новости онлайн игр Гарант RF-Cheats.ru Чёрный рынок Реклама и привилегии Разработка читов Арбитраж

Регистрация Бан-лист Сообщество ПОПУЛЯРНОЕ
Вернуться   RF-Cheats.ru - форум читеров и ботоводов > > >

Скрипты и боты для ArcheAge

: Различные механизмы, программы и скрипты для автоматизации игры в ArcheAge
Читы и обход фроста для RF Online без хайдаБоты и читы для Perfect World бесплатно без хайдаМоды и читы для World of Tanks (WoT) бесплатно без хайдаМоды и читы для Armored Warfare бесплатно без хайдаБоты и читы для DOTA 2 бесплатно без хайдаБоты и читы для Black Desert Online бесплатно без хайдаЧиты на ArcheAge бесплатно без хайдаЧиты для Warface бесплатно без хайдаВзлом ВКонтакте и ОдноклассниковСписок разделов со всеми играмиЧиты для онлайн игр






Ответ
 
Опции темы
Старый 07.04.2014, 11:24   #1
arksu
Подпольщик WoT
Аватар для arksu
OFFLINE
Регистрация: 08.10.2012
Возраст: 41
Сообщений: 161
Благодарностей:
89 всего
Мнения: + 226
Репутация: 268
Отправить сообщение для arksu с помощью ICQ Отправить сообщение для arksu с помощью Skype™

[AutoIT] Бот-кликер на мага


Важно помнить:

- Если Тема находиться под скрытым текстом, и Вы не понимаете, что происходит, прочитайте >> Правила

- Не оставляйте сообщения, не относящиеся к тематики первоначального поста!

- Если у Вас что-то не работает, описывайте более детально вашу проблему, дабы Вам могли помочь

- Если тема более не актуальна, укажите в какой момент тема перестала быть интересной, рабочей и почему

- Если тема находится не в АРХИВЕ, то значит она всё ещё действенна. Не надо писать "Работает ли?"

- На нашем портале нет "Личных хайдов", а так же запрещено просить слить имеющийся хайд лично Вам!

- Хотите отблагодарить автора темы? Для этого есть специальная кнопка, в правом нижнем углу сообщения.


( прим. DarkCat )

Скрипт для AutoIT для кача мага
ищем кучкующихся мобов встаем, в опциях убираем бег по клику мышки (чтобы бот не бегал до мобов иначе убежит хз куда)
F10 - старт / стоп
F11 - убить процесс бота

бот юзает огненный шар, поглощение энергии чтобы восполнять мп
следит за своим мп, если мало и если моб уже убит - играет на флейте
следит за мобами - если не может найти начинает вращатся чтобы искать новые цели


PHP код:
разрешение экрана 1280х800
F10 запуск остановка кача

Opt
("SendKeyDownDelay"35) ; Глобальная задержка для удержания клавиши в нажатом состоянии 35мс
Opt
("PixelCoordMode"2)
Func _WinWaitActivate($title,$text,$timeout=0)
    
WinWait($title,$text,$timeout)
    If 
Not WinActive($title,$textThen WinActivate($title,$text)
    
WinWaitActive($title,$text,$timeout)
EndFunc

ToolTip
("started, wait aa"00)
$COUNTER=0
HotKeySet
("{F10}","StartOrStop") ; хоткей старта и остановки если надо более одной копии скрипта запустить используйте другие клавиши
HotKeySet
("{F11}","Terminate")
Global 
$STOP True
Global $AA_TITLE "- ArcheAge " Название ОКНА клиентаЕсли используете мульти-окна переименовывайте их по-разному и в точности вписывайте название (лучше скопировать)

Global 
$hp_color 0x

В данном варианте скрипт привяжется через HWND к первому найденному окну.
_WinWaitActivate($AA_TITLE ,"")
Global 
$hWnd WinActive($AA_TITLE ,"")
sleep(1000)

ToolTip("aa found!"00)

Global 
$BUFF1_COUNT TimerInit()
Global 
$BUFF2_COUNT TimerInit()
Global 
$BUFF3_COUNT TimerInit()
Global 
$NeedShield False
Global $ShieldTryCount 0

Do
    
Sleep(1000)
Until $STOP False
While (1)
    
Main()
WEnd

CHECKING HP LEVEL ===============================
Func CheckHP($xCoord$Color)
   
$y=37
   
if PixelSearch($xCoord,$y,$xCoord+4,$y+4$Color301$hWnd) <> 0 Then
      
Return True
   
Else
      Return 
False
   
EndIf
EndFunc
Func hp90
()
   Return 
CheckHP(2420x62983B)
EndFunc
Func hp75
()
   Return 
CheckHP(1910x528C31)
EndFunc
Func hp50
()
   Return 
CheckHP(1350x3E7E25)
EndFunc
Func hp25
()
   Return 
CheckHP(700x30741D)
EndFunc
CHECKING MP LEVEL ===============================
Func CheckMP($xCoord$Color)
   
$y=52
   
if PixelSearch($xCoord,$y,$xCoord+4,$y+4$Color301$hWnd) <> 0 Then
      
Return True
   
Else
      Return 
False
   
EndIf
EndFunc
Func mp90
()
   Return 
CheckMP(2450x4D76C8)
EndFunc
Func mp75
()
   Return 
CheckMP(1910x4064C3)
EndFunc
Func mp50
()
   Return 
CheckMP(1350x3351BC)
EndFunc
Func mp25
()
   Return 
CheckMP(700x304DBA)
EndFunc
CHECK TARGET ==================================
Func HaveTarget()
   ; 
смотрим на полоску маны моба в нескольких местах
   $y 
52
   $Color 
0x304DBB
   $xCoord 
525
   $px1 
PixelSearch($xCoord,$y,$xCoord+2,$y+2$Color201$hWnd)
   
$xCoord 573
   $px2 
PixelSearch($xCoord,$y,$xCoord+2,$y+2$Color201$hWnd)

   if (
$px1 <> 0) or ($px2 <> 0Then
      
Return True
   
Else
      Return 
False
   
EndIf
EndFunc
;===================================================
Func Main()
    If 
$STOP False Then


         $df 
TimerDiff($BUFF2_COUNT)
         If 
$df 50000 Then
            $NeedShield 
True
            $ShieldTryCount 
3
            $BUFF2_COUNT 
TimerInit()
         EndIf

         ; 
если есть цель
         
If Not HaveTarget() Then
            
цели нет
            
проверим наше мп
            
если его мало запустим реген
            
If (Not mp50()) Then
               
While (Not mp50())
                  
ControlSend($hWnd"""""{F1}") ; РЕГЕН МАНЫФЛЕЙТА
                  Sleep
(1600)
                  
$BUFF1_COUNT TimerInit()
               
WEnd
            
Else
               ; 
если же мп хватает
               
пошлем поворот чтобы найти цель
               Opt
("SendKeyDownDelay"700)
               
ControlSend($hWnd"""""d")
               
Opt("SendKeyDownDelay"35)
            EndIf
         EndIf


         if 
$NeedShield Then
            Sleep
(200)
            
ControlSend($hWnd"""""{F7}") ; Магический щит
            Sleep
(50)
            
$ShieldTryCount $ShieldTryCount 1
            
if ($ShieldTryCount <= 0Then
               $NeedShield 
False
            
EndIf
         else
            
Sleep(50)
            ; 
только если нужно мп!
            if (
Not mp75()) Then
               ControlSend
($hWnd"""""{F6}") ; Поглощение энергии чтобы восполнять мп но можно оставлять слот пустым
               Sleep
(50)
            EndIf

            
ControlSend($hWnd"""""{F5}") ; Огненный шар
            Sleep
(50)

            
ControlSend($hWnd"""""f") ; Поднимаем дроп

         
EndIf

        
Sleep(100)

        
$COUNTER $COUNTER 1


        $text 
"some"
        
if hp90() Then
            $text
="hp >90"
        
ElseIf hp75() Then
            $text
="hp >75"
        
ElseIf hp50() Then
            $text
="hp >50"
        
ElseIf hp25() Then
            $text
="hp >25"
        
Else
            
$text="hp LOW"
        
EndIf
        if 
mp90() Then
            $text2
="mp >90"
        
ElseIf mp75() Then
            $text2
="mp >75"
        
ElseIf mp50() Then
            $text2
="mp >50"
        
ElseIf mp25() Then
            $text2
="mp >25"
        
Else
            
$text2="mp LOW"
         
EndIf

         if 
HaveTarget() Then
            $text3 
"YES"
         
Else
            
$text3 "none"
         
EndIf


        if 
$STOP False Then
           ToolTip
("buff2="& ($df) & " " $text " " $text2 " target=" $text300)
        EndIf

    Else
        
Sleep(100)
    EndIf

EndFunc   ;==>Main

Func StartOrStop
()
    If 
$STOP True Then

        
;On START action
        ToolTip
("STARTED! Press F10 for stop"00) ; подсказка о состоянии работы скрипта в левом верхнем углу
        $STOP 
False
    
Else
        ;
On STOP action
        
;ColorCheck()
        
ToolTip("STOPPED! Press F10 for start"00)
        
$STOP True
    
EndIf
 
EndFunc

Func Terminate
()
    Exit 
0
EndFunc 
подсказка постоянно висит в левом верхнем углу экрана, в ней отображается статус работы бота

клиент запускать в ОКОННОМ режиме. разрешение 1280х800. под него заточен бот
панель хп/мп и таргета должны быть на своих местах

скрипт компилим. упаковываем upx. даем рандомное имя.
запускаем от прав АДМИНИСТРАТОРА

писал сам. соответственно проверил) качнул пока несколько уровней.
система Win 7 x64

жду адекватную критику, предложения по улучшению бота

Последний раз редактировалось Big Bad Sensey; 21.11.2014 в 17:08.
 
Ответить с цитированием
Сказали спасибо:
ANTARES (02.05.2015), Недоступно (31.12.2014), KBADPATuK (30.11.2014), Недоступно (03.10.2014), Недоступно (03.10.2014), Недоступно (20.09.2014), Недоступно (19.09.2014), ALSIY (01.09.2014), Недоступно (27.08.2014), Недоступно (05.08.2014), Недоступно (10.07.2014), Недоступно (15.06.2014), Недоступно (22.05.2014), Недоступно (07.05.2014), Недоступно (30.04.2014), bit (13.04.2014), Недоступно (12.04.2014), wirus666 (10.04.2014), Недоступно (09.04.2014)


Старый 07.04.2014, 20:36   #2
Kaschey
Гость
Аватар для Kaschey
Сообщений: n/a
Благодарностей:
0 всего

Если можно, то и мне ссылочку или в ЛС. До этого юзал другого бота под AutoIt из соседней темы, но он не поворачивался, не следил за своим МР и на дуде не играл пока простаивает. Энергию он вытягивал другим скиллом, который только с 30 уровня давался. Вобщем было не удобно. Очень интересно потестировать ваш скрипт и посмотреть как реализована проверка на остаток МР, потому что хотелось бы такую же и для НР добавить.
 
Ответить с цитированием
Сказали спасибо:
Недоступно (23.08.2014)
Старый 07.04.2014, 22:10   #3
arksu
Подпольщик WoT
Аватар для arksu
OFFLINE
Регистрация: 08.10.2012
Возраст: 41
Сообщений: 161
Благодарностей:
89 всего
Мнения: + 226
Репутация: 268
Отправить сообщение для arksu с помощью ICQ Отправить сообщение для arksu с помощью Skype™

Цитата:
Сообщение от Kaschey Посмотреть сообщение
Если можно, то и мне ссылочку или в ЛС. До этого юзал другого бота под AutoIt из соседней темы, но он не поворачивался, не следил за своим МР и на дуде не играл пока простаивает. Энергию он вытягивал другим скиллом, который только с 30 уровня давался. Вобщем было не удобно. Очень интересно потестировать ваш скрипт и посмотреть как реализована проверка на остаток МР, потому что хотелось бы такую же и для НР добавить.
проверка для HP в скрипте присутствует. но в логике я ее не использую
хотелось бы предложений как улучшить поведение...
я сам лично не очень доволен. хоть бот и качается нон стопом. и по мане загружен, т.е. не простаивает - все равно как то медленно качается :(
хочется чтобы быстрее все это было.

в личку давать не буду - чтобы не расползалось. хайд итак низкий

Добавлено через 2 минуты
Цитата:
Сообщение от dimon2796 Посмотреть сообщение
Если можно то сылочку в лс или хайд понизь
хайд понизил. обновил текст скрипта. мелкие правки по итогам дня кача.
кач стабильный но иногда бывает не вытягивает. т.к. качался на агро мобах... надо поискать не агро места

Последний раз редактировалось arksu; 07.04.2014 в 22:13. Причина: Добавлено сообщение
 
Ответить с цитированием
Старый 09.04.2014, 11:45   #4
arksu
Подпольщик WoT
Аватар для arksu
OFFLINE
Регистрация: 08.10.2012
Возраст: 41
Сообщений: 161
Благодарностей:
89 всего
Мнения: + 226
Репутация: 268
Отправить сообщение для arksu с помощью ICQ Отправить сообщение для arksu с помощью Skype™

Цитата:
Сообщение от wirus666 Посмотреть сообщение
уже слили на другой портал без хайда...

p.s. Надо было 150 оставлять.
я худею))))))
ну ок. я не остановился на этом. бот дорабатываю
следующую версию выложу с хайдом повыше. либо через лс вообще.
 
Ответить с цитированием
Старый 10.04.2014, 12:15   #5
dimon2796
Освоившийся
Аватар для dimon2796
OFFLINE
Регистрация: 09.03.2014
Сообщений: 40
Благодарностей:
0 всего
Репутация: 1

Скриптик нормальный вполне даже ни чего, на данный момент я бы даже сказал он лучший, но требует доработки в плане отслеживания хп моба, а в остальном очень благодарен автору
 
Ответить с цитированием
Старый 10.04.2014, 15:41   #6
Likeya
Пользователь
Аватар для Likeya
OFFLINE
Регистрация: 01.04.2014
Возраст: 35
Сообщений: 20
Благодарностей:
1 всего
Мнения: + 18
Репутация: 4
Отправить сообщение для Likeya с помощью Skype™

Цитата:
Сообщение от dimon2796 Посмотреть сообщение
Скриптик нормальный вполне даже ни чего, на данный момент я бы даже сказал он лучший, но требует доработки в плане отслеживания хп моба, а в остальном очень благодарен автору
Посмотреть на хп моба проблем не составит, только что делать дальше? Если определить что моб "чужой" и переключиться на другого то может возникнуть нехорошая ситуация, когда начали бить с кем-то вместе, он сагрил первым, но наша плюха была сильней и моб сагрился на нас. У кого есть идеи как этого избежать?
 
Ответить с цитированием
Старый 10.04.2014, 15:53   #7
arksu
Подпольщик WoT
Аватар для arksu
OFFLINE
Регистрация: 08.10.2012
Возраст: 41
Сообщений: 161
Благодарностей:
89 всего
Мнения: + 226
Репутация: 268
Отправить сообщение для arksu с помощью ICQ Отправить сообщение для arksu с помощью Skype™

Цитата:
Сообщение от Likeya Посмотреть сообщение
Посмотреть на хп моба проблем не составит, только что делать дальше? Если определить что моб "чужой" и переключиться на другого то может возникнуть нехорошая ситуация, когда начали бить с кем-то вместе, он сагрил первым, но наша плюха была сильней и моб сагрился на нас. У кого есть идеи как этого избежать?
есть. надо делать бота на пакетном уровне.
наработки есть. сделаю.
 
Ответить с цитированием
Старый 11.04.2014, 21:47   #8
TokaToka
Нуб
Аватар для TokaToka
OFFLINE
Регистрация: 11.04.2014
Сообщений: 0
Благодарностей:
3 всего
Репутация: 10

бот банки пьет?
 
Ответить с цитированием
Старый 13.04.2014, 00:10   #9
arksu
Подпольщик WoT
Аватар для arksu
OFFLINE
Регистрация: 08.10.2012
Возраст: 41
Сообщений: 161
Благодарностей:
89 всего
Мнения: + 226
Репутация: 268
Отправить сообщение для arksu с помощью ICQ Отправить сообщение для arksu с помощью Skype™

Цитата:
Сообщение от TokaToka Посмотреть сообщение
бот банки пьет?
банки на хп? сделать думал. но ведь их мало....
 
Ответить с цитированием
Старый 22.04.2014, 06:58   #10
Kaschey
Гость
Аватар для Kaschey
Сообщений: n/a
Благодарностей:
0 всего

Вопрос к автору скрипта: как можно переделать координаты проверок под другое разрешение? Есть какие-то формулы пересчета или прога или вручную тыкать и записывать?
 
Ответить с цитированием
Ответ



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

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

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

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Бот (кликер) Dzybi Reborn online читы 15 10.07.2021 15:01
Макрос + кликер = Бот БГ ЦукерОо Баги, читы для WoW 1 03.03.2014 16:58
FarmBot - новый бот-кликер palanik Архив читов и багов World of Tanks 11 10.01.2013 15:54
Бот для WOT v5.8.1 (кликер) Nemec7 Архив читов и багов World of Tanks 22 25.08.2011 19:31
Бот для ДО, не кликер leverant Dark Orbit читы 8 18.12.2010 10:53

Мир танков | Проект "Армата" | ArcheAge | Black Desert | РФ Онлайн | Айон | Майнкрафт | Браузерные игры
Элдер скролс | Р2 Онлайн | Реквием Онлайн | ПУБГ | Роял Квест | ГТА Санадреас | Контра | Дота 2
Мир кораблей | Лост Арк | Arma2 DayZ mod | The War Z | Карос: Начало | Tera Online
Читы для всех Онлайн-игр