so gehts
Delphi-Quellcode:
function RotateLeft(Value: Longint;Rotate: Byte): Longint;
assembler;
asm
mov cl,
dl
rol eax, cl
end;
function RotateRight(Value: Longint; Rotate: Byte): Longint;
assembler;
asm
mov cl,
dl
ror eax, cl
end;
sollte also mit einer anweisung getan sein da die zweite hier wohl dazu dient das ganze auf result zu schieben (kenn mich da nicht so aus mit
asm)