Add(MainForm,6016793,7,35)
{
 Width=403
 Height=241
}
Add(IndexToChanel,11631242,532,-28)
{
 Count=18
 link(onEvent12,6674507:doWork2,[])
 link(onEvent13,7934983:doWork2,[])
 link(onEvent14,1245562:doWork2,[])
 link(onEvent15,12747404:doWork2,[])
 link(onEvent16,9874699:doWork2,[])
 link(onEvent17,9874699:doWork3,[(592,90)])
 link(onEvent18,11633699:doWork2,[(623,97)(623,62)])
}
Add(If_else,416891,581,182)
{
 Type=3
 Op2=Integer(16)
 link(onTrue,1694203:doWork1,[])
 link(onFalse,9520171:doWork1,[(628,195)])
 AddHint(-1,37,27,13,Op2)
}
Add(If_else,5161824,644,231)
{
 Op2=Integer(17)
 link(onTrue,1694203:doWork2,[(688,237)(688,195)])
 AddHint(-2,36,27,13,Op2)
}
Add(HubEx,9520171,624,231)
{
 link(onEvent,5161824:doCompare,[])
}
Add(If_else,9788377,532,182)
{
 Type=4
 Op2=Integer(11)
 link(onTrue,416891:doCompare,[])
 link(onFalse,9520171:doWork2,[(572,195)(572,237)])
 AddHint(-2,38,27,13,Op2)
}
Add(ChanelToIndex,1694203,700,182)
{
 link(onIndex,10400535:doValue,[])
}
Add(ChanelToIndex,11633699,644,49)
{
 link(onIndex,11403340:doValue,[])
}
Add(HubEx,6674507,588,49)
{
 link(onEvent,11633699:doWork1,[])
}
Add(HubEx,7934983,588,56)
{
 Angle=3
 link(onEvent,6674507:doWork3,[])
}
Add(HubEx,1245562,588,63)
{
 Angle=3
 link(onEvent,7934983:doWork3,[])
}
Add(HubEx,12747404,588,70)
{
 Angle=3
 link(onEvent,1245562:doWork3,[])
}
Add(HubEx,9874699,588,77)
{
 Angle=3
 link(onEvent,12747404:doWork3,[])
}
Add(TimeCounter,7414212,238,35)
{
 Precision=1
 link(onStart,13989793:doFor,[])
 link(onStop,10448880:doText,[(278,48)(278,90)])
}
Add(For,13989793,287,35)
{
 Start=1
 End=100000
 link(onEvent,9853830:doFor,[])
 link(onStop,7414212:doStop,[(331,48)(331,19)(224,19)(224,48)])
}
Add(Button,6531240,70,35)
{
 Left=125
 Top=60
 link(onClick,10379623:doEvent1,[])
}
Add(Memory,11403340,700,49)
{
 Default=Integer(0)
}
Add(Memory,10400535,749,182)
{
 Default=Integer(0)
}
Add(Label,10448880,287,84)
{
 Left=200
 Top=65
 Width=80
 AutoSize=1
}
Add(TimeCounter,11725473,245,182)
{
 Precision=1
 link(onStart,6755417:doFor,[])
 link(onStop,14469705:doText,[(285,195)(285,237)])
}
Add(For,6755417,294,182)
{
 Start=1
 End=100000
 link(onEvent,9176190:doFor,[])
 link(onStop,11725473:doStop,[(338,195)(338,166)(231,166)(231,195)])
}
Add(Label,14469705,294,231)
{
 Left=200
 Top=85
 Width=80
 AutoSize=1
}
Add(Hub,10379623,147,35)
{
 OutCount=4
 link(onEvent1,7414212:doStart,[])
 link(onEvent2,11725473:doStart,[(188,48)(188,188)])
 link(onEvent3,67066:doStart,[(180,55)(180,335)])
 link(onEvent4,4082358:doStart,[(171,62)(171,461)])
}
Add(For,9853830,357,35)
{
 Start=1
 End=18
 link(onEvent,11631242:doEvent,[(457,41)(457,-22)])
}
Add(For,9176190,357,182)
{
 Start=1
 End=18
 link(onEvent,9788377:doCompare,[])
}
Add(FTCG_Tools,1744119,294,329)
{
 link(onEventData,67066:doStop,[(336,335)(336,321)(233,321)(233,342)])
}
BEGIN_SDK
  Add(EditMultiEx,1754439,21,21)
  {
   WorkCount=#9:doCompare|
   EventCount=#11:onEventData|
   VarCount=#5:Value|
   Width=538
   Height=347
   link(doCompare,16377451:doFor,[(45,27)(45,83)])
   link(Value,6936366:Value,[(27,238)(475,238)])
  }
  Add(FT_If_else,7947835,196,77)
  {
   Type=4
   Op2=Integer(11)
   link(onTrue,336565:doCompare,[])
   link(onFalse,11436735:doWork2,[(240,90)(240,132)])
  }
  Add(FT_If_else,336565,252,77)
  {
   Type=3
   Op2=Integer(16)
   link(onTrue,16236819:doData,[])
   link(onFalse,11436735:doWork1,[(298,90)])
  }
  Add(FT_If_else,10995659,315,126)
  {
   Op2=Integer(17)
   link(onTrue,16006813:doData,[])
  }
  Add(HubEx,11436735,294,126)
  {
   link(onEvent,10995659:doCompare,[])
  }
  Add(FT_DoData,16236819,385,77)
  {
   Data=Integer(0)
   link(onEventData,13868993:doWork2,[])
  }
  Add(FT_DoData,16006813,385,126)
  {
   Data=Integer(1)
   link(onEventData,13868993:doWork3,[(439,132)])
  }
  Add(HubEx,13868993,435,77)
  {
   link(onEvent,6936366:doValue,[])
  }
  Add(FT_Memory,6936366,469,77)
  {
  }
  Add(FT_For,16377451,70,77)
  {
   End=100000
   Start=1
   link(onEvent,10691750:doFor,[])
   link(onStop,1754439:onEventData,[(111,90)(111,27)])
  }
  Add(FT_For,10691750,119,77)
  {
   End=18
   Start=1
   link(onEvent,7947835:doCompare,[])
  }
END_SDK
Add(TimeCounter,67066,245,329)
{
 Precision=1
 link(onStart,1744119:doCompare,[])
 link(onStop,2348341:doText,[(285,342)(285,384)])
}
Add(Label,2348341,294,378)
{
 Left=200
 Top=105
 Width=80
}
Add(InlineCode,8947214,301,455)
{
 WorkPoints=#7:doStart|
 EventPoints=#6:onStop|5:onRes|
 Code=#15:unit HiAsmUnit;|12:// Autor Tad|0:|9:interface|0:|21:uses kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|10:   k:byte;|9:   public|27:   onRes, onStop:THI_Event;|50:   procedure doStart(var _Data:TData; Index:Word);|47:   procedure vRes(var _Data:TData; Index:Word);|5: end;|0:|14:implementation|31: procedure THiAsmClass.doStart;|18: var i, n:integer;|6: Begin|23:  for i:=1 to 100000 do|21:    for n:=1 to 18 do|10:     begin|24:      If n=17 then k:=1;|35:      If(n>=11)and(n<=16) then k:=0|9:     end;|25:   _hi_onEvent(onStop);  |5: End;|0:|27:procedure THiAsmClass.vRes;|5:begin|22:    dtInteger(_Data,k)|5:end; |4:end.|
 link(onStop,4082358:doStop,[(344,461)(344,443)(226,443)(226,468)])
}
Add(Label,5463166,301,525)
{
 Left=200
 Top=125
 Width=80
}
Add(TimeCounter,4082358,238,455)
{
 Precision=1
 link(onStart,8947214:doStart,[])
 link(onStop,5463166:doText,[(286,468)(286,531)])
}