Add(MainForm,2953706,294,133)
{
 Width=348
 Height=562
 Caption="Лог убийства"
 BorderStyle=3
 Position=1
 link(onCreate,9235146:doWork1,[(356,153)])
}
Add(StrList,6286943,371,154)
{
 Strings=#32:У попа была собака, он её любил,|33:Она съела кусок мяса, он её убил,|34:В землю закопал и надпись написал:|
 Point(Index)
 Point(doGetString)
 Point(onGetString)
 Point(IdxToSelect)
 link(onGetString,16075684:doCase,[])
 link(IdxToSelect,11313563:reCalc,[])
}
Add(Timer,5622247,294,175)
{
 link(onTimer,9235146:doWork2,[])
}
Add(Case,16075684,427,161)
{
 DataOnTrue=String(\r\n)
 link(onNextCase,6988846:doEvent1,[])
 link(onTrue,6988846:doEvent2,[])
}
Add(Memo,14392347,560,161)
{
 Left=5
 Top=10
 Width=330
 Height=515
 Font=[MS Sans Serif,10,1,0,1]
 Ctl3D=1
 ScrollBars=2
 ReadOnly=0
 Point(doSetSelStart)
 Point(doEnsureVisible)
}
Add(Hub,6988846,469,161)
{
 InCount=2
 OutCount=3
 link(onEvent1,14392347:doAdd,[])
 link(onEvent2,2151330:doText,[])
 link(onEvent3,14392347:doEnsureVisible,[(496,181)(496,216)])
}
Add(VisualStrings,2151330,504,168)
{
 Lines=#5:10000|
 Width=39
 Point(doText)
 Point(onText)
 link(onText,14392347:doSetSelStart,[(551,174)(551,209)])
}
Add(MathParse,11313563,378,105)
{
 DataCount=1
 MathStr="%1 + 1"
 Point(reCalc)
 link(X1,6286943:Index,[(384,96)(286,96)(286,215)(398,215)])
}
Add(HubEx,9235146,352,175)
{
 Angle=1
 link(onEvent,6286943:doGetString,[(356,202)])
}