DenkA003

Заблокированные
  • Публикации

    232
  • Зарегистрирован

  • Посещение

  • Days Won

    29

DenkA003 last won the day on January 10 2016

DenkA003 had the most liked content!

Репутация

70 Intermediate

О DenkA003

  • Звание
    Спамер

Информация

  • Пол
    Не определился

Посетители профиля

3 635 просмотров профиля
  1. Ну пример от исходника много чем отличается ... а вот как были пользователи странные и не горящие помочь такими и остались
  2. В общем снова пример нужно искать в гугле как и всегда )))
  3. мм я только намекну куда можно копать чтобы обойти защиту E:\Games\Black Desert\live\Paz Имя.PAZ а дальше сами ))))
  4. Всем привет !! Нужна ваша помощь ))) Как выделить в чужом процессе свободное пространство как это делает функция AllocMem ? А то получается создать свободное пространство только в своем процессе (( Delphi. Функция AllocMem( Size: Cardinal ): Poiner;Модуль: SysUtilsОписаниеФункция выделяет на куче блок памяти размером Size байт, заполняет его нулями и возвращает указатель на начало блока.
  5. Сам использую функцию function G_Base(ProcessID: Cardinal; MName: String): Pointer; var Modules : Array of HMODULE; cbNeeded, i : Cardinal; ModuleInfo : TModuleInfo; ModuleName : Array[0..MAX_PATH] of Char; PHandle : THandle; begin Result := nil; SetLength(Modules, 1024); PHandle := OpenProcess(PROCESS_QUERY_INFORMATION + PROCESS_VM_READ, False, ProcessID); if (PHandle <> 0) then begin EnumProcessModules(PHandle, @Modules[0], 1024 * SizeOf(HMODULE), cbNeeded); SetLength(Modules, cbNeeded div SizeOf(HMODULE)); for i := 0 to Length(Modules) - 1 do begin GetModuleBaseName(PHandle, Modules[i], ModuleName, SizeOf(ModuleName)); if AnsiCompareText(MName, ModuleName) = 0 then begin GetModuleInformation(PHandle, Modules[i], @ModuleInfo, SizeOf(ModuleInfo)); Result := ModuleInfo.lpBaseOfDll; CloseHandle(PHandle); Exit; end; end; end; end;Применить : varGAME_BasseAdress : Cardinal;ProcessId : Cardinal;beginTERA_BasseAdress := $0+Ulong(G_Base(ID процесса, 'Название файла .dll или .exe '));//TERA_BasseAdress := $0+Ulong(G_Base(ProcessId, 'TERA.exe'));ShowMessage(IntToStr('$'+TERA_BASSEADRESS));end;
  6. https://www.youtube.com/watch?v=Jn1pzXIBO8Y
  7. Ну вот я говорю про тоже
  8. Почему ? работает как WriteProcessMemory так и ReadProcessMemory
  9. Когда взламываете игру вы же спрашиваете у разработчика разрешения ?
  10. сам не знал что .exe не грузит ((( постоянно в архивах заливаю все ))
  11. оО что за расширение такие ? .rar .zip .txt .jpg норм все загружаются
  12. Для красоты )))
  13. Не много глупо утверждать о краже сигнатур ... ведь функций мог бы сделать больше нужно реализация скриптов ,а мне лень прописывать в ручную все jmp call и прочие. поэтому сделал самые доступные функции ... Пример : я же не кричу что кто то своровал мои функции с трейнера Plants vs Zombies ведь с какой стороны ты не зайди там все го 5-6 инструкций которые отвечают за изменения адреса и будет логично что хороший программист выберет более подходящую инструкция для изменения и в дальнейшем составления сигнатуры ....