Make(delphi)
ver(4.04 build 185)
Add(MainForm,2953706,84,84)
{
 Point(onKeyDown)
 link(onKeyDown,5188877:doCase,[])
}
Add(PaintBox,6139397,182,287)
{
 Left=5
 Top=10
 Width=370
 Height=25
 Color=0
 ClearBeforeDraw=0
 Point(Width)
 link(onBeforeDraw,7264497:doEvent1,[])
}
Add(Img_Text,11951108,532,196)
{
 X=3
 Y=3
 Font=[Fixedsys,8,0,65280,204]
 Point(X)
 link(Bitmap,3957640:getVar,[(538,189)(503,189)])
 link(Text,4360801:Var2,[(545,157)(307,157)])
 link(X,13305097:GetData,[])
}
Add(Timer,15596887,126,287)
{
 Interval=33
 link(onTimer,6139397:doRefresh,[])
}
Add(ConvertorEx,1283532,189,105)
{
 Mode=16
 link(onResult,7045840:doStrCat,[])
}
Add(Case,5188877,133,105)
{
 Value=Integer(8)
 link(onNextCase,1283532:doConvert,[])
 link(onTrue,4258028:doDelete,[(180,118)(180,174)])
}
Add(StrCat,7045840,245,105)
{
 link(onStrCat,12344749:doWork2,[])
 link(Str1,4360801:Var3,[(251,93)(342,93)(342,148)])
}
Add(Delete,4258028,245,168)
{
 Count=1
 Direction=1
 link(onDelete,12344749:doWork3,[(291,174)])
 link(Str,4360801:Var1,[(251,148)])
}
Add(Memory,16182012,301,105)
{
}
Add(GetDataEx,4360801,301,143)
{
 link(Data,16182012:Value,[])
}
Add(HubEx,12344749,287,105)
{
 link(onEvent,16182012:doValue,[])
}
Add(Timer,2452271,420,350)
{
 Interval=500
 link(onTimer,10968175:doNext,[])
}
Add(Img_Rectangle,2536580,525,469)
{
 Point2=983050
 Point2AsOffset=0
 Color=65280
 BgColor=65280
 Style=1
 Point(Point1)
 link(Bitmap,15923218:getVar,[(531,459)(496,459)])
 link(Point1,342220:Var,[])
}
Add(MathParse,3015664,532,350)
{
 DataCount=1
 MathStr="196608 + %1 + 5\r\n"
 ResultType=0
 Point(reCalc)
 link(X1,3319486:Var2,[])
}
Add(LineBreak,4272244,476,196)
{
 Caption="Ref"
 link(Out,11951108:doDraw,[])
 Primary=[12658435,-217,91]
}
Add(InfoTip,2258805,56,56)
{
 Info=#4:Edit|
 Font=[MS Sans Serif,8,1,0,1]
 Width=309
 Height=158
}
Add(CounterEx,10968175,469,350)
{
 Max=1
}
Add(Hub,7264497,224,287)
{
 link(onEvent1,12658435:In,[])
 link(onEvent2,11947913:In,[(248,300)(248,314)])
}
Add(LineBreak,3823505,406,469)
{
 Caption="Ref2"
 link(Out,4417188:doCompare,[])
 Primary=[11947913,-147,-161]
}
Add(If_else,4417188,469,469)
{
 Op2=Integer(1)
 link(onTrue,2536580:doDraw,[])
 link(Op1,10968175:Count,[])
}
Add(LineBreakEx,2208601,182,357)
{
 Caption="Bmp"
 Type=3
 link(_Data,6139397:Bitmap,[])
}
Add(InfoTip,11339744,56,231)
{
 Info=#8:PaintBox|
 Font=[MS Sans Serif,8,1,0,1]
 Width=309
 Height=158
}
Add(LineBreakEx,3957640,497,168)
{
 Caption="Bmp"
 Type=2
}
Add(EventFromData,13305097,546,126)
{
 link(onEvent,8081089:doCompare,[])
 link(Data,3410514:Data,[(552,81)(839,81)(839,170)(804,170)])
}
Add(If_else,8081089,602,126)
{
 Type=2
 link(onTrue,6641335:doData,[])
 link(onFalse,15676184:doCalc,[(667,139)(667,195)])
 link(Op1,15018363:getVar,[])
 link(Op2,12801746:Var2,[(615,114)(651,114)])
}
Add(GetDataEx,3319486,532,231)
{
 link(Data,11951108:TextWidth,[])
}
Add(DoData,6641335,700,126)
{
 Data=Integer(3)
 link(onEventData,3410514:doWork1,[])
}
Add(MathParse,15676184,700,189)
{
 MathStr="%2 - %1 - 15"
 link(onResult,3410514:doWork2,[(765,195)(765,139)])
 link(X1,12801746:Var3,[(706,173)])
 link(X2,4557425:getVar,[])
}
Add(GetDataEx,12801746,645,168)
{
 Angle=2
 link(Data,3319486:Var3,[(651,236)])
}
Add(LineBreakEx,8931214,189,336)
{
 Caption="Width"
 Type=3
 link(_Data,6139397:Width,[])
}
Add(LineBreakEx,15018363,602,91)
{
 Caption="Width"
 Type=2
}
Add(LineBreakEx,4557425,707,161)
{
 Caption="Width"
 Type=2
}
Add(ChanelToIndex,3410514,798,126)
{
 Point(Data)
 link(onIndex,3116672:doEvent1,[])
}
Add(Hub,3116672,847,126)
{
 OutCount=3
 link(onEvent1,13305097:doData,[(873,132)(873,74)(536,74)(536,132)])
 link(onEvent2,15095120:doOperation,[])
 link(onEvent3,16081951:In,[])
}
Add(GetIndexData,342220,539,413)
{
 link(Data1,3015664:reCalc,[])
 link(Data2,4464802:Point,[(552,392)(930,392)])
}
Add(Math,15095120,924,133)
{
 OpType=1
 Op2=15
 link(Op1,10625444:getVar,[])
}
Add(LineBreakEx,10625444,924,105)
{
 Caption="Width"
 Type=2
}
Add(LineBreak,16537770,490,413)
{
 Caption="Idx"
 link(Out,342220:doIndex,[])
 Primary=[16081951,385,-273]
}
Add(LineBreakEx,15923218,490,434)
{
 Caption="Bmp"
 Type=2
}
Add(PointXY,4464802,924,182)
{
 Y=3
 link(X,15095120:Result,[])
}
Add(InfoTip,6960389,392,336)
{
 Info=#6:Курсор|
 Font=[MS Sans Serif,8,1,0,1]
 Width=197
 Height=179
}
Add(InfoTip,9067223,455,49)
{
 Info=#16:Отрисовка текста|
 Font=[MS Sans Serif,8,1,0,1]
 Width=533
 Height=221
}