Вверх ↑
Этот топик читают: Гость
Ответов: 902
Рейтинг: 27
#1: 2012-09-07 17:36:31 ЛС | профиль | цитата
Здравствуйте.
Необходимо посчитать 1 (единицы) в вертикальных строках списка.
И если встречается количество непрерывно идущих 1 более 60, выдать сообщение.
Если таких вертикальных строк нет, то, тоже выдать сообщение.

Собрал схемку, вроде все работает. Но, чувствую, что сделал все через жоп.... и можно гораздо проще и точнее.
Не подскажите, может можно по другому?

code_29001.txt
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
файлы: 1code_29001.txt [8.6KB] [262]
Ответов: 1173
Рейтинг: 49
#2: 2012-09-07 17:58:14 ЛС | профиль | цитата
А компонент Матрица для ваших целей не пойдёт? С ним было бы куда легче. Сейчас пытаюсь сделать попроще со строками.
------------ Дoбавленo в 17.57:
Я слоупок. Можно же из списка сделать матрицу и работать с ней
карма: 0

0
Ответов: 902
Рейтинг: 27
#3: 2012-09-07 18:01:12 ЛС | профиль | цитата
Пойдет наверно. Я просто его никогда не использовал.
Забыл сказать, что данные в список строк, грузятся из локального файла.
Необходимо перебрать и проверить более 4000 файлов.
------------ Дoбавленo в 18.00:
juk писал(а):
Я слоупок. Можно же из списка сделать матрицу и работать с ней

А как это сделать?
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 8930
Рейтинг: 823
#4: 2012-09-07 18:21:24 ЛС | профиль | цитата
juk, code_29002.txt
карма: 19

2
файлы: 1code_29002.txt [7.6KB] [158]
Голосовали:Ex_, juk
Ответов: 902
Рейтинг: 27
#5: 2012-09-07 19:33:28 ЛС | профиль | цитата
Леонид, Спасибо. Щас разберусь. Наверно чуть переделать надо будет. Мне нужно, чтоб сообщение выдавалось только один раз.
------------ Дoбавленo в 19.32:
Леонид, Есть подозрение, что Ваша схема работает неправильно, а вернее совсем не работает. Попробуйте задать поиск или 75 или 90 или 40, результат будет один и тот-же. Ну, или я дуб дерево.
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 8930
Рейтинг: 823
#6: 2012-09-07 20:20:32 ЛС | профиль | цитата
juk, наши Math (да и все прочие подобные) имеют фичу: при подаче события с данными на точку doDefoult при свойстве 0, данные записываются в свойство. У себя эти компоненты скорректировал, но забыл предупредить, надо на этот линк поставить doData (Null или 0):
errordel.jpg
карма: 19

0
файлы: 1errordel.jpg [14.6KB] [291]
Ответов: 902
Рейтинг: 27
#7: 2012-09-07 20:38:27 ЛС | профиль | цитата
Да, спасибо, теперь работает.
Немного изменил под свои нужды. Надеюсь правильно.

code_29004.txt
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
файлы: 1code_29004.txt [7.7KB] [125]
Ответов: 16884
Рейтинг: 1239
#8: 2012-09-07 23:49:42 ЛС | профиль | цитата
juk писал(а):
Надеюсь правильно.
doData перед Memory выбрось. Лишнее оно там.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 902
Рейтинг: 27
#9: 2012-09-08 01:20:01 ЛС | профиль | цитата
Tad, У меня без него почемуто не работает. Хотя я тоже сначала думал, что лишнее.
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Разработчик
Ответов: 26170
Рейтинг: 2127
#10: 2012-09-08 02:13:40 ЛС | профиль | цитата
juk писал(а):
У меня без него почемуто не работает

Да быть такого не может -- doClear не принимает данные со входа, только из свойств
карма: 22

0
Ответов: 902
Рейтинг: 27
#11: 2012-09-08 09:31:52 ЛС | профиль | цитата
nesco писал(а):
Да быть такого не может

Да, точно. Ступил.
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 16884
Рейтинг: 1239
#12: 2012-09-08 09:52:24 ЛС | профиль | цитата
Tad писал(а):
doData перед Memory выбрось.
juk писал(а):
У меня без него почемуто не работает.
juk писал(а):
Да, точно. Ступил.
Вывод: Помогать тебе не стоит.
Не проверяешь советы.
Вот так смотрится схема после чистки.
Add(MainForm,950183,126,182)
{
}
Add(Button,11181565,126,98)
{
Left=25
Top=15
Data=Integer(0)
link(onClick,12330231:doEvent1,[])
}
Add(StrList,900704,357,112)
{
Strings=#74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000011111111111111111111111111111111111111111111111111101|74:00000000000000000000000000011111111111111111111111111111111111111111111101|74:00000000000000000000000000011111111111111111111111111111111111111111111101|74:00000000000000000000000000011111111111111111111111111111111111111111111101|74:00000000000000000000000000011111111111111111111111111111111111111111111101|74:00000000000000000000000000011111111111111111111111111111111111111111111101|74:00000000000000000000000000011111111111111111111111111111111111111111111101|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:00000000000000000000000000011111111111111111111111111111111111111100000001|74:01111111111111000000011111111111111111111111111111111111111111111100000001|74:01111111111111000000011111111111111111111111111111111111111111111100000001|74:01111111111111000000011111111111111111111111111111111111111111111100000001|74:01111111111111000000011111111111111111111111111111111111111111111100000001|74:01111111111111000000011111111111111111111111111111111111111111111100000001|74:01111111111111000000011111111111111111111111111111111111111111111100000001|74:01111111111111111111111111111111111111111111111111111111111111111100000001|74:01111111111111111111111111111111111111111111111111111111111111111100000001|74:01111111111111111111111111111111111111111111111111111111111111111100000001|74:01111111111111111111111111111111111111111111111111111111111111111100000001|74:01111111111111111111111111111111111111111111111111111111111111111100000001|74:01111111111111111111111111111111111111111111111111111111111111111100000001|74:01111111111111111111111111111111111111111111111000000000000000000000000001|74:01111111111111111111111111111111111111111111111000000000000000000000000001|74:01111111111111111111111111111111111111111111111000000000000000000000000001|74:01111111111111111111111111111111111111111111111000000000000000000000000001|74:01111111111111111111111111111111111111111111111000000000000000000000000001|74:01111111111111111111111111111111111111111111111000000000000000000000000001|
}
Add(Message,1689361,721,273)
{
Message="есть"
}
Add(Hub,12330231,168,98)
{
link(onEvent1,10837613:doValue,[])
link(onEvent2,9047068:doRead,[(192,111)(192,188)])
}
Add(ArrayEnum,16468696,371,203)
{
onBreakEnable=0
link(onItem,4813160:doCopy,[])
link(Array,12226898:Var2,[])
}
Add(For,15956180,294,182)
{
Start=1
InData=0
link(onEvent,9197468:doEvent1,[])
link(onStop,2297791:doCompare,[(334,195)(334,272)])
}
Add(ArrayRW,9047068,203,182)
{
Index=Integer(0)
link(onRead,12077250:doLength,[])
link(Array,12226898:Var1,[(209,166)])
}
Add(Length,12077250,245,182)
{
link(onLength,15956180:doFor,[])
}
Add(GetDataEx,12226898,371,161)
{
link(Data,900704:Array,[])
}
Add(Copy,4813160,427,203)
{
Count=1
link(onCopy,661975:doCompare,[])
link(Position,15956180:Position,[(440,194)(420,194)(420,244)(300,244)])
}
Add(Math,4763354,525,203)
{
ResultType=0
Point(doClear)
link(onResult,10087499:doCompare,[])
link(Op1,4763354:Result,[(531,191)(567,191)(567,245)(531,245)])
}
Add(If_else,661975,469,203)
{
Op1=Integer(1)
link(onTrue,4763354:doOperation,[])
link(onFalse,6594203:doWork2,[])
}
Add(Hub,9197468,336,182)
{
link(onEvent1,6594203:doWork1,[(515,188)])
link(onEvent2,16468696:doEnum,[(360,195)(360,209)])
}
Add(HubEx,6594203,511,210)
{
link(onEvent,4763354:doClear,[])
}
Add(If_else,10087499,581,203)
{
Type=4
Op2=Integer(60)
link(onTrue,3295394:doEvent1,[])
}
Add(If_else,2297791,672,266)
{
Op2=Integer(0)
link(onTrue,7724337:doMessage,[(712,272)(712,237)])
link(onFalse,1689361:doMessage,[])
link(Op1,10837613:Value,[])
}
Add(Memory,10837613,672,98)
{
Default=Integer(1)
}
Add(Hub,3295394,623,203)
{
OutCount=3
link(onEvent1,10837613:doClear,[(647,209)(647,111)])
link(onEvent2,15956180:doStop,[(656,216)(656,263)(282,263)(282,195)])
link(onEvent3,16468696:doStop,[(651,223)(651,256)(359,256)(359,216)])
}
Add(Message,7724337,721,231)
{
Message="нет"
}


карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
1
Голосовали:juk
Ответов: 902
Рейтинг: 27
#13: 2012-09-08 13:21:12 ЛС | профиль | цитата
Tad писал(а):
Вывод: Помогать тебе не стоит.
Не проверяешь советы.


С чего такой вывод?
Проверил же.
За очищенную схемку отдельное спасибо в виде: +
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 16884
Рейтинг: 1239
#14: 2012-09-08 14:33:12 ЛС | профиль | цитата
Ладно. Забили.
Вариант №2
code_29014.txt

Время на поиск то же.
Так как тебе нужно только узнать есть или нет, то Math можно спокойно удалить.
Событие у Pos только если есть.
Мне второй вариант больше по душе.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_29014.txt [7.1KB] [134]
Ответов: 902
Рейтинг: 27
#15: 2012-09-08 14:48:53 ЛС | профиль | цитата
Tad, Спасибо. На сегодня лимит голосов исчерпал, но обязательно плюсану. Не забуду.
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)