Make(delphi)
ver(4.04 build 184)
Add(Label,16395594,357,238)
{
 @Color=16777215
 Left=25
 Top=440
 Width=173
 Height=17
 Color=11921092
 Font=[Tahoma,8,0,0,204]
 Visible=1
 Caption=""
}
Add(MultiElement,12953831,357,63)
{
 @Color=16777215
 PColor(onEvent1,16777215)
 link(onEvent1,16395594:doText,[(520,69)(331,244)])
}
BEGIN_SDK
  Add(EditMulti,12521559,28,28)
  {
   EventCount=1
   WorkCount=1
   Width=153
   Height=46
   link(doWork1,7387326:doEvent1,[])
  }
  Add(Timer,10733887,70,28)
  {
   Interval=3000
   Enable=1
   AutoStop=1
   link(onTimer,4395694:doWork2,[])
  }
  Add(Hub,7387326,42,28)
  {
   link(onEvent1,10733887:doTimer,[])
   link(onEvent2,1488189:doData,[])
  }
  Add(DoData,1488189,119,35)
  {
   Data=String(© Петр Паули, 2010 aka petrocan)
   link(onEventData,4395694:doWork3,[(165,41)])
  }
  Add(HubEx,4395694,161,28)
  {
   link(onEvent,12521559:onEvent1,[])
  }
END_SDK
Add(VisualShape,1810662,357,63)
{
 @Color=16777215
 Top=440
 Width=20
 Height=20
 Color=11921092
 PColor=8421504
 Color2=65535
 ShapeType=4
 Transparent=0
 Point(onMouseDown)
 PColor(onMouseDown,16777215)
 link(onMouseDown,12953831:doWork1,[(401,69)(401,57)(345,57)(345,69)])
}
Add(MainForm,4439525,357,63)
{
 Width=332
 Height=487
 Color=11921092
 Caption="LRC reader+player mp3"
 BorderStyle=1
}
Add(Button,12169720,84,119)
{
 Left=5
 Top=75
 Width=155
 Height=25
 Color=11921092
 Font=[tahoma,9,0,0,1]
 Caption="Начать проигрывание"
 link(onClick,11892224:doEvent1,[])
}
Add(MediaPlayer,7716745,308,133)
{
 link(onEndPlay,12464237:doEvent1,[])
 link(FileName,794625:Text,[])
}
Add(Hub,11892224,133,119)
{
 OutCount=5
 link(onEvent1,1426082:doWork3,[(270,125)])
 link(onEvent2,6137128:doWork1,[(157,132)])
 link(onEvent3,7716745:doPlay,[])
 link(onEvent4,15962171:doWork1,[(166,146)])
 link(onEvent5,711528:doTimer,[(246,153)(246,195)])
}
Add(Button,4276871,245,28)
{
 Left=160
 Top=75
 Width=80
 Height=25
 Color=11921092
 Font=[tahoma,9,0,0,1]
 Caption="Pause"
 link(onClick,7716745:doPause,[(290,34)(290,153)])
}
Add(StyleXP,9353879,357,28)
{
}
Add(StrList,2691613,210,176)
{
}
Add(ArrayRW,5401229,224,239)
{
 link(onRead,9775315:doSearch,[])
 link(Array,2691613:Array,[])
}
Add(BlockFind,9775315,266,239)
{
 IncludeBlock=1
 StartBlock="["
 EndBlock="]"
 link(onSearch,2211765:doValue,[])
}
Add(Delete,12028149,504,239)
{
 Count=3
 Direction=1
 link(onDelete,8677039:doWork3,[(543,245)])
}
Add(Label,2655448,658,196)
{
 Left=5
 Top=5
 Width=197
 Height=17
 Color=11921092
 Font=[Tahoma,8,0,0,1]
 Caption="Здесь будет выводиться текст песни"
}
Add(Counter,4383426,175,239)
{
 Min=-1
 Max=500
 Default=-1
 link(onNext,5401229:doRead,[])
}
Add(Math,3416333,308,189)
{
 OpType=3
 Op2=1000
 ResultType=0
 link(onResult,13943984:doConvert,[])
 link(Op1,7716745:Position,[])
}
Add(DateConvertor,13943984,357,189)
{
 Mode=16
 Format="mm:ss"
 Point(Result)
 link(onResult,12042458:doCompare,[])
}
Add(Timer,711528,259,189)
{
 Interval=500
 Enable=1
 link(onTimer,3416333:doOperation,[])
}
Add(StrMask,12042458,553,189)
{
 Point(doMask)
 link(onTrue,8221655:doEvent1,[])
}
Add(Hub,8221655,595,196)
{
 link(onEvent1,16440970:Wire2,[(630,202)(630,146)])
 link(onEvent2,15962171:doWork3,[(621,209)(621,172)])
}
Add(HubEx,15962171,162,166)
{
 Angle=1
 link(onEvent,4383426:doNext,[(166,245)])
}
Add(Hub,12464237,357,133)
{
 OutCount=4
 link(onEvent1,16440970:Wire1,[])
 link(onEvent2,711528:doStop,[(378,146)(378,180)(250,180)(250,202)])
 link(onEvent3,8132885:doWork1,[(648,153)])
 link(onEvent4,10779722:In,[])
}
Add(HubEx,8132885,644,196)
{
 link(onEvent,2655448:doText,[])
}
Add(Button,1321139,189,98)
{
 Left=240
 Top=75
 Width=80
 Height=25
 Color=11921092
 Font=[tahoma,9,0,0,1]
 Caption="Stop"
 link(onClick,5528687:doEvent1,[])
}
Add(Hub,5528687,238,98)
{
 link(onEvent1,7716745:doStop,[(283,104)(283,146)])
 link(onEvent2,1426082:doWork2,[])
}
Add(HubEx,1426082,266,105)
{
 link(onEvent,8132885:doWork3,[(699,111)(699,234)(648,234)])
}
Add(ChildGroupBox,16696567,357,280)
{
 link(Data1,13943984:Result,[])
}
BEGIN_SDK
  Add(EditMulti,16310324,21,21)
  {
   DataCount=1
   Width=321
   Height=228
  }
  Add(GroupBox,4412252,42,210)
  {
   Left=2
   Top=100
   Width=321
   Height=336
   Color=11921092
   Font=[MS Sans Serif,8,0,16777215,1]
   Caption="Запись текста"
  }
  Add(Button,2791107,91,35)
  {
   Left=5
   Top=75
   Width=65
   Color=11921092
   Font=[Tahoma,8,0,0,1]
   Caption="Add"
   link(onClick,5904044:doAdd,[])
  }
  Add(ListBox,5904044,147,35)
  {
   Left=5
   Top=95
   Width=65
   Height=215
   Font=[Tahoma,8,0,0,1]
   link(onChange,5379487:doOperation,[(191,41)(191,83)(146,83)(146,97)])
   link(Str,16310324:Data1,[(153,28)(27,28)])
  }
  Add(ListBox,11115529,224,42)
  {
   Left=70
   Top=95
   Width=245
   Height=215
   Font=[Tahoma,8,0,0,1]
   Point(doSelect)
  }
  Add(FormatStr,683296,231,175)
  {
   Mask="[%1] %2"
   link(onFString,11130769:doAdd,[])
   link(Str2,2374584:Item,[])
  }
  Add(ArrayRW,2374584,238,119)
  {
   link(Array,11115529:Array,[])
   link(Index,1590044:Index,[(251,106)(209,106)(209,182)(174,182)])
  }
  Add(Button,9442690,101,140)
  {
   Left=5
   Top=310
   Width=310
   Color=11921092
   Font=[Tahoma,8,0,0,1]
   Caption="Сохранить в lirycs файл (.lrc)"
   link(onClick,1590044:doEnum,[])
  }
  Add(Hub,12286135,203,140)
  {
   link(onEvent1,2374584:doRead,[(227,146)(227,125)])
   link(onEvent2,683296:doString,[(224,153)(224,181)])
  }
  Add(ArrayEnum,1590044,161,140)
  {
   link(onItem,12286135:doEvent1,[])
   link(onEndEnum,7251657:doExecute,[(198,153)(198,216)])
   link(Array,5904044:Array,[])
  }
  Add(Math,5379487,154,91)
  {
   OpType=1
   Op2=1
   link(onResult,11115529:doSelect,[(205,97)(205,90)])
   link(Op1,5904044:Count,[])
  }
  Add(Label,12896354,294,42)
  {
   Left=10
   Top=15
   Width=305
   Height=57
   Color=11921092
   Font=[Tahoma,8,0,0,204]
   Caption="Lirycs creator - загрузите текст песни без пропусков строк, запустите песню - и вперед, нажимайте Add когда начинается очередная строка (первая в том числе)\r\nПо окончанию нажмите Сохранить."
   AutoSize=1
  }
  Add(Button,6112803,43,70)
  {
   Left=70
   Top=75
   Width=245
   Color=11921092
   Font=[Tahoma,8,0,0,1]
   Caption="Загрузить текст"
   link(onClick,9882034:doExecute,[])
  }
  Add(ODialog,9882034,91,70)
  {
   Filter="Текстовые файлы|*.txt"
   Title="Загрузить текст"
   FileName=""
   link(onExecute,11115529:doLoad,[])
  }
  Add(StrList,11130769,294,175)
  {
  }
  Add(SDialog,7251657,231,210)
  {
   Filter="Lirycs|*.lrc"
   Title="Сохранить записанный LRC"
   FileName=""
   link(onExecute,11130769:doSave,[])
  }
END_SDK
Add(Edit,794625,308,63)
{
 Left=5
 Top=25
 Width=295
 Color=16777215
 Font=[tahoma,9,0,0,1]
 Text=""
}
Add(ODialog,7845408,245,63)
{
 Filter="Mp3|*.mp3"
 Title="Загрузить mp3"
 FileName=""
 link(onExecute,794625:doText,[])
}
Add(Button,12219808,189,63)
{
 Left=300
 Top=25
 Width=25
 Color=11921092
 Font=[tahoma,9,0,0,1]
 Hint="Загрузить mp3"
 Caption="..."
 link(onClick,7845408:doExecute,[])
}
Add(Button,4538265,84,204)
{
 Left=5
 Top=50
 Width=290
 Height=25
 Color=11921092
 Font=[tahoma,9,0,0,1]
 Caption="Загрузить Lirycs песни"
 link(onClick,6696762:doExecute,[])
}
Add(LED,2816734,84,245)
{
 Left=300
 Top=55
 Width=20
 Height=20
 Color=11921092
 Font=[tahoma,9,0,0,1]
 Hint="Текст загружен"
}
Add(ODialog,6696762,126,204)
{
 Filter="Lirycs|*.lrc"
 Title="Загрузить LRC файл"
 FileName=""
 link(onExecute,10027292:doEvent1,[])
}
Add(Hub,10027292,175,204)
{
 link(onEvent1,2691613:doLoad,[])
 link(onEvent2,2816734:doOn,[(201,217)(201,199)(73,199)(73,265)])
}
Add(MultiStrData,10970858,224,280)
{
 Char="]"
 link(Str,5401229:Item,[])
 link(onPart2,8132885:doWork2,[(635,293)(635,202)])
}
Add(Length,12874211,357,239)
{
 link(onLength,5159559:doCompare,[])
}
Add(If_else,5159559,406,239)
{
 Op2=String(8)
 link(onTrue,136238:doReplace,[])
 link(onFalse,8677039:doWork2,[(447,252)(447,202)])
}
Add(HubEx,8677039,539,196)
{
 link(onEvent,12042458:doMask,[])
}
Add(Replace,136238,455,239)
{
 SubStr="."
 DestStr=":"
 link(onReplace,12028149:doDelete,[(489,245)(489,244)(503,244)(503,245)])
 link(Str,2211765:Value,[(461,229)(349,229)(349,277)(314,277)])
}
Add(Memory,2211765,308,239)
{
 link(onData,12874211:doLength,[])
}
Add(CableEvent,2002501,140,273)
{
 link(Wire1,6137128:doWork3,[(157,279)])
 link(Wire2,10970858:doSplit,[])
}
Add(CableWork,16440970,651,133)
{
 link(Cable,16760579:In,[])
}
Add(HubEx,6137128,153,253)
{
 link(onEvent,4383426:doReset,[])
}
Add(LineBreak,6970604,84,280)
{
 Color=15780518
 link(Out,2002501:Cable,[(127,286)(127,279)])
 Primary=[16760579,595,-147]
}
Add(LineBreak,10003324,35,252)
{
 Caption="off"
 Color=255
 link(Out,2816734:doOff,[])
 Primary=[10779722,350,-98]
}