Cheat Engine

[natanreis1]

im using this script to edit memory but i want to Hack using SetThreadContext or Hardware Breakpoints

Procedure InjectPinTyper(Address:Cardinal; nCase:ShortInt); export;
const aInject:Array [0..2] of byte = ($0F, $83, $6C);//Modifies 1 BYTE, 85 to 83
aEject:Array [0..2] of byte = ($0F, $86, $6C);
Access = PROCESS_VM_WRITE or PROCESS_VM_OPERATION;
Begin
hWindow:=FindWindow('Class',Nil);
if hWindow=0 then
showmessage('Start the "Game"');
if hWindow<>0 then
case nCase of
1: //Inject PT
Try
GetWindowThreadProcessId(hWindow, @PID);
hProcess:=OpenProcess(Access, FALSE, PID);
WriteProcessMemory(hProcess, Ptr(Address), @aInject, sizeof(aInject), lpBytes);
CloseHandle(hProcess);
except
ShowMessageFmt('GetLastError Code: %.d', [IntToStr(GetLastError())]);
End;
2: //Eject PT
Try
GetWindowThreadProcessId(hWindow, @PID);
hProcess:=OpenProcess(Access, FALSE, PID);
WriteProcessMemory(hProcess, Ptr(Address), @aEject, sizeof(aEject), lpBytes);
CloseHandle(hProcess);
except
ShowMessageFmt('GetLastError Code: %.d', [IntToStr(GetLastError())]);
End;
End;
End;

[Xeleron]

maybe this can help you
http://www.microsoft.com/programming-tutorials/70185-tut-how-make-search-loop-any-game-delphi-7-a.html

[natanreis1]

[p99]

How about looking at the CE source...

[natanreis1]

setthreadcontext is very complicated.
can someone give me a example?

[dnsi0]

Use SuspendThread to suspend all threads.
Use GetTHreadContext To Retrieve the context from a thread.
Modify the debug registers (DR0-DR3) to the address of violation.
Set DR7 to to on access.
Replace the context into the thread using SetThreadContext.

Watch for the access command when the command runs through.
Set the zf flag to 1.
Resume the thread that has accessed.

I got the first parts but I can't really get a listener for detecting access. How you do that has something to do with DR6... But Idk...

[natanreis1]