Make(delphi)
ver(4.03 build 181)
Add(MainForm,2953706,-111,985)
{
 Width=931
 Height=669
 Color=-16777203
 Caption="1000V media player"
 Icon=[ZIPBE25000078DAED59096C1465145EE49F9916CA2194B31C05A914C452B90594A3504E01299672B68AC016C4002A8941518209180E1BE281800A8A1115D11803211C42141503882296265E200851146F85D9D9E7FBFE7FA73BDBDD7667DB2531B23F79CCCC9BFD1FDFFFFFEF7DEFBDC1E3A9C57FB2B33DFC77BA676B86C7D3D4E3F164B2B0CA53E451FAC4488CC4488CC4488CFFD3B85C6C902DA6E33E5C92E47B535E9302CF91AE465CC5FEF722C9656F109B8DCF2DFE305BFF71FC55D9095D47144CDEF8E2371D7E6356E143A64B718DDFEB4EE7167F51478DE676D14230EC1CAD539BBAA25C6675D2E4F5C81D6ACEFBB71BD4969FBF9A6AD0B6613AA5F3BD3D774785B9ABFAEAF4619E21EF4F4D37E8C20C833A3510F4F4AD7A1CFCC7A0316D359A789D46BFCF34E85240FFE6089D6A7B6AD3E705067DCD182FDC6550B7C6829A1882D25304A5F2B57F7321D7F2528E4E9A27887FFB7035F7C4A4E0DC03E30CA9C37A1FEEAE51F324413FCF30E2863FA5B690365BD511B463945E8EFFE2DDC1F87DA29F4E69FCFE5C9141A9BAA0F50374690B7804E3FF625228FE02DE9329191A7D3A31881FF3F1DBA76E09DF7B6BFF3AF26D29AE16FEC91D34A91BD042D0C8D65A44FCC05DE71A41F775D5A8BE10D20F3EC937A82EEBBA5C2BA85F33417FCF0EE2DF3050A7CD8375FAAE3088FF335ECB125E2FCE306CBF1FCA24FFC5B3642EEF1B13FF007FE78682EEE11868A00969DF89DF392FAF9D267D65DAF51AFD39CBA01EA982F2799F4FB35FC3A756F4D1CBF163EF0BF977BB6ED3CBF1CFE438821F62BD917CC6B77634F97F3A45E6A2D6AEF0E31EF69F1BA4D3F32C7BC7E8F21DFC16BABF6687E23F5EA0F4A5930DFA669ABAFFBE48FD0631FDF2105DFA38F4B660CED9C2A06EEB509DCEDF5939A7FAB63F4856D90132E7D471C53F66BCF8D3C985DE08FC18EDBDFDEFCD4926EBD8DB64ED5AE5CAFFA38B33FF1A8E7CE7CCBF11F079AB813FF0CE5CD084FCE7CBC8B7716A94FD4F92FEBA674C900FC0A1AB99B3E11FF013DCDB7270BC41DF4E53BA352C9B383EF10C3BE049E8C1F125CC55886D1BD333CCF51F8C8F31FF2EEBA6E27969D7A8FC73EF8D9AF4F9177394CF23D6B0A6D787A9589CC7B13D9F7F83BCB66FAC7A3F2353A3216982EA3117EDE6182A9BACF45823386C2073D91A5EC7B25EBAE4CC8FF262AF1F7C1BA690FF5C2999F353A3E29F7383467A2D2139AE227EC4E6C7130C99736CFCD877D8C9E135409CF85F19AA30DFCF5CDB93392AAB91A876FD63ED2921EBC81B322E2AC33F95B9AE29E72F6F678D66B338F103C74DCC79E0BD4379A1F8616B3A7364F7D450FCC8E5C8D52FB07F75A82768E5CD7AF5EB4FE621AB742FF9DE5A5229FFD7E3FC0B7F40AE018F57C48FB347ED03DE037EE8E04B9BD9DF90331EE9A185E087EDB97C9EED394F25737E3B5358C3FAF98134CE0BA7C95732226CFF91B7BAF2F91E0BC41BCE1CCFA8B9901B706F0BFC026780FB6C3E8FC12DB93EE3BD45DE45BC432FE3D6ABFC0DCFA8FDDCF28FB9B019F9D6E406A56438F9D64F9262ED5A4DFEDF7E247371460DF833297EFC19611DA81DFC968FAC839BC87A6FA312C66DED7CBC5CCC47B3C2F0C7A57FAC2EFE0A621DDF49BE670B62E8BF22E3874F806F4C077EE406F0BCCA1F415BD05DF246C7E646E0E3FE5347D976B2ABFCBB8463AF8150752D3803FEBB6FAC4E2D9305B5604E1ADD46A33FB8562BE5FA38A3BEA034D6836F50F7FCC0B8FB34553AC42A6A65D8FE85EBBE465C63D7655E90B58E4BFFB1F7C52ADB4FBE75F9AEEB872D4314CFD8CF7D19D3C22C8D7E651C0D995F5097A14F1BC56BC13E83CFB1EEE5BD75EAC86BFA87CF6A427BD507C1367809F35AF0BAD6F6D763AF1F56E590FFCCF14A6BB868F8710E4F067A8C4CEEF596F6D464BF853C0C9F1B1BE819C0B9B9AD34697351B6CA03B08DBC8CF5CECF52F9CB157E87C83338B1BBCAFAC7F9FDA1227EF4A78FF552FB863DC45AC6A56BB2EEC77CD406F338670373EF2642EA6671DE1BC66BF9728A217B04D414E050D83D9A5F8DEF0F2BFA73ED7032621C38EBB7C5DD34995F9DF8517FA197844FA0E743FDFECE489D1AB14F20DFC2370E733E43AD011DF27763F677F4F238AB7629CAA72E077C6D419656F5FE1747FEFE609D7C57727F55FE63F7D7C8A74E1BC85FAFE5EAB26FB4F5E8E7B7E6AA1EC5D6216FBDCA3A3B760FF19E97EFB757AD51E6E4187948625D3988FC674F84C5C115E1FF2BF4FDCD3ABC8D6BE9EE571E7FC56F5035E85F9CF925BEFD5765F543923BBF288ED17F62C5EF75833FF4BB634CF8BDF1C39FF81F84C4488CC4488CAB73901C17AC9A5E95B5ABEF5AD37DFB17C23CC43D]
 Point(Handle)
 link(onCreate,4252681:doInit,[(-70,1005)(-70,1006)])
}
Add(BASS_Init,4252681,-48,1000)
{
 link(onInit,3098335:doEvent1,[(35,1006)(35,975)])
 link(onError,11232751:doMessage,[(3,1013)(3,1054)])
 link(Handle,2953706:Handle,[(-28,988)(-66,988)(-66,1029)(-105,1029)])
}
Add(Message,11232751,29,1048)
{
 Message="Error BASS initialization"
 Caption="Error"
 Icon=1
}
Add(PaintBox,8758719,154,259)
{
 Left=185
 Top=235
 Width=700
 Height=150
 link(onBeforeDraw,12050567:doEvent,[(236,265)(236,335)])
}
Add(BASS_ChannelVisibleSpectrum,5631139,341,273)
{
 SoundStream="MainSound"
 Pen=16711680
 Mode=1
 DrawPeak=1
 link(WindowsHandle,1470837:Var3,[(347,261)(297,261)(297,289)])
}
Add(Timer,5820169,98,286)
{
 Interval=50
 link(onTimer,8758719:doRefresh,[(142,292)(142,265)])
}
Add(BitBtn,11967952,-84,720)
{
 Left=815
 Top=580
 Width=80
 Height=26
 Color=65280
 Caption="About program"
 link(onClick,2534829:doMessage,[(-5,726)(-5,734)])
}
Add(Message,2534829,35,728)
{
 Message="1000V media player-программа для прослушивания
аудиофайлов. В программе используется кодек BASS
и дополнительные кодеки (add-ons)
Программа может проигрывать файлы с Вашего комьютера
и интернет-радио, записывать звук других программ
и интернет-радио.
Программа собрана Artem с помощью HiAsm
(http://www.hiasm.com/_index.html)"
 Caption="Info"
}
Add(BitBtn,11865194,140,420)
{
 Left=10
 Top=410
 Width=60
 Color=65280
 Caption="Open file"
 link(onClick,15104708:doExecute,[(177,426)(177,433)])
}
Add(BitBtn,13458823,-21,77)
{
 Left=375
 Top=155
 Width=48
 Height=28
 Color=8421504
 Caption=""
 Bitmap=[ZIPF60F000078DA73F2FDC6CF00066640AC01C406402C03C48C0C1260F103507964D0300A4601CDC07F06065C68B0B967401C468C7BE8E93092DC430787A159A422F376605D85E91E381A1087E1710FA9AEA28AC308BA87CEC145BC7B48721B9DDD43D04923337C064FFA193CF96B90943F035544935D5F0C92FA74F0D4EFA3EDB1C1D05E1D05A3003F0000133526CA]
 link(onClick,16324067:doEvent1,[(19,83)(19,125)])
}
Add(BitBtn,16664371,-122,103)
{
 Left=285
 Top=155
 Width=48
 Height=28
 Color=8421504
 Caption=""
 Bitmap=[ZIPF60F000078DA73F2FDC6CF00066640AC01C406402C03C48C0C1260F1035079647067148C02AA829966FA7443A3EE19750F9DDDD3C0F09F8A68D43DA3EE1975CFA87B46DD432DF78CD65FA3EE19D2EE1905A380780000F99E99D2]
 link(onClick,12108558:doEvent1,[(-69,109)(-69,55)])
}
Add(DropFile,14973487,140,462)
{
 link(onDropFile,12669718:doEvent2,[(219,468)(219,440)])
}
Add(Hub,12669718,259,427)
{
 InCount=3
 OutCount=1
 link(onEvent1,14738624:doAdd,[(280,433)(280,454)])
}
Add(Label,2006297,132,793)
{
 Left=585
 Top=155
 Width=45
 Height=17
 Color=-16777203
 Font=[MS Sans Serif,8,1,0,1]
 Caption="Volume"
}
Add(Label,5758854,864,1074)
{
 Left=20
 Top=240
 Width=35
 Height=12
 Color=-16777203
 Caption="80Hz"
}
Add(ScrollBarEx,5404405,863,1116)
{
 Left=20
 Top=265
 Width=15
 Height=100
 Color=8388736
 LightColor=16711935
 DarkColor=16711935
 FaceColor=0
 ArrowColor=16711935
 Max=15
 Min=-15
 Kind=1
 link(onPosition,7027187:doEvent1,[(900,1122)(900,1121)])
}
Add(Hub,7027187,905,1115)
{
 OutCount=3
 link(onEvent1,11230734:doSet,[(935,1121)(935,1093)])
 link(onEvent2,13126728:doText,[])
 link(onEvent3,12180348:doSet,[(935,1135)(935,1142)])
}
Add(BASS_ChannelFX_Eq,11230734,959,1087)
{
 Channel="MainSound"
 Bandwidth=16
}
Add(Label,13126728,1000,1122)
{
 Left=20
 Top=375
 Width=15
 Height=17
 Color=-16777203
 Caption="0"
}
Add(Label,451566,858,1293)
{
 Left=115
 Top=240
 Width=45
 Height=12
 Color=-16777203
 Caption="1000Hz"
}
Add(ScrollBarEx,13212864,858,1335)
{
 Left=125
 Top=265
 Width=15
 Height=100
 Color=8388736
 LightColor=16711935
 DarkColor=16711935
 FaceColor=0
 ArrowColor=16711935
 Max=15
 Min=-15
 Kind=1
 link(onPosition,3954111:doEvent1,[(902,1341)(902,1342)])
}
Add(Hub,3954111,914,1336)
{
 OutCount=3
 link(onEvent1,12129067:doSet,[(937,1342)(937,1306)])
 link(onEvent2,12597389:doText,[(981,1349)(981,1341)])
 link(onEvent3,4872676:doSet,[(949,1356)(949,1369)])
}
Add(BASS_ChannelFX_Eq,12129067,946,1300)
{
 Channel="MainSound"
 Center=1000
 Bandwidth=16
}
Add(Label,12597389,1018,1335)
{
 Left=125
 Top=375
 Width=15
 Height=17
 Color=-16777203
 Caption="0"
}
Add(Label,12713548,861,1379)
{
 Left=150
 Top=260
 Width=28
 Height=20
 Color=-16777203
 Font=[MS Sans Serif,10,1,0,1]
 Caption="Min"
}
Add(Label,1730784,913,1379)
{
 Left=150
 Top=355
 Width=32
 Height=20
 Color=-16777203
 Font=[MS Sans Serif,10,1,0,1]
 Caption="Max"
}
Add(Label,5163481,828,1171)
{
 Left=65
 Top=240
 Width=40
 Height=12
 Color=-16777203
 Caption="500Hz"
}
Add(ScrollBarEx,14691260,827,1209)
{
 Left=70
 Top=265
 Width=15
 Height=100
 Color=8388736
 LightColor=16711935
 DarkColor=16711935
 FaceColor=0
 ArrowColor=16711935
 Max=15
 Min=-15
 Kind=1
 link(onPosition,3147679:doEvent1,[])
}
Add(Hub,3147679,875,1209)
{
 OutCount=3
 link(onEvent1,12574546:doSet,[(907,1215)(907,1191)])
 link(onEvent2,320291:doText,[])
 link(onEvent3,347354:doSet,[(917,1229)(917,1254)])
}
Add(BASS_ChannelFX_Eq,12574546,925,1185)
{
 Channel="MainSound"
 Center=500
 Bandwidth=16
}
Add(Label,320291,970,1216)
{
 Left=70
 Top=375
 Width=15
 Height=17
 Color=-16777203
 Caption="0"
}
Add(Math,15138911,245,794)
{
 OpType=3
 Op2=100
 link(onResult,15216955:doEvent1,[])
}
Add(Hub,15216955,294,794)
{
 OutCount=3
 link(onEvent1,4641453:doText,[(353,800)(353,772)])
 link(onEvent2,3018529:doAttribute,[(369,807)(369,819)])
 link(onEvent3,14304365:doAttribute,[(342,814)(342,835)])
}
Add(Label,4641453,377,766)
{
 Left=840
 Top=155
 Width=20
 Height=17
 Color=-16777203
 Caption="1"
}
Add(BASS_ChannelAttribute,3018529,413,813)
{
 Channel="MainSound"
 Attrib=1
}
Add(BASS_StreamCreateURL,12045247,203,119)
{
 Name="InetStream"
 link(onCreate,3479084:doPlay,[])
 link(URL,2845596:Var3,[(209,107)(475,107)])
}
Add(BASS_ChannelAttribute,14304365,356,829)
{
 Channel="InetStream"
 Attrib=1
}
Add(Hub,16324067,28,119)
{
 OutCount=3
 link(onEvent1,12045247:doCreate,[])
 link(onEvent2,12127398:doEvent1,[(76,132)(76,573)])
 link(onEvent3,8014491:doWork2,[(55,139)(55,622)])
}
Add(BASS_ChannelPlay,3479084,252,119)
{
 Channel="InetStream"
 link(onPlay,4406639:doWork2,[(300,125)(300,174)(186,174)(186,209)])
}
Add(Hub,12108558,-63,49)
{
 OutCount=3
 link(onEvent1,1147551:doDestroy,[(386,55)(386,678)])
 link(onEvent2,12045247:doDestroy,[(182,62)(182,132)])
 link(onEvent3,5066922:doStop,[(-32,69)(-32,223)])
}
Add(BASS_ChannelFX_Eq,12180348,952,1136)
{
 Channel="InetStream"
 Bandwidth=16
}
Add(BASS_ChannelFX_Eq,347354,925,1248)
{
 Channel="InetStream"
 Center=500
 Bandwidth=16
}
Add(BASS_ChannelFX_Eq,4872676,969,1363)
{
 Channel="InetStream"
 Center=1000
 Bandwidth=16
}
Add(ODialog,15104708,182,427)
{
 Title="Open File"
 FileName=""
 Select=1
 link(onExecute,12669718:doEvent1,[])
}
Add(Browse,5540297,182,497)
{
 BrowseObj=3
 link(onBrowse,12669718:doEvent3,[(250,503)(250,447)])
}
Add(BitBtn,3196937,133,511)
{
 Left=10
 Top=445
 Width=60
 Color=65280
 Caption="Browse"
 link(onClick,5540297:doBrowse,[(173,517)(173,503)])
}
Add(BASS_ChannelVisibleSpectrum,11969606,336,336)
{
 SoundStream="InetStream"
 Pen=16711680
 Mode=1
 DrawPeak=1
 link(WindowsHandle,1470837:Var2,[(342,319)(244,319)])
}
Add(FileAttributes,257569,596,882)
{
 Point(FileSize)
 link(onRead,3265491:doString,[])
}
Add(FormatStr,3265491,645,882)
{
 DataCount=3
 Mask="
%3"
 link(onFString,512619:doOperation,[])
 link(Str3,257569:FileSize,[(665,860)(636,860)(636,935)(623,935)])
}
Add(Math,8983054,749,882)
{
 OpType=3
 Op2=1024
 link(onResult,14476757:doText,[(795,888)(795,900)])
}
Add(Math,512619,701,882)
{
 OpType=2
 Op2=8
 link(onResult,8983054:doOperation,[])
}
Add(Edit,14476757,803,894)
{
 Left=125
 Top=95
 Width=120
 Height=21
 Color=0
 Font=[MS Sans Serif,8,0,8388863,1]
 Text=""
}
Add(Edit,5901030,678,817)
{
 Left=125
 Top=60
 Width=120
 Height=21
 Color=0
 Font=[MS Sans Serif,8,0,8388863,1]
 Text=""
}
Add(Math,15697503,770,966)
{
 OpType=3
 link(onResult,8317669:doText,[(817,972)(817,956)])
 link(Op1,14476757:Text,[(776,948)(809,948)])
 link(Op2,5901030:Text,[(783,932)(684,932)])
}
Add(Edit,8317669,838,950)
{
 Left=440
 Top=55
 Width=120
 Height=21
 Color=0
 Font=[MS Sans Serif,8,0,8388863,1]
 Text=""
}
Add(Timer,10044967,700,966)
{
 link(onTimer,15697503:doOperation,[])
}
Add(Label,10786214,722,820)
{
 Left=15
 Top=60
 Width=87
 Height=17
 Color=-16777203
 Font=[MS Sans Serif,9,1,0,1]
 Caption="Длина,секунд"
}
Add(Label,14260004,848,896)
{
 Left=15
 Top=95
 Width=80
 Height=17
 Color=-16777203
 Font=[MS Sans Serif,9,1,0,1]
 Caption="Размер,кбит"
}
Add(Label,12776112,884,947)
{
 Left=325
 Top=60
 Width=99
 Height=17
 Color=-16777203
 Font=[MS Sans Serif,9,1,0,1]
 Caption="Битрейт(bitrate)"
}
Add(ScrollBarEx,3282786,184,774)
{
 Left=655
 Top=155
 Width=170
 Color=8388736
 LightColor=16777215
 DarkColor=16777215
 FaceColor=0
 ArrowColor=65280
 Position=100
 Point(doMax)
 link(onPosition,15138911:doOperation,[(238,780)(238,800)])
}
Add(IndexToChanel,12050567,257,329)
{
 Count=3
 Point(Index)
 link(onEvent1,5631139:doDraw,[(318,335)(318,279)])
 link(onEvent2,11969606:doDraw,[])
 link(onEvent3,9594586:doDraw,[(320,349)(320,398)])
 link(Index,501698:Value,[(263,279)(284,279)])
}
Add(GetDataEx,1470837,238,284)
{
 Angle=3
 link(Data,8062642:Var3,[])
}
Add(Memory,501698,278,196)
{
}
Add(Hub,3098335,57,969)
{
 OutCount=7
 link(onEvent1,8570657:doLoad,[(200,975)(200,966)])
 link(onEvent2,10791262:doLoad,[(227,982)(227,1015)])
 link(onEvent3,2146342:doLoad,[(212,989)(212,1074)])
 link(onEvent4,8332581:doLoad,[(181,996)(181,1124)])
 link(onEvent5,9912701:doLoad,[(133,1003)(133,1181)])
 link(onEvent6,1361511:doLoad,[(121,1010)(121,1232)])
 link(onEvent7,3656964:doEnum,[(94,1017)(94,1225)(-45,1225)(-45,1412)])
}
Add(BASS_dll,8570657,260,960)
{
 link(NameDll,6663329:Value,[(266,953)(312,953)])
}
Add(BASS_dll,8332581,371,1118)
{
 link(NameDll,5740465:Value,[(377,1103)(405,1103)])
}
Add(BASS_dll,2146342,336,1068)
{
 link(NameDll,10559211:Value,[(342,1050)(371,1050)])
}
Add(BASS_dll,10791262,294,1009)
{
 link(NameDll,13409555:Value,[(300,999)(342,999)])
}
Add(Memory,6663329,306,908)
{
 Default=String(bass_aac.dll)
}
Add(Memory,13409555,336,956)
{
 Default=String(bass_ac3.dll)
}
Add(Memory,5740465,399,1063)
{
 Default=String(basswma.dll)
}
Add(Memory,4616829,437,1109)
{
 Default=String(basswv.dll)
}
Add(Memory,10559211,365,1003)
{
 Default=String(basscd.dll)
}
Add(BASS_dll,9912701,406,1175)
{
 link(NameDll,4616829:Value,[(412,1155)(443,1155)])
}
Add(BASS_dll,1361511,445,1226)
{
 link(NameDll,910421:Value,[(451,1213)(480,1213)])
}
Add(Memory,910421,474,1170)
{
 Default=String(bassflac.dll)
}
Add(Hub,12127398,189,567)
{
 InCount=2
 OutCount=1
 link(onEvent1,2028006:doNext,[])
}
Add(Counter,2028006,252,567)
{
 Min=-1
 Max=10000
 Default=-1
 Point(doValue)
 link(onNext,13600621:doEvent1,[])
}
Add(Hub,13600621,294,567)
{
 link(onEvent1,14738624:doSelect,[(315,573)(315,496)])
 link(onEvent2,8101473:doWork2,[])
}
Add(ListBox,14738624,329,448)
{
 Left=80
 Top=400
 Width=820
 Height=100
 Color=0
 Font=[MS Sans Serif,8,0,16711680,1]
 Point(doSelect)
 link(onClick,6437386:doGet,[])
}
Add(ArrayRW,7455926,336,574)
{
 link(onRead,1372390:doEvent1,[])
 link(Array,14738624:Array,[(342,537)(349,537)])
}
Add(Hub,11293159,434,462)
{
 link(onEvent1,2028006:doValue,[(462,468)(462,557)(240,557)(240,594)])
 link(onEvent2,8101473:doWork1,[(467,475)(467,526)(326,526)])
}
Add(Hub,1372390,392,574)
{
 link(onEvent1,8243139:doText,[])
 link(onEvent2,8014491:doWork1,[(423,587)])
}
Add(BASS_StreamCreateFile,1147551,434,665)
{
 Name="MainSound"
 link(onCreate,3651364:doPlay,[])
 link(onEndPlay,10006279:doStart,[(481,678)(481,692)])
 link(FileName,2845596:Var1,[(440,628)])
}
Add(BASS_ChannelPlay,3651364,567,665)
{
 Channel="MainSound"
 link(onPlay,6034887:doData,[(639,671)(639,207)])
}
Add(HubEx,8101473,322,574)
{
 link(onEvent,7455926:doRead,[])
}
Add(DoData,6034887,700,201)
{
 link(onEventData,8780488:doEvent1,[(761,207)(761,216)])
 link(Data,6457552:Length,[(706,185)(767,185)(767,346)(713,346)])
}
Add(Hub,8780488,784,210)
{
 OutCount=3
 link(onEvent1,10441699:doMax,[(876,216)(876,208)])
 link(onEvent2,5901030:doText,[(836,223)(836,547)(661,547)(661,823)])
 link(onEvent3,4406639:doWork1,[(814,230)(814,248)(197,248)(197,202)])
}
Add(ScrollBarEx,10441699,884,195)
{
 Left=15
 Top=205
 Width=880
 Height=10
 Color=8388736
 LightColor=16777215
 DarkColor=16777215
 FaceColor=0
 ArrowColor=16711935
 Max=999999999
 ScrollMode=1
 Point(doMax)
 link(onPosition,6457552:doPosition,[(928,201)(928,265)(663,265)(663,284)])
}
Add(DoData,11518414,819,341)
{
 link(onEventData,10441699:doPosition,[(869,347)(869,201)])
 link(Data,6457552:CurPosition,[(825,328)(706,328)])
}
Add(Timer,15591768,763,383)
{
 link(onTimer,11518414:doData,[(807,389)(807,347)])
}
Add(BASS_ChannelPosition,6457552,700,278)
{
 Channel="MainSound"
 Mode=2
}
Add(BitBtn,2621935,261,497)
{
 Left=10
 Top=480
 Width=60
 Color=65280
 Caption="Clear List"
 link(onClick,14738624:doClear,[(301,503)(301,461)])
}
Add(ChanelToIndex,4406639,237,196)
{
 Count=3
 link(onIndex,501698:doValue,[])
}
Add(PointHint,15445204,945,1428)
{
 Info=#10:Эквалайзер|
 Width=85
 Height=53
}
Add(PointHint,9025282,161,854)
{
 Info=#17:Регулировка звука|
 Width=134
}
Add(PointHint,5466983,714,1015)
{
 Info=#18:Измерение битрейта|
 Width=162
}
Add(PointHint,552116,126,1253)
{
 Info=#33:Загрузка дополнительных библиотек|
 Width=253
}
Add(Edit,8243139,483,574)
{
 Left=75
 Top=20
 Width=825
 Height=21
 Color=0
 Font=[MS Sans Serif,8,1,16711680,1]
 Text=""
 link(onChange,257569:doRead,[(555,580)(555,888)])
}
Add(Label,2833520,497,530)
{
 Left=15
 Top=20
 Width=45
 Height=17
 Color=-16777203
 Font=[MS Sans Serif,9,1,0,1]
 Caption="Playing"
}
Add(HubEx,8014491,419,616)
{
 Angle=1
 link(onEvent,1147551:doCreate,[(423,671)])
}
Add(BASS_RecordStart,5066922,-15,210)
{
 Freq=44100
 Channels=2
 Name="mainrec"
 link(onStart,4406639:doWork3,[])
 link(FileName,16746696:Text,[(-9,201)(13,201)])
}
Add(Edit,16746696,7,161)
{
 Left=440
 Top=95
 Width=460
 Color=16777215
 Text=""
}
Add(Label,9655938,-128,56)
{
 Left=310
 Top=100
 Width=115
 Height=17
 Color=-16777203
 Font=[MS Sans Serif,9,1,0,1]
 Caption="Record in file(.wav)"
}
Add(BitBtn,7037358,-84,210)
{
 Left=460
 Top=155
 Width=48
 Height=28
 Color=8388608
 Caption=""
 Bitmap=[ZIPF60F000078DA73F2FDC6CF00066640AC01C406402C03C48C0C1260F1034079616E088681BF025CA368148D22083A2DE016C471D38AFD1B10D9B27FCCE6DC35502E59CA5F62CEF6D384F52F1A3265FBE3C4FE86CE8E69E19E03B417D3317064CEF66BF038869E4E024613318E81203A445C08C70D221D0341B4CE4D58D3301E44D31C4764CAA15B2ACAE5DA4E926320D97FE4B867B0C5D7604BCF832DBF0FC2F270B0D51783B03E1D84ED8D41D81E1B45A368102200255FDA76]
 link(onClick,5066922:doStart,[])
}
Add(BitBtn,3335374,-84,777)
{
 Left=815
 Top=525
 Width=80
 Height=25
 Color=65280
 Caption="On the record"
 link(onClick,14421634:doMessage,[(-8,783)(-8,797)])
}
Add(Message,14421634,35,791)
{
 Message="Эта программа записывает звук только в формате wav
Громкость записываемого звука в процессе записи не регулируется.
Эквалайзер в режиме записи не функционирует.
Краткая последовательность действий:
ПОСТАВЬТЕ ПОЛЗУНОК ГРОМКОСТИ ЗВУКА В КОМПЬЮТЕРЕ
НА ПОЛНУЮ ГРОМКОСТЬ!!!
Зайдите в "звуковые устройства" и включите (щелкнув правой кнопкой мыши)
"показать отключенные устройства" стерео микшер, далее включите звук на
воспроизведение (на полную громкость!)
Начните запись.
Остановите запись при необходимости."
 Caption="On the record"
}
Add(BASS_ChannelVisibleSpectrum,9594586,336,392)
{
 SoundStream="mainrec"
 Pen=16711680
 Mode=1
 DrawPeak=1
 link(WindowsHandle,8062642:Var2,[(342,382)(216,382)])
}
Add(GetDataEx,8062642,210,284)
{
 Angle=3
 link(Data,8758719:Bitmap,[(197,289)(197,303)(160,303)])
}
Add(GetDataEx,2845596,469,623)
{
 Angle=1
 link(Data,8243139:Text,[(489,628)])
}
Add(Thread,10006279,490,686)
{
 Delay=0
 FastStop=0
 link(onSyncExec,12127398:doEvent2,[(534,699)(534,639)(164,639)(164,580)])
}
Add(MT_Get,6437386,392,455)
{
 link(onGet,11293159:doEvent1,[])
}
Add(BASS_RecordDevices,3656964,-33,1406)
{
 link(onEnum,8286307:doAdd,[(15,1412)(15,1343)])
}
Add(BASS_RecordInput,1805458,293,1414)
{
 link(onEnumInputs,7568572:doAdd,[(340,1420)(340,1476)])
}
Add(Hub,7374572,160,1477)
{
 OutCount=3
 link(onEvent1,7568572:doClear,[])
 link(onEvent2,10198942:doFree,[(220,1490)(220,1427)])
 link(onEvent3,10198942:doInit,[(202,1497)(202,1420)])
}
Add(BASS_RecordCenter,10198942,236,1414)
{
 link(onInit,1805458:doEnumInputs,[])
 link(Device,8286307:Index,[(242,1353)(155,1353)(155,1418)(64,1418)])
}
Add(ListBox,8286307,37,1337)
{
 Left=115
 Top=520
 Width=400
 Height=95
 Color=0
 Font=[MS Sans Serif,8,0,16711680,1]
 Point(doSelect)
 Point(Index)
 link(onClick,9169415:doWork1,[(114,1350)])
}
Add(ListBox,7568572,349,1470)
{
 Left=610
 Top=520
 Width=190
 Height=95
 Color=0
 Font=[MS Sans Serif,8,0,16711680,1]
 Point(doSelect)
 Point(Index)
}
Add(Label,1027376,-24,1332)
{
 Left=10
 Top=545
 Width=99
 Height=17
 Color=-16777203
 Font=[MS Sans Serif,9,1,0,1]
 Caption="Record devices"
}
Add(Label,6914338,351,1416)
{
 Left=555
 Top=545
 Width=44
 Height=17
 Color=-16777203
 Font=[MS Sans Serif,9,1,0,1]
 Caption="Inputs"
}
Add(PointHint,6630095,98,1526)
{
 Info=#31:Выбор устройства записи и входа|
 Width=232
}
Add(PointHint,15265791,679,434)
{
 Info=#20:Позиция проигрывания|
 Width=148
}
Add(BitBtn,3148339,25,1449)
{
 Left=20
 Top=575
 Width=60
 Color=65280
 Caption="Choose"
 link(onClick,9169415:doWork2,[])
}
Add(HubEx,9169415,110,1449)
{
 Angle=1
 link(onEvent,7374572:doEvent1,[(114,1483)])
}