Существует много способов осуществить задержку, рассмотрим некоторые из них.

• Первый способ (PTDelay в исходнике ниже) основан на том факте, что в системе существует два таймера: программируемый таймер i8253/i8254, частота которого 1193181 Гц (~ 1.19 МГц, подробнее о нём см. в теме Воспроизведение звука из PC Speaker'а) и счётчик BIOS, расположенный в памяти по адресу 0040:046C и занимающий 4 байта. Читая их значения можно измерять время с точностью более микросекунды (см. процедуру GetTimerValue, более расширенный вариант для языка Turbo/Borland Pascal см. в аттаче)! Процедура PTDelay читает первые значения таймеров и добавляет к ним мсек*1193181/1000 (т.к. отсчёт ведётся по 1/1000 секунды), где мсек - необходимая задержка в миллисекундах. После этого процедура в цикле читает новые значения таймеров и вычитает из них полученное ранее значение. Если результат получился отрицательным, значит время ещё не вышло, и цикл повторяется, если положительным, то осуществляется выход из процедуры.
  P.S. В данной программе я использовал математический сопроцессор, т.к. в противном случае пришлось бы либо использовать регистры процессора 386+ (а здесь я их нигде не использовал), либо писать процедуру деления больших чисел, которая сама по себе довольно громоздкая.
  P.P.S. Я использую режим таймера 2, а не 3 (как инициализирует BIOS) потому, что в этом случае повышается точность таймера, т.к. в режиме 3 таймер возвращает только нечётные значения (т.е. фактически точность меньше в 2 раза). При использовании режима 2 никаких нарушений в работе системы не происходит!
  
  
• Второй способ (PasDelay в исходнике ниже) используется в языке программирования Turbo/Borland Pascal. Т.к. стандартная процедура работает некорректно на современных (быстрых) процессорах, мне пришлось немного её подправить (исправленные turbo.tpl и tpp.tpl вместе с исходниками(!) можно скачать здесь, а подробности прочесть здесь). Этот метод использует только счётчик BIOS, меняющийся ~ 18.2 раза в секунду (т.е. каждые ~ 55 миллисекунд), но это совершенно не означает, что этот метод настолько неточен. В процедуре инициализации вычисляется количество "холостых" циклов (PasDelayLoop), которые происходят за 1 тик (изменение) счётчика, и зависит это число от производительности процессора. После этого полученное число делится на 55 (причём с правильным округлением, обратите внимание на инструкцию mov ax,-28). Т.о, получается количество циклов за 1 миллисекунду, которое записывается в переменную DelayCnt. При вызове процедуры PasDelay тот же холостой цикл прогоняется DelayCnt*мсек раз, где мсек - необходимая задержка в миллисекундах.
  
  
• Третий способ (TickDelay в исходнике ниже) один из самых простых и неточных. В нём используется только значение счётчика BIOS. Количество миллисекунд делится на 55 (вернее, умножается на 1193 и берётся старшее слово результата - так будет немного точнее) и к результату прибавляется единица (т.к. во-первых, частное округляется в меньшую сторону, а во-вторых, при входе в процедуру тик уже может заканчиваться, а он будет считаться целым). Получается количество тиков, которые нужно выждать, что затем и производится.
  
  
• Ну и, наконец, четвёртый способ (Int15Delay в исходнике ниже) - самый простой, но и самый ненадёжный. Здесь используется прерывание 15h:
  
  

  Задержка с помощью прерывания:
  Вход:  AH = 86h
         CX:DX = количество миллисекунд (CX - старшее слово, DX - младшее)
  Выход: CF=NC=0 - задержка завершена
         CF=CY=1 - функция занята
  В чём же её ненадёжность? Во-первых, кроме функции ah=86h существует функция ax=8300h, которая устанавливает флаг (бит 7 байта по указанному адресу) по истечении указанного промежутка времени, и во время активности этой функции функция ah=86h не работает. Во-вторых, я слышал, что эта функция вообще не работает на некоторых компьютерах (XT не в счёт). Первая проблема решаема: для этого необходимо в начало процедуры Int15Delay добавить инструкции mov ax,8301h + int 15h (только нужно это сделать так, чтобы не потерять передаваемое функции значение регистра ax), они отменят работу функции ax=8300h. Но в этом случае возможен сбой в какой-то другой программе, а именно в той, которая вызывала эту функцию. Вторую проблему таким образом не решить, хотя можно скомбинировать, например, этот и третий способ, т.е. если данная функция вернёт CF=CY=1, то можно использовать TickDelay... но я бы, честно говоря, так делать не стал (если бы речь шла о серьёзной программе) .
  
  
• Можно придумать ещё кучу способов, например, измерить частоту процессора и ожидать необходимое число тактов процессора. Но реализовывать такой способ на чистом ассемблере я не буду, т.к. он работает только как минимум на Pentium и ничем не лучше первого способа. Если Вам всё же интересно, можете скачать вариант на Turbo/Borland Pascal'е (см. аттач, tscdelay.pas)...

Теперь несколько слов о том, какой способ лучше всего использовать. Первый способ самый точный и надёжный, но и самый громоздкий. Хотя... не знаю почему, но под Windows счётчик BIOS изменяется не сразу, а только через несколько тиков системного программируемого таймера. Поэтому примерно один из 1300 (на моём компьютере) вызов GetTimerValue даёт сбой на 55 миллисекунд. В чистом DOS'е всё работает чётко! Второй способ достаточно точный на коротких задержках (в несколько десятков или сотен миллисекунд), но для больших задержек вместо него лучше использовать третий способ. Про четвёртый уже сказано достаточно.

А вот, собственно, и долгожданный исходник:

Прикреплённый файлdelay.zip (11.56 Кбайт, скачиваний: 312)