Add(MainForm,2233653,126,147)
{
 Left=20
 Top=105
 link(onCreate,10787259:doOperation,[])
}
Add(InlineCode,10787259,196,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|19:    _prop_Op1:real;|19:    _prop_Op2:real;|24:    _data_Op1:THI_Event;|24:    _data_Op2:THI_Event;|30:    _event_onResult:THI_Event;|0:|61:    procedure _work_doOperation(var _Data:TData; Index:word);|6:  end;|0:|14:implementation|0:|40:procedure THiAsmClass._work_doOperation;|3:var|17:  r1,r2,res:real;|5:begin|44:  r1 := ReadReal(_Data,_data_Op1,_prop_Op1);|44:  r2 := ReadReal(_Data,_data_Op2,_prop_Op2);|19:  Res := r1/r2*100;|34: _hi_OnEvent(_event_onResult,Res);|0:|4:end;|0:|4:end.|
}