[Inline Assembler] Wo liegt der Fehler?

[HardCore.1337]

Hi, ich arbeite seit gestern mit Assembler (inline Assembler). Grundsachen wie Rechnen und einfache Schleifen kann ich schon, aber an diesem nicht sinnvollen Beispiel (das ich nur zum üben nehme ) bekomme ich einen Zugriffsfehler. Warum?

function Test(x: integer): Integer; assembler;
  asm
  PUSH EAX;
  MOV EAX, X; //Kopiere einen beliebigen Wert in EAX
  MOV EDX, 30; //kopiere 30 in EDX
  CMP EAX, 20; //WENN EAX = 20 DANN
  JE @Start;   //Springe zu Start
  CDQ;         //EAX auf 64Bit erweitern
  @Start:      //Startausführung starten
    ADD EAX, EDX;  //Addiere EAX mit EDX
    IDIV EAX, EDX; //Diviediere EAX mit EDX
    RET;           //Gebe das Ergebnis zurück
end;


procedure TForm1.FormCreate(Sender: TObject);
begin
  ShowMessage (IntToStr(Test(20)));
end;

end.

[Bot_interesierter]

Die Genau Fehlermeldung wäre interessant, allerdings vermute ich das es an dem PUSH EAX am Anfang liegt, du müsstest das vor dem Return wieder vom Stack Popen denn sonst returnst du ins nirvana.

Wenn du bei Delphi Funktionen das Assembler lable in weg lässt werden die Parameter übrigens automatisch nacheinander in die Register geschoben, also das MOV EAX, X; würde entfallen bei deiner Funktion

[HardCore.1337]

Jop, daran lags.
Ich hätte erst POP EAX nutzten sollen.

Nun kommt keine Fehlermeldung mehr, aber das Ergebnis sieht merkwürdig aus.
Es kommt immer -51 raus.

Also theoretisch wird doch so gerechnet

ADD EAX, EDX;
IDIV EAX, EDX;
...

20 + 30 (=50)
20/50
...

Oder seh ich das Falsch?

[Bot_interesierter]

Machst du vor dem return pop eax?

[HardCore.1337]

ja

[Bot_interesierter]

Das ist des Pudels Kern!
EAX wird verwendet um den Rückgabewert zu übergeben, also wird schlicht der Wert zurückgegeben, welcher am Anfang auf den Stack gepusht wurde :P

[HardCore.1337]

soll ich mal PUSH und POP weg machen?

[Bot_interesierter]

Lernst du was wenn ich dir schritt für schritt erkläre was du machen sollst damit das Programm das tut was du wolltest?
Ich glaube nicht und es ist wohl sehr Offensichtlich dass das Push EAX und Pop EAX überflüssig ist, aber wenn du lustig bist kannst du auch einfach ein anderes freies Register benutzten um den wert vom Stack zu holen, Sinnvoll ist das aber nicht.

[HardCore.1337]

Ja, ich habe in einem Tutorial gelesen, das es sicherer ist EAX zu Pushen.
Ich arbeite noch nicht sehr lange mit Assembler und deswegen seh ich da auch noch nicht richtig durch.Aber ich hab mir jetzt ein Super Buch geholt.