PureBasic - форум

Информация о пользователе

Привет, Гость! Войдите или зарегистрируйтесь.


Вы здесь » PureBasic - форум » Вопросы по PureBasic » Mic to Speaker BASS


Mic to Speaker BASS

Сообщений 1 страница 2 из 2

1

Доброго времени суток.
Бьюсь уже несколько дней над такой задачей:необходимо
произвести запись в файл(это более менее понятно как делать)и
одновременно(в реальном времени) выводить звук на динамики.
Вот именно с выводом звука на дин. и споткнулся. Может кто
подскажет идею, как это делать?(stream, samples?)

(В примерах к BASS одноременного вывода на дин. нет).

0

2

Выводи звук в отдельном потоке. Или наоборот - пиши в файл в отдельном потоке. В общем, примерно так:

Код:
Procedure WriteFile(*Value)
  Protected file = OpenFile(#PB_Any, "C:\file.txt") ;Путь изменить!
  
  ;Тут код записи в файл - или WriteString, или WriteData, я не знаю, каким способом пользуешься
  ;Для примера запишем в файл 15 КБ пустых пробелов :)
  
  Protected str$ = Space(15*1024)
  WriteString(file, str$)
  CloseFile(file)
EndProcedure

th = CreateThread(@WriteFile(),1)

;Тут код для вывода звука!!

If IsThread(th)
  WaitThread(th) ;Если запись в файл не закончена, а музыка уже проиграна, то ждём окончпния записи в файл.
EndIf

0


Вы здесь » PureBasic - форум » Вопросы по PureBasic » Mic to Speaker BASS