Add(ListBox,4313538,448,196)
{
Left=255
Top=62
Width=35
Height=100
FileName="pochta.txt"
Strings=#1:r|1:f|1:v|1:b|1:m|
}
Add(ArrayRW,863698,462,364)
{
link(onRead,4756942:doText,[])
link(Array,4313538:Array,[])
}
Add(BitBtn,5018303,196,364)
{
Left=10
Top=66
Width=105
Height=25
Font=[Arial,8,0,0,1]
TabOrder=5
FrameColor=-16777188
link(onClick,13089735:doEvent1,[])
}
Add(Hub,13089735,252,364)
{
OutCount=4
link(onEvent1,1052212:doNext,[])
link(onEvent2,2839218:doCompare,[(314,377)(314,517)])
}
Add(Counter,1052212,385,364)
{
Min=-1
Point(Max)
link(onNext,863698:doRead,[])
link(Max,5889732:Var1,[(391,338)])
}
Add(If_else,2839218,385,511)
{
link(onTrue,1052212:doReset,[(429,517)(429,419)(373,419)(373,384)])
link(Op1,1052212:Count,[])
link(Op2,5889732:Var2,[])
}
Add(Edit,4756942,511,364)
{
Left=125
Top=65
Width=120
Height=25
}
Add(MainForm,2953706,140,266)
{
Width=395
Height=275
link(onCreate,16318049:doOperation,[])
}
Add(GetDataEx,5889732,385,329)
{
Angle=1
link(Data,16318049:Result,[(419,338)])
}
Add(Math,16318049,413,280)
{
OpType=1
Op2=1
ResultType=0
link(Op1,4313538:Count,[(419,260)(461,260)])
}
p.s
Когда научите HiAsm с русским языком нормально работать.