Rus. server

[dj_al]

Originally Posted by Shamanpovt

Ребят, подскажите: делаю таргет инекцией. код такой:
MOV_EAX(Dec("0098ADDC"))
MOV_EAX_DWORD_PTR_EAX()
MOV_EDI(Dec("801050D6"))
MOV_EDI_DWORD_PTR_EDI()
PUSH_EDI()
MOV_ECX_DWORD_PTR_EAX_ADD(Dec("20"))
ADD_ECX(Dec("EC"))
MOV_EDX(Dec("005B7B70"))
CALL_EDX()
Но клиент завершается аварийно. В чём ошибка?

Смущает, вот это:
MOV_EDI(Dec("801050D6"))
MOV_EDI_DWORD_PTR_EDI()
PUSH_EDI()

попробуй вместо этого:
MOV_EDI(Dec("801050D6"))
PUSH_EDI()

Насколько помню, там просто ID моба в стек запихать надо. А ты в регистр EDI пихаешь ID, а потом пытаешься этот ID трактовать как некий адрес и берёшь значение по этому адресу и потом пихаешь его в стек.

[origmas]

Originally Posted by dj_al

Смущает, вот это:
MOV_EDI(Dec("801050D6"))
MOV_EDI_DWORD_PTR_EDI()
PUSH_EDI()

попробуй вместо этого:
MOV_EDI(Dec("801050D6"))
PUSH_EDI()

Насколько помню, там просто ID моба в стек запихать надо. А ты в регистр EDI пихаешь ID, а потом пытаешься этот ID трактовать как некий адрес и берёшь значение по этому адресу и потом пихаешь его в стек.

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

mov eax, BaseAddress;
mov eax, dword ptr[eax];

mov edi, MonsterID;
mov edi, [edi];
push edi;

mov ecx, dword ptr[eax+0x20];
add ecx, 0xEC;

mov edx, CallAddress;
call edx;

- можно и так и так написать и попробывать - клиента из-за этого именно не выбивает
просто ID цели будет не тот - а это не критично

Скорее всего потому что ты посылаешь не функцию а OPcode
функция она сама прячет все регистры перед работой потом востанавливает
а в Автоите надо тебе перед и после поставить pushad() .... pop(edi) popad() возможно и команду RET() ..

[muzhig]

Originally Posted by silkytail

Любопытно было бы взглянуть на логику, если это как-либо обобщено, а не тупо захардкожена последовательность действий.
Я тут хочу замахнуться на что-то типа goal-oriented аи, но пока не очень ясно, как это можно сделать.

лично я рассматриваю бота как автомат. У автоматов есть та называемые устойчивые состояния. Ну в игре например это указатель текущего действия, насколько я понимаю.
у бота моего тоже есть флаг действия.
0-ничего не делаем
1-летим к waypoint
2-летим к выбранной цели (цель лубого плана: нпс, моб, рес, игрок итд)
3-активируем цель(убиваем моба, бафаем)
255-блокировка ЧС (черезвычайная ситуация- когда продолжать работу как обычно бот уже не может. Это грозит здоровью или еще чем нибудь. есть еще флаг причины блокировки, чтобы потом эту блокировку снять)

(эти устойчивые состояния добавятся, я так думаю)

Вся фишка в универсальности понятия цели- минимальная единица, частица общей Цели (пока бред, но я счас поясню)

К примеру, Цель- это сбор ресов. Тогда эта самая цель- или подцель - это самый близкий,выгодный, не занятый ресурс.
Если главная Цель это фарм, тогда подцели это мобы и лут.
ну и.т.д. и.т.п.

Эти подцели можно, при желании, выстраивать в цепочки, ставить в зависимость друг от друга, ставить им важность и тд.

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

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

Например, текущая цель не равна найденной цели, следовательно, либо текущая цель неактуальна, либо новая цель более выгодна. (бывает, например, летит к ресурсу какому нибудь- потом бац, прямо около перса респнулся новый ресурс- нужно забить на тот что далеко и собрать тот что под ногами) Действие очевидно- двигаться к новой цели, тк она более выгодна.

потом при следующем проходе потока, он смотрит: ага, я двигаюсь к цели такой то. Ага, расстояние до цели достаточно для ее активации (копнуть рес, ударить моба итд). Значит посылаем клиенту команду активировать, переключаем состояние в режим активации.
Следующий проход потока:

Ага, мы активируем цель. Сколько процентов готово (жизнь моба, процесс копания) Если уже все, то переключаем в режим 0 (ничего не делания)

В новой итерации, в самом начале мы ищем новую цель. И снова по кругу- полететь к цели, активировать.

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

В случае ЧС ставится блокировка, потом например прыгаем на полет, поднимаемся повыше, ждем- это в случае с мобами или здоровьем/маной
С поломкой оружия/брони или переполнением инвентаря- ТП в город, или пешком/полетом. Там продаться/купить что нужно, отремонтироваться и го назад, к ближайшей точке маршрута/цели, если таковая есть.
В ситуации с нападением на бота другим игроком, можно продумать что делать- например свалить в город. или свалить в радиальном направлении и орать ему в ПМ типа "Ты че творишь?" итд.

В общем, блокировка - это способ обойти нестандартные ситуации.
После чего переводит состояние в режим 0.

Вот, я вроде описал задумку. весьма вкраце, правда)))
Здесь остается место для универсальности- это поиск цели, способ ее активации и блокировки в непредвиденных ситуациях. В принципе, я так думаю, этим алгоритмом можно описать практически любые варианты поведения. Другое дело, что это только основа- а частные случаи нужно сидеть и писать все равно. А чтобы бот стал по настоящему универсальным.. это надо сдохнуть похоже :-)

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

ЗЫ, специально для origmas:
Потоки про которые я говорю, запускаются у меня, в моей программе(никуда не инжектятся).
Внутри тела простого потока, например, обновляющего списки объектов, стоит бесконечный цикл.

while Active do
begin
{Refresh here}
sleep(500);
end;

Ну поток следящий за движением к точке более сложный, но идея все та же.
поток выключается когда ставишь Active:= false.
Так он сам понимает, что пора выходить, сохраняет что нужно и делает Terminate.
Надеюсь, доступно объяснил)))

[origmas]

Originally Posted by muzhig

..îñòàåòñÿ ìåñòî äëÿ óíèâåðñàëüíîñòè..

Âîò ýòî ÿ ïîíèìàþ - Ðóñèøü Áîò ïîëó÷èòñÿ .. åùå ÷óòü-÷óòü è ïåðåéäåì ê Ýêñïåðòíûì ñèñòåìàì .. ïîèñê àïðèîðíûõ âåðîÿòíîñòåé, áàçû çíàíèé è ò.ä.
Ñèñòåìà Ôëàãîâ ñîñòîÿíèé - î÷åíü ïîëåçíà è äàæå íåîáõîäèìà - ñàì Êëèåíò îñíîâûâàåòñÿ íà ïðîâåðêå òàêèõ ôëàãîâ.
Ñïàñèáî çà ñîâåò - îáÿçàòåëüíî âîçüìó íà âîîðóæåíèå ..))

[Novohyd]

У меня пока запросы к боту чуть-чуть поскромнее Цель находит в таргет не берет(. От себя добавил CloseHandle(Proc); перед CallRemoteFunction(Proc,(LPVOID)PriorID); и OpenProc(); после, а то видеть клиента переставал

[origmas]

Novohyd

Еще раз попробуй такой вариант - сег. ночью спец. пробывал - РАБОТАЕТ, насчет
процесса - да, ты правильно заметил ..

//---------------------------------------------------------------------------
static DWORD WINAPI SelectMonster(LPCVOID lpParam )
{ DWORD BaseAddress = 0x0098ADDC;
DWORD CallAddress = 0x005B7B70;
DWORD MonsterID = (DWORD)lpParam;
__try
{ __asm
{ mov eax, BaseAddress;
mov eax, dword ptr[eax];
mov edi, MonsterID;
mov edi, [edi];
push edi;
mov ecx, dword ptr[eax+0x20];
add ecx, 0xEC;
mov edx, CallAddress;
call edx;
}
}
__except(1){}
return 0;
}
//---------------------------------------------------------------------------
bool CBotDlg::CallRemoteFunction(HANDLE hProcess, LPVOID lpParam)
{ HANDLE hThread = NULL;
LPVOID ThreadCodeAddr = NULL; //Inject Fuction Address after allocate
LPVOID ThreadDataAddr = NULL; //Inject Fuction Stack Address after allocate
LPVOID Func = SelectMonster; //Inject Function
DWORD ThreadID; //
DWORD dwWritten; //
ThreadCodeAddr=VirtualAllocEx(hProcess,NULL,256,ME M_COMMIT,PAGE_READWRITE);
WriteProcessMemory(hProcess,ThreadCodeAddr,Func,25 6,&dwWritten);
ThreadDataAddr=VirtualAllocEx(hProcess,NULL,64,MEM _COMMIT,PAGE_READWRITE);
WriteProcessMemory(hProcess,ThreadDataAddr,&lpParam,64,&dwWritten);
hThread = CreateRemoteThread(hProcess,NULL,0,(LPTHREAD_START _ROUTINE)ThreadCodeAddr,ThreadDataAddr,NULL,&ThreadID);
if (!hThread) return false;
else WaitForSingleObject(hThread,INFINITE);
CloseHandle(hThread);
VirtualFreeEx(hProcess,ThreadCodeAddr,256,MEM_RELE ASE);
VirtualFreeEx(hProcess,ThreadDataAddr, 64,MEM_RELEASE);
CloseHandle(hProcess);
return true;
}
//---------------------------------------------------------------------------

[silkytail]

Originally Posted by muzhig

ëè÷íî ÿ ðàññìàòðèâàþ áîòà êàê àâòîìàò. Ó àâòîìàòîâ åñòü òà íàçûâàåìûå óñòîé÷èâûå ñîñòîÿíèÿ. Íó â èãðå íàïðèìåð ýòî óêàçàòåëü òåêóùåãî äåéñòâèÿ, íàñêîëüêî ÿ ïîíèìàþ.

Òû íà ñàìîì äåëå ÷àñòè÷íî îïèñûâàåøü goap, òîëüêî íàâåðíî íå çíàøü, ÷òî ýòî òàêîå Ìåæäó goap è àâòîìàòàìè (fsm) ðàçíèöà íà ñàìîì äåëå ïðèíöèïèàëüíî, õîòü èõ è ìîæíî ñîâìåùàòü ïðè æåëàíèè.
Íàïðèìåð äëÿ èëëþñòðàöèè ìîæíî ïîñòàâèòü öåëü "óáèâàòü ìîáîâ", äëÿ êîòîðîé åñòü ïëàí:
óñëîâèÿ: îðóæèå íå ñëîìàíî, èíâåíòàðü íå ïîëîí, áàíêè â íàëè÷èè, åòö
äåéñòâèå <äîãîíÿåì, óáèâàåì, åòö, ýòî òîæå ïîäïëàíû>
ýôôåêò: ìîáû óìèðàþò

Åñëè â ïðîöåññå âûïîëíåíèÿ íàðóøàåòñÿ êàêîå-òî èç óñëîâèé, íàïðèìåð ëîìàåòñÿ îðóæèå, òî íàì íóæíî áóäåò íàéòè ïîñëåäîâàòåëüíîñòü äåéñòâèé, êîòîðàÿ ïðèâîäèò íàñ â ñîñòîÿíèå "îðóæèå íå ñëîìàíî". Äîïóñòèì, ó íàñ áóäåò òàêîé ïëàí "ïî÷èíêà":
óñëîâèÿ: ñòîèì ó òîðãîâöà
äåéñòâèå: ÷èíèìñÿ
ýôôåêò: îðóæèå íå ñëîìàíî
À ÷òîáû äîéòè äî òîðãîâöà îò òåêóöåãî ìåñòà, íàì ïðèãîäèòñÿ ïëàí "ïåðåìåùåíèå"
óñëîâèÿ: <÷òî òóò íàïèñàòü íå î÷åíü ïðåäñòàâëÿþ>
äåéñòâèå: <áåæèì, ëåòèì, ïîëüçóåìñÿ òåëåïîðòîì?>
Ýôôåêò: íàõîæäåíèå ó òîðãîâöà

Èçâèíèòå åñëè ðñïèñûâàþ î÷åâèäíûå è èçâåñòíûå âåùè ×òî â ýòîì õîðîøî, òàê ÷òî íàâîðà÷èâàòü ëîãèêó ìîæíî äî áåñêîíå÷íîñòè, îäíèì ìåòîäîì çàäàâàÿ è èíäèâèäóàëüíîå, è ãðóïïîâîå ïîâåäåíèå, è òï.

Òàê âîò, âîïðîñîâ ïîñåìó ìíîæåñòâî.
Íàïðèìåð, êàê ìîæíî ôîðìàëèçîâàòü ïëàíû è öåëè òàê, ÷òîáû ýòî íå áûëî çàøèòî òîëüêî â êîäå è ìîæíî áûëî ýòî íàñòðàèâàòü? Êàêîé-òî ñâîé ðåäàêòîð èëè êîìïèëèðóåìûé ÿçûê?
Èëè, êàê ïðèäàòü íåêîé ãèáêîñòè âñåìó ýòîìó - íàïðèìåð ðàç ìû âñå ðàâíî äîøëè äî òîðãîâöà, êàê âûðàçèòü òî, ÷òî çàîäíî íåïëîõî áûëî áû ïðîäàòü ëóò è êóïèòü áàíîê? Äà åùå è çàéòè ê áàíêèðó âûãðóçèòü ïîëåçíîå. Åñòü îùóùåíèå, ÷òî öåëè è ïëàíû íàäî ñíàáäèòü âåñàìè è äèíàìè÷åñêè èõ ðàññ÷èòûâàòü.

Òû, äàðàãîé ìóæèã, ÷òî-òî óæå êàê-òî ðåàëèçîâàë, èëè òîæå ôàíòàçèðóåøü ? Ïîäåëèñÿ êîäîì åñëè ÷òî åñòü.

[dwar]

Êñòàòè, òðåê, ñîñòîÿùèé èç waypoint-îâ íå îáÿçàòåëüíî äåëàòü êîëüöîì.
äóìàþ, åãî ìîæíî ðàçâåòâèòü êàê óãîäíî, ãëàâíîå çàëîæèòü ëîãèêó ïîòîì, êàê ïåðåñêàêèâàòü ñ òî÷êè íà òî÷êó.

Ó ìîåãî áîòà êàðòà ïðåäñòàâëåíà â âèäå ãðàôà, âåðøèíû êîòîðîãî, íàïðèìåð, ìåñòà ñáîðà ðåñà, íèï’û è ò.ä., ðåáðà – «ðàññòîÿíèå» (âåðíåå, âðåìÿ, òðåáóåìîå äëÿ äîñòèæåíèå òî÷êè ñ ó÷åòîì âñåõ òðåõ êîîðäèíàò è ñêîðîñòè ïåðåäâèæåíèÿ). Âûáîð áëèæàéøåé òî÷êè – àëãîðèòì Äåéêñòðû. Âîçíèêëà èñêëþ÷èòåëüíàÿ ñèòóàöèÿ, ïîòðåáîâàëîñü áîòó áàíêàìè çàïàñòèñü, áîò ëåãêî íàõîäèò êðàò÷àéøèé ïóòü ê öåëè, åñëè íåò âîçìîæíîñòè òåëåïîðòèðîâàòüñÿ òóäà…

[origmas]

Ну че Novohyd - прививается зараза - Али как ?

-- беги за Клинским ..))

[Shamanpovt]

Вот такой код:
$PID = WinGetProcess("Element Client")
PUSHAD()
MOV_EAX(Dec("0098ADDC"))
MOV_EAX_DWORD_PTR_EAX()
MOV_EDI(Dec("801050D6"))
MOV_EDI_DWORD_PTR_EDI()
PUSH_EDI()
MOV_ECX_DWORD_PTR_EAX_ADD(Dec("20"))
ADD_ECX(Dec("EC"))
MOV_EDX(Dec("005B7B70"))
CALL_EDX()
POPAD()
RET()
INJECTCODE($PID)

Пробовал закомментить MOV_EDI_DWORD_PTR_EDI() - всё равно аварийное завершение(

[origmas]

Originally Posted by Shamanpovt

Вот такой код:
$PID = WinGetProcess("Element Client")
PUSHAD()
MOV_EAX(Dec("0098ADDC"))
MOV_EAX_DWORD_PTR_EAX()
MOV_EDI(Dec("801050D6"))
MOV_EDI_DWORD_PTR_EDI()
PUSH_EDI()
MOV_ECX_DWORD_PTR_EAX_ADD(Dec("20"))
ADD_ECX(Dec("EC"))
MOV_EDX(Dec("005B7B70"))
CALL_EDX()
POPAD()
RET()
INJECTCODE($PID)

Пробовал закомментить MOV_EDI_DWORD_PTR_EDI() - всё равно аварийное завершение(

стек востановлен некорректно - в него ж EDI прятали - надо вынуть от туда значение - просто POP() какой-нить перед POPAD()

[Shamanpovt]

Originally Posted by origmas

ñòåê âîñòàíîâëåí íåêîððåêòíî - â íåãî æ EDI ïðÿòàëè - íàäî âûíóòü îò òóäà çíà÷åíèå - ïðîñòî POP() êàêîé-íèòü

изменил так:
$PID = WinGetProcess("Element Client")
PUSHAD()
MOV_EAX(Dec("0098ADDC"))
MOV_EAX_DWORD_PTR_EAX()
MOV_EDI(Dec("801050D6"))
MOV_EDI_DWORD_PTR_EDI()
PUSH_EDI()
MOV_ECX_DWORD_PTR_EAX_ADD(Dec("20"))
ADD_ECX(Dec("EC"))
MOV_EDX(Dec("005B7B70"))
CALL_EDX()
POP_EDI()
POPAD()
RET()
INJECTCODE($PID)

Всё равно аварийное завершение(

[origmas]

Originally Posted by Shamanpovt

Âñ¸ ðàâíî àâàðèéíîå çàâåðøåíèå(

òû ïîêà ýòî âñå òàê îñòàâü - ïðîâåðü - êîäû Opcode ôóíêöèé, íî òàì âðîäå ïðàëüíûå. À âîò ñàìà ôóíêöèÿ INJECTCODE($PID) ïîñìîòðåòü íàäî êàêîé òû ïîëüçóåøüñÿ, åñëè èç GEObot - òî îíà òàì ïîä ñîìíåíèåì - èç îáùåñòâåííîé êîïèëêè âîçüìè ïîïðîáóé.

[dwar]

Originally Posted by Shamanpovt

èçìåíèë òàê:
POP_EDI()
POPAD()
RET()

popad = pop EDI, ESI, EBP, ESP, EBX, EDX, ECX, EAX
ò.å., äîñòàòî÷íî îñòàâèòü popad (åñëè çäåñü ïîä POPAD() ïîäðàçóìåâàåòñÿ àíàëîã êîìàíäû àññåìáëåðà)

[dj_al]

Originally Posted by origmas

mov edi, MonsterID;
mov edi, [edi];
push edi;

Вах молодца... А щас включи мозг и подумай что ты РЕАЛЬНО запихнул в стек таким образом.

mov edi, MonsterID; - запихиваешь ID монстра, которое по сути просто идентификатор (порядковый номер моба на сервере)

mov edi, [edi]; - начинаешь трактовать этот ID монстра как адрес и пытаешься по этому адресу взять данные и запихнуть в регистр edi

push edi; - этот мусор полученный выше - ты пихаешь в стек.

К тому кто с автоитом мучается, я не знаю в чём у тебя причина, может некорректно формируются OPCODE, либо ты инжектируешь неправильно (что скорее всего).

Вот мой код на Delphi, который работает как со старым клиентом, так и с новым, всё зависит от того, какие адреса передал через структуру праметров (для нового клиента $0098addc и $005b7b70):

procedure SelectMonster(MonID: PParams); stdcall;
(*
PW Ru Off 1.4.1
0045B30D - a1 1c 6b 97 00             - mov eax,[00976b1c] : 009771A0
0045B312 - 57                         - push edi
0045B313 - 8b 48 20                   - mov ecx,[eax+20]
0045B316 - 81 c1 ec 00 00 00          - add ecx,000000ec
0045B31C - e8 1f 2d 15 00             - call 005ae040

PW Ru Off 1.4.1 Build 2273
0045C30D - a1 dc ad 98 00             - mov eax,[0098addc] : 0098B460
0045C312 - 57                         - push edi
0045C313 - 8b 48 20                   - mov ecx,[eax+20]
0045C316 - 81 c1 ec 00 00 00          - add ecx,000000ec
0045C31C - e8 4f b8 15 00             - call 005b7b70
*)
var
  CallAddress: pointer;
  BaseAddress, P1: DWORD;
begin
  BaseAddress := MonID^.BaseAddr;
  CallAddress := Pointer(MonID^.FuncAddr);
  P1:=MonID^.Param1;
  asm
    pushad
    mov edi, P1
    mov eax, BaseAddress
    mov eax, [eax]
    push     edi
    mov ecx, DWORD PTR [eax+$20]
    add ecx, $EC
    call     CallAddress
    popad
  end;
end;