Add(InlineCode,2552674,224,161)
{
 WorkPoints=#9:doAdditor|
 EventPoints=#9:onAdditor|
 DataPoints=#1:x|1:y|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|21:uses KOL,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|9:   public|19:     x,y:THI_Event;|25:     onAdditor:THI_Event;|49:     procedure doAdditor(var dt:TData; idx:word);|5: end;|0:|45:function additor(x,y:double):double; stdcall;|0:|14:implementation|0:|53:function additor; external 'main.dll' name 'additor';|0:|32:procedure THiAsmClass.doAdditor;|18:var dx,dy: double;|5:begin|29:  dx := ReadReal(dt, x, 0.0);|29:  dy := ReadReal(dt, y, 0.0);|41:  _hi_OnEvent(onAdditor, additor(dx,dy));|4:end;|0:|4:end.|
 link(onAdditor,2588499:doMessage,[])
 link(x,13632711:Value,[(230,146)(209,146)])
 link(y,14388563:Value,[(237,145)(258,145)])
}
Add(Button,15802796,161,161)
{
 Left=40
 Top=25
 link(onClick,2552674:doAdditor,[])
}
Add(Memory,14388563,252,98)
{
 Default=Real(9)
}
Add(Message,2588499,280,161)
{
}
Add(Memory,13632711,203,98)
{
 Default=Real(12.3)
}