PlayCDTrack (трек,[режим] )
Параметры
трек = номер трека для проигрывания
режим = 1: проиграть трек один раз; 2: проигрывать бесконечно; 3: проиграть до конца комакт-диска
Описание
Команда проигрывает трек с компакт-диска и возвращает указатель на канал.
Необязательный параметр
режим позволяет проигрывать трек разными способами. Запомните, что воспроизведение происходит через кабель внутри компьютера, который соединяет CR-ROM и звуковую карту. На многих компьютерах (по каким-либо причинам) данный кабель не подключен. В этом случае вы НЕ услышите звук с компакт-диска, даже если слышите остальные звуковые эффекты и музыку.
Пример
; PlayCDTrack – пример использования
; Пользователь вводит номер трек для проигрывания
track=Input$("Введите номер трека:")
; Проиграть трек, назначить его каналу (проиграть только один раз)
chnCD=PlayCDTrack(track,1)
; Запомнить текущее время
oldTime=MilliSecs()
; Играть до окончания трека или до нажатия Esc
While ChannelPlaying(chnCD) And (Not KeyHit(1))
; Очистить экран и написать, сколько прошло времени с начала проигрывания
Cls
Locate 0,0
Print "Прошло времени (в секундах):" + ((MilliSecs()-oldTime)/1000)
Wend
; Остановить канал
StopChannel chnCD