Вверх ↑
Ответов: 179
Рейтинг: 3
#1: 2019-08-20 16:03:20 ЛС | профиль | цитата
этот вариант хорош спасибо, но мне нужно чтобы создавалась ссылка что то типа (http://102.175.56.174:89/MySound.mp3) и поток слался на сайта в <audio></audio>

я пробовал создавать аудио файл WAV и каждые 2 секунды его перезаписывать и создал HTTP server но ничего не работает.

--- Добавлено в 2019-08-20 16:09:22

заработало но прямого потока нет вот сам код что у меня получилось
то есть слушать можно но только после того как файл создастся. нужно чтобы в реал тайм был звук
Add(ChildPanelEx,15569021,112,70)
{
@Hint=#39:Запуск BASS 2.4 и выбор источника звука|
link(Handle,14765800:Handle,[(118,61)(104,61)(104,96)(69,96)])
}
BEGIN_SDK
Add(EditMultiEx,6822816,21,21)
{
WorkCount=#21:doStart=Начать работу|
EventCount=#21:onStart=Начать работу|
DataCount=#46:Handle=Идентификатор основного окна приложения|
Width=692
Height=242
VOffset=35
HOffset=42
link(doStart,15175716:doEvent1,[(53,62)(53,132)])
}
Add(Panel,3900892,266,112)
{
Left=15
Width=385
Height=26
Visible=1
Caption=" Выбрать источник звука"
Alignment=2
Point(doVisible)
}
Add(BASS_Version,10183901,161,161)
{
link(onCheckOk,2139448:doEnum,[])
link(onCheckFailed,109118:doMessage,[(201,174)(201,216)])
}
Add(Message,11232751,161,210)
{
Message="Error BASS initialization"
Caption="Error"
Icon=1
}
Add(Message,109118,210,210)
{
Message="Incorrect version of BASS library "
Caption="Error"
Icon=1
}
Add(BASS_Init,4252681,112,161)
{
Freq=22050
Flags=3
link(onInit,10183901:doCheck,[])
link(onError,11232751:doMessage,[(152,174)(152,216)])
link(Handle,6822816:Handle,[(132,126)(104,126)])
}
Add(BASS_RecordCenter,12302345,308,168)
{
link(onInit,15862958:doEnumInputs,[])
link(onError,11713735:doMessage,[(345,181)(345,223)])
}
Add(Message,11713735,378,217)
{
Message="InitRecord failed!"
Caption="Error"
Icon=1
}
Add(BASS_RecordInput,15862958,357,168)
{
link(onEnumInputs,16487182:doEvent1,[])
}
Add(BASS_InputControl,9998094,497,168)
{
Volume=1
State=1
link(onSetInput,9127027:doEvent1,[])
link(Volume,10061734:Var1,[(510,153)])
link(State,10061734:Var2,[])
}
Add(Memory,4613851,511,105)
{
Default=Integer(1)
}
Add(ComboBox,4718633,259,161)
{
Left=5
Top=5
Width=185
Height=21
link(onClick,12302345:doInit,[])
}
Add(GetDataEx,10061734,511,148)
{
link(Data,4613851:Value,[])
}
Add(ChanelToIndex,14252892,161,119)
{
link(onIndex,3900892:doVisible,[])
}
Add(Hub,15175716,84,126)
{
link(onEvent1,14252892:doWork2,[])
link(onEvent2,4252681:doInit,[(101,139)(101,167)])
}
Add(ComboBox,8950199,441,161)
{
Left=195
Top=5
Width=175
Height=21
Enabled=1
Point(doEnabled)
link(onClick,9998094:doSetInput,[])
}
Add(BASS_RecordDevices,2139448,210,161)
{
link(onEnum,4718633:doAdd,[])
}
Add(Hub,16487182,399,168)
{
link(onEvent1,8950199:doEnabled,[(423,174)(423,195)])
link(onEvent2,8950199:doAdd,[(427,181)(427,167)])
}
Add(Hub,9127027,567,168)
{
link(onEvent1,14252892:doWork1,[(593,174)(593,150)(149,150)(149,125)])
link(onEvent2,6822816:onStart,[(595,181)(595,62)])
}
END_SDK
Add(MainForm,14765800,63,56)
{
Width=455
Height=380
Caption="Звук"
Point(onClose)
Point(Handle)
link(onCreate,15569021:doStart,[])
}
Add(BASS_RecordStart,930540,301,287)
{
Freq=22050
Name="MySound"
link(FileName,7034552:Var1,[(307,152)])
}
Add(Button,14423340,154,161)
{
Left=45
Top=35
Caption="Пуск"
link(onClick,8914287:doEvent1,[])
}
Add(Button,7390731,98,287)
{
Left=125
Top=40
Caption="Стоп"
link(onClick,10975849:doEvent1,[])
}
Add(PaintBox,8758719,210,70)
{
Left=10
Top=70
Width=360
Height=180
link(onBeforeDraw,5631139:doDraw,[])
}
Add(BASS_ChannelVisibleSpectrum,5631139,266,70)
{
SoundStream="MySound"
link(WindowsHandle,8758719:Bitmap,[(272,58)(244,58)(244,114)(216,114)])
}
Add(Timer,5820169,161,70)
{
Interval=10
link(onTimer,8758719:doRefresh,[])
}
Add(Hub,8914287,315,161)
{
OutCount=5
link(onEvent1,1507986:doString,[(445,167)(445,223)])
link(onEvent2,6145327:doString,[(427,174)(427,111)])
link(onEvent5,930540:doStart,[(341,195)(341,244)(289,244)(289,293)])
}
Add(HTTPServer,8589034,525,294)
{
Port="900"
link(Path,1507986:FString,[])
}
Add(Dir,9567969,525,49)
{
}
Add(FormatStr,6145327,525,105)
{
Mask="%1server\www\default.wav"
Point(FString)
link(Str1,9567969:CurrentDir,[])
}
Add(GetDataEx,329078,525,140)
{
link(Data,6145327:FString,[])
}
Add(GetDataEx,7034552,525,147)
{
link(Data,329078:Var2,[])
}
Add(Hub,10975849,182,287)
{
OutCount=3
link(onEvent3,930540:doStop,[(248,307)(248,300)])
}
Add(Dir,16773686,525,168)
{
}
Add(FormatStr,1507986,525,217)
{
Mask="%1server\www\"
Point(FString)
link(onFString,8589034:doCreate,[(569,223)(569,261)(513,261)(513,300)])
link(Str1,16773686:CurrentDir,[])
}


карма: 0

0
Редактировалось 2 раз(а), последний 2019-08-20 16:11:17