HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуMp3 ← Ctrl1234Ctrl →
Этот топик читают: Гость
Ответов: 8930
Рейтинг: 823
#46: 2017-10-24 13:18:38 ЛС | профиль | цитата
Udokanec, а зачем велосипед изобретать Ведь есть BASS_ChannelPosition специально для вас
карма: 19

0
Ответов: 4631
Рейтинг: 749
#47: 2017-10-24 13:21:59 ЛС | профиль | цитата
Ну, есть же пример в hiBASS_StreamCreateFile.pas: 

unit hiBASS_ChannelPlay;

interface

uses Kol,Share,Debug,BASS;

type
  THIBASS_ChannelPlay = class(TDebug)
   private
     FSync: HSYNC;
   public
    _prop_Channel:^cardinal;
    _prop_Restart:byte;

    _event_onPlay:THI_Event;
    _event_onEndPlay:THI_Event;

    procedure _work_doPlay(var _Data:TData; Index:word);
    procedure _var_State(var _Data:TData; Index:word);
  end;

implementation

procedure SyncProc(handle:HSYNC; channel:DWORD; data:DWORD; user:pointer); stdcall;
var
  C: THIBASS_ChannelPlay;
begin
  C := THIBASS_ChannelPlay(user);

  // По получению сигнала снимаем обработчик (вероятно, нужно снимать обработчик по других условиях,
  // а может вообще не нужно снимать, но ставить более комплексные условия для повторной установки,
  // например, при пересоздании канала (изменении _prop_Channel^) или принудительной остановке 
  // воспроизведения (в таком случае SyncProc не вызовется?))
  BASS_ChannelRemoveSync(C._prop_Channel^, C.FSync);
  C.FSync := 0;

  // Вызываем событие
  _hi_onEvent(C._event_onEndPlay);
end;

procedure THIBASS_ChannelPlay._work_doPlay;
begin
  if FSync = 0 then // Назначаем обработчик
    FSync := BASS_ChannelSetSync(_prop_Channel^, BASS_SYNC_MIXTIME or BASS_SYNC_END, 0, SyncProc, self);

  BASS_ChannelPlay(_prop_Channel^, _prop_Restart = 0);
  
   _hi_onEvent(_event_onPlay);
end;

procedure THIBASS_ChannelPlay._var_State;
begin            
  dtInteger(_Data, BASS_ChannelIsActive(_prop_Channel^));
end;

end.
карма: 26

0
Ответов: 287
Рейтинг: 5
#48: 2017-10-24 13:29:33 ЛС | профиль | цитата
Netspirit я по hiBASS_StreamCreateFile.pas: и делал

--- Добавлено в 2017-10-24 13:49:11

Или я совсем дурак теперь другая ошибка fatal unit name mismatgh строка 8
блин чувствую что я всех уже достал

Редактировалось 1 раз(а), последний 2017-10-24 13:49:11
карма: 0

0
Ответов: 4631
Рейтинг: 749
#49: 2017-10-24 14:04:33 ЛС | профиль | цитата
Если ты делаешь в InlineCode - то в первой строчке после unit менять не надо было. Но в InlineCode у тебя не получится подключить. Пиши прямо в hiBASS_ChannelPlay.pas (не забудь точку добавить в BASS_ChannelPlay.ini).

Предполагаю, точку onEndPlay лучше добавлять не в BASS_ChannelPlay, а аналогично BASS_StreamCreateFile в компонент, который создаёт канал.

Редактировалось 1 раз(а), последний 2017-10-24 14:09:10
карма: 26

0
Ответов: 287
Рейтинг: 5
#50: 2017-10-24 14:53:00 ЛС | профиль | цитата
Пиши прямо в hiBASS_ChannelPlay.pas (не забудь точку добавить в BASS_ChannelPlay.ini)
все сделал заменил пас файл а изменений нет.Комп перезагружал
карма: 0

0
Ответов: 2059
Рейтинг: 132
#51: 2017-10-24 16:46:44 ЛС | профиль | цитата
Udokanec, вот, что ты хотел. http://forum.hiasm.com/getfile/38232
̶П̶р̶и̶ ̶э̶т̶о̶м̶ ̶н̶е̶о̶б̶х̶о̶д̶и̶м̶о̶ ̶з̶а̶м̶е̶н̶и̶т̶ь̶ ̶h̶i̶B̶A̶S̶S̶_̶S̶t̶r̶e̶a̶m̶C̶r̶e̶a̶t̶e̶F̶i̶l̶e̶.̶p̶a̶s̶ ̶и̶з̶ ̶а̶р̶х̶и̶в̶а̶.̶
̶И̶з̶м̶е̶н̶е̶н̶и̶я̶ ̶м̶и̶н̶и̶м̶а̶л̶ь̶н̶ы̶е̶,̶ ̶п̶р̶о̶с̶т̶о̶ ̶в̶ ̶п̶о̶т̶о̶к̶ ̶в̶ы̶в̶о̶д̶и̶т̶с̶я̶ ̶F̶S̶y̶n̶c̶ ̶-̶ ̶б̶е̶з̶ ̶э̶т̶о̶г̶о̶ ̶н̶и̶к̶а̶к̶!̶ ̶Н̶а̶ ̶р̶а̶б̶о̶т̶у̶ ̶в̶ ̶с̶т̶а̶р̶ы̶х̶ ̶с̶хе̶м̶а̶х̶ ̶н̶и̶к̶а̶к̶ ̶н̶е̶ ̶в̶л̶и̶я̶е̶т̶!̶

В компоненте заложены ещё другие функции, но сегодня нет здоровья доделать.
Постараюсь завтра допилить.
P.S.
А почему не подошла точка onEndPlay=Событие происходит всякий раз после окончания проигрывания звукового потока в BASS_StreamCreateFile???
----------------------------------

Допилил и перезалил.
--------------------------------------
Почистил и перезалил. 2017-10-25

Редактировалось 8 раз(а), последний 2017-10-25 13:06:35
карма: 6

0
Ответов: 287
Рейтинг: 5
#52: 2017-10-25 06:34:45 ЛС | профиль | цитата
flint2,Спасибо большое.Но событие onEndPlay не происходит. 

Add(MainForm,2953706,343,266)
{
 Height=117
 link(onCreate,13443462:doInit,[])
}
Add(BASS_Init,13443462,406,280)
{
 link(onInit,10183901:doCheck,[])
 link(onError,11232751:doMessage,[(459,293)(459,328)])
}
Add(BASS_StreamCreateURL,1863145,658,280)
{
 Name="InetStream"
 link(onCreate,7574751:doPlay,[])
 link(URL,2861385:Text,[])
}
Add(BASS_Version,10183901,469,280)
{
 link(onCheckFailed,109118:doMessage,[(515,293)(515,286)])
}
Add(BASS_ChannelPlay,9406897,721,329)
{
 Channel="InetStream"
}
Add(Message,11232751,469,322)
{
 Message="Error BASS initialization"
 Caption="Error"
 Icon=1
}
Add(Message,109118,525,280)
{
 Message="Incorrect version of BASS library "
 Caption="Error"
 Icon=1
}
Add(Edit,2861385,658,231)
{
 Left=10
 Top=15
 Width=370
 Text="http://dnl10.mp3crazy.me/dl/online/1HY0UMu6RLRZR86TOM76lw/1508286033/download_music/2017/04/vitalijj-gordejj-milaja-(mp3crazy.me).mp3"
}
Add(Button,3757077,602,280)
{
 Left=90
 Top=45
 Caption="Пуск"
 link(onClick,1863145:doCreate,[])
}
Add(Button,3963193,602,322)
{
 Left=170
 Top=45
 Caption="Стоп"
 link(onClick,1863145:doDestroy,[(641,328)(641,293)])
}
Add(Message,1770236,784,287)
{
 Message="Конец"
 Caption="Поток"
 Icon=1
}
Add(BASS_ChannelPlayEx,7574751,714,280)
{
 Channel="InetStream"
 link(onEndPlay,1770236:doMessage,[])
}
карма: 0

0
Ответов: 2059
Рейтинг: 132
#53: 2017-10-25 13:05:36 ЛС | профиль | цитата
Поправил http://forum.hiasm.com/getfile/38232 синхронизацию по концу потока по умолчанию.
Не забываем дёргать за ниточку doSetPosition
конец песни, это тоже позиция и точка синхронизации

Add(MainForm,11879092,210,140)
{
 Height=117
 link(onCreate,13443462:doInit,[])
}
Add(BASS_Init,13443462,273,154)
{
}
Add(BASS_StreamCreateURL,1863145,525,154)
{
 Name="InetStream"
 link(onCreate,12481131:doEvent1,[])
 link(URL,2861385:Text,[])
}
Add(Edit,2861385,525,105)
{
 Left=10
 Top=15
 Width=370
 Text="http://dl5.mp3party.net/download/6895592"
}
Add(Button,3757077,469,154)
{
 Left=90
 Top=45
 Caption="Пуск"
 link(onClick,1863145:doCreate,[])
}
Add(Button,3963193,469,196)
{
 Left=170
 Top=45
 Caption="Стоп"
 link(onClick,1863145:doDestroy,[(508,202)(508,167)])
}
Add(Message,1770236,742,161)
{
 Message="Конец"
 Caption="Поток"
 Icon=1
}
Add(BASS_ChannelPlayEx,7574751,672,154)
{
 Channel="InetStream"
 link(onEndPlay,1770236:doMessage,[])
}
Add(Hub,12481131,609,154)
{
 link(onEvent1,7574751:doPlay,[])
 link(onEvent2,7574751:doSetPosition,[])
}
Если не устанавливать какую либо синхронизацию, то данная модификация компонента вообще бесполезна!

Редактировалось 4 раз(а), последний 2017-10-25 13:17:54
карма: 6

0
Ответов: 287
Рейтинг: 5
#54: 2017-10-25 13:40:25 ЛС | профиль | цитата
flint2, В скрипте

Add(MainForm,2953706,343,266)
{
Height=117
link(onCreate,13443462:doInit,[])
}
Add(BASS_Init,13443462,406,280)
{
link(onInit,10183901:doCheck,[])
link(onError,11232751:doMessage,[(459,293)(459,328)])
}
Add(BASS_StreamCreateURL,1863145,658,280)
{
Name="InetStream"
link(onCreate,7574751:doPlay,[])
link(URL,2861385:Text,[])
}
Add(BASS_Version,10183901,469,280)
{
link(onCheckFailed,109118:doMessage,[(515,293)(515,286)])
}
Add(BASS_ChannelPlay,9406897,721,329)
{
Channel="InetStream"
}
Add(Message,11232751,469,322)
{
Message="Error BASS initialization"
Caption="Error"
Icon=1
}
Add(Message,109118,525,280)
{
Message="Incorrect version of BASS library "
Caption="Error"
Icon=1
}
Add(Edit,2861385,658,231)
{
Left=10
Top=15
Width=370
Text="http://dnl10.mp3crazy.me/dl/online/1HY0UMu6RLRZR86TOM76lw/1508286033/download_music/2017/04/vitalijj-gordejj-milaja-(mp3crazy.me).mp3"
}
Add(Button,3757077,602,280)
{
Left=90
Top=45
Caption="Пуск"
link(onClick,1863145:doCreate,[])
}
Add(Button,3963193,602,322)
{
Left=170
Top=45
Caption="Стоп"
link(onClick,1863145:doDestroy,[(641,328)(641,293)])
}
Add(Message,1770236,784,287)
{
Message="Конец"
Caption="Поток"
Icon=1
}
Add(BASS_ChannelPlayEx,7574751,714,280)
{
Channel="InetStream"
link(onEndPlay,1770236:doMessage,[])
}
Все работает нормально а в моей программе вылазит ошибка
1.jpg

Редактировалось 2 раз(а), последний 2017-10-25 13:48:40
карма: 0

0
Ответов: 2059
Рейтинг: 132
#55: 2017-10-25 13:54:03 ЛС | профиль | цитата
Udokanec писал(а):
В скрипте Все работает нормально

Ничего нормального нет!
flint2 писал(а):
Не забываем дёргать за ниточку doSetPosition

Сравни как у тебя сделано и у меня постом выше!
А ты думаешь, что твою схему видно?
Эта заплатка на картинке не даёт представления, что и как сделано.

Add(MainForm,11879092,196,56)
{
 Height=323
 link(onCreate,13443462:doInit,[])
}
Add(BASS_Init,13443462,259,70)
{
}
Add(BASS_StreamCreateURL,1863145,511,70)
{
 Name="InetStream"
 link(onCreate,12481131:doEvent1,[])
 link(URL,2861385:Text,[])
}
Add(Edit,2861385,511,21)
{
 Left=10
 Top=15
 Width=370
 Text="http://dl5.mp3party.net/download/6895592"
}
Add(Button,3757077,455,70)
{
 Left=90
 Top=45
 Caption="Пуск"
 link(onClick,1863145:doCreate,[])
}
Add(Button,3963193,455,112)
{
 Left=170
 Top=45
 Caption="Стоп"
 link(onClick,1863145:doDestroy,[(494,118)(494,83)])
}
Add(Message,1770236,728,77)
{
 Message="Конец"
 Caption="Поток"
 Icon=1
}
Add(BASS_ChannelPlayEx,7574751,658,70)
{
 Channel="InetStream"
 link(onEndPlay,1770236:doMessage,[])
}
Add(Hub,12481131,595,70)
{
 OutCount=3
 link(onEvent1,7574751:doPlay,[])
 link(onEvent2,7574751:doSetPosition,[])
 link(onEvent3,6375846:doData,[(621,90)(621,261)(387,261)(387,433)])
}
Add(BASS_ChannelPosition,350794,413,350)
{
 Channel="InetStream"
 Mode=2
}
Add(DoData,6375846,420,427)
{
 link(onEventData,768769:doEvent1,[])
 link(Data,350794:Length,[])
}
Add(Timer,12131307,334,448)
{
 link(onTimer,13024500:doData,[])
}
Add(DoData,13024500,413,448)
{
 link(onEventData,10472067:doCalc,[(457,454)(457,404)(150,404)(150,356)])
 link(Data,350794:CurPosition,[])
}
Add(Label,10798328,873,441)
{
 Left=25
 Top=165
 Width=15
 Color=4012084
 Font=[DS-Digital,12,1,16777215,1]
 Caption=""
}
Add(Hub,12839992,621,434)
{
 link(onEvent1,8619628:doOperation,[(649,440)(649,398)])
 link(onEvent2,15107888:doOperation,[])
}
Add(Math,8619628,663,392)
{
 OpType=7
 Op2=60
}
Add(Math,15107888,663,441)
{
 OpType=8
 Op2=60
 link(onResult,12854102:doCompare,[])
}
Add(FormatStr,495579,824,441)
{
 @Color=14473430
 Mask="%1:%2"
 Point(FString)
 link(onFString,10798328:doText,[])
 link(Str1,8619628:Result,[(830,433)(669,433)])
}
Add(If_else,12854102,712,441)
{
 @Color=14473430
 Type=1
 Op2=Integer(10)
 link(onTrue,12229998:doStrCat,[])
 link(onFalse,5098350:doWork3,[(807,454)])
}
Add(StrCat,12229998,761,441)
{
 @Color=14473430
 Str1="0"
 link(onStrCat,5098350:doWork2,[])
}
Add(HubEx,5098350,803,441)
{
 link(onEvent,495579:doString,[])
}
Add(Hub,768769,481,427)
{
 link(onEvent1,10472067:doValue,[(507,433)(507,391)(157,391)(157,349)])
 link(onEvent2,12839992:doEvent1,[])
}
Add(PaintBox,10401170,175,246)
{
 Left=60
 Top=165
 Width=225
 Height=19
 Color=4012084
 Cursor=2
 SizeSp=1
 ClearBeforeDraw=0
 Point(MouseX)
 Point(Width)
 Point(doColor)
 Point(onMouseMove)
 Point(onMouseDown)
 Point(onMouseUp)
 link(onBeforeDraw,10472067:doDraw,[(219,252)(219,308)(163,308)(163,363)])
 link(onMouseMove,10472067:doEvent1,[(215,257)(219,259)(219,315)(163,315)(163,370)])
 link(onMouseDown,10472067:doEvent2,[(219,266)(219,322)(163,322)(163,377)])
 link(onMouseUp,10472067:doEvent11,[(219,273)(219,329)(163,329)(163,384)])
}
Add(MultiElementEx,10472067,175,343)
{
 link(onEvent2,4424033:doEvent1,[(327,349)(327,573)])
 link(onEventData,350794:doPosition,[])
 link(Out,10401170:doRefresh,[(219,363)(219,307)(163,307)(163,252)])
 link(Data,10401170:Bitmap,[])
 link(Data1,10401170:MouseX,[])
 link(Data2,10401170:Width,[])
}
BEGIN_SDK
  Add(EditMultiEx,4452642,259,210)
  {
   WorkCount=#7:doValue|6:doCalc|6:doDraw|8:doEvent1|8:doEvent2|9:doEvent11|
   EventCount=#8:onEvent2|11:onEventData|3:Out|
   DataCount=#4:Data|5:Data1|5:Data2|
   Width=538
   Height=571
   link(doValue,14249144:doValue,[(434,216)(434,265)])
   link(doCalc,7657658:doEvent1,[(269,223)(269,489)])
   link(doDraw,9616931:doDraw,[(347,230)(347,370)])
   link(doEvent1,9420304:doEvent1,[(319,237)(319,433)])
   link(doEvent2,9420304:doEvent2,[(319,244)(319,440)])
   link(doEvent11,14301463:doEvent1,[(392,251)(392,496)])
  }
  Add(Bitmap,14613759,441,287)
  {
   Picture=[ZIPEA2D000078DAED9AED52DA4014864F2FA07FAA8804F249BE09910F2541052C6AB1D54E6BDB4BED0DF56FAFA2E71CB38888180582D359669ED9DD6443327BF2F29EDD65FCF56F13F8D3437CE40FF21E7907061FFF9D9D9FFD0CFA87709A76E124E9C0E47C085F2EC7F0FDFA0A6E6F3E333F6E2E252B707B7DC13C75FED73388EB9F22EFFD053F33646C8A81B4447CFB32613D91BE3E7D1CC249AF0BC3E49021ED0D8F8FE07A3286D1490F7AED185A0D1F9ABE0371E0421C06923573D0080BBB5724C77BBBB10E3D86B58490BE46C709DC4C2E60941E31A7A8C3C97804DDB891F50F9816BE27F4AE88B6E4756C3EC68DE5883822AD8C8307D74B0A8D7FC3633ACD10AECECF3807BD189D623B9AEA2EE976D01B7BE88D7DCC535318F67B921518E0EFDC204DB09EBE92CD3E9B8CD1A649D1F7FA5CD27B9074DAE8873EFB5D3B0AE0F26C00C749179AE15DCE79D46E4113CF7B750BEABA068E69405DB212CE1B41C662BBF1772D9375C53AEBC4EC8551E0B0FEA61E183520F2BD37F3CEFC2FB83975F0E2EF364CC6B6ACDCC8786C21FEA83D51DA86CE75D299C84DDB7108A1634FDBE47D84E85F9763B83E1FB2B45C58A60A3681E3FF1C16C7C87C84398338C69A9571D84AFE31AB478E9BA64E3517A0FE3C3C2ED6EAD4CA3E58AAC6FDA8BF95E956B21E1F7466B4E664CCB799D96B33BFCBCB224D2ED2A03BFF6C928D7AA1F040D29FAE5478EDA5897E48F929F960E83A773EA8E9502BEF639F2A986A0D8C5A15742C25ABA066D440D51EA3E92A43F5C5D7E543CD43764F1993E23050735AA6A31A6A8F7C8EF4487A23DD11B436435ED8F05C5E8F211FAC96F7607F7707CA3B1FA05CDA95AC44E901A505EDD282E3F72CFFFE3D8CD34B90F1281631E6A2246F239D89B59783C8E3FD41D7BC9B039226E93C413A15A564CD04E13D0BF7FC025EBF8EB358CC12CF21F680E711FB5045ED534A9EDEBF155AA2F91EEB0FFD8EE601B65EE3FFCB1069B7C5EB00947B8A35549A2BFA769DCB657892A5B83886FE36714C869E839031291A675AB7695E88989A0275A306C9618B3D90A0BD5AD222FD6E52AE4A5AA4BC55AF2AA0610E2B593FFA1C8FFA54CB8CAAEC3D40AB6428254657CA4B31A77539E65BA1A230A42582D6DC683F9EF436C8FEA7F60F8F1154B8]
  }
  Add(Img_Bmp,9616931,434,364)
  {
   Y=3
   link(onDraw,12878194:doDraw,[])
   link(Bitmap,598252:Var2,[])
   link(SourceBitmap,14613759:Bitmap,[])
  }
  Add(PointXY,1405180,497,245)
  {
   Y=13
   link(X,11699433:Var,[])
  }
  Add(GetDataEx,598252,434,336)
  {
   Angle=3
   link(Data,4452642:Data,[(265,341)])
  }
  Add(Bitmap,743712,560,287)
  {
   Picture=[ZIPE202000078DA658FC96ED36014853F36A80221B1440204499A788887788C87D8719CA9499A40D5455B098961C1F3B067C79A35EFC18B20B5D8294B6E1C890D963E9D7BCEB9BFFDBBDCEE383EA1A00A0F84878DBE6EF267FCFF9C7CF9C5C9D75B1E7FBBE3D1F78A273F2A9EFEFC43EC190C5D8724F071ED3E7AB78D7ADAA1D76ED1EBBC42E9BE44EDB4D1950E9ED5A7A3A868AA81DA1FD0316C14DDA66D1828E2BB9A85AE75D14C8BEEA13B64826A1E5174B751CD38A2DA2E3DCB42B50214CB4137037A868366D9746DBBF1AA198ABAF42D41FCE19C3E90BDBE2F5988E948EFF84D766488E9B968B6F4D29992196E2C1A61CB3FD6758DED4554BF6B74FFB0136139D27B09461031F0639EB77AD86EC28B561BCB4FB1243F608731EE306110665455259AB2BFAF318351337B821B8D850C5F689DAAFF74104EF0920C6798E3C62541920A53EEAA9A3019B3AFEF71D331415AE04B1F8EA604794994CF69695AE3DB8A4E90CD08D359A3F178D1F471BEE4765F331CCDA9E43EA164D1B82429960DA372D9EC68BAD57855EFCBD93571B96058CCC8272BA27245566E888B15C954CE141B46933589904ED74CE6324FCFC9856CB6255DACC926E2E76764F3738AC586F5DB37E4CB8DCC5B8A99BC6FB9632CBBB9F89170B6BB946FCDD95E7FE0E2FA2317379FD9DEBC677725F3D527C9DF91C97DFE02E66C8757]
  }
  Add(Memory,14249144,609,259)
  {
   @Hint=#3:Max|
   Default=Integer(100)
   MakeExt(Default,,Max)
   AddHint(51,-1,35,13,@Hint)
   AddHint(50,18,33,13,Default)
  }
  Add(MathParse,8586132,595,427)
  {
   @Hint=#9:Рассчет и|14:выдача позиции|
   DataCount=3
   MathStr="%1*(%3/%2)"
   link(onResult,6852183:doEvent1,[])
   link(X2,14066560:Var3,[(608,408)])
   link(X3,9376726:Var2,[])
   AddHint(18,90,72,13,MathStr)
   AddHint(84,29,82,26,@Hint)
  }
  Add(Hub,6852183,637,427)
  {
   link(onEvent1,4452642:Out,[(724,433)(724,230)])
   link(onEvent2,4452642:onEvent2,[(724,440)(724,216)])
  }
  Add(LineBreak,3034600,539,476)
  {
   Caption="X"
   Type=1
   link(Data,7260969:Value,[])
   Primary=[11699433,-42,-259]
  }
  Add(IndexToChanel,9221743,406,427)
  {
   link(onEvent1,14705890:doEvent1,[(443,433)(443,447)])
  }
  Add(Hub,9420304,378,427)
  {
   InCount=2
   OutCount=1
   link(onEvent1,9221743:doEvent,[])
  }
  Add(MathParse,12665931,329,280)
  {
   DataCount=3
   MathStr="%1*(%2/%3)"
   link(onResult,527484:doWork1,[(529,286)])
   link(X2,14066560:Var1,[(342,247)(461,247)])
   link(X3,9376726:Var1,[(349,268)(481,268)(481,334)])
  }
  Add(GetDataEx,9376726,609,329)
  {
   link(Data,14249144:Value,[])
  }
  Add(GetDataEx,14066560,455,403)
  {
   Angle=3
   link(Data,4452642:Data2,[(279,408)])
  }
  Add(DoData,2804632,595,490)
  {
   link(onEventData,4452642:onEventData,[(708,496)(708,223)])
   link(Data,8586132:Result,[])
  }
  Add(Hub,14705890,448,441)
  {
   link(onEvent1,903031:doOn,[(474,447)(474,440)(268,440)(268,433)])
   link(onEvent2,1294335:doData,[(466,454)(466,531)])
  }
  Add(Switch,903031,280,413)
  {
   DataOn=Integer(0)
   DataOff=Integer(1)
   Point(State)
   Point(doOn)
  }
  Add(Hub,14301463,525,490)
  {
   link(onEvent1,2804632:doData,[])
   link(onEvent2,903031:doReset,[(579,503)(579,465)(268,465)(268,426)])
  }
  Add(Commutator,7657658,280,483)
  {
   link(Index,903031:State,[])
   link(onEvent2,12665931:doCalc,[(320,496)(320,286)])
  }
  Add(HubEx,527484,525,427)
  {
   link(onEvent,7260969:doValue,[])
  }
  Add(Memory,7260969,539,427)
  {
   link(onData,8586132:doCalc,[])
  }
  Add(DoData,1294335,476,525)
  {
   link(onEventData,527484:doWork2,[(517,531)(517,433)])
   link(Data,4452642:Data1,[(482,367)(272,367)])
  }
  Add(Img_Rectangle,12878194,483,364)
  {
   Point1=327680
   PatternStyle=0
   Style=1
   rX=6
   rY=6
   Color=4012084
   BgColor=3372543
   Point(Point2)
   Point(Pattern)
   link(Bitmap,598252:Var3,[(489,341)])
   link(Point2,1405180:Point,[])
   link(Pattern,743712:Bitmap,[(510,352)(566,352)])
  }
END_SDK
Add(Hub,4424033,448,567)
{
 link(onEvent1,10395962:doOperation,[(476,573)(476,531)])
 link(onEvent2,15129426:doOperation,[])
}
Add(Math,10395962,490,525)
{
 OpType=7
 Op2=60
}
Add(Math,15129426,490,574)
{
 OpType=8
 Op2=60
 link(onResult,2122446:doCompare,[])
}
Add(FormatStr,13616945,651,574)
{
 @Color=14473430
 Mask="%1:%2"
 Point(FString)
 link(onFString,704570:doEvent1,[])
 link(Str1,10395962:Result,[(657,566)(496,566)])
}
Add(If_else,2122446,539,574)
{
 @Color=14473430
 Type=1
 Op2=Integer(10)
 link(onTrue,7306238:doStrCat,[])
 link(onFalse,1776191:doWork3,[(634,587)])
}
Add(StrCat,7306238,588,574)
{
 @Color=14473430
 Str1="0"
 link(onStrCat,1776191:doWork2,[])
}
Add(HubEx,1776191,630,574)
{
 link(onEvent,13616945:doString,[])
}
Add(PaintBox,14024717,742,581)
{
 @Color=14473430
 Left=288
 Top=165
 Width=56
 Height=19
 Color=4012084
 Font=[MS Sans Serif,10,0,16744448,1]
 TabOrder=-1
 Hint="Название песни"
 ClearBeforeDraw=0
 Point(doLeft)
 link(onBeforeDraw,5863807:doDraw,[(824,587)(824,636)])
}
Add(Hub,704570,707,574)
{
 @Color=14473430
 link(onEvent1,7963083:doValue,[])
 link(onEvent2,14024717:doRefresh,[])
}
Add(Img_Text,5863807,875,630)
{
 @Color=14473430
 X=1
 Font=[DS-Digital,14,1,16777215,0]
 Point(X)
 MakeExt(Font,,Font)
 MakeExt(Text,,Text)
 link(Bitmap,14024717:Bitmap,[(881,621)(748,621)])
 link(Text,7963083:Value,[])
}
Add(Memory,7963083,882,574)
{
 @Color=14473430
}


Редактировалось 2 раз(а), последний 2017-10-25 14:20:17
карма: 6

0
Ответов: 287
Рейтинг: 5
#56: 2017-10-25 15:03:42 ЛС | профиль | цитата
flint2 Спасибо большое все получилось.А как рейтинг повышать?Да еще что у Вас за нестандартный компонент на схеме.
карма: 0

0
Ответов: 2059
Рейтинг: 132
#57: 2017-10-25 15:34:42 ЛС | профиль | цитата
А чего так не хочешь сделать на DirectShowPlayer? 


Add(MainForm,2953706,287,105)
{
 Width=480
 Height=386
 Color=4012084
 Point(onMouseWheel)
 Point(Handle)
}
Add(Button,9053722,63,294)
{
 Left=5
 Top=290
 Width=75
 Caption="Open MP3"
 link(onClick,4803536:doExecute,[])
}
Add(DoData,6375846,287,322)
{
 link(onEventData,768769:doEvent1,[])
 link(Data,8120099:Length,[])
}
Add(Hub,6613546,210,273)
{
 link(onEvent1,8120099:doPlay,[(252,279)(252,265)])
 link(onEvent2,6375846:doData,[(245,286)(245,328)])
}
Add(Timer,12131307,203,315)
{
 link(onTimer,13024500:doData,[])
}
Add(ODialog,4803536,112,294)
{
 Filter="MP3|*.mp3|mp4|*.mp4|*.*|*.*|"
 link(onExecute,2567518:doEvent1,[])
}
Add(Edit,6935091,287,70)
{
 Left=90
 Top=290
 Width=370
 Text=""
}
Add(Hub,4424033,182,462)
{
 link(onEvent1,10395962:doOperation,[(210,468)(210,426)])
 link(onEvent2,15129426:doOperation,[])
}
Add(Math,10395962,224,420)
{
 OpType=7
 Op2=60
}
Add(Math,15129426,224,469)
{
 OpType=8
 Op2=60
 link(onResult,2122446:doCompare,[])
}
Add(FormatStr,13616945,385,469)
{
 @Color=14473430
 Mask="%1:%2"
 Point(FString)
 link(onFString,704570:doEvent1,[])
 link(Str1,10395962:Result,[(391,461)(230,461)])
}
Add(If_else,2122446,273,469)
{
 @Color=14473430
 Type=1
 Op2=Integer(10)
 link(onTrue,7306238:doStrCat,[])
 link(onFalse,1776191:doWork3,[(368,482)])
}
Add(StrCat,7306238,322,469)
{
 @Color=14473430
 Str1="0"
 link(onStrCat,1776191:doWork2,[])
}
Add(HubEx,1776191,364,469)
{
 link(onEvent,13616945:doString,[])
}
Add(DoData,13024500,280,315)
{
 link(onEventData,10472067:doCalc,[(324,321)(324,244)(58,244)(58,167)])
 link(Data,8120099:Position,[])
}
Add(Label,10798328,742,336)
{
 Left=5
 Top=162
 Width=69
 Height=33
 Color=4012084
 Font=[DS-Digital,14,1,16777215,1]
 Caption=""
}
Add(Hub,12839992,490,329)
{
 link(onEvent1,8619628:doOperation,[(518,335)(518,293)])
 link(onEvent2,15107888:doOperation,[])
}
Add(Math,8619628,532,287)
{
 OpType=7
 Op2=60
}
Add(Math,15107888,532,336)
{
 OpType=8
 Op2=60
 link(onResult,12854102:doCompare,[])
}
Add(FormatStr,495579,693,336)
{
 @Color=14473430
 Mask="%1:%2"
 Point(FString)
 link(onFString,10798328:doText,[])
 link(Str1,8619628:Result,[(699,328)(538,328)])
}
Add(If_else,12854102,581,336)
{
 @Color=14473430
 Type=1
 Op2=Integer(10)
 link(onTrue,12229998:doStrCat,[])
 link(onFalse,5098350:doWork3,[(676,349)])
}
Add(StrCat,12229998,630,336)
{
 @Color=14473430
 Str1="0"
 link(onStrCat,5098350:doWork2,[])
}
Add(HubEx,5098350,672,336)
{
 link(onEvent,495579:doString,[])
}
Add(Hub,768769,350,322)
{
 link(onEvent1,10472067:doValue,[(376,328)(376,244)(58,244)(58,160)])
 link(onEvent2,12839992:doEvent1,[])
}
Add(PaintBox,14024717,476,476)
{
 @Color=14473430
 Left=288
 Top=162
 Width=56
 Height=33
 Color=4012084
 Font=[MS Sans Serif,10,0,16744448,1]
 TabOrder=-1
 Hint="Название песни"
 ClearBeforeDraw=0
 Point(doLeft)
 link(onBeforeDraw,5863807:doDraw,[(558,482)(558,531)])
}
Add(Hub,704570,441,469)
{
 @Color=14473430
 link(onEvent1,7963083:doValue,[])
 link(onEvent2,14024717:doRefresh,[])
}
Add(Img_Text,5863807,609,525)
{
 @Color=14473430
 X=1
 Font=[DS-Digital,14,1,16777215,0]
 Point(X)
 MakeExt(Font,,Font)
 MakeExt(Text,,Text)
 link(Bitmap,14024717:Bitmap,[(615,516)(482,516)])
 link(Text,7963083:Value,[])
}
Add(Memory,7963083,616,469)
{
 @Color=14473430
}
Add(PaintBox,10401170,70,57)
{
 Left=60
 Top=165
 Width=225
 Height=19
 Color=4012084
 Cursor=2
 SizeSp=1
 ClearBeforeDraw=0
 Point(MouseX)
 Point(Width)
 Point(doColor)
 Point(onMouseMove)
 Point(onMouseDown)
 Point(onMouseUp)
 link(onBeforeDraw,10472067:doDraw,[(114,63)(114,119)(58,119)(58,174)])
 link(onMouseMove,10472067:doEvent1,[(114,70)(114,126)(58,126)(58,181)])
 link(onMouseDown,10472067:doEvent2,[(114,77)(114,133)(58,133)(58,188)])
 link(onMouseUp,10472067:doEvent11,[(114,84)(114,140)(58,140)(58,195)])
}
Add(DirectShowPlayer,8120099,280,259)
{
 Point(doFullScreen)
 Point(doPause)
 link(onEndPlay,1770236:doMessage,[])
 link(Handle,2953706:Handle,[])
}
Add(BitBtn,11917917,63,371)
{
 Left=345
 Top=162
 Width=24
 Height=24
 Color=4012084
 Font=[Webdings,14,1,16777215,1]
 FrameColor=4012084
 Caption=";"
 link(onClick,12771080:doEvent1,[])
}
Add(Switch,403246,70,427)
{
 DataOn=String(4)
 DataOff=String(;)
 link(onSwitch,11917917:doCaption,[(114,433)(114,405)(51,405)(51,377)])
}
Add(Hub,12771080,112,371)
{
 link(onEvent1,8120099:doPause,[(199,377)(199,286)])
 link(onEvent2,403246:doSwitch,[(138,384)(138,408)(58,408)(58,433)])
}
Add(MultiElementEx,10472067,70,154)
{
 link(onEvent2,4424033:doEvent1,[(156,160)(156,468)])
 link(onEventData,8120099:doPosition,[(178,167)(178,272)])
 link(Out,10401170:doRefresh,[(114,174)(114,118)(58,118)(58,63)])
 link(Data,10401170:Bitmap,[])
 link(Data1,10401170:MouseX,[])
 link(Data2,10401170:Width,[])
}
BEGIN_SDK
  Add(EditMultiEx,4452642,259,210)
  {
   WorkCount=#7:doValue|6:doCalc|6:doDraw|8:doEvent1|8:doEvent2|9:doEvent11|
   EventCount=#8:onEvent2|11:onEventData|3:Out|
   DataCount=#4:Data|5:Data1|5:Data2|
   Width=538
   Height=571
   link(doValue,14249144:doValue,[(434,216)(434,265)])
   link(doCalc,7657658:doEvent1,[(269,223)(269,489)])
   link(doDraw,9616931:doDraw,[(347,230)(347,370)])
   link(doEvent1,9420304:doEvent1,[(319,237)(319,433)])
   link(doEvent2,9420304:doEvent2,[(319,244)(319,440)])
   link(doEvent11,14301463:doEvent1,[(392,251)(392,496)])
  }
  Add(Bitmap,14613759,441,287)
  {
   Picture=[ZIPEA2D000078DAED9AED52DA4014864F2FA07FAA8804F249BE09910F2541052C6AB1D54E6BDB4BED0DF56FAFA2E71CB38888180582D359669ED9DD6443327BF2F29EDD65FCF56F13F8D3437CE40FF21E7907061FFF9D9D9FFD0CFA87709A76E124E9C0E47C085F2EC7F0FDFA0A6E6F3E333F6E2E252B707B7DC13C75FED73388EB9F22EFFD053F33646C8A81B4447CFB32613D91BE3E7D1CC249AF0BC3E49021ED0D8F8FE07A3286D1490F7AED185A0D1F9ABE0371E0421C06923573D0080BBB5724C77BBBB10E3D86B58490BE46C709DC4C2E60941E31A7A8C3C97804DDB891F50F9816BE27F4AE88B6E4756C3EC68DE5883822AD8C8307D74B0A8D7FC3633ACD10AECECF3807BD189D623B9AEA2EE976D01B7BE88D7DCC535318F67B921518E0EFDC204DB09EBE92CD3E9B8CD1A649D1F7FA5CD27B9074DAE8873EFB5D3B0AE0F26C00C749179AE15DCE79D46E4113CF7B750BEABA068E69405DB212CE1B41C662BBF1772D9375C53AEBC4EC8551E0B0FEA61E183520F2BD37F3CEFC2FB83975F0E2EF364CC6B6ACDCC8786C21FEA83D51DA86CE75D299C84DDB7108A1634FDBE47D84E85F9763B83E1FB2B45C58A60A3681E3FF1C16C7C87C84398338C69A9571D84AFE31AB478E9BA64E3517A0FE3C3C2ED6EAD4CA3E58AAC6FDA8BF95E956B21E1F7466B4E664CCB799D96B33BFCBCB224D2ED2A03BFF6C928D7AA1F040D29FAE5478EDA5897E48F929F960E83A773EA8E9502BEF639F2A986A0D8C5A15742C25ABA066D440D51EA3E92A43F5C5D7E543CD43764F1993E23050735AA6A31A6A8F7C8EF4487A23DD11B436435ED8F05C5E8F211FAC96F7607F7707CA3B1FA05CDA95AC44E901A505EDD282E3F72CFFFE3D8CD34B90F1281631E6A2246F239D89B59783C8E3FD41D7BC9B039226E93C413A15A564CD04E13D0BF7FC025EBF8EB358CC12CF21F680E711FB5045ED534A9EDEBF155AA2F91EEB0FFD8EE601B65EE3FFCB1069B7C5EB00947B8A35549A2BFA769DCB657892A5B83886FE36714C869E839031291A675AB7695E88989A0275A306C9618B3D90A0BD5AD222FD6E52AE4A5AA4BC55AF2AA0610E2B593FFA1C8FFA54CB8CAAEC3D40AB6428254657CA4B31A77539E65BA1A230A42582D6DC683F9EF436C8FEA7F60F8F1154B8]
  }
  Add(Img_Bmp,9616931,434,364)
  {
   Y=3
   link(onDraw,12878194:doDraw,[])
   link(Bitmap,598252:Var2,[])
   link(SourceBitmap,14613759:Bitmap,[])
  }
  Add(PointXY,1405180,497,245)
  {
   Y=13
   link(X,11699433:Var,[])
  }
  Add(GetDataEx,598252,434,336)
  {
   Angle=3
   link(Data,4452642:Data,[(265,341)])
  }
  Add(Bitmap,743712,560,287)
  {
   Picture=[ZIPE202000078DA658FC96ED36014853F36A80221B1440204499A788887788C87D8719CA9499A40D5455B098961C1F3B067C79A35EFC18B20B5D8294B6E1C890D963E9D7BCEB9BFFDBBDCEE383EA1A00A0F84878DBE6EF267FCFF9C7CF9C5C9D75B1E7FBBE3D1F78A273F2A9EFEFC43EC190C5D8724F071ED3E7AB78D7ADAA1D76ED1EBBC42E9BE44EDB4D1950E9ED5A7A3A868AA81DA1FD0316C14DDA66D1828E2BB9A85AE75D14C8BEEA13B64826A1E5174B751CD38A2DA2E3DCB42B50214CB4137037A868366D9746DBBF1AA198ABAF42D41FCE19C3E90BDBE2F5988E948EFF84D766488E9B968B6F4D29992196E2C1A61CB3FD6758DED4554BF6B74FFB0136139D27B09461031F0639EB77AD86EC28B561BCB4FB1243F608731EE306110665455259AB2BFAF318351337B821B8D850C5F689DAAFF74104EF0920C6798E3C62541920A53EEAA9A3019B3AFEF71D331415AE04B1F8EA604794994CF69695AE3DB8A4E90CD08D359A3F178D1F471BEE4765F331CCDA9E43EA164D1B82429960DA372D9EC68BAD57855EFCBD93571B96058CCC8272BA27245566E888B15C954CE141B46933589904ED74CE6324FCFC9856CB6255DACC926E2E76764F3738AC586F5DB37E4CB8DCC5B8A99BC6FB9632CBBB9F89170B6BB946FCDD95E7FE0E2FA2317379FD9DEBC677725F3D527C9DF91C97DFE02E66C8757]
  }
  Add(Memory,14249144,609,259)
  {
   @Hint=#3:Max|
   Default=Integer(100)
   MakeExt(Default,,Max)
   AddHint(51,-1,35,13,@Hint)
   AddHint(50,18,33,13,Default)
  }
  Add(MathParse,8586132,595,427)
  {
   @Hint=#9:Рассчет и|14:выдача позиции|
   DataCount=3
   MathStr="%1*(%3/%2)"
   link(onResult,6852183:doEvent1,[])
   link(X2,14066560:Var3,[(608,408)])
   link(X3,9376726:Var2,[])
   AddHint(18,90,72,13,MathStr)
   AddHint(84,29,82,26,@Hint)
  }
  Add(Hub,6852183,637,427)
  {
   link(onEvent1,4452642:Out,[(724,433)(724,230)])
   link(onEvent2,4452642:onEvent2,[(724,440)(724,216)])
  }
  Add(LineBreak,5751876,539,476)
  {
   Caption="X"
   Type=1
   link(Data,7260969:Value,[])
   Primary=[11699433,-42,-259]
  }
  Add(IndexToChanel,9221743,406,427)
  {
   link(onEvent1,14705890:doEvent1,[(443,433)(443,447)])
  }
  Add(Hub,9420304,378,427)
  {
   InCount=2
   OutCount=1
   link(onEvent1,9221743:doEvent,[])
  }
  Add(MathParse,12665931,329,280)
  {
   DataCount=3
   MathStr="%1*(%2/%3)"
   link(onResult,527484:doWork1,[(529,286)])
   link(X2,14066560:Var1,[(342,247)(461,247)])
   link(X3,9376726:Var1,[(349,268)(481,268)(481,334)])
  }
  Add(GetDataEx,9376726,609,329)
  {
   link(Data,14249144:Value,[])
  }
  Add(GetDataEx,14066560,455,403)
  {
   Angle=3
   link(Data,4452642:Data2,[(279,408)])
  }
  Add(DoData,2804632,595,490)
  {
   link(onEventData,4452642:onEventData,[(708,496)(708,223)])
   link(Data,8586132:Result,[])
  }
  Add(Hub,14705890,448,441)
  {
   link(onEvent1,903031:doOn,[(474,447)(474,440)(268,440)(268,433)])
   link(onEvent2,1294335:doData,[(466,454)(466,531)])
  }
  Add(Switch,903031,280,413)
  {
   DataOn=Integer(0)
   DataOff=Integer(1)
   Point(State)
   Point(doOn)
  }
  Add(Hub,14301463,525,490)
  {
   link(onEvent1,2804632:doData,[])
   link(onEvent2,903031:doReset,[(579,503)(579,465)(268,465)(268,426)])
  }
  Add(Commutator,7657658,280,483)
  {
   link(Index,903031:State,[])
   link(onEvent2,12665931:doCalc,[(320,496)(320,286)])
  }
  Add(HubEx,527484,525,427)
  {
   link(onEvent,7260969:doValue,[])
  }
  Add(Memory,7260969,539,427)
  {
   link(onData,8586132:doCalc,[])
  }
  Add(DoData,1294335,476,525)
  {
   link(onEventData,527484:doWork2,[(517,531)(517,433)])
   link(Data,4452642:Data1,[(482,367)(272,367)])
  }
  Add(Img_Rectangle,12878194,483,364)
  {
   Point1=327680
   PatternStyle=0
   Style=1
   rX=6
   rY=6
   Color=4012084
   BgColor=3372543
   Point(Point2)
   Point(Pattern)
   link(Bitmap,598252:Var3,[(489,341)])
   link(Point2,1405180:Point,[])
   link(Pattern,743712:Bitmap,[(510,352)(566,352)])
  }
END_SDK
Add(Button,13404279,146,126)
{
 Left=5
 Top=265
 Width=75
 Caption="Радио"
 link(onClick,7269793:doData,[])
}
Add(Edit,14664315,200,74)
{
 Left=90
 Top=265
 Width=370
 Text="http://storage.mp3cc.com/download/72505498/L2J4Yy9VcHZZemkvcHZHTTdQcTJHZFk0eVhjZ281MkVOdnRqS2RCYmU1eVZmcUxFSEFZQ0FRbVFhNURHUnFUdGdwVmxsRklwTjlENFQzWlZRemR2dkdWSDFpTXZ6V3ZVRmdXMDZFcVh4NitlOU9KUmFHT3hGZUpNcmgzUkg3UHo/justin-johnson-johnny-b.-goode_(mp3CC.com).mp3"
}
Add(DoData,7269793,200,126)
{
 link(onEventData,15125759:doWork1,[(244,132)(244,204)(200,204)])
 link(Data,14664315:Text,[])
}
Add(Hub,2567518,168,294)
{
 link(onEvent1,15125759:doWork2,[(190,300)(190,279)])
 link(onEvent2,6935091:doText,[(264,307)(264,76)])
}
Add(HubEx,15125759,196,273)
{
 link(onEvent,6613546:doEvent1,[])
}
Add(Message,1770236,364,266)
{
 Message="Конец"
 Caption="Поток"
 Icon=1
}

Да еще что у Вас за нестандартный компонент на схеме.

Какой?

А как рейтинг повышать?

Это не самое главное!
карма: 6

0
Ответов: 287
Рейтинг: 5
#58: 2017-10-25 15:43:23 ЛС | профиль | цитата
Я уже сделал схему на BASS.В вот этой 

Add(MainForm,2953706,287,105)
{
 Width=480
 Height=386
 Color=4012084
 Point(onMouseWheel)
 Point(Handle)
}
Add(Button,9053722,63,294)
{
 Left=5
 Top=290
 Width=75
 Caption="Open MP3"
 link(onClick,4803536:doExecute,[])
}
Add(DoData,6375846,287,322)
{
 link(onEventData,768769:doEvent1,[])
 link(Data,8120099:Length,[])
}
Add(Hub,6613546,210,273)
{
 link(onEvent1,8120099:doPlay,[(252,279)(252,265)])
 link(onEvent2,6375846:doData,[(245,286)(245,328)])
}
Add(Timer,12131307,203,315)
{
 link(onTimer,13024500:doData,[])
}
Add(ODialog,4803536,112,294)
{
 Filter="MP3|*.mp3|mp4|*.mp4|*.*|*.*|"
 link(onExecute,2567518:doEvent1,[])
}
Add(Edit,6935091,287,70)
{
 Left=90
 Top=290
 Width=370
 Text=""
}
Add(Hub,4424033,182,462)
{
 link(onEvent1,10395962:doOperation,[(210,468)(210,426)])
 link(onEvent2,15129426:doOperation,[])
}
Add(Math,10395962,224,420)
{
 OpType=7
 Op2=60
}
Add(Math,15129426,224,469)
{
 OpType=8
 Op2=60
 link(onResult,2122446:doCompare,[])
}
Add(FormatStr,13616945,385,469)
{
 @Color=14473430
 Mask="%1:%2"
 Point(FString)
 link(onFString,704570:doEvent1,[])
 link(Str1,10395962:Result,[(391,461)(230,461)])
}
Add(If_else,2122446,273,469)
{
 @Color=14473430
 Type=1
 Op2=Integer(10)
 link(onTrue,7306238:doStrCat,[])
 link(onFalse,1776191:doWork3,[(368,482)])
}
Add(StrCat,7306238,322,469)
{
 @Color=14473430
 Str1="0"
 link(onStrCat,1776191:doWork2,[])
}
Add(HubEx,1776191,364,469)
{
 link(onEvent,13616945:doString,[])
}
Add(DoData,13024500,280,315)
{
 link(onEventData,10472067:doCalc,[(324,321)(324,244)(58,244)(58,167)])
 link(Data,8120099:Position,[])
}
Add(Label,10798328,742,336)
{
 Left=5
 Top=162
 Width=69
 Height=33
 Color=4012084
 Font=[DS-Digital,14,1,16777215,1]
 Caption=""
}
Add(Hub,12839992,490,329)
{
 link(onEvent1,8619628:doOperation,[(518,335)(518,293)])
 link(onEvent2,15107888:doOperation,[])
}
Add(Math,8619628,532,287)
{
 OpType=7
 Op2=60
}
Add(Math,15107888,532,336)
{
 OpType=8
 Op2=60
 link(onResult,12854102:doCompare,[])
}
Add(FormatStr,495579,693,336)
{
 @Color=14473430
 Mask="%1:%2"
 Point(FString)
 link(onFString,10798328:doText,[])
 link(Str1,8619628:Result,[(699,328)(538,328)])
}
Add(If_else,12854102,581,336)
{
 @Color=14473430
 Type=1
 Op2=Integer(10)
 link(onTrue,12229998:doStrCat,[])
 link(onFalse,5098350:doWork3,[(676,349)])
}
Add(StrCat,12229998,630,336)
{
 @Color=14473430
 Str1="0"
 link(onStrCat,5098350:doWork2,[])
}
Add(HubEx,5098350,672,336)
{
 link(onEvent,495579:doString,[])
}
Add(Hub,768769,350,322)
{
 link(onEvent1,10472067:doValue,[(376,328)(376,244)(58,244)(58,160)])
 link(onEvent2,12839992:doEvent1,[])
}
Add(PaintBox,14024717,476,476)
{
 @Color=14473430
 Left=288
 Top=162
 Width=56
 Height=33
 Color=4012084
 Font=[MS Sans Serif,10,0,16744448,1]
 TabOrder=-1
 Hint="Название песни"
 ClearBeforeDraw=0
 Point(doLeft)
 link(onBeforeDraw,5863807:doDraw,[(558,482)(558,531)])
}
Add(Hub,704570,441,469)
{
 @Color=14473430
 link(onEvent1,7963083:doValue,[])
 link(onEvent2,14024717:doRefresh,[])
}
Add(Img_Text,5863807,609,525)
{
 @Color=14473430
 X=1
 Font=[DS-Digital,14,1,16777215,0]
 Point(X)
 MakeExt(Font,,Font)
 MakeExt(Text,,Text)
 link(Bitmap,14024717:Bitmap,[(615,516)(482,516)])
 link(Text,7963083:Value,[])
}
Add(Memory,7963083,616,469)
{
 @Color=14473430
}
Add(PaintBox,10401170,70,57)
{
 Left=60
 Top=165
 Width=225
 Height=19
 Color=4012084
 Cursor=2
 SizeSp=1
 ClearBeforeDraw=0
 Point(MouseX)
 Point(Width)
 Point(doColor)
 Point(onMouseMove)
 Point(onMouseDown)
 Point(onMouseUp)
 link(onBeforeDraw,10472067:doDraw,[(114,63)(114,119)(58,119)(58,174)])
 link(onMouseMove,10472067:doEvent1,[(114,70)(114,126)(58,126)(58,181)])
 link(onMouseDown,10472067:doEvent2,[(114,77)(114,133)(58,133)(58,188)])
 link(onMouseUp,10472067:doEvent11,[(114,84)(114,140)(58,140)(58,195)])
}
Add(DirectShowPlayer,8120099,280,259)
{
 Point(doFullScreen)
 Point(doPause)
 link(onEndPlay,1770236:doMessage,[])
 link(Handle,2953706:Handle,[])
}
Add(BitBtn,11917917,63,371)
{
 Left=345
 Top=162
 Width=24
 Height=24
 Color=4012084
 Font=[Webdings,14,1,16777215,1]
 FrameColor=4012084
 Caption=";"
 link(onClick,12771080:doEvent1,[])
}
Add(Switch,403246,70,427)
{
 DataOn=String(4)
 DataOff=String(;)
 link(onSwitch,11917917:doCaption,[(114,433)(114,405)(51,405)(51,377)])
}
Add(Hub,12771080,112,371)
{
 link(onEvent1,8120099:doPause,[(199,377)(199,286)])
 link(onEvent2,403246:doSwitch,[(138,384)(138,408)(58,408)(58,433)])
}
Add(MultiElementEx,10472067,70,154)
{
 link(onEvent2,4424033:doEvent1,[(156,160)(156,468)])
 link(onEventData,8120099:doPosition,[(178,167)(178,272)])
 link(Out,10401170:doRefresh,[(114,174)(114,118)(58,118)(58,63)])
 link(Data,10401170:Bitmap,[])
 link(Data1,10401170:MouseX,[])
 link(Data2,10401170:Width,[])
}
BEGIN_SDK
  Add(EditMultiEx,4452642,259,210)
  {
   WorkCount=#7:doValue|6:doCalc|6:doDraw|8:doEvent1|8:doEvent2|9:doEvent11|
   EventCount=#8:onEvent2|11:onEventData|3:Out|
   DataCount=#4:Data|5:Data1|5:Data2|
   Width=538
   Height=571
   link(doValue,14249144:doValue,[(434,216)(434,265)])
   link(doCalc,7657658:doEvent1,[(269,223)(269,489)])
   link(doDraw,9616931:doDraw,[(347,230)(347,370)])
   link(doEvent1,9420304:doEvent1,[(319,237)(319,433)])
   link(doEvent2,9420304:doEvent2,[(319,244)(319,440)])
   link(doEvent11,14301463:doEvent1,[(392,251)(392,496)])
  }
  Add(Bitmap,14613759,441,287)
  {
   Picture=[ZIPEA2D000078DAED9AED52DA4014864F2FA07FAA8804F249BE09910F2541052C6AB1D54E6BDB4BED0DF56FAFA2E71CB38888180582D359669ED9DD6443327BF2F29EDD65FCF56F13F8D3437CE40FF21E7907061FFF9D9D9FFD0CFA87709A76E124E9C0E47C085F2EC7F0FDFA0A6E6F3E333F6E2E252B707B7DC13C75FED73388EB9F22EFFD053F33646C8A81B4447CFB32613D91BE3E7D1CC249AF0BC3E49021ED0D8F8FE07A3286D1490F7AED185A0D1F9ABE0371E0421C06923573D0080BBB5724C77BBBB10E3D86B58490BE46C709DC4C2E60941E31A7A8C3C97804DDB891F50F9816BE27F4AE88B6E4756C3EC68DE5883822AD8C8307D74B0A8D7FC3633ACD10AECECF3807BD189D623B9AEA2EE976D01B7BE88D7DCC535318F67B921518E0EFDC204DB09EBE92CD3E9B8CD1A649D1F7FA5CD27B9074DAE8873EFB5D3B0AE0F26C00C749179AE15DCE79D46E4113CF7B750BEABA068E69405DB212CE1B41C662BBF1772D9375C53AEBC4EC8551E0B0FEA61E183520F2BD37F3CEFC2FB83975F0E2EF364CC6B6ACDCC8786C21FEA83D51DA86CE75D299C84DDB7108A1634FDBE47D84E85F9763B83E1FB2B45C58A60A3681E3FF1C16C7C87C84398338C69A9571D84AFE31AB478E9BA64E3517A0FE3C3C2ED6EAD4CA3E58AAC6FDA8BF95E956B21E1F7466B4E664CCB799D96B33BFCBCB224D2ED2A03BFF6C928D7AA1F040D29FAE5478EDA5897E48F929F960E83A773EA8E9502BEF639F2A986A0D8C5A15742C25ABA066D440D51EA3E92A43F5C5D7E543CD43764F1993E23050735AA6A31A6A8F7C8EF4487A23DD11B436435ED8F05C5E8F211FAC96F7607F7707CA3B1FA05CDA95AC44E901A505EDD282E3F72CFFFE3D8CD34B90F1281631E6A2246F239D89B59783C8E3FD41D7BC9B039226E93C413A15A564CD04E13D0BF7FC025EBF8EB358CC12CF21F680E711FB5045ED534A9EDEBF155AA2F91EEB0FFD8EE601B65EE3FFCB1069B7C5EB00947B8A35549A2BFA769DCB657892A5B83886FE36714C869E839031291A675AB7695E88989A0275A306C9618B3D90A0BD5AD222FD6E52AE4A5AA4BC55AF2AA0610E2B593FFA1C8FFA54CB8CAAEC3D40AB6428254657CA4B31A77539E65BA1A230A42582D6DC683F9EF436C8FEA7F60F8F1154B8]
  }
  Add(Img_Bmp,9616931,434,364)
  {
   Y=3
   link(onDraw,12878194:doDraw,[])
   link(Bitmap,598252:Var2,[])
   link(SourceBitmap,14613759:Bitmap,[])
  }
  Add(PointXY,1405180,497,245)
  {
   Y=13
   link(X,11699433:Var,[])
  }
  Add(GetDataEx,598252,434,336)
  {
   Angle=3
   link(Data,4452642:Data,[(265,341)])
  }
  Add(Bitmap,743712,560,287)
  {
   Picture=[ZIPE202000078DA658FC96ED36014853F36A80221B1440204499A788887788C87D8719CA9499A40D5455B098961C1F3B067C79A35EFC18B20B5D8294B6E1C890D963E9D7BCEB9BFFDBBDCEE383EA1A00A0F84878DBE6EF267FCFF9C7CF9C5C9D75B1E7FBBE3D1F78A273F2A9EFEFC43EC190C5D8724F071ED3E7AB78D7ADAA1D76ED1EBBC42E9BE44EDB4D1950E9ED5A7A3A868AA81DA1FD0316C14DDA66D1828E2BB9A85AE75D14C8BEEA13B64826A1E5174B751CD38A2DA2E3DCB42B50214CB4137037A868366D9746DBBF1AA198ABAF42D41FCE19C3E90BDBE2F5988E948EFF84D766488E9B968B6F4D29992196E2C1A61CB3FD6758DED4554BF6B74FFB0136139D27B09461031F0639EB77AD86EC28B561BCB4FB1243F608731EE306110665455259AB2BFAF318351337B821B8D850C5F689DAAFF74104EF0920C6798E3C62541920A53EEAA9A3019B3AFEF71D331415AE04B1F8EA604794994CF69695AE3DB8A4E90CD08D359A3F178D1F471BEE4765F331CCDA9E43EA164D1B82429960DA372D9EC68BAD57855EFCBD93571B96058CCC8272BA27245566E888B15C954CE141B46933589904ED74CE6324FCFC9856CB6255DACC926E2E76764F3738AC586F5DB37E4CB8DCC5B8A99BC6FB9632CBBB9F89170B6BB946FCDD95E7FE0E2FA2317379FD9DEBC677725F3D527C9DF91C97DFE02E66C8757]
  }
  Add(Memory,14249144,609,259)
  {
   @Hint=#3:Max|
   Default=Integer(100)
   MakeExt(Default,,Max)
   AddHint(51,-1,35,13,@Hint)
   AddHint(50,18,33,13,Default)
  }
  Add(MathParse,8586132,595,427)
  {
   @Hint=#9:Рассчет и|14:выдача позиции|
   DataCount=3
   MathStr="%1*(%3/%2)"
   link(onResult,6852183:doEvent1,[])
   link(X2,14066560:Var3,[(608,408)])
   link(X3,9376726:Var2,[])
   AddHint(18,90,72,13,MathStr)
   AddHint(84,29,82,26,@Hint)
  }
  Add(Hub,6852183,637,427)
  {
   link(onEvent1,4452642:Out,[(724,433)(724,230)])
   link(onEvent2,4452642:onEvent2,[(724,440)(724,216)])
  }
  Add(LineBreak,5751876,539,476)
  {
   Caption="X"
   Type=1
   link(Data,7260969:Value,[])
   Primary=[11699433,-42,-259]
  }
  Add(IndexToChanel,9221743,406,427)
  {
   link(onEvent1,14705890:doEvent1,[(443,433)(443,447)])
  }
  Add(Hub,9420304,378,427)
  {
   InCount=2
   OutCount=1
   link(onEvent1,9221743:doEvent,[])
  }
  Add(MathParse,12665931,329,280)
  {
   DataCount=3
   MathStr="%1*(%2/%3)"
   link(onResult,527484:doWork1,[(529,286)])
   link(X2,14066560:Var1,[(342,247)(461,247)])
   link(X3,9376726:Var1,[(349,268)(481,268)(481,334)])
  }
  Add(GetDataEx,9376726,609,329)
  {
   link(Data,14249144:Value,[])
  }
  Add(GetDataEx,14066560,455,403)
  {
   Angle=3
   link(Data,4452642:Data2,[(279,408)])
  }
  Add(DoData,2804632,595,490)
  {
   link(onEventData,4452642:onEventData,[(708,496)(708,223)])
   link(Data,8586132:Result,[])
  }
  Add(Hub,14705890,448,441)
  {
   link(onEvent1,903031:doOn,[(474,447)(474,440)(268,440)(268,433)])
   link(onEvent2,1294335:doData,[(466,454)(466,531)])
  }
  Add(Switch,903031,280,413)
  {
   DataOn=Integer(0)
   DataOff=Integer(1)
   Point(State)
   Point(doOn)
  }
  Add(Hub,14301463,525,490)
  {
   link(onEvent1,2804632:doData,[])
   link(onEvent2,903031:doReset,[(579,503)(579,465)(268,465)(268,426)])
  }
  Add(Commutator,7657658,280,483)
  {
   link(Index,903031:State,[])
   link(onEvent2,12665931:doCalc,[(320,496)(320,286)])
  }
  Add(HubEx,527484,525,427)
  {
   link(onEvent,7260969:doValue,[])
  }
  Add(Memory,7260969,539,427)
  {
   link(onData,8586132:doCalc,[])
  }
  Add(DoData,1294335,476,525)
  {
   link(onEventData,527484:doWork2,[(517,531)(517,433)])
   link(Data,4452642:Data1,[(482,367)(272,367)])
  }
  Add(Img_Rectangle,12878194,483,364)
  {
   Point1=327680
   PatternStyle=0
   Style=1
   rX=6
   rY=6
   Color=4012084
   BgColor=3372543
   Point(Point2)
   Point(Pattern)
   link(Bitmap,598252:Var3,[(489,341)])
   link(Point2,1405180:Point,[])
   link(Pattern,743712:Bitmap,[(510,352)(566,352)])
  }
END_SDK
Add(Button,13404279,146,126)
{
 Left=5
 Top=265
 Width=75
 Caption="Радио"
 link(onClick,7269793:doData,[])
}
Add(Edit,14664315,200,74)
{
 Left=90
 Top=265
 Width=370
 Text="http://storage.mp3cc.com/download/72505498/L2J4Yy9VcHZZemkvcHZHTTdQcTJHZFk0eVhjZ281MkVOdnRqS2RCYmU1eVZmcUxFSEFZQ0FRbVFhNURHUnFUdGdwVmxsRklwTjlENFQzWlZRemR2dkdWSDFpTXZ6V3ZVRmdXMDZFcVh4NitlOU9KUmFHT3hGZUpNcmgzUkg3UHo/justin-johnson-johnny-b.-goode_(mp3CC.com).mp3"
}
Add(DoData,7269793,200,126)
{
 link(onEventData,15125759:doWork1,[(244,132)(244,204)(200,204)])
 link(Data,14664315:Text,[])
}
Add(Hub,2567518,168,294)
{
 link(onEvent1,15125759:doWork2,[(190,300)(190,279)])
 link(onEvent2,6935091:doText,[(264,307)(264,76)])
}
Add(HubEx,15125759,196,273)
{
 link(onEvent,6613546:doEvent1,[])
}
Add(Message,1770236,364,266)
{
 Message="Конец"
 Caption="Поток"
 Icon=1
}


в мультике
карма: 0

0
Ответов: 2059
Рейтинг: 132
#59: 2017-10-25 16:01:13 ЛС | профиль | цитата
Я уже сделал схему на BASS.В вот этой

Это моя постом выше!
Тут BASS даже не заходил.

А понял - нестандартный компонент на схеме, в мультике?
Просо валялась схемка, немножко допилил, чтобы позицию устанавливать, или прогресс отображать.
Не помню.

Вообще-то, внизу, во вкладке отладка можно посмотреть название "неизвестного" компонента.
Вот это? http://forum.hiasm.com/getfile/5664

Редактировалось 4 раз(а), последний 2017-10-25 17:45:42
карма: 6

0
59
ФорумыПомощь по пакетуMp3 ← Ctrl1234Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2024
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика