Devil9313

procedure WriteBytes(Address: Integer; WriteValue: array of Byte);var pHandle: LongInt; NumWritten: DWORD_PTR;begin pHandle := OpenProcess(PROCESS_VM_READ or PROCESS_VM_WRITE or PROCESS_VM_OPERATION,False,GameID); VirtualProtectEx(pHandle,Ptr(Address),SizeOf(WriteValue),PAGE_EXECUTE_READWRITE,old_Protect_ON); WriteProcessMemory(pHandle,Ptr(Address),@WriteValue,SizeOf(WriteValue),NumWritten); VirtualProtectEx(pHandle,Ptr(Address),SizeOf(WriteValue),old_Protect_OFF,old_Protect_ON); CloseHandle(pHandle);end; Кто поможет реализовать в Delphi поиск адреса по сигнатуре мой Skype: gm..4game

Вот кусочек кода трейнера if CheckBox1.Checked then DebugPrivilege; GameID := ProcessID('PointBlank.exe'); if GameID = 0 then Label1.Caption := 'ID процесса не найден, запустите игру!' else Label1.Caption := 'ID процесса:' + #32 + IntTostr(GameID);procedure TTrainer.CheckBox20Click(Sender: TObject);const A: Array [1..2] of Byte = ($0F, $84); B: Array [1..2] of Byte = ($0F, $85);begin if CheckBox20.Checked then WriteBytes(ESP_Name,A) else WriteBytes(ESP_Name,;end; А причем тут версия и название игры речь идет не об игре а о том как работать с модулями игры то как изменять значение в памяти exe я знаю проблема в том что я не знаю как работать с модулем который подгружает играть нужный мне адрес находится не в exe игры а в её модуле game.dll

Доброго времени суток ребят у меня возникла проблема мне нужно изменить значение по адресу который находится в модуле game.dll Trainer не меняет значение по адресу в этом модуле помогите решить проблему если вам не трудно

Спасибо ребят за помощь!!!

Здравствуйте у меня такой вопрос кто объяснить как работать с VIrtualProtectEx функция чтения function Read(Pattern: Cardinal): Cardinal;var pHandle: LongInt; P: Cardinal; NumRead: DWORD_PTR;begin pHandle := OpenProcess(PROCESS_VM_READ or PROCESS_VM_WRITE or PROCESS_VM_OPERATION,False,GameID); if ReadProcessMemory(pHandle, Ptr(Pattern),@P,SizeOf(P),NumRead) then Result := P; CloseHandle(pHandle);end; Процедуры записи значения procedure WriteValue(Address: integer; Value: Cardinal);var pHandle: LongInt; NumWritten: DWORD_PTR;begin pHandle := OpenProcess(PROCESS_VM_READ or PROCESS_VM_WRITE or PROCESS_VM_OPERATION,False,GameID); WriteProcessMemory(pHandle,Ptr(Address),@Value,SizeOf(Value),NumWritten); CloseHandle(pHandle);end;procedure WriteBytes(Adress: Integer; Value: array of Byte);var pHandle: LongInt; NumWritten: DWORD_PTR;begin pHandle := OpenProcess(PROCESS_VM_READ or PROCESS_VM_WRITE or PROCESS_VM_OPERATION,False,GameID); WriteProcessMemory(pHandle,Ptr(Adress),@Value,SizeOf(Value),NumWritten); CloseHandle(pHandle);end; Если возможно то с примером буду очень благодарен

Какой мат был ? то что я написал [CENSORED] это разве мат ? Я кого-то оскорбил или что ? А знаешь я за репу не парюсь я же не школьник что бы париться за репутацию так что минусуйте сколько вам угодно NullAlex: Я смотрю, намеков ты не понимаешь.

Ребят кто нибудь поможет решить эту проблему ? не понял а за что репу минусуем ? Ну что за каждую помощь репу минусуют ? Мда

Я IDA пользоваться не умею!!! Мата и не было !!!

Давайте без [CENSORED] я реально попросил помочь потому что уже не знаю как с этим бороться NullAlex: Без матов.

В режиме ядра тоже пробовал вылет

Ставлю VEH отладчик игра всё равно вылетает отладчик даже не успевает поймать функцию Olldbg тоже пробовал вылет Может есть ещё какие нибудь способы ?

Здравствуйте у меня такая проблема ломаю данную игру нахожу здоровье персонажа жму бряк на запись и игра сразу вылетает я так понимаю в игре есть защита от отладчика CE и т д но как её обойти ? помогите пожалуйста буду очень благодарен

Странный ответ! Trainer основан на библиотеки VAMemory это игровой модуль client.dll+1DEC17 client.dll плюс смещение 1DEC17 я попадаю на тот адрес с которым мне нужно работать но как мне использовать данный модуль плюс смещение в трейнере

Здравствуйте уважаемые пользователи данного форума у меня такой вопрос я пишу Trainer для css v84 и у меня возникла такая проблема как мне использовать данный модуль client.dll+1DEC17 я использую библиотеку VAMemory

Здравствуйте keng такой вопрос а в данном классе VAMemory получается нет функции чтения указателей или всё таки есть ?

Это как понимать то ? Короче спасибо за помощь всем пока всем удачного разуплотнения игр [terminus]/* keng: Ненормативная лексика - это плохо и за нее нужно мыть рот с мылом. */[/terminus]

Не работает ! А я то думал здесь помогают ! Все то мне нужно было узнать как работать с указателями исползуя данный класс VAMemory Зачем тогда вообще учить кого то ?

Мне нужно использовать функцию чтения указателей с данного класса который у меня

Мне нужно именно с этим классом VAMemory

Здравствуйте уважаемые GameHacker'ы мне нужна помощь у меня есть готовый класс VAmemory

Это не совсем то что нужно но я уже сам сделал !

GameID: Cardinal;Const No_Reload = $00491E4F;implementation{$R *.dfm}function GetProcess(ProcessName: string): Cardinal;var hSnap: THandle; prEntry: PROCESSENTRY32;begin Result := 0; hSnap := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0); prEntry.dwSize := SizeOf(prEntry); If Process32First(hSnap,prEntry) then begin While Process32Next(hSnap,prEntry) do Begin If prEntry.szExeFile = ProcessName then Result := Cardinal(prEntry.th32ProcessID); End; end; CloseHandle(hSnap);end;procedure WriteSig(GameID: Cardinal; Address: Integer; Value: array of Byte);var pHandle: LongInt; NumWritten: SIZE_T;begin pHandle := OpenProcess(PROCESS_VM_READ or PROCESS_VM_WRITE or PROCESS_VM_OPERATION,False,GameID); WriteProcessMemory(pHandle,Ptr(Address),@Value,SizeOf(Value),NumWritten); CloseHandle(pHandle);end;procedure TForm1.SpeedButton1Click(Sender: TObject);const No_ReloadOn: array[0..2] of Byte = ($90, $90, $90);//Байты для записи в процесс игры No_ReloadOFF: array[0..2] of Byte = ($8B, $47, $24);//Байты для записи в процесс игрыbegin WriteSig(GameID,No_Reload,No_ReloadOn);//Пример записи байт в памятьEnd;procedure TForm1.SpeedButton2Click(Sender: TObject);begin GameID := GetProcess('PlantsVsZombies.exe');//Получаем ID процесса по названию процесса Label1.Caption := IntTostr(GameID);end; Вот исходник трейнер Нужно прочитать значение с этого адреса 00491E4F Мне кто нибудь поможет ?

Здравствуйте у меня такой вопрос как можно прочитать значение по статическому адресу ?