Возможный вариант?
Add(MainForm,12397248,140,182)
{
Width=709
Height=242
}
Add(Edit,13314783,308,105)
{
Left=30
Top=25
Width=295
Text="41021811320118 32151112065 26052018 1600"
}
Add(Edit,13965869,378,175)
{
Left=30
Top=75
Width=505
Text="0"
}
Add(Button,15874368,224,175)
{
Left=340
Top=25
link(onClick,8201177:doCalc,[])
}
Add(MultiElementEx,8201177,308,175)
{
link(onRes,13965869:doText,[])
link(String,13314783:Text,[])
}
BEGIN_SDK
Add(EditMultiEx,12596441,21,21)
{
WorkCount=#6:doCalc|
EventCount=#5:onRes|
DataCount=#6:String|
Width=734
Height=417
VOffset=70
HOffset=70
link(doCalc,5462783:doEvent1,[(35,97)(35,83)])
}
Add(Str_Enum,389233,140,140)
{
Delimiter=""
link(onEnum,9024364:doConvert,[])
link(onEndEnum,14252911:doSort,[(184,153)(184,188)])
link(String,4506909:Var2,[])
}
Add(Convertor,9024364,189,140)
{
Mode=1
link(onResult,13089371:doCase,[])
}
Add(ArrayRW,2322341,273,126)
{
link(Array,11069843:Var2,[])
}
Add(IntegerArray,4591465,273,63)
{
IntArray=[]
}
Add(ArraySort,14252911,308,182)
{
ArrayType=1
link(onEndSort,815268:doCount,[])
link(Array,11069843:Var3,[(314,110)])
}
Add(GetDataEx,11069843,273,105)
{
link(Data,4591465:Array,[])
}
Add(Case,13089371,231,140)
{
Value=Integer(0)
link(onNextCase,2322341:doAdd,[])
}
Add(ArrayCountRepeats,815268,357,182)
{
ArrayType=1
link(onCount,9747463:doValue,[])
link(Array,14252911:ArraySort,[(363,170)(350,170)(350,228)(314,228)])
}
Add(MT_MultiMem,9747463,406,182)
{
link(onData,12300473:doCompare,[(474,188)(474,223)(401,223)(401,258)])
}
Add(If_else,12300473,413,252)
{
Op2=Integer(1)
link(onFalse,13579507:doEvent1,[])
link(Op1,9630900:Var2,[])
}
Add(Math,14873352,525,259)
{
OpType=2
link(onResult,11017156:doOperation,[])
link(Op1,16059183:Var2,[])
link(Op2,13830514:Var3,[(538,236)])
}
Add(GetDataEx,9630900,413,231)
{
link(Data,9747463:Value2,[])
}
Add(Math,11017156,637,259)
{
Point(doDefault)
link(Op1,753617:Var1,[(643,247)(625,247)(625,303)])
}
Add(For,12601497,490,308)
{
IncludeEnd=1
link(onEvent,2705495:doStrCat,[])
link(End,13830514:Var2,[])
}
Add(StrCat,2705495,574,308)
{
Point(doClear)
link(Str1,11299000:Var1,[(580,296)(555,296)(555,356)])
link(Str2,16059183:Var3,[(587,229)])
}
Add(Hub,13579507,455,259)
{
link(onEvent1,14873352:doOperation,[])
link(onEvent2,12601497:doFor,[(469,314)])
}
Add(GetDataEx,13830514,497,231)
{
Angle=3
link(Data,9630900:Var3,[])
}
Add(GetDataEx,16059183,525,224)
{
Angle=3
link(Data,9747463:Value1,[(412,229)])
}
Add(FormatStr,1600567,651,378)
{
DataCount=3
Mask="%1 %2 %3"
link(onFString,12596441:onRes,[(719,384)(719,97)])
link(Str1,4506909:Var3,[(657,117)])
link(Str2,11299000:Var3,[(664,356)])
link(Str3,753617:Var3,[(671,303)])
}
Add(Hub,5462783,49,77)
{
OutCount=5
link(onEvent1,4591465:doClear,[])
link(onEvent2,6405299:In,[])
link(onEvent3,9905071:In,[(95,97)(95,111)])
link(onEvent4,389233:doEnum,[(89,104)(89,146)])
link(onEvent5,1600567:doString,[(80,111)(80,384)])
}
Add(GetDataEx,4506909,140,112)
{
link(Data,12596441:String,[(146,66)(97,66)])
}
Add(GetDataEx,11299000,574,351)
{
link(Data,2705495:Result,[])
}
Add(GetDataEx,753617,637,298)
{
link(Data,11017156:Result,[])
}
Add(LineBreak,7236626,490,350)
{
link(Out,2705495:doClear,[(547,356)(547,321)])
Primary=[6405299,-385,-266]
}
Add(LineBreak,10370963,588,266)
{
link(Out,11017156:doDefault,[])
Primary=[9905071,-483,-161]
}
END_SDK