Add(MainForm,2953706,112,126)
{
 Width=248
 Height=95
}
Add(InlineCode,1630934,217,126)
{
 WorkPoints=#6:doWork|
 EventPoints=#6:onPlus|
 DataPoints=#4:data|
 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|25:   onPlus,data:THI_Event;|49:   procedure doWork(var _Data:TData; Index:Word);|5: end;|0:|14:implementation|0:|29:procedure THiAsmClass.doWork;|5:begin|54: _hi_OnEvent(onPlus,MAX(0,ReadInteger(_Data,Data,0)));|4:end;|4:end.|
 link(data,11379556:Text,[])
 link(onPlus,1663723:doText,[])
}
Add(Label,1663723,273,126)
{
 Left=170
 Top=25
}
Add(Button,12107465,161,126)
{
 Left=15
 Top=20
 Data=Integer(12)
 link(onClick,1630934:doWork,[])
}
Add(Edit,11379556,217,84)
{
 Left=95
 Top=20
 Text="0"
}