Появилась мысль написать маленькую программу для PW,выбрал Delphi как более распространенную среди ботоводов.До этого имел дело только с PHP Devel Studio, и то в написание фейков. Скачал Delphi 7 поковырялся,выполнил несколько уроков каторые нашел мне гугл , но посчитал это малым.
В чем возникает вопрос:
1.Какие учебники лучше всего подойдут для данной задачи?
2.Как найти офсеты которые отвечают за хп,мп,координаты и т.п
P.S: Огромная просьба в не флудить и отвечать по теме
________________
Люблю спасибки. Problem?
Последний раз редактировалось Fr[0]ST; 06.12.2011 в 05:06.
Причина: Афтор нуп и АПАЗОРИЛСЯ =(
книжек посоветовать не могу.. лучше лазь по сайтам и форумам Делфи
лазь по Жуку.. читай темы от корки до корки.. здесь есть немного интересных исходников
если конешно мозг не расплавится все читать... много тролей в последнее время развелось тут
Последний раз редактировалось Moder Death; 06.12.2011 в 10:07.
книжек посоветовать не могу.. лучше лазь по сайтам и форумам Делфи
лазь по Жуку.. читай темы от корки до корки.. здесь есть немного интересных исходников
если конешно мозг не расплавится все читать... много тролей в последнее время развелось тут
Наконец то ответил адекватный человек.
Спасибо, последую вашему совету.
просто я сам щас Делфи изучаю...
пишу программку для клана
инфораздел - с сылками на интересные сайты по ПВ.. ссылки на сайты варкланов, альянсов и т.д. всякие гайды
и читраздел.. автопот. волволкер. радар.
просто я сам щас Делфи изучаю...
пишу программку для клана
инфораздел - с сылками на интересные сайты по ПВ.. ссылки на сайты варкланов, альянсов и т.д. всякие гайды
и читраздел.. автопот. волволкер. радар.
вот с радаром застрял.. не получается пока.
Щас подучу может потом даже тебе чем нить помогу. Спс.
var
hProcess,cid,PID,BytesCount,buf:dword;
WndHndl:THandle;
begin
WndHndl:=findwindow(nil,'Perfect World');
GetWindowThreadProcessId(WndHndl, @PID);
hProcess:=OpenProcess(PROCESS_ALL_ACCESS, False, PID);
ReadProcessMemory(hProcess,ptr(base_addr),@buf,4,BytesCount);
ReadProcessMemory(hProcess,ptr(buf+$1C),@buf,4,BytesCount);
ReadProcessMemory(hProcess,ptr(buf+$34),@buf,4,BytesCount);
ReadProcessMemory(hProcess,ptr(buf+$604),@cid,4,BytesCount);
closehandle(hProcess);
// $604 оффсет ID клана
if cid<>505 then
begin
ShowMessage('Вы не из нашего клана.');
Close; // зкрываем прогу
end
else
begin
ShowMessage('вы прошли проверку)') ;
end
end;
________________
Почти забросил раздел Pw скажем спасибо TBX1n и серверу