WorldCheats Forum

Форум
Форум посвященный главным образом MMORPG играм. Никаких ХАЙДОВ!

 
ФорумПорталЧаВоПоискПользователиГруппыРегистрацияВход

Поделиться | 
 

 IMMainLoop

Предыдущая тема Следующая тема Перейти вниз 
АвторСообщение
Belfigor
Освоившийся
Освоившийся
avatar

Мужчина Количество сообщений : 259
Возраст : 18
Награда :  
Дата регистрации : 2009-04-29

СообщениеТема: IMMainLoop   Пт Май 01, 2009 11:06 am

Цитата :
IMMainLoop v0.1 Change Log:
v0.1 - 15.02.2009 [Link]:
- Альфа релиз модуля

Цитата :
Главная тема [Link]
Содержание [Link]


Последний раз редактировалось: Belfigor (Пт Май 01, 2009 12:08 pm), всего редактировалось 1 раз(а)
Вернуться к началу Перейти вниз
Посмотреть профиль
Belfigor
Освоившийся
Освоившийся
avatar

Мужчина Количество сообщений : 259
Возраст : 18
Награда :  
Дата регистрации : 2009-04-29

СообщениеТема: Re: IMMainLoop   Пт Май 01, 2009 12:07 pm

IMMAinLoop v0.1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;
;; IMMainLoop Главный цикл. Задает порядок действий боту, что и когда делать и тд.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;
;; Команды Пояснения
;; CS(1000) - Задержка выполнения скрипта. В скобках указать то время на которое вы хотите приостановить выполнение скрипта (в м.с., 1000 = 1 сек).
;; LoadingToOutospace() - Выгрузка бота со станции на в космос. Ожидание подтверждение нахождения в космосе.
;; MiningIceRoid() - Запускает 2 айс харвестера
;; OpenMenu($Stroke, $MenuX, $MenuY, $Type, $Run) - Работа с первым уровнем Меню.
;; OpenMenu(1, $StrokeX, $StrokeY2, 1, 2) - Работа со вторым и всеми последующими уровнями Меню.
;; OpenMenu(1, $OverviewX, $OverviewY, 2, 1) - Работа с Меню пресетов Овервью.
;; SearchingForIceRoid() - Выполняет поиск АйсРойда и выделяет его.
;; StopShip() - Запрос на остановку корабля.
;; TargetingForIceRoid() - Нацеливается на астероид.
;; Timer($TTMinutes, $TTSeconds, $Action) - Включает таймер на заданное время с заданным комментом
;; TT("Открываю Овервью") - Работа с ТулТипами. В скобках указывается значение которое будет отображено в ТулТипе.
;; WarpTest() - Проверка на нахождение корабля в варпе. Отслеживает вход и выход из варпа и после выхода из варпа продолжает выполнение сценария
;; WaitDocking() - После выхода из варпа у базы ожидает стыковки со станцией
;; UnloadCargo() - Разгружает трюм
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;
Func MainLoop()
Do
LoadingToOutospace()
StopShip()
CS(20000)
OpenMenu(6, $MenuX, $MenuY, 1, 1)
OpenMenu(1, $StrokeX, $StrokeY2, 1, 2)
WarpTest()
OpenMenu(1, $OverviewX, $OverviewY, 2, 1)
SearchingForIceRoid()
TargetingForIceRoid()
MiningIceRoid()
Timer(0, 436, "Варп на базу через ")
StopShip()
CS(1000)
OpenMenu(7, $MenuX, $MenuY, 1, 1)
OpenMenu(3, $StrokeX, $StrokeY2, 1, 2)
WarpTest()
OpenMenu(7, $MenuX, $MenuY, 1, 1)
OpenMenu(1, $StrokeX, $StrokeY2, 1, 2)
WaitDocking()
UnloadCargo()
Until $MainLoop = 0
CS(2000)
EndFunc ;==>MainLoop()
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;
Вернуться к началу Перейти вниз
Посмотреть профиль
Archy26
Пользователь
Пользователь
avatar

Мужчина Количество сообщений : 73
Возраст : 35
Награда :  
Дата регистрации : 2009-06-01

СообщениеТема: Re: IMMainLoop   Чт Июн 04, 2009 3:17 pm

Уважаемые посетители форума, между мной и автором темы произошла небольшая беседа афтар просил выложить на всеобщее обозрение:

Здравствуйте уважаемый. Мы с Вами уже видеись на другом форуме, с которого вы любезно направили меня сюда. У меня есть несколько вопросов к вашим модулям. Если вопросы примитивные, прошу не бить меня палкой, я дальше макросов хот кейборда не ходил, и в целом, я только начинаю постигать синтаксис AutoIT.
В целом у меня есть достоверные данные, об одном из параметров, за которым следит клиент евы. перемещение мыши. Дело в том, что я тут недавно начал постигать логику компании майкрософт Smile относительно системных событий. И выяснил, что мышь, при движении пользователем перемещается тиками.
т.е. процес перебрасывания руды откуда-либо куда-либо выглядит примерно так:
-------\\ \\----------
1 (delay n) set screen size h, w
2 (delay n) set window size h, w
3 (delay n) set window position x, y
4 (delay n) init vouse pisition x, y
5 (delay n) mouse move x, y
6 (delay n) mouse move x, y
7 (delay n) mouse move x, y
------\\ \\----
35 (delay n) mouse move x, y
36 (delay n) mouse keyBttnLeft down x, y
37 (delay n) mouse move x, y
------\\ \\----
45 (delay n) mouse move x, y
36 (delay n) mouse keyBttnLeft Up x, y
------\\ \\----

К чему я всё это пишу? Ну к тому что в основном майнерском цикле прописывания тиков движения мыши я не заметил, собственно как и других попыток "рандомизировать" и приблизить действия скртипта к к действиям человека с внешней точки зрения.
Такое есть в проекте или вы не предполагаете подобных вещей?
Так же сейчас посижу повтыкаю на вашу функцию пиксельчсёрч и, возможно придумаю, как локал сканить.


Belfigor пишет:
Локал сканить достаточно просто, но в пределах видимости клиента, достаточно пробежать по тем точкам в локале на которых должны быть знаки характеризующие принадлежность игрока, собрать данные о них и сопоставить есть ли наличие нежелательных субъектов.

Рандомизировать движения мыши не вижу смысла ибо за несколько лет не получил ниодного нарекания со стороны разработчиков да и в принципе они и так знают что люди на ботах в импе роют Smile.

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


собсно - кто и что думает на эту тему?
Вернуться к началу Перейти вниз
Посмотреть профиль
Archy26
Пользователь
Пользователь
avatar

Мужчина Количество сообщений : 73
Возраст : 35
Награда :  
Дата регистрации : 2009-06-01

СообщениеТема: Re: IMMainLoop   Чт Июн 04, 2009 3:19 pm

от себя хочу добавить, что копка льда в империи одно дело - а автокопка арконора в нулях - дело совсем другое.
Вернуться к началу Перейти вниз
Посмотреть профиль
Belfigor
Освоившийся
Освоившийся
avatar

Мужчина Количество сообщений : 259
Возраст : 18
Награда :  
Дата регистрации : 2009-04-29

СообщениеТема: Re: IMMainLoop   Чт Июн 04, 2009 5:06 pm

Никто и не спорит, и понадобятся для бота под нули - километры кода, простенькими схемами как для импы тут не отделаться. Могу потом выложить сканер локала который я использовал когда в ручную копал арк в нулях, он правда примитивный но при работе в 6 окон очень облегчал жизнь Smile
Вернуться к началу Перейти вниз
Посмотреть профиль
Archy26
Пользователь
Пользователь
avatar

Мужчина Количество сообщений : 73
Возраст : 35
Награда :  
Дата регистрации : 2009-06-01

СообщениеТема: Re: IMMainLoop   Ср Июн 10, 2009 2:54 am

Выкладывай. Я тут мучаюсь с примитивным сканером локала основаным на PixelChecksum но у меня не всё ладится.
Вот посмотри к чему я пришёл путём ряда жутких манипуляйций и быстрого проглядывания хэлпа. Вот этот код не выдаёт ошибок (у меня), но и не делает что должен делать:

Func GoHome()
_Log("Тикаем на ПОС")
MouseMove(400,197, 5)
MouseDown("right")
Sleep(100)
MouseUp("right")
sleep(50)
MouseMove(550,319, 5)
Sleep(100)
MouseMove(643,319, 5)
Sleep(100)
MouseDown("left")
MouseUp("left")
EndFunc ;==> GoHome

Func PlusOrMinus()
_Log("Начинаю проверку локала")
Const $himinus = 3822465788, $minus = 1070223349, $neutral = 2525533859, $socorp = 770660109, $hiplus = 154549252, $plus = 1184196157, $iam = 2311997261, $y = 9
Global $i = PixelChecksum(365, 82+$y-9, 365+8+$y-9, 82+Cool
_Log($i)
If $i = $himinus Then
_Log("Обнаружен враг")
GoHome()
EndIf
If $i = $minus Then
_Log("Обнаружен враг")
GoHome()
EndIf
If $i = $neutral Then
_Log("Обнаружен враг")
GoHome()
EndIf
If $i = $hiplus Then
_Log("Враг не обнаружен.")
EndIf
If $i = $plus Then
_Log("Враг не обнаружен.")
EndIf
If $i = $iam Then
_Log("Враг не обнаружен.")
EndIf
EndFunc ;==> PlusOrMinus
PlusOrMinus()

Для того, чтобы отследить потом какое он действие делает, я прикрутил к нему твой модуль лога. Модуль лога работает идеально. НО!
Затыка происходит, видимо, на первой сроке включающей в себя IF, потому что последнее что оно пишет в лог - значение возвращёное pixelcheksum по заданым координатам. Жесть. Четвёртый час над ней бьюсь - выручайте, кто понимает Smile
Вернуться к началу Перейти вниз
Посмотреть профиль
Belfigor
Освоившийся
Освоившийся
avatar

Мужчина Количество сообщений : 259
Возраст : 18
Награда :  
Дата регистрации : 2009-04-29

СообщениеТема: Re: IMMainLoop   Ср Июн 10, 2009 10:37 am

Вернуться к началу Перейти вниз
Посмотреть профиль
Lyuk
Пользователь
Пользователь
avatar

Мужчина Количество сообщений : 41
Возраст : 37
Награда :  
Дата регистрации : 2009-04-30

СообщениеТема: Re: IMMainLoop   Вт Июл 21, 2009 4:19 am

по моему, в шапку можно добавить ссылку на более продвинутый вариант главного цикла: http://worldcheats.mo-rpg.com/forum-f108/tema-t196.htm
Вернуться к началу Перейти вниз
Посмотреть профиль
Belfigor
Освоившийся
Освоившийся
avatar

Мужчина Количество сообщений : 259
Возраст : 18
Награда :  
Дата регистрации : 2009-04-29

СообщениеТема: Re: IMMainLoop   Вт Июл 21, 2009 10:37 am

То пример а это как бы "рабочий" вариант, хотя хз уже насколько он рабочий, но когда-то точно был Smile
Вернуться к началу Перейти вниз
Посмотреть профиль
Archy26
Пользователь
Пользователь
avatar

Мужчина Количество сообщений : 73
Возраст : 35
Награда :  
Дата регистрации : 2009-06-01

СообщениеТема: Re: IMMainLoop   Чт Июл 23, 2009 6:23 pm

Ахахахаха Белфигор!!! Ну ты ОТЖОГ! Smile
Этой мессаге, народ, уже очень очень очень много времени. За это время этот код вырос в поноценный ИИ. веренее на вермишель я забил давно, и как раз на основе выбора из более чем 36 ситуаций по 6 переменным в кейсе делаю выбор следующего действия.

Мы с Белльфигором вообще стараемся не использовать вермишель ни в каком виде, однако - в некоторых местах, это просто-таки, необходимо, для упрощения кода.

Например - выбрав из 36 кейсов (в каждом по 6 переменных)
1 кейс бот обнаруживает... ...вермишель... и выполняет её.
Не будь той вермишели - код получился бы слишком уж мудрёным. И в нём не разобрался бы даже сам автор.
Вернуться к началу Перейти вниз
Посмотреть профиль
Спонсируемый контент




СообщениеТема: Re: IMMainLoop   

Вернуться к началу Перейти вниз
 
IMMainLoop
Предыдущая тема Следующая тема Вернуться к началу 
Страница 1 из 1

Права доступа к этому форуму:Вы не можете отвечать на сообщения
WorldCheats Forum :: Лаборатория Читера :: EVE Online-
Перейти: