#hws
  println('for ', i, ' := ', start_num, ' to ', end_num, ' do')
  lng.begin()
    event(onEvent, i)
  lng.end()
  event(onStop[color=red],1[/color])

#hws
  _hi_onEvent(THIFTCG_Tools(FParent).Events[1], );

#hws
func doClear(_data)
if(linked(doClear))
 println(res, ' := ',default, ';')   
end

#sha
Add(Button,11036070,49,105)
{
 Left=100
 Top=20
 Caption="Hello"
 Data=String(4)
 link(onClick,14860139:doStrCat,[])
}
Add(Hub,4606655,175,105)
{
 link(onEvent1,5994167:doStrCat,[(220,111)(220,37)(107,37)(107,55)])
 link(onEvent2,16577163:doMessage,[])
}
Add(StrCat,5994167,119,49)
{
 Str2="-222-"
}
Add(StrCat,14860139,119,105)
{
 Str2="55"
 link(onStrCat,4606655:doEvent1,[])
 link(Str1,5994167:Result,[])
}
Add(Message,16577163,245,112)
{
 Caption="Info"
}

Add(Button,11036070,189,161)
{
 Left=100
 Top=20
 Caption="Hello"
 Data=String(4)
 link(onClick,2721812:doStrCat,[])
}
Add(Message,16577163,301,161)
{
 Caption="Info"
}
Add(FTCG_Tools,2721812,245,161)
{
 link(onEvent2,16577163:doMessage,[])
}
BEGIN_SDK
  Add(EditMultiEx,15276447,21,21)
  {
   WorkCount=#8:doStrCat|
   EventCount=#8:onEvent2|
   link(doStrCat,11998741:doStrCat,[(59,27)(59,111)])
  }
  Add(FT_StrCat,13617345,98,49)
  {
   Str2="-222-"
  }
  Add(FT_StrCat,11998741,98,105)
  {
   Str2="55"
   link(onStrCat,4561534:doEvent1,[])
   link(Str1,13617345:Result,[])
  }
  Add(FT_Hub,4561534,154,105)
  {
   link(onEvent1,13617345:doStrCat,[(202,111)(202,38)(86,38)(86,55)])
   link(onEvent2,15276447:onEvent2,[(254,118)(254,27)])
  }
END_SDK