Add(MainForm,6016793,133,140) { Width=403 Height=241 } Add(IndexToChanel,11631242,658,77) { 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,[(718,195)]) link(onEvent18,11633699:doWork2,[(749,202)(749,167)]) } Add(If_else,416891,707,287) { Type=3 Op2=Integer(16) link(onTrue,1694203:doWork1,[]) link(onFalse,9520171:doWork1,[(754,300)]) AddHint(-1,37,27,13,Op2) } Add(If_else,5161824,770,336) { Op2=Integer(17) link(onTrue,1694203:doWork2,[(814,342)(814,300)]) AddHint(-2,36,27,13,Op2) } Add(HubEx,9520171,750,336) { link(onEvent,5161824:doCompare,[]) } Add(If_else,9788377,658,287) { Type=4 Op2=Integer(11) link(onTrue,416891:doCompare,[]) link(onFalse,9520171:doWork2,[(698,300)(698,342)]) AddHint(-2,38,27,13,Op2) } Add(ChanelToIndex,1694203,826,287) { link(onIndex,10400535:doValue,[]) } Add(ChanelToIndex,11633699,770,154) { link(onIndex,11403340:doValue,[]) } Add(HubEx,6674507,714,154) { link(onEvent,11633699:doWork1,[]) } Add(HubEx,7934983,714,161) { Angle=3 link(onEvent,6674507:doWork3,[]) } Add(HubEx,1245562,714,168) { Angle=3 link(onEvent,7934983:doWork3,[]) } Add(HubEx,12747404,714,175) { Angle=3 link(onEvent,1245562:doWork3,[]) } Add(HubEx,9874699,714,182) { Angle=3 link(onEvent,12747404:doWork3,[]) } Add(TimeCounter,7414212,364,140) { link(onStart,13989793:doFor,[]) link(onStop,10448880:doText,[(404,153)(404,195)]) } Add(For,13989793,413,140) { Start=1 End=100000 link(onEvent,9853830:doFor,[]) link(onStop,7414212:doStop,[(457,153)(457,124)(350,124)(350,153)]) } Add(Button,6531240,196,140) { Left=125 Top=60 link(onClick,10379623:doEvent1,[]) } Add(Memory,11403340,826,154) { Default=Integer(0) } Add(Memory,10400535,875,287) { Default=Integer(0) } Add(Label,10448880,413,189) { Left=200 Top=65 } Add(TimeCounter,11725473,371,287) { link(onStart,6755417:doFor,[]) link(onStop,14469705:doText,[(411,300)(411,342)]) } Add(For,6755417,420,287) { Start=1 End=100000 link(onEvent,9176190:doFor,[]) link(onStop,11725473:doStop,[(464,300)(464,271)(357,271)(357,300)]) } Add(Label,14469705,420,336) { Left=200 Top=85 } Add(Hub,10379623,273,140) { OutCount=4 link(onEvent1,7414212:doStart,[]) link(onEvent2,11725473:doStart,[(314,153)(314,293)]) link(onEvent3,67066:doStart,[(306,160)(306,440)]) link(onEvent4,4082358:doStart,[(297,167)(297,566)]) } Add(For,9853830,483,140) { Start=1 End=18 link(onEvent,11631242:doEvent,[(583,146)(583,83)]) } Add(For,9176190,483,287) { Start=1 End=18 link(onEvent,9788377:doCompare,[]) } Add(FTCG_Tools,1744119,427,434) { link(onEventData,16054461:doValue,[]) link(onStop,67066:doStop,[(469,447)(469,420)(359,420)(359,447)]) } BEGIN_SDK Add(EditMultiEx,1754439,21,21) { WorkCount=#9:doCompare| EventCount=#11:onEventData|6:onStop| Width=475 Height=347 link(doCompare,6564903:doFor,[(42,27)(42,97)]) } Add(FT_If_else,7947835,224,133) { Type=4 Op2=Integer(11) link(onTrue,336565:doCompare,[]) link(onFalse,11436735:doWork2,[(268,146)(268,188)]) } Add(FT_If_else,336565,280,133) { Type=3 Op2=Integer(16) link(onTrue,16236819:doData,[]) link(onFalse,11436735:doWork1,[(326,146)]) } Add(FT_If_else,10995659,343,182) { Op2=Integer(17) link(onTrue,16006813:doData,[]) } Add(HubEx,11436735,322,182) { link(onEvent,10995659:doCompare,[]) } Add(FT_DoData,16236819,413,133) { Data=Integer(0) link(onEventData,13868993:doWork2,[]) } Add(FT_DoData,16006813,413,182) { Data=Integer(1) link(onEventData,13868993:doWork3,[(467,188)]) } Add(HubEx,13868993,463,133) { Angle=3 link(onEvent,1754439:onEventData,[(467,27)]) } Add(FT_For,6564903,63,91) { End=100000 Start=1 link(onEvent,2541856:doFor,[(117,97)(117,139)]) link(onStop,1754439:onStop,[(148,104)(148,34)]) } Add(FT_For,2541856,168,133) { End=18 Start=1 link(onEvent,7947835:doCompare,[]) } END_SDK Add(Memory,16054461,497,434) { Default=Integer(0) } Add(TimeCounter,67066,371,434) { link(onStart,1744119:doCompare,[]) link(onStop,2348341:doText,[(411,447)(411,489)]) } Add(Label,2348341,427,483) { Left=200 Top=105 } Add(InlineCode,8947214,427,560) { 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|0:|9: public|27: onRes, onStop:THI_Event;|50: procedure doStart(var _Data:TData; Index:Word);|5: end;|0:|14:implementation|31: procedure THiAsmClass.doStart;|21: var i, n, k:integer;|6: Begin|23: for i:=1 to 100000 do|21: for n:=1 to 18 do|10: begin|40: If n=17 then _hi_onEvent(onRes,1);|51: If(n>=11)and(n<=16) then _hi_onEvent(onRes,0)|9: end;|25: _hi_onEvent(onStop); |5: End;|4:end.| link(onStop,4082358:doStop,[(470,566)(470,548)(352,548)(352,573)]) link(onRes,6856650:doValue,[]) } Add(Memory,6856650,497,567) { Default=Integer(0) } Add(Label,5463166,427,602) { Left=200 Top=125 } Add(TimeCounter,4082358,364,560) { link(onStart,8947214:doStart,[]) link(onStop,5463166:doText,[(412,573)(412,608)]) }