Einzelnen Beitrag anzeigen

keksman
(Gast)

n/a Beiträge
 
#39

Re: Autorennen2.4 mit Online Highscore

  Alt 20. Jun 2007, 19:02
Und hier wie bei Spielen üblich der erste Trainer
Einfach spiel pausieren und ausführen.
(auch wenn mein Nick ziemlich ähnlich zu sein scheint, die Einträge in der Highscore-Liste stammen nicht von mir )

Delphi-Quellcode:
program Trainer;

{$APPTYPE CONSOLE}

uses
  Windows;

procedure cheat(newpoints: Integer);
var
  hwnd, pid, hprocess: Integer;
  bytesWritten: Cardinal;
begin
  WriteLn('Autorennen 2.4 Trainer');
  WriteLn('by BlackBlood');
  WriteLn('================================');
  hwnd := FindWindow(0, 'Autorennen 2.4');
  if hwnd <> 0 then
  begin
    GetWindowThreadProcessId(hwnd, @pid);
    hProcess := OpenProcess(PROCESS_ALL_ACCESS, true, pid);
    WriteProcessMemory(hProcess, ptr($0110B67C), @newpoints, 4, bytesWritten);
    WriteLn('Punkte wurden erfolgreich geschrieben :)');
    ReadLn;
  end else
  begin
    Writeln('Autorennen 2.4 nicht gefunden');
    readln;
  end;
end;

begin
  cheat(999999999);
end.
Angehängte Dateien
Dateityp: rar trainer_155.rar (9,8 KB, 7x aufgerufen)
  Mit Zitat antworten Zitat