Schreib das einfach so:
Delphi-Quellcode:
function farbverlauf2(rot, gruen: integer): TColor;
asm
cmp eax, edx;
js @kalt;
//rot<gruen
sub eax, edx;
jmp @weiter;
@kalt:
sub edx, eax;
shl edx, 8;
mov eax, edx;
@weiter:
end;
Die Parameter liegen der Reihe nach in EAX, EDX und ECX, danach auf dem Stack. Das Ergebnis gehört in EAX.
(Ausnahme wäre ein String als Rückgabewert. Dabei wird der String für das Ergebnis wie ein weiterer Parameter übergeben.)