Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Problem mit Geschwndigkeits-Berechnung bei Singleplayer Spiel (https://www.delphipraxis.net/157893-problem-mit-geschwndigkeits-berechnung-bei-singleplayer-spiel.html)

Gimp 28. Jan 2011 14:05


Problem mit Geschwndigkeits-Berechnung bei Singleplayer Spiel
 
Hallo!

edit:
Crossposting Delphi Forum:
http://www.delphi-forum.de/topic_Zei...me_103845.html

Damit ihr nicht zurückschreckt: Es geht um ein etwas älteres Singleplayer Spiel. Das Thema "Hooking" und Assembler ist noch etwas neu für mich, Zeitberechnungen in Spielen erst recht. Ich habe nun vor, die Geschwindigkeit des lokalen Spielers zu erhöhen. Die Funktion die ich hooke, ist ein __thiscall, der this Pointer ist hierbei der Pointer zur Einheit, für welche die Geschwindigkeit berechnet werden soll. Die Funktion an sich scheint definitiv richtig, allerdings verstehe ich die Berechnung durch die 2 Parameter welche beide vom Typ DWORD sind nicht so recht. Die Berechnung läuft scheinbar über GetTickCount()

Folgende Parameter werden übergeben:

Parameter 1: 28986122
Parameter 2: 28986110

Die umgekehrte push Reihenfolge habe ich natürlich beachtet, die Parameter sind so in der Reihenfolge also korrekt.

Anfangs ging ich von einer recht simplen Berechnung aus, doch leider wurde ich wohl getäuscht. Folgende Funktion habe ich mir hier zusammengebastelt:
Delphi-Quellcode:
procedure hook_CalculateSpeed(dwTime1, dwTime2: Cardinal); stdcall;
var
  pLocal, pTemp: Pointer;
  dwTemp: Cardinal;
const
  factor: float = 1.0;
begin
  asm
    pushad
  end;

  // Pointer zur Einheit kopieren
  asm
    mov eax, [ecx+$100]
    mov pTemp, eax
  end;

  pLocal := GetMyUnitPointer();

  if (pLocal = pTemp) then
  begin
    dwTemp := dwTime1 - dwTime2;
    dwTemp := dwTemp * Trunc(factor);

    dwTime1 := dwTime1 + dwTemp;
    dwTime2 := dwTime2 + dwTemp;
  end;

  asm
    popad
  end;

  oCalculateSpeed(dwTime1, dwTime2);
end;
Die Funktion an sich läuft ohne Probleme durch. Der Pointer-Check ob es denn auch meine Einheit ist funktioniert ebenfalls. Nun scheint es aber einen simplen Fehler mit großen Auswirkungen in meinem Code zu geben, denn meine Geschwindigkeit erhöht sich kein bisschen, selbst wenn ich den factor auf * 100 drehe.

dwTime1 & 2 direkt * 50 zu multiplizieren funktioniert ohne Probleme, mir kommt es aber nicht recht clever vor, den Wert bei jeder Bewegung derartig zu erhöhen :S Sind beide Werte (dwTime1, dwTime2) exakt gleich, kann ich mich schließlich gar nicht mehr bewegen, dwTime1 muss scheinbar höher sein.

Ich würde mich wirklich riesig freuen, wenn hier schon jemand Erfahrungen mit solchen Berechnungen gemacht hat. und mich ein wenig in die richtige Richtung lenken könnte.

lg

Aphton 29. Jan 2011 21:02

AW: Problem mit Geschwndigkeits-Berechnung bei Singleplayer Spiel
 
Warum
Delphi-Quellcode:
  dwTime1 := dwTime1 + dwTemp;
  dwTime2 := dwTime2 + dwTemp;
?
Letzendlich bleibt die Differenz zwischen dwTime1 und dwTime2 gleich?!

Ich würde den größeren dwTime-Wert um dwTemp erhöhen und sehen, was es für Auswirkungen hat!

MfG


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:45 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz