 | |
| | | | |
Шевченко В.В.
дата публикации 14-09-2001 14:52 Использование команды RDTSC процессора Pentium для работы с малыми временными интервалам
Приветствую Вас, жители королевства!
В одной толстой книге нашел интересное использование команды RDTSC
процессора Pentium для работы с малыми временными интервалами. Я думаю,
что эта функция может найти широкое применение (в таймерах, управлении внешними
устройствами, научных исследованиях).
Пример прилагается Project_RDTSC.Zip.(4K)
Этот счетчик увеличивается на 1 на каждом такте CPU.
Он стартует при включении компьютера или при нажатии кнопки
RESET.
Обычно функцию RDTSC используют при определении тактовой частоты процессора.
Применяя программные ухищрения можно добиться измерения очень малых временных величин
в реальном масштабе времени или применять для калибровки
таймеров (предварительно определив при помощи этой же функции тактовую частоту процессора).
Готовые примеры определения тактовой частоты при помощи функции RDTSC есть в
интернете, например, на сайте Мастера Delphi" :
"Скорость работы процессора, точный таймер"
function RDTSC: comp;
var
TimeStamp: record
case byte of
1: (Whole: comp);
2: (Lo, Hi: Longint);
end;
begin
asm
db $0F; db $31;
{$ifdef Cpu386}
mov [TimeStamp.Lo], eax
mov [TimeStamp.Hi], edx
{$else}
db D32
mov word ptr TimeStamp.Lo, AX
db D32
mov word ptr TimeStamp.Hi, DX
{$endif}
end;
Result := TimeStamp.Whole;
end;
[Таймеры]
 Обсуждение материала [ 03-04-2009 09:27 ] 16 сообщений |
|
| | |  | | |
| |
Время на сайте: GMT минус 5 часов
Если вы заметили орфографическую ошибку на этой странице, просто выделите ошибку мышью и нажмите Ctrl+Enter.
Функция может не работать в некоторых версиях броузеров.
©
При использовании любых материалов «Королевства Delphi»
необходимо указывать источник информации.
Перепечатка авторских статей возможна только при согласии всех авторов и администрации сайта.
Все используемые на сайте торговые марки являются
собственностью их производителей.
