Ähm, soviel ich verstanden habe ich...simpel: RDTSC gibt dir den Wert von Taktzyklen zurück
Und das Beispielprogramm sollte alles erklären
Delphi-Quellcode:
procedure Test;
var
Start,Stop: Int64;
Tick: DWord;
begin
WriteLn('CPU Taktfrequenz ist ', CPUFrequency/1000000.0:6:1, ' MHz');
Tick := GetTickCount + 100;
Start := RDTSC;
while GetTickCount < Tick do ;
Stop := RDTSC;
WriteLn;
WriteLn('Testschleife dauerte: ');
WriteLn('Taktzyklen : ', Stop - Start:10);
WriteLn('Millisekunden : ', Ticks(Stop - Start):10:2);
WriteLn('Sekunden : ', Secs(Stop - Start):10:2);
end;
[edit]S**t, zu langsam[/edit]