Вверх ↑
Ответов: 1376
Рейтинг: 197
#1: 2011-04-21 19:39:14 ЛС | профиль | цитата
Tad, схема-то для отсеявания цифр есть, с тобой же, в какой-то теме, до нее докатились, хоть там и советовали многокилобайтные парсинги
code_23447.txt
NordWest, вот поиск наибольшей температуры в списке

Add(StrList,2546815,392,119)
{
@Hint=#26:Поиск наибольшего значения|
Strings=#13:Hard DiskB:45|13:Hard DiskC:24|13:Hard DiskD:60|13:Hard DiskE:15|13:Hard DiskF:55|
Point(doSort)
}
Add(ArrayEnum,4197338,392,196)
{
link(onItem,1980317:doSplit,[])
link(onEndEnum,9031935:doRead,[(445,209)(445,321)])
link(Array,3620002:Var1,[(398,184)])
}
Add(Button,7435302,280,196)
{
Left=95
Top=20
link(onClick,15510954:doEvent1,[])
}
Add(If_else,10617334,511,196)
{
Type=2
link(onTrue,12567218:doEvent1,[])
link(Op2,16492831:Value,[(524,184)(687,184)(687,236)(643,236)])
}
Add(Memory,16492831,637,196)
{
Default=Integer(0)
}
Add(Hub,12567218,560,196)
{
link(onEvent1,16492831:doValue,[])
link(onEvent2,6205179:doValue,[(592,209)(592,265)])
}
Add(Memory,6205179,609,259)
{
Default=Integer(0)
Point(Data)
link(Data,4197338:Index,[(615,243)(405,243)])
}
Add(Hub,15510954,322,196)
{
link(onEvent1,8571544:In,[(350,202)(350,181)])
link(onEvent2,4197338:doEnum,[(375,209)(375,202)])
}
Add(LineBreak,15867089,595,203)
{
link(Out,16492831:doClear,[])
Primary=[8571544,-238,-28]
}
Add(ArrayRW,9031935,490,315)
{
link(onRead,13256994:doText,[])
link(Array,3620002:Var3,[(496,184)])
link(Index,6205179:Value,[(503,303)(615,303)])
}
Add(GetDataEx,3620002,406,179)
{
link(Data,2546815:Array,[])
}
Add(StrPart,1980317,455,196)
{
Char=":"
link(onSplit,10617334:doCompare,[])
}
Add(Label,13256994,560,315)
{
Left=25
Top=60
Width=185
Height=40
Font=[MS Sans Serif,20,0,0,1]
AutoSize=1
}


карма: 1

0
файлы: 1code_23447.txt [1023B] [470]