Add(Edit,10851423,224,175)
{
 Left=35
 Top=20
 ClearAfterEnter=1
 link(onChange,8598429:doTest,[])
}
Add(Label,3551326,399,231)
{
 Left=130
 Top=20
}
Add(GlobalVarEx,7634650,399,182)
{
 Name="MyVar"
 Point(onValue)
}
Add(GlobalVarEx,3171293,329,231)
{
 Name="MyVar"
 Point(onValue)
 link(onValue,3551326:doText,[])
}
Add(InlineCode,8598429,266,175)
{
 WorkPoints=#6:doTest|
 EventPoints=#5:onRes|
 VarPoints=#
 DataPoints=#
 Code=#15:unit HiAsmUnit;|13:// Author Tad|0:|9:interface|0:|21:uses kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|24:     onRes  : THI_Event;|51:     PROCEDURE doTest(var _Data:TData; Index:Word);|0:|5: end;|0:|14:implementation|0:|29:PROCEDURE THiAsmClass.doTest;|16:var s,ss:string;|18:    i,j,k:integer;|5:BEGIN|9:  ss:='';|21:  s:=toString(_Data);|15:  j:=Length(s);|100:   for i:=1 to j do if s[i] in ['0'..'9','.',','] then if s[i]=',' then ss:=ss+'.' else ss:=ss+s[i];|24:  _hi_onEvent(onRes,ss);|4:END;|0:|0:|4:end.|
 link(onRes,14875545:doEvent1,[])
}
Add(Hub,14875545,308,175)
{
 link(onEvent1,10851423:doText2,[(333,181)(333,167)(214,167)(214,188)])
 link(onEvent2,3053149:doConvert,[])
}
Add(Convertor,3053149,343,182)
{
 Mode=10
 link(onResult,7634650:doValue,[])
}

Add(MainForm,15201511,392,182)
{
 link(onCreate,2951063:doEvent1,[])
}
Add(Edit,14040054,532,301)
{
 Left=20
 Top=35
 Width=95
 Text=""
 link(Str,12523105:Var,[])
}
Add(Edit,6585437,532,147)
{
 Left=20
 Top=10
 Width=95
 Text="0.6168 "
 DataType=4
 ClearAfterEnter=1
 link(onEnter,13570874:doWork2,[])
}
Add(DoData,84245,532,196)
{
 link(onEventData,13570874:doWork3,[(585,202)])
 link(Data,6585437:Text,[])
}
Add(GlobalVar,6409773,602,154)
{
 Name="test"
 link(onValue,1555405:doWork3,[(648,160)(648,251)])
}
Add(HubEx,13570874,581,154)
{
 link(onEvent,6409773:doValue,[])
}
Add(GlobalVar,12523105,532,266)
{
 Name="test"
}
Add(Hub,2951063,462,196)
{
 link(onEvent1,84245:doData,[])
 link(onEvent2,1555405:doWork1,[(522,209)])
}
Add(HubEx,1555405,518,245)
{
 Angle=1
 link(onEvent,14040054:doText,[(522,307)])
}