Add(MainForm,2953706,21,105)
{
 link(onCreate,7828194:doStart,[])
}
Add(InlineCode,7710145,119,119)
{
 WorkPoints=#4:Enum|
 EventPoints=#2:Ev|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|21:uses kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|17:    ev:THI_Event;|3:   |47:    procedure Enum(var _Data:TData ; idx:WORD);|5: end;|0:|14:implementation|0:|27:procedure THiAsmClass.Enum;|12:var i:int64;|8:begin   |7:  i:=0;|35:  while i <> 1099511627776 do begin|33:   _hi_OnEvent(ev,Int2Hex(i,10));|10:   inc(i);|6:  end;|4:end;|0:|4:end.|
 link(Ev,12108361:doAdd,[])
}
Add(ListBox,12108361,168,119)
{
 Left=55
 Top=15
 Width=165
 Height=230
}
Add(Thread,7828194,70,119)
{
 link(onExec,7710145:Enum,[])
}