Интернет-журнал "Домашняя лаборатория", 2006 №12

Как правило, звуковая карта (рис. 1) имеет два сдвоенных (стереофонических) входа и два таких же выхода. Первый (линейный) вход рассчитан на входные сигналы с амплитудой около 1 В, второй — микрофонный, для более слабых сигналов. При использовании звуковой карты в качестве аналого-цифрового преобразователя можно использовать любой из этих входов — в зависимости от уровня обрабатываемого сигнала.

Данные, имеющие отношение к мультимедиа, хранятся в файлах в так называемом RIFF-формате (Resource Interchange File Format — формат файла для обмена ресурсами) [1]. Файл в формате RIFF содержит вложенные фрагменты (chunk's). Внешний фрагмент состоит из заголовка и области данных (рис. 2). Первое двойное слово заголовка содержит четырехсимвольный код, который идентифицирует данные, хранящиеся во фрагменте.

Второе двойное слово заголовка — размер области данных в байтах (без учета размера самого заголовка). Область данных имеет переменную длину с условием ее выравнивания на границу слова и дополнения в конце нулевым байтом до целого числа слов в случае необходимости.

Формат RIFF не описывает формат данных. Практически файл в формате RIFF может содержать любые данные для мультимедиа, причем формат данных зависит от типа данных.

Область, обозначенная на рис. 2 как "Данные", могут содержать внутри себя другие фрагменты. Для файла, в котором хранятся звуковые данные (wav-файл), эта область содержит идентификатор данных "WAVE", фрагмент формата звуковых данных "fmt" (три символа "fmt" и пробел на конце), а также фрагмент звуковых данных (рис. 2). Файл может дополнительно содержать фрагменты других типов, поэтому не следует думать, что заголовок wav-файла имеет фиксируемый формат. Например в файле может присутствовать фрагмент "LIST" или "INFO", содержащий информацию о правах копирования и другую дополнительную информацию.

Рассмотрим, как происходит запись данных. Вначале требуется открыть устройство ввода, указав ему формат звуковых данных. Затем нужно заказать один или несколько блоков памяти и подготовить их для ввода, вызвав специальную функцию. После этого подготовленные блоки нужно по мере необходимости передавать драйверу устройства ввода, который заполняет их записанными звуковыми данными. Для сохранения записанных данных в wav-файле приложение должно сформировать и записать в файл заголовок wav-файла и звуковые данные из подготовленных заполненных драйвером устройств ввода блоков памяти.

Ниже представлен фрагмент программы, позволяющий записать блок данных в файл, что необходимо при использовании звуковой карты в качестве аналого-цифрового преобразователя:

_uses

        _{SysUtils, MMSystem;}

_type

       _{TWaveData = array[0..0) of word;}

_const

        _{Discret = 22050;}

_{WaveHdr: TWaveHdr=(}

    _{IpData                        : nil; (address of the waveform buffer)}

    _{dwBufferLength           : 0; (length, in bytes, of the buffer)}

    _{dwBytesRecorded         : 0; (How much data is in the buffer)}

    _{dwUser                        : 0;}

    _{dwFlags                       : 0;}

    _{dwLoops           : 0;}

    _{IpMext                         : nil;}

    _{reserved                      : 0}

    _);

_{WaveFormat: TWaveFormatEx=(}

    _{wFormatTag   : WAVE_FORMAT_PCM;}

    _{nChannels       : 1;}

    _{nSamplesPerSec              : Discret;}

    _{nAvgBytesPerSec             : Discret;}

    _{nBllockAlign     : 1;}

    _{wBitsPerSample              : 8;}

    _{csSize                            : 0}

    _);

_var

    _{WaveDate         : ^TWaveDate;}

     _{HSoundDevice   : HWaveln;}

     _{hfile                              : HMMIO;}

     _{res                   : MMResult;}

_begin

     _{with WaveHdr do}

                      _begin

             _{dwBufferLehgth: =round(Discret/10);}

              _{dwBytesRecorded: =round(Discret/10);}

               _{GetMem(WaveData, dwBytesRecorded);}

               _{lpData: =PChar(WaveData);}

                    _end;

     _{res: =wavelnOpen (@HSoundDevice, WAVE_MAPPER, SWaveFormat, 0,0,0);}

     _{res: =waveInPrepareHeader (HSoundDevice, QWaveHdr, SizeOf (WaveHdr));}

     _{res: =waveInUnprepareHeader (HSoundDevice, QWaveHdr,SizeOf(WaveHdr));}