Rus. server

[GrieVeR-13]

Ну чтож, поздравляю всех с обновлением. И самая важная первая новость:
Полёт снова работает по старой системе
(Added: Кажется, сервер всё равно возвращает обратно, чуть что ему не понравится, обломался флайджамп.. Т_Т)
Также два окна запускаются абсолютно без проблем. Просто тыкаем элемент клиент, даже без параметров.
Таргет мобов происходит мгновенно.
gen-ostr, черт) только хотел написать про базовый) опередил

[Shamanpovt]

Âîò, ÷òî íà äàííûé ìîìåíò íàøåë:

BaseAdress = 9C0E6C
[BaseAdress] = BaseAdress + 1C

Ïåðñîíàæ: [BaseAdress] + 20
HP 46C
MP 470
MaxHP 4A4
MaxMP 4A8
Target AF8
Êîîðä. Ïåðñîíàæà X 65C
Êîîðä. Ïåðñîíàæà Y 640
Êîîðä. Ïåðñîíàæà Z 63C
Óðîâåíü 464
Òåêóùèé îïûò 474

Ïèòîìåö [BaseAddress] + 32 + FF8 + ((petNo - 1) * 4 + 10) + (petNo - êëåòêà ïèòîìöà)
HP 56
Âåðíîñòü 4

Âñå ïðîäîëæàþ ïûòàòüñÿ íàéòè ñòðóêòóðó ìîáîâ... èëè êòî ïîäåëèòñÿ?

[begemot]

[Custom_32_Offsets_In_Decimal]
Target_OffSet=2808
MaxMP_OffSet=1192
MaxHP_OffSet=1188
MP_OffSet=1136
HP_OffSet=1132
[Perfect_World_Base_Address_In_Decimal]
Application_Title=Perfect World
Base_Address=10229012
Base_Inject=10229012

Светофор =)

[stsnsw]

Гугл как всегда рулит Проверяем:

. постоянной базовый адрес , 10227308 ,, " 9C0E6C "
. Постоянные выбора объектов, 6101296 ,, " 5D1930 "
. Постоянное состояние ответа, 10240884 ,, " 9C4374 "
. Постоянные выборы странно, 6101408 ,, " 5D19A0 "
. Постоянное возвращение смерти, 6101616 ,, " 5D1A70 "
. Постоянные полета, 6100816 ,, " 5D1750 "
. Постоянный полный ремонт, 6255552 ,, " 5F73C0 "
. Постоянные навыков, 4578512 ,, " 45DCD0 "
. Постоянное использование материалов, 6100816 ,, " 5D1750 "
. Постоянные открытые NPC, 6102384 ,, " 5D1D70 "
. Постоянное тесное NPC, 7594576 ,, " 73E250 "
. Постоянное тесное PUSH , 9862692 ,, " 967E24 "
. Константы купить вещи, 6255296 ,, " 5F72C0 "
. Постоянная ярмарка, 6255424 ,, " 5F7340 "
. постоянной нормальной атаки, 6246816 ,, " 5F51A0 "
. Постоянные торгов, 6126640 ,, " 5D7C30 "
. Лу постоянной Pao 1 , 4620400 ,,, " 468070 "
. Лу постоянной Pao 2 , 4635824 ,, " 46BCB0 "
. Лу постоянной Pao 3 , 4621424 ,, " 468470 "
. Постоянное смещение Paolu , 4064 ,, " FE0 "
. Постоянные и сквозь стены, 4225347 ,, " 407943 "
. Постоянные видения, 4226592 ,, " 407E20 "
. Константы скрытого потенциала, 4344520 ,, " 424AC8 "
. Постоянные бесконечной прыгать, 4546137 ,, " 455E59 "
. Постоянные Kong По, 6666367 ,, " 65B87F "
. Постоянное расстояние атаки, 4589860 ,, " 460924 "
. постоянной добычи 6 метров, 4652119 ,, " 46FC57 "
. Постоянные роль ID, 1112 ,, " 458 "
. Постоянное имя роли, 1544 ,, " 608 "
. Постоянные первого класса, 1552 ,, " 610 "
. Константы выбрали С.Н., 2808 ,, " AF8 "
. Постоянные банды ID 1492 года ", 5D4 "
. Постоянное название банды, 1776 ,, " 6F0 "
. Постоянный диалог ID, 2824 ,, " B08 "
. постоянный диалог государства, 2838 ,, " B16 "
. Постоянное качество , 1320 ,, " 528 "
. Постоянные является статическим, 2200 ,, " 898 "
. Постоянные роль в адрес государственной базы, 860 ,, " 35C "
. роли государства постоянное число , 864 ,, " 360 "
. Постоянное состояние максимальное количество функций, 868 ,, " 364 "
. Постоянное место, 1564 ,, " 61C "
. Постоянное текущее состояние, 1640 ,, " 668 "
. Использование магических констант , 1732 ,, " 6C4 "
. постоянном уровне, 1124 ,, " 464 "
. Постоянные понимания для , 1128 ,, " 468 "
. Постоянные опыта, 1140 ,, " 474 "
. Постоянные души, 1144 ,, " 478 "
. Константы жизнь, 1132 ,, " 46C "
. Постоянные действительно раздражает , 1136 ,, " 470 "
. Постоянные реальные доллары , 1152 ,, " 480 "
. постоянной жизни максимум, 1188 ,, " 4A4 "
. постоянной максимальной действительно раздражает , 1192 ,, " 4A8 "
. "Кредитование реального постоянных долларах 1316 ,, " 524 "
. постоянной миграции пакетов , 3132 ,, " C3c "
. Постоянное смещение оборудования, 3136 ,, " C40 "
. постоянной миграции пакетов задачу, 3140 ,, " C44 "
. Константы навыков миграции, 4104 ,, " 1008 "
. Постоянные животных смещение, 4088 ,, " FF8 "
. Странное имя постоянного смещения, 588 ,, " 24C "
. Постоянная смена винить далеко от, 624 ,, " 270 "
. Постоянные странное свойство миграции, 576 ,, " 240 "
. Странные состоянии постоянной миграции, 688 ,, " 2B0 "

[GrieVeR-13]

Прошу всех заглянуть сюда:

[kruha]

Когда появиться новый wh???
оченя не хватает

[kulas2k2]

hi, i found this autogeo.au3 attached on these thread. is this for the Villa quest?

[AEBus]

yep

[kulas2k2]

cool, can it work on other pw servers?

[Kaiten92]

jamp hack на руофф есть? я отсюда качал на иностранный серв - не робит

[fenechka]

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

        private void getPlayerList()
        {
            int BytesRead = 0;
            byte[] tBuff = new byte[4];
            byte[] bplayer_name = new byte[32];

            ReadProcessMemory(hProc, (IntPtr)BA, tBuff, 4, ref BytesRead);
            ReadProcessMemory(hProc, (IntPtr)(BitConverter.ToInt32(tBuff, 0) + 0x1C), tBuff, 4, ref BytesRead);
            ReadProcessMemory(hProc, (IntPtr)(BitConverter.ToInt32(tBuff, 0) + 0x8), tBuff, 4, ref BytesRead);
            ReadProcessMemory(hProc, (IntPtr)(BitConverter.ToInt32(tBuff, 0) + 0x20), tBuff, 4, ref BytesRead);
            ReadProcessMemory(hProc, (IntPtr)(BitConverter.ToInt32(tBuff, 0) + 0x18), tBuff, 4, ref BytesRead);
            
            int pointer = BitConverter.ToInt32(tBuff, 0);
            
            listView1.Items.Clear();

            for (int i = 0x0; i < 0x300; i++)
            {
                ReadProcessMemory(hProc, (IntPtr)(pointer + (i * 0x4)), tBuff, 4, ref BytesRead);
                ReadProcessMemory(hProc, (IntPtr)(BitConverter.ToInt32(tBuff, 0) + 0x4), tBuff, 4, ref BytesRead);

                int player_base = BitConverter.ToInt32(tBuff, 0);
                
                if (player_base != 0)
                {
                    ReadProcessMemory(hProc, (IntPtr)(player_base + 0x608), tBuff, 4, ref BytesRead);
                    ReadProcessMemory(hProc, (IntPtr)(BitConverter.ToInt32(tBuff, 0) + 0x0), bplayer_name, 32, ref BytesRead);
                    string[] split = UTF8Encoding.Unicode.GetString(bplayer_name).Split(new string[] {"\0"}, StringSplitOptions.RemoveEmptyEntries);
                    string player_name = split[0];

                    ReadProcessMemory(hProc, (IntPtr)(player_base + 0x464), tBuff, 4, ref BytesRead);
                    string player_lvl = BitConverter.ToInt16(tBuff, 0).ToString()

                    listView1.Items.Add(player_name).SubItems.Add(player_lvl);
                }   
            }
        }

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

[dj_al]

Originally Posted by fenechka

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

Всё нормально. Пока в таргет не возьмёшь противинка - сервер не шлёт информацию о его лвл, HP и MP.

[sioli]

fenechka Можно читать культивацию, этого вполне достаточно чтоб понять примерный левел, как - это уже описано, даю линк:

[begemot]

Помогите, пожалуйста, с инжектами. Когда я делаю инъекцию таргета, то клиент вылетает (отправить отчёт в мелкософт, бла-бла)

Вот код:

 Spoiler

PHP Code:

///// процедура инъекции /////

procedure InjectFunc (ProcessID:Cardinal;Func:Pointer;aParams:Pointer;aParamsSize:DWORD);
var hThread:THandle;
    lpNumberOfBytes:DWORD;
    ThreadAddr,ParamAddr:Pointer;
begin
if ProcessID <> 0 then
 begin
  ThreadAddr:=VirtualAllocEx(ProcessID,nil,256,MEM_COMMIT,PAGE_READWRITE); //Выделение места в памяти процесса.
  WriteProcessMemory(ProcessID,ThreadAddr,Func,256,lpNumberOfBytes); //Запись в памяти нашей функции.
  ParamAddr:=VirtualAllocEx(ProcessID,nil,aParamsSize,MEM_COMMIT,PAGE_READWRITE); //Также запись параметров к ней.
  WriteProcessMemory(ProcessID,ParamAddr,aParams,aParamsSize,lpNumberOfBytes);
  hThread:=CreateRemoteThread(ProcessID,nil,0,ThreadAddr,ParamAddr,0,lpNumberOfBytes); //Создание потока, в котором будет выполняться функция.
  WaitForSingleObject(hThread,INFINITE); //Ожидание времени окончания работы функции.
  CloseHandle(hThread);  //Очистка памяти.
  VirtualFreeEx(ProcessID,ParamAddr,0,MEM_RELEASE);
  VirtualFreeEx(ProcessID,ThreadAddr,0,MEM_RELEASE);
 end;
end;

////////////////////////////////

//////// инъекция Фулл-таргетинга ////

procedure TargetCall(aPParams:Cardinal);Stdcall;
var MobWID:DWORD;
begin
MobWID:=aPParams;
 asm
  pushad
  mov ecx, dword ptr [PW_BASE_ADDRESS]
  mov ecx, dword ptr [ecx+$20]
  add ecx, $EC
  mov edx, MobWID
  push edx
  mov eax, $5D19A0
  call eax
  popad
 end;
end;

procedure Target(MobWID:dword);
var aParams:Cardinal;
begin
aParams:=MobWID; //WID моба (Mobs Struct +$11C)
InjectFunc(wh,@TargetCall,@aParams,SizeOf(aParams));
end;

////////////////////////////////




..........




procedure TForm1.ButtonTakeAssistClick(Sender: TObject);
begin
Target(2148549583);    //при нажатии на кнопку взять в таргет моба с WID=2148549583
end; 


Или приведите рабочий кусок кода на дельфи. Не могу понять, в чём ошибка =(
P.S.: попробовал вызвать медитацию - тоже вылетел клиент

[sioli]

var aParams:Cardinal;

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

Вот пример

 Spoiler

const PW_BASE_ADDRESS = $009C0E6C;
type
  PParams = ^TParams;
  TParams = packed record
    Param0: DWORD; //for base call address
    Param1: DWORD;
    Param2: DWORD;
    Param3: single;
    Param4: single;
    Param5: single;
    Param6: byte;
    Param7: DWORD; //for call addresses
    Param8: DWORD; //for call addresses
    Param9: DWORD; //for call addresses
  end;

procedure TargetCall(aPParams:PParams);Stdcall;
var MobWID:DWORD;
begin
MobWID:=aPParams^.Param1;
 asm
  pushad
  mov ecx, dword ptr [PW_BASE_ADDRESS]
  mov ecx, dword ptr [ecx+$20]
  add ecx, $EC
  mov edx, MobWID
  push edx
  mov eax, $5D19A0
  call eax
  popad
 end;
end;

procedure InjectFunc(ProcessID: Cardinal; Func: Pointer; aParams: Pointer;
  aParamsSize: DWORD);
var
  hThread: THandle;
  lpNumberOfBytes: DWORD;
  ThreadAddr, ParamAddr: Pointer;
begin
   if ProcessID <> 0 then
  begin
    ThreadAddr := VirtualAllocEx(ProcessID, nil, 256, MEM_COMMIT,
      PAGE_READWRITE);
    WriteProcessMemory(ProcessID, ThreadAddr, Func, 256, lpNumberOfBytes);

    ParamAddr := VirtualAllocEx(ProcessID, nil, aParamsSize, MEM_COMMIT,
      PAGE_READWRITE);
    WriteProcessMemory(ProcessID, ParamAddr, aParams, aParamsSize,
      lpNumberOfBytes);

    hThread := CreateRemoteThread(ProcessID, nil, 0, ThreadAddr, ParamAddr, 0,
      lpNumberOfBytes);

    WaitForSingleObject(hThread, INFINITE);

    CloseHandle(hThread);
    VirtualFreeEx(ProcessID, ParamAddr, 0, MEM_RELEASE);
    VirtualFreeEx(ProcessID, ThreadAddr, 0, MEM_RELEASE);
  end
end;

procedure GetTarget(aProcessID, TargetID: Cardinal);
var
  aParams: TParams;
begin
  aParams.Param1:=TargetID;
  InjectFunc(aProcessID,@TargetCall,@aParams,SizeOf(aParams));
end;