Add(ChildPanelEx,15569021,196,70)
{
 @Hint=#39:Запуск BASS 2.4 и выбор источника звука|
 link(Handle,14765800:Handle,[(202,61)(188,61)(188,96)(153,96)])
}
BEGIN_SDK
  Add(EditMultiEx,6822816,21,21)
  {
   WorkCount=#21:doStart=Начать работу|
   EventCount=#21:onStart=Начать работу|
   DataCount=#46:Handle=Идентификатор основного окна приложения|
   Width=517
   Height=172
   VOffset=35
   HOffset=42
   link(doStart,15175716:doEvent1,[])
  }
  Add(Panel,3900892,175,42)
  {
   Top=-5
   Width=378
   Height=260
   Visible=1
   Caption="                                                               Выбрать источник звука"
   Alignment=2
   Point(doVisible)
  }
  Add(BASS_Version,10183901,126,91)
  {
   link(onCheckOk,2139448:doEnum,[])
   link(onCheckFailed,109118:doMessage,[(166,104)(166,146)])
  }
  Add(Message,11232751,126,140)
  {
   Message="Error BASS initialization"
   Caption="Error"
   Icon=1
  }
  Add(Message,109118,175,140)
  {
   Message="Incorrect version of BASS library "
   Caption="Error"
   Icon=1
  }
  Add(BASS_Init,4252681,77,91)
  {
   Freq=22050
   Flags=3
   link(onInit,10183901:doCheck,[])
   link(onError,11232751:doMessage,[(117,104)(117,146)])
   link(Handle,6822816:Handle,[(97,56)(69,56)])
  }
  Add(BASS_RecordCenter,12302345,273,98)
  {
   link(onInit,15862958:doEnumInputs,[])
   link(onError,11713735:doMessage,[(310,111)(310,153)])
  }
  Add(Message,11713735,322,147)
  {
   Message="InitRecord failed!"
   Caption="Error"
   Icon=1
  }
  Add(BASS_RecordInput,15862958,322,98)
  {
   link(onEnumInputs,16487182:doEvent1,[])
  }
  Add(BASS_InputControl,9998094,448,98)
  {
   Volume=1
   State=1
   link(onSetInput,9127027:doEvent1,[])
   link(Volume,10061734:Var1,[(461,83)])
   link(State,10061734:Var2,[])
  }
  Add(Memory,4613851,462,35)
  {
   Default=Integer(1)
  }
  Add(ComboBox,4718633,224,91)
  {
   Left=5
   Top=5
   Width=185
   Height=21
   link(onClick,12302345:doInit,[])
  }
  Add(GetDataEx,10061734,462,78)
  {
   link(Data,4613851:Value,[])
  }
  Add(ChanelToIndex,14252892,126,49)
  {
   link(onIndex,3900892:doVisible,[])
  }
  Add(Hub,15175716,49,56)
  {
   link(onEvent1,14252892:doWork2,[])
   link(onEvent2,4252681:doInit,[(66,69)(66,97)])
  }
  Add(ComboBox,8950199,399,105)
  {
   Left=195
   Top=5
   Width=175
   Height=21
   Enabled=1
   Point(doEnabled)
   link(onClick,9998094:doSetInput,[(439,118)(439,104)])
  }
  Add(BASS_RecordDevices,2139448,175,91)
  {
   link(onEnum,4718633:doAdd,[])
  }
  Add(Hub,16487182,364,98)
  {
   link(onEvent1,8950199:doEnabled,[(388,104)(388,153)])
   link(onEvent2,8950199:doAdd,[])
  }
  Add(Hub,9127027,490,98)
  {
   link(onEvent1,14252892:doWork1,[(512,104)(512,31)(114,31)(114,55)])
   link(onEvent2,6822816:onStart,[(522,111)(522,62)])
  }
END_SDK
Add(MainForm,14765800,147,56)
{
 Width=393
 Height=295
 Caption="Звук"
 Point(onClose)
 Point(Handle)
 link(onCreate,15569021:doStart,[])
}
Add(BASS_RecordStart,930540,203,126)
{
 Freq=22050
 Mode=1
 Name="MySound"
 link(onData,1578070:Method,[])
}
Add(Button,14423340,147,112)
{
 Left=25
 Top=10
 Caption="Пуск"
 link(onClick,930540:doStart,[(193,118)(193,132)])
}
Add(Button,7390731,147,147)
{
 Left=25
 Top=45
 Caption="Стоп"
 link(onClick,930540:doStop,[(186,153)(186,139)])
}
Add(PaintBox,8758719,294,70)
{
 Left=10
 Top=70
 Width=360
 Height=180
 link(onBeforeDraw,5631139:doDraw,[])
}
Add(BASS_ChannelVisibleSpectrum,5631139,350,70)
{
 SoundStream="MySound"
 Mode=1
 link(WindowsHandle,8758719:Bitmap,[(356,58)(328,58)(328,114)(300,114)])
}
Add(Timer,5820169,245,70)
{
 Interval=10
 link(onTimer,8758719:doRefresh,[])
}
Add(PointHint,1578070,252,123)
{
 Info=#55:Из этой точки 10 раз в секунду выдаётся звуковой поток.|
 HAlign=0
 Width=302
}