Add(MainForm,12612452,154,147)
{
 Left=20
 Top=105
 link(onCreate,10787259:doOperation,[])
}
Add(InlineCode,10787259,224,182)
{
 WorkPoints=#11:doOperation|
 EventPoints=#8:onResult|
 DataPoints=#3:op1|3:op2|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|21:uses kol,Share,Debug;|0:|4:type|29:  THiAsmClass = class(TDebug)|11:    private|10:    public|18:    Op1:THI_Event;|18:    Op2:THI_Event;|23:    onResult:THI_Event;|0:|55:    procedure doOperation(var _Data:TData; Index:word);|6:  end;|0:|14:implementation|0:|34:procedure THiAsmClass.doOperation;|3:var|17:  r1,r2,res:real;|5:begin|28:  r1 := ReadReal(_Data,Op1);|28:  r2 := ReadReal(_Data,Op2);|19:  Res := r1/r2*100;|28:  _hi_OnEvent(onResult,Res);|0:|4:end;|0:|4:end.|
 link(onResult,5483251:doText,[])
 link(op1,6779195:Text,[])
 link(op2,4494887:Text,[(237,167)(279,167)])
}
Add(Edit,4494887,273,119)
{
 Left=200
 Top=115
 Text="3544"
}
Add(Edit,6779195,224,119)
{
 Left=145
 Top=115
 Text="2890"
}
Add(Label,5483251,294,182)
{
 Left=260
 Top=120
}