Вверх ↑
Разработчик
Ответов: 26163
Рейтинг: 2127
#1: 2009-11-01 03:43:10 ЛС | профиль | цитата
Последние изыскания в области оптимизации схемы без использования IC


Add(MainForm,94467,385,343)
{
Width=367
Height=75
Caption="Log_Parser"
}
Add(Button,4481738,203,224)
{
Left=5
Top=10
TabOrder=-1
Caption="Parse"
link(onClick,1555007:doStart,[])
}
Add(Thread,1555007,245,224)
{
Delay=0
FastStop=0
link(onExec,5019261:doEvent1,[])
}
Add(Hub,5019261,287,224)
{
OutCount=9
link(onEvent1,13462740:doClear,[(630,230)(630,405)])
link(onEvent2,2279432:doData,[(445,237)(445,405)])
link(onEvent3,2091159:doString,[(439,244)(439,461)])
link(onEvent4,6468069:doOff,[(330,251)(330,314)])
link(onEvent5,15640483:doStart,[(325,258)(325,342)])
link(onEvent6,7652695:doOpen,[])
link(onEvent7,7652695:doClose,[])
link(onEvent8,15640483:doStop,[(320,279)(320,349)])
link(onEvent9,6468069:doOn,[(315,286)(315,321)])
}
Add(LED,6468069,343,301)
{
Left=335
Top=10
Width=20
Height=20
Shape=1
ColorBlick=255
}
Add(TimeCounter,15640483,343,336)
{
link(onStop,94467:doCaption,[])
}
Add(StrList,2597292,462,252)
{
link(onChange,77592:doEnum,[(503,258)(503,237)(451,237)(451,314)])
}
Add(Edit,11092326,525,357)
{
Left=65
Top=10
Width=130
Text="serial"
}
Add(BlockFind,2886579,581,392)
{
Point(doStartBlock)
Point(doEndBlock)
link(onSearch,13462740:doAdd,[])
}
Add(DoData,2279432,525,399)
{
link(onEventData,2886579:doStartBlock,[])
link(Data,11092326:Text,[])
}
Add(FileStream,7652695,343,259)
{
FileName="log1.txt"
link(onLoad,32675:doConvert,[])
}
Add(Convertor,32675,385,259)
{
Mode=11
link(onResult,2597292:doText,[(428,265)(428,279)])
}
Add(ArrayEnum,77592,476,308)
{
link(onItem,2886579:doSearch,[(570,314)(570,398)])
link(onEndEnum,13462740:doSave,[(625,321)(625,433)])
link(Array,2597292:Array,[])
}
Add(StrList,13462740,644,392)
{
FileName="log2.txt"
link(Str,77592:Item,[(650,350)(482,350)])
}
Add(Edit,11996385,476,413)
{
Left=200
Top=10
Width=130
Text="dur"
}
Add(FormatStr,2091159,476,455)
{
DataCount=1
Mask="%1:"
link(onFString,2886579:doEndBlock,[(570,461)(570,412)])
link(Str1,11996385:Text,[])
}

Парсирование файла лога размером 117 Мб с записью в файл выборки присходит за 2,8 сек (на моем компе). Скорость выпонения, практически, совпадает с IC, приведенное Tad-ом (его схема тоже выдала в том же режиме 2,8 сек, но при одном условии поиска)
карма: 22

0