Клиппер 5. Справочник


Клиппер 5. Справочник - часть 504


 
  . Пример использования данной функции можно найти в файле
    Melodies.prg поставляемом в составе программных примеров CT II.
 
  Примеры
 
  . Воспроизведение гаммы четвертой октавы:
 
    SOUND(262, 40)
    SOUND(294, 40)
    SOUND(330, 40)
    SOUND(349, 40)
    SOUND(392, 40)
    SOUND(440, 40)
    SOUND(494, 40)
    SOUND(523, 40)
 
  . Вызов с параметром в форме символьной строки:
 
    cVar := I2BIN(262) + I2BIN(40) + I2BIN(294) + I2BIN(40)
    SOUND(cVar)
 
  . Пауза в полсекунды:
 
    SOUND(0, 50)
 


See Also: MILLISEC()

 


 


 SPEED()
 Возвращает относительное значение скорости процессора.
------------------------------------------------------------------------------
 
  Синтаксис
 
    SPEED([<lMode>]) --> nCPUSpeed
 
  Параметры
 
    <lMode> - необязательный логический параметр, задающий при значении
    .T. маскирование всех прерываний, кроме прерываний таймера, на время
    измерения скорости процессора, а при значении .F. или по умолчанию
    измерение без маскирования.
 
  Возвращаемое значение
 
    nCPUSpeed - числовое значение скорости процессора в процентах, где
    100% соответствует скорости стандартного IBM PC/XT с тактовой частотой
    4.77 МГц.
 
  Описание
 
    Функция позволяет сравнить скорость работы используемого процессора со
    стандартным IBM PC/XT с тактовой частотой 4.77 МГц. Для увеличения
    точности измерений можно маскировать все прерывания, кроме прерываний
    таймера, без которых невозможно функционирование микросхем ОЗУ.
 
  Примечания
 
  . Внимание! При маскировании прерываний не могут работать
    использующие их функции, например, функции последовательного
    интерфейса. По окончании измерения маскирование прерываний снимается
    автоматически.
 
  Примеры
 
  . Измерение скорости для машин класса IBM PC/AT:
 
    ? SPEED(.T.)                // 470 (в 4.7 раза быстрее чем IBM PC/XT)



Начало  Назад  Вперед