Ставьте спасибы и не жопьтесь никогда! Даже если вы корпели над этим.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;
Всмысле?Quote:
жаль - аброкадаброй написано не могу прочесть ..
папку settings создай в папке где сам файл ботаQuote:
Всмысле?
Нежелает бот короче говоря работать. Всё сделал так-же как и ты, но после того как в боте появляется инфа о персе и игре, а так-же открываются settings - две секунды и всё отключается.
Settings отключаются, инфа исчезает, а игровое окно переименовывется в "" (нету названия).
Повторно бот не активируется.
Скорее всего в этом проблема, т.к. у меня имя чара содержит русские буквы, а бот явно буржуинский и написан на старых делфях, который найтивно с юникод не работают. Пытается переименовать окно клиента, обламывается и получается пустая строка. А тоборажать у себя в списке окна с пустыми заголовками не умеет.Quote:
окно должно имя перса писать в заголовке
По Z - это не движение, насколько я понимаю... Разберемся )Quote:
По движению опять вопрос..
Вот мы записали три координаты цели, а он двигается только по плоскости, не набирает высоту. По Z вообще не двигается...
кто реализовал нормально, в чем загвоздка?
PS: я китайскую процедуру использовал, WalkTo
Есть у меня правило - перед тем, как сказать человеку, что он что-то сделал не так - надо подумать почему он это сделал. И зачастую оказывается, что все чел сделал так ) Только по-своему )Quote:
нет, я не про быстроту - мой стоит на месте (друлька) и стреляет поворачивается и стреляет - все как в кино, другой перс - Человек - тот подходит бъет, поворачивается - немного шагнет бъет все по порядку как бы в жизни кто дрался, а этот Fix мечется бой ведет безсистемно не естественно всетаки работает, наверное это зависит от того что его делал программист без эмоций без переживания процесса и выбора цели и очеловечивания его поведения, кстати нет даже банальной отсортровки целей выше перса на 42(лвл) уровня и на котят кидается и на верх хочет запрыгнуть на небо-мобов .. а если в списке целей NO поставить - то он их все равно в таргет берет, иногда подбегает потом одумывается на полпути (другая цель в таргете) и к ней .. программист делал который - спешил наверное не продумал все, главное механизм ..
...... так думаю ..
поэтому нам с вами еще пахать и пахать как папам Карлам - своим Буратинам мозги править. ..))