Register for your free account! | Forgot your password?

Go Back   elitepvpers > MMORPGs > Perfect World
You last visited: Today at 17:42

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Rus. server

Discussion on Rus. server within the Perfect World forum part of the MMORPGs category.

Reply
 
Old 12/03/2009, 12:44   #811
 
elite*gold: 0
Join Date: Nov 2009
Posts: 96
Received Thanks: 31
Quote:
Originally Posted by Biga73 View Post
стопроцентов уверен что этот бот на автоит написан
ты наверн судишь потому что он F12345 кл. назначает, может это чтоб гэймер просто не путался .. врят-ли на Atoit
origmas is offline  
Old 12/03/2009, 12:47   #812
 
elite*gold: 0
Join Date: Nov 2009
Posts: 96
Received Thanks: 31
на дельфи и на атоит тока ин-сервер или наш старый
Attached Files
File Type: rar WanMeiWG.rar (333.1 KB, 54 views)
origmas is offline  
Thanks
2 Users
Old 12/03/2009, 13:20   #813
 
muzhig's Avatar
 
elite*gold: 0
Join Date: Sep 2009
Posts: 85
Received Thanks: 27
Итак..
1) Я освоил поиск адресов процедур для инжекта.
2) Взял процедуру бега с инжектом(а не через ЖП) из китайского исходника и привел ее в надлежащий вид.
т.е. все смещения наши, русские))

пользуйтесь, и другим давайте.
Quote:
procedure WalkCall(aPParams:PParams); Stdcall;
var
Address1: pointer;
Address2: pointer;
Address3: pointer;
x,y,z:single;
//fly: Cardinal;
const
W2I_Walk_Call1 =$00461FD0;
W2I_Walk_Call2 =$00465AB0;
W2I_Walk_Call3 =$004623D0;
W2I_BASE_Call =PW_BASE_ADDRESS;

begin
//by muzhig
Address1:=Pointer(W2I_Walk_Call1);
Address2:=pointer(W2I_Walk_Call2);
Address3:=pointer(W2I_Walk_Call3);
x:=aPParams^.Param3;
y:=aPParams^.Param4;
z:=aPParams^.Param5;

//if r_POSITION1=0 then
//fly:=0
//else
//fly:=1;
asm
pushad
mov eax, dword ptr [PW_BASE_ADDRESS] // 92D534 929174
mov eax, dword ptr [eax+$1C]
mov esi, dword ptr [eax+$20]
mov ecx, dword ptr [esi+$C10] //Bcc+8=BD4
push 1
call Address1
{
mov ecx, [esi+0C10h];[[ba+$20]+$C10]
push ebx ; 1
call sub_461FD0
}
mov edi, eax
lea eax, dword ptr [esp+$0C]
push eax
push 0 //r_POSITION1 //0µШГж 1їХЦР
mov ecx, edi
call Address2
{
mov edi, eax
lea eax, [esp+0Ch]
push eax
push 0
mov ecx, edi
call coordset_465AB0
}

mov ecx, dword ptr [esi+$C10] //Bcc+8=BD4
push 0
push 1
push edi
push 1
call Address3
{
.text:0044E791 mov ecx, [esi+0C10h]
.text:0044E797 push 0
.text:0044E799 push ebx
.text:0044E79A push edi
.text:0044E79B push ebx
.text:0044E79C call sub_4623D0
.text:0044E7A1 pop edi
}
mov eax, dword ptr [PW_BASE_ADDRESS] // 92D534 00929174 929174
mov eax, dword ptr [eax+$1C]
mov eax, dword ptr [eax+$20]
mov eax, dword ptr [eax+$C10] //$C10
mov eax, dword ptr [eax+$30]
mov ecx, dword ptr [eax+$4]
mov eax, x
mov dword ptr[ecx+$20], eax
mov eax, z
mov dword ptr[ecx+$24], eax
mov eax, y
mov dword ptr[ecx+$28], eax
popad
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
var
aParams : TParams;
aParamsSize: DWORD;
x,y,z:single;
begin

x:=(strtofloatdef(Edit1.Text,400)-400)*10;
y:=(strtofloatdef(Edit2.Text,550)-550)*10;
z:=strtofloatdef(Edit3.Text,0)*10; координаты приводим в надлежащий вид
aParams.Param3:=x;
aParams.Param4:=y;
aParams.Param5:=z;

aParamsSize:=SizeOf(aParams);
//if GHwnd<>0 then
begin
InjectFunc(hProcess, @WalkCall, @aParams, aParamsSize);
end;
end;
Ставьте спасибы и не жопьтесь никогда! Даже если вы корпели над этим.
muzhig is offline  
Thanks
8 Users
Old 12/03/2009, 13:38   #814
 
elite*gold: 0
Join Date: Nov 2009
Posts: 12
Received Thanks: 1
Quote:
Originally Posted by origmas View Post
жаль - аброкадаброй написано не могу прочесть ..
Всмысле?
Нежелает бот короче говоря работать. Всё сделал так-же как и ты, но после того как в боте появляется инфа о персе и игре, а так-же открываются settings - две секунды и всё отключается.
Settings отключаются, инфа исчезает, а игровое окно переименовывется в "" (нету названия).
Повторно бот не активируется.
muchenberg is offline  
Old 12/03/2009, 13:55   #815
 
muzhig's Avatar
 
elite*gold: 0
Join Date: Sep 2009
Posts: 85
Received Thanks: 27


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

Если соберусь пропадать надолго или надоест, отдам логин пароль другим энтузиастам.
muzhig is offline  
Thanks
1 User
Old 12/03/2009, 14:09   #816
 
elite*gold: 0
Join Date: Nov 2009
Posts: 96
Received Thanks: 31
Quote:
Originally Posted by muchenberg View Post
Всмысле?
Нежелает бот короче говоря работать. Всё сделал так-же как и ты, но после того как в боте появляется инфа о персе и игре, а так-же открываются settings - две секунды и всё отключается.
Settings отключаются, инфа исчезает, а игровое окно переименовывется в "" (нету названия).
Повторно бот не активируется.
папку settings создай в папке где сам файл бота
отключи Файр Вол и все шпион-Боты ..

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

может папку settings не так написал

окно должно имя перса писать в заголовке
origmas is offline  
Old 12/03/2009, 14:37   #817
 
elite*gold: 0
Join Date: Jul 2008
Posts: 43
Received Thanks: 16
У меня такая же проблема с этим ботом. Отображается в списке, а через секунду-две исчезает. И после бот не видит клиента.

Quote:
Originally Posted by origmas View Post
окно должно имя перса писать в заголовке
Скорее всего в этом проблема, т.к. у меня имя чара содержит русские буквы, а бот явно буржуинский и написан на старых делфях, который найтивно с юникод не работают. Пытается переименовать окно клиента, обламывается и получается пустая строка. А тоборажать у себя в списке окна с пустыми заголовками не умеет.
dj_al is offline  
Old 12/03/2009, 14:44   #818
 
elite*gold: 0
Join Date: Nov 2009
Posts: 12
Received Thanks: 1
Да, проблема действительно оказалась в имени чара.
muchenberg is offline  
Old 12/03/2009, 15:29   #819
 
elite*gold: 0
Join Date: Nov 2009
Posts: 96
Received Thanks: 31
А вот к этому боту ИНСТРУКЦИЯ


и тут подробнее но на английском
origmas is offline  
Old 12/03/2009, 18:58   #820
 
elite*gold: 0
Join Date: Oct 2009
Posts: 5
Received Thanks: 4
осталось найти 2 ответа
1) как эту гадость научить нажимать старт после того как перса убили и он телепартнулся в город
2) как сделать так чтобы когда убили питомца он его ресал и вызывал по новой
ksimma is offline  
Old 12/03/2009, 19:01   #821
 
elite*gold: 0
Join Date: Nov 2009
Posts: 69
Received Thanks: 5
У меня с ним немного другая проблема. После логина определяет перса. И каждые 3 секунды начинает обновлять инфу о клиенте..персе в главном окне. С каждым обновлением из окон настроек переключается в основное окно Clients((
Novohyd is offline  
Old 12/04/2009, 00:35   #822
 
elite*gold: 0
Join Date: Jan 2009
Posts: 137
Received Thanks: 19
Все то. В фикседе тоже очень быстрая логика. Просто продукт-то коммерческий. Поэтому для избежания ненужных вопросов сделаны задержки для плохих коннектов ) Вот он и думает долго. Этот параметр, кстати, можно изменить.
AlexGD is offline  
Old 12/04/2009, 00:36   #823
 
elite*gold: 0
Join Date: Jan 2009
Posts: 137
Received Thanks: 19
Quote:
Originally Posted by muzhig View Post
По движению опять вопрос..
Вот мы записали три координаты цели, а он двигается только по плоскости, не набирает высоту. По Z вообще не двигается...

кто реализовал нормально, в чем загвоздка?

PS: я китайскую процедуру использовал, WalkTo
По Z - это не движение, насколько я понимаю... Разберемся )
AlexGD is offline  
Old 12/04/2009, 01:05   #824
 
elite*gold: 0
Join Date: Aug 2009
Posts: 6
Received Thanks: 0
Страныый этот крякнутый ботПиратес... Хилит постоянно пета, не видит некоторых мобов которых ему указываешь
Tr1k is offline  
Old 12/04/2009, 05:53   #825
 
elite*gold: 0
Join Date: Jan 2009
Posts: 137
Received Thanks: 19
Quote:
Originally Posted by origmas View Post
нет, я не про быстроту - мой стоит на месте (друлька) и стреляет поворачивается и стреляет - все как в кино, другой перс - Человек - тот подходит бъет, поворачивается - немного шагнет бъет все по порядку как бы в жизни кто дрался, а этот Fix мечется бой ведет безсистемно не естественно всетаки работает, наверное это зависит от того что его делал программист без эмоций без переживания процесса и выбора цели и очеловечивания его поведения, кстати нет даже банальной отсортровки целей выше перса на 42(лвл) уровня и на котят кидается и на верх хочет запрыгнуть на небо-мобов .. а если в списке целей NO поставить - то он их все равно в таргет берет, иногда подбегает потом одумывается на полпути (другая цель в таргете) и к ней .. программист делал который - спешил наверное не продумал все, главное механизм ..

...... так думаю ..
поэтому нам с вами еще пахать и пахать как папам Карлам - своим Буратинам мозги править. ..))
Есть у меня правило - перед тем, как сказать человеку, что он что-то сделал не так - надо подумать почему он это сделал. И зачастую оказывается, что все чел сделал так ) Только по-своему )

Ты не выкупил логику работы бота. Мобов он фильтрует по списку отлично. А вот таргет на далекую цель зачем использует (на любую, причем никогда ее не атакует, причем пофиг на филтры) - это тебе домашнее задание Подсказка: выкупи логику сбора лута и копания ресов. Честно говоря - очень орррригинально придумано

А вот с выбором цели - да - можно и улучшить. Просто люди на этом не заморачивались видимо особо (zcPW в этом мегакрут!).
AlexGD is offline  
Reply




All times are GMT +1. The time now is 17:43.


Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.