Add(MainForm,8086831,406,133)
{
 Width=284
 Height=172
 Point(Handle)
}
Add(InlineCode,2961482,245,84)
{
 VarPoints=#6:MyTime|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|38:uses kol,Share,Debug,Windows,mmsystem;|0:|4:type|28: THiAsmClass = class(TDebug)|9:   public|44:   procedure MyTime(var dt:TData; idx:word);|5: end;|0:|14:implementation|0:|29:procedure THiAsmClass.MyTime;|5:begin|37:  dtInteger(dt,integer(timeGetTime));|4:end;|0:|4:end.|
}
Add(MMTimer,5088309,133,133)
{
 link(onTimer,9610015:doValue,[])
}
Add(Memory,9610015,245,133)
{
 Point(Data)
 link(onData,5316279:doSleepMks,[])
 link(Data,2041310:Var2,[])
}
Add(Math,8276259,357,133)
{
 OpType=1
 link(onResult,8086831:doCaption,[])
 link(Op1,2041310:Var3,[(363,124)])
 link(Op2,9610015:Value,[(370,103)(297,103)(297,177)(251,177)])
}
Add(GetDataEx,2041310,245,119)
{
 link(Data,2961482:MyTime,[])
}
Add(Sleep,5316279,308,133)
{
 Delay=2000
 link(onSleep,8276259:doOperation,[])
}