Одновременное проигрывание нескольких звуков

Форумы Новые компонентыОдновременное проигрывание нескольких звуков ← Ctrl1Ctrl →

Этот топик читают: Гость

Ответов: 32

Рейтинг: -2

#1: 2018-07-31 15:11:20 ЛС | профиль | цитата

Есть такая проблема - мне нужно сделать так чтобы несколько звуков можно было воспроизвести так, чтобы новопроигрываемый не останавливал старый! Я уже мучался с плеерами в дублирующемся компоненте, получился ужас! Может кто-то знает как такое реализовать или у кого-то есть уже такой элемент?

карма: -2

cschanell

Ответов: 1926

Рейтинг: 172

#2: 2018-07-31 20:49:00 ЛС | профиль | цитата


Add(Thread,9911842,371,126)
{
 Delay=0
 FastStop=0
 link(onExec,6533399:doPlay,[])
}
Add(MediaPlayer,6533399,427,126)
{
}
Add(Thread,12034579,371,175)
{
 Delay=0
 FastStop=0
 link(onExec,9085446:doPlay,[])
}
Add(MediaPlayer,9085446,427,175)
{
}
Add(Button,6564058,280,126)
{
 Left=200
 Top=80
 link(onClick,9354849:doEvent1,[])
}
Add(Hub,9354849,329,126)
{
 link(onEvent1,9911842:doStart,[])
 link(onEvent2,12034579:doStart,[(357,139)(357,181)])
}

Робит?

карма: 9

Учебник по HiAsm | Видеоуроки | Мои программы

Ответов: 1291

Рейтинг: 47

#3: 2022-10-09 00:43:44 ЛС | профиль | цитата

3042, к сожалению не работает. В 10 винде только один звук.

карма: 3

Hiasm + Flowstone + CopperCube + GoDot + JS

Ответов: 876

Рейтинг: 101

#4: 2022-10-09 09:32:10 ЛС | профиль | цитата

bass.dll


Add(MainForm,2953706,133,105)
{
 Point(onPaint)
 link(onCreate,9916698:doInit,[(177,125)(177,62)])
 link(onPaint,7201641:doData,[])
}
Add(BASS_Init,9916698,231,56)
{
 link(onInit,7361044:doEvent1,[])
}
Add(BASS_CPU,1550103,189,70)
{
}
Add(BASS_StreamCreateFile,6607607,476,56)
{
 FileName="C:\Windows\Media\Alarm01.wav"
 Name="ch1"
 link(onCreate,254457:doPlay,[])
}
Add(DoData,7201641,189,126)
{
 link(onEventData,2953706:doCaption,[(286,132)(286,45)(121,45)(121,111)])
 link(Data,1550103:UsageCPU,[])
}
Add(BASS_ChannelPlay,254457,532,56)
{
 Channel="ch1"
}
Add(BASS_StreamCreateFile,9953300,476,112)
{
 FileName="C:\Windows\Media\Alarm02.wav"
 Name="ch2"
 link(onCreate,10990684:doPlay,[])
}
Add(BASS_StreamCreateFile,3102252,476,175)
{
 FileName="C:\Windows\Media\Alarm03.wav"
 Name="ch3"
 link(onCreate,9312834:doPlay,[])
}
Add(BASS_ChannelPlay,10990684,532,112)
{
 Channel="ch2"
}
Add(BASS_ChannelPlay,9312834,532,175)
{
 Channel="ch3"
}
Add(Hub,7361044,350,56)
{
 OutCount=6
 link(onEvent1,6607607:doCreate,[])
 link(onEvent2,9953300:doCreate,[(420,69)(420,118)])
 link(onEvent3,3102252:doCreate,[(413,76)(413,181)])
 link(onEvent4,7986385:doCreate,[(406,83)(406,237)])
 link(onEvent5,15464240:doCreate,[(399,90)(399,293)])
 link(onEvent6,8682156:doCreate,[(392,97)(392,356)])
}
Add(BASS_StreamCreateFile,7986385,476,231)
{
 FileName="C:\Windows\Media\Alarm04.wav"
 Name="ch4"
 link(onCreate,8545461:doPlay,[])
}
Add(BASS_ChannelPlay,8545461,532,231)
{
 Channel="ch4"
}
Add(BASS_StreamCreateFile,15464240,476,287)
{
 FileName="C:\Windows\Media\Alarm05.wav"
 Name="ch5"
 link(onCreate,15769467:doPlay,[])
}
Add(BASS_StreamCreateFile,8682156,476,350)
{
 FileName="C:\Windows\Media\Alarm06.wav"
 Name="ch6"
 link(onCreate,6604920:doPlay,[])
}
Add(BASS_ChannelPlay,15769467,532,287)
{
 Channel="ch5"
}
Add(BASS_ChannelPlay,6604920,532,350)
{
 Channel="ch6"
}

карма: 1

Ответов: 2059

Рейтинг: 132

#5: 2022-10-09 11:45:27 ЛС | профиль | цитата

Схема дурацкая и не правильная - так не делают с несколькими звуками!

карма: 6

-1

Голосовали:

sla8a

Ответов: 8928

Рейтинг: 823

#6: 2022-10-09 12:15:21 ЛС | профиль | цитата

flint2 писал(а):

так не делают с несколькими звуками!

Сенсей, вот так можно?

Вот так


Add(MainForm,2953706,140,112)
{
 Left=200
 Top=100
 Point(Handle)
 link(onCreate,6099049:doInit,[])
}
Add(BASS_Init,6099049,210,126)
{
 link(onError,5380400:doMessage,[(249,139)(249,167)(200,167)(200,181)])
 link(Handle,2953706:Handle,[(230,117)(202,117)(202,152)(146,152)])
}
Add(Message,5380400,210,175)
{
}
Add(ChildPanel,11696085,266,126)
{
 link(onEvent1,8843944:doWork1,[])
 link(onEvent2,8843944:doWork2,[])
}
BEGIN_SDK
  Add(EditMulti,15723362,21,21)
  {
   EventCount=3
  }
  Add(Panel,2761010,35,105)
  {
   Width=65
   Height=275
   Align=1
  }
  Add(Button,15132903,112,35)
  {
   Left=5
   Top=5
   Caption="Add"
   link(onClick,3827494:doExecute,[])
  }
  Add(Button,11824566,112,77)
  {
   Left=5
   Top=30
   Caption="Clear"
   link(onClick,15723362:onEvent2,[(221,83)(221,34)])
  }
  Add(ODialog,3827494,175,35)
  {
   link(onExecute,15723362:onEvent1,[(214,41)(214,27)])
  }
END_SDK
Add(ChildPanel,8843944,322,126)
{
}
BEGIN_SDK
  Add(EditMulti,5836778,21,21)
  {
   WorkCount=2
   link(doWork1,9482205:doEvent1,[(102,27)(102,48)])
   link(doWork2,13092589:##clear,[(95,34)(95,97)])
  }
  Add(Panel,10234881,49,49)
  {
   Left=65
   Width=315
   Height=270
   Align=5
  }
  Add(ChildPanelEx,13092589,154,84)
  {
   Mode=1
  }
  BEGIN_SDK
    Add(EditMultiEx,13294978,21,21)
    {
     WorkCount=#5:##add|7:##clear|
     Width=314
     Point(##add)
     Point(##clear)
     link(##add,16690323:doValue,[(144,27)(144,41)])
     link(##clear,1143613:doWork1,[(123,34)])
    }
    Add(Panel,6843746,35,49)
    {
     Left=1
     Top=1
     Width=315
     Height=47
     Layout="parent.MYLay"
    }
    Add(BASS_StreamCreateFile,5115026,154,77)
    {
     Name="MySong"
     link(onCreate,11306922:doPlay,[])
     link(FileName,16690323:Value,[])
    }
    Add(BASS_ChannelPlay,11306922,203,77)
    {
     Channel="MySong"
    }
    Add(Label,2054866,252,35)
    {
     Left=70
     Top=10
    }
    Add(Button,9069857,77,49)
    {
     Left=5
     Top=5
     Caption="Play"
     link(onClick,5115026:doCreate,[(139,55)(139,83)])
    }
    Add(Button,12385456,77,84)
    {
     Left=5
     Top=25
     Caption="Stop"
     link(onClick,1143613:doWork2,[])
    }
    Add(ScrollBar,14543971,77,126)
    {
     Left=65
     Top=25
     Width=240
     Page=20
     Position=200
     link(onPosition,11200819:doOperation,[])
    }
    Add(Memory,16690323,154,35)
    {
     link(onData,13514049:doPart,[])
    }
    Add(FilePartElm,13514049,203,35)
    {
     Mode=2
     link(onPart,2054866:doText,[])
    }
    Add(Math,11200819,154,126)
    {
     OpType=3
     Op2=200
     link(onResult,13936470:doAttribute,[])
    }
    Add(BASS_ChannelAttribute,13936470,203,126)
    {
     Channel="MySong"
     Attrib=1
    }
    Add(HubEx,1143613,119,84)
    {
     link(onEvent,5115026:doDestroy,[])
    }
  END_SDK
  Add(VBoxLayout,13685421,154,49)
  {
   Name="MYLay"
   Space=2
   Padding=2
   AddMode=0
  }
  Add(Hub,9482205,112,42)
  {
   link(onEvent1,13092589:##add,[(137,48)(137,90)])
   link(onEvent2,13685421:doResize,[])
  }
END_SDK

карма: 19

Ответов: 2059

Рейтинг: 132

#7: 2022-10-09 12:35:33 ЛС | профиль | цитата

Леонид, для тебя всё можно!
Я тут тоже нарисовал с новыми компонентами... из массива mp3, wav, ogg - неважно...
Но видно не судьба, минусовать начали...
Зачем мне это нужно?
Всем пока. Извеняйте, если чем обидел!

sla8a, смешно ручками сутить.
Что упало с возу - не вырубишь топором.
Война ещё не кончилась!
И сайты закрывал и три пальца отрезал.
А не помнишь, как в 14 году меня минусовали?
И чё - сейчас пик один - сайт будет закрыт - проходили, навык есть. (меня можно забанить).
Неподумав ты нарвался... Мы же придурки.

Всё прощаем, не Лёвики мы чтоли?
(Думаешь не знаю где и с кем живёшь - я тоже не скрываю. Увижу тебя.)
не ПОНЯЛА МОЯ - бодаться штоля будем?
Прикол?
Неверишь -будем посмотреть.

А тебя повесил бы (,Будим посмртреть), ну и пошло кто тебя любит- 1 2 3. не нравишься ты мне, да и дело с концом.
Кто кого повесит - будем наблюдать!

Дядя Лёня - ты хороший мужик как из пистолета!

Редактировалось 12 раз(а), последний 2022-10-09 19:16:06

карма: 6

-1

Голосовали:

sla8a

Форумы Новые компонентыОдновременное проигрывание нескольких звуков ← Ctrl1Ctrl →


Сообщение ...
Прикрепленные файлы (файлы не залиты)