Подсчет символов в строке

Форумы Помощь по пакетуПодсчет символов в строке ← Ctrl12Ctrl →

Этот топик читают: Гость

Ответов: 1536

Рейтинг: 176

#16: 2012-09-08 16:04:32 ЛС | профиль | цитата

juk писал(а):

Необходимо посчитать 1 (единицы) в вертикальных строках списка.
И если встречается количество непрерывно идущих 1 более 60, выдать сообщение.

Tad, я насчитал 40 столбцов с единицами, а почему у тебя 28?

Add(Math,3451689,602,154)
{
 ResultType=0
 Point(doClear)
 link(onResult,16411786:doCompare,[])
 link(Op1,3451689:Result,[(608,142)(596,142)(596,198)(608,198)])
}
Add(StrList,900704,343,98)
{
 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(For,4822084,294,154)
{
 End=74
 link(onEvent,2210981:doEnum,[])
}
Add(ArrayEnum,2210981,357,154)
{
 link(onItem,4536272:doCopy,[])
 link(onEndEnum,14920367:doWork2,[])
 link(Array,900704:Array,[])
}
Add(Copy,4536272,427,154)
{
 Count=1
 link(onCopy,14678914:doCompare,[(471,160)(471,139)])
 link(Position,4822084:Position,[(440,132)(409,132)(409,198)(300,198)])
}
Add(Button,7588959,182,84)
{
 Left=20
 Top=25
 link(onClick,14779296:doEvent1,[])
}
Add(Hub,14779296,231,84)
{
 OutCount=3
 link(onEvent1,6216016:doClear,[(759,90)(759,167)])
 link(onEvent2,14920367:doWork1,[(550,97)])
 link(onEvent3,4822084:doFor,[(275,104)(275,160)])
}
Add(If_else,16411786,651,154)
{
 Type=2
 Op2=Integer(60)
 link(onTrue,11292532:doEvent1,[])
 AddHint(18,-19,27,13,Op2)
}
Add(Math,6216016,784,154)
{
 Op2=1
 ResultType=0
 Point(doClear)
 link(onResult,6654526:doText,[])
 link(Op1,6216016:Result,[(790,142)(778,142)(778,198)(790,198)])
}
Add(Hub,11292532,700,154)
{
 link(onEvent1,6216016:doOperation,[])
 link(onEvent2,13889574:doWork2,[(730,167)(730,219)])
}
Add(Label,6654526,833,154)
{
 Left=100
 Top=25
 Width=75
}
Add(HubEx,13889574,525,213)
{
 Angle=2
 link(onEvent,2210981:doStop,[(331,219)(331,167)])
}
Add(HubEx,14920367,546,161)
{
 link(onEvent,3451689:doClear,[])
}
Add(If_else,14678914,483,133)
{
 Op2=Integer(1)
 link(onTrue,3451689:doOperation,[(559,139)(559,160)])
 link(onFalse,13889574:doWork1,[(529,146)])
}

карма: 1

Не так страшна ошибка, как опасность её не заметить.

Разработчик

Ответов: 26160

Рейтинг: 2127

#17: 2012-09-08 16:09:02 ЛС | профиль | цитата

ser_davkin писал(а):

я насчитал 40 столбцов с единицами, а почему у тебя 28?

Наверное потому, что

juk писал(а):

встречается количество непрерывно идущих 1 более 60

карма: 22

Ответов: 1376

Рейтинг: 197

#18: 2012-09-08 16:13:47 ЛС | профиль | цитата

ser_davkin, 28 - первая колонка с более 60 единиц
продолжение схемной темы от Tad'а


Add(MainForm,1737633,294,56)
{
 Width=144
 Height=267
}
Add(StrList,900704,378,28)
{
 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(Position,25134,504,168)
{
 Target="11111111111111111111111111111111111111111111111111111111111"
 ShortSearch=1
 link(onSearch,7861047:doEvent1,[])
 link(Str,11026281:Var2,[])
}
Add(For,4822084,343,112)
{
 Start=1
 End=74
 onBreakEnable=0
 link(onEvent,2210981:doEnum,[])
 link(onStop,16662936:doMessage,[(383,125)(383,160)])
}
Add(ArrayEnum,2210981,392,112)
{
 link(onItem,4536272:doCopy,[])
 link(onEndEnum,15004481:doEvent1,[(432,125)(432,174)])
 link(Array,8063786:Var2,[])
}
Add(StrCat,10704761,504,112)
{
 Point(doClear)
 link(Str1,11026281:Var3,[(510,100)(546,100)(546,154)])
}
Add(GetDataEx,11026281,504,149)
{
 link(Data,10704761:Result,[])
}
Add(Copy,4536272,441,112)
{
 Count=1
 link(onCopy,10704761:doStrCat,[])
 link(Position,3667985:Var2,[(454,92)(623,92)])
}
Add(Button,7588959,294,112)
{
 Left=15
 Top=10
 link(onClick,4822084:doFor,[])
}
Add(Hub,15004481,462,168)
{
 link(onEvent1,25134:doSearch,[])
 link(onEvent2,10704761:doClear,[(490,181)(490,125)])
}
Add(Message,5110078,581,168)
{
 Caption=">= 64"
 link(Message,3667985:Var1,[(587,145)])
}
Add(Hub,7861047,546,168)
{
 link(onEvent1,5110078:doMessage,[])
 link(onEvent2,4822084:doStop,[(572,181)(572,206)(335,206)(335,125)])
}
Add(Message,16662936,392,154)
{
 Message="Не найдено"
 Caption="Результат"
}
Add(GetDataEx,3667985,617,140)
{
 Angle=2
 link(Data,4822084:Position,[(623,220)(349,220)])
}
Add(Position,16761170,511,336)
{
 Target="11111111111111111111111111111111111111111111111111111111111"
 ShortSearch=1
 link(onSearch,3497349:doAdd,[])
 link(Str,10917475:Var2,[])
}
Add(For,10509326,350,280)
{
 Start=1
 End=74
 link(onEvent,15699963:doEnum,[])
}
Add(ArrayEnum,15699963,399,280)
{
 link(onItem,2496210:doCopy,[])
 link(onEndEnum,15953916:doEvent1,[(439,293)(439,342)])
 link(Array,7763090:Var,[])
}
Add(StrCat,5475057,511,280)
{
 Point(doClear)
 link(Str1,10917475:Var3,[(517,268)(553,268)(553,322)])
}
Add(GetDataEx,10917475,511,317)
{
 link(Data,5475057:Result,[])
}
Add(Copy,2496210,448,280)
{
 Count=1
 link(onCopy,5475057:doStrCat,[])
 link(Position,939167:Var2,[(461,260)(630,260)])
}
Add(Button,6016256,301,280)
{
 Left=15
 Top=50
 link(onClick,10509326:doFor,[])
}
Add(Hub,15953916,469,336)
{
 link(onEvent1,16761170:doSearch,[])
 link(onEvent2,5475057:doClear,[(497,349)(497,293)])
}
Add(GetDataEx,939167,624,308)
{
 Angle=2
 link(Data,10509326:Position,[(630,388)(356,388)])
}
Add(GetDataEx,8063786,392,77)
{
 link(Data,900704:Array,[])
}
Add(LineBreak,495394,406,91)
{
 Type=1
 link(Data,8063786:Var3,[(412,82)])
 Primary=[7763090,-7,161]
}
Add(ListBox,3497349,588,336)
{
 Left=15
 Top=80
 Height=150
 link(Str,939167:Var1,[(594,313)])
}
Add(InfoTip,6563159,644,168)
{
 Info=#16:Первая встречная|
}
Add(InfoTip,13655014,651,336)
{
 Info=#9:Все >= 60|
}

карма: 1

Голосовали: Tad

Ответов: 1536

Рейтинг: 176

#19: 2012-09-08 16:23:52 ЛС | профиль | цитата

juk писал(а):

И если встречается количество непрерывно идущих 1

А-а-а, "встречается", тогда понятно!

карма: 1

Не так страшна ошибка, как опасность её не заметить.

Ответов: 16884

Рейтинг: 1239

#20: 2012-09-08 18:42:59 ЛС | профиль | цитата

juk писал(а):

И если встречается количество непрерывно идущих 1 более 60, выдать сообщение.
Если таких вертикальных строк нет, то, тоже выдать сообщение.

ser_davkin писал(а):

я насчитал 40 столбцов с единицами,

juk писал(а):

Необходимо перебрать и проверить более 4000 файлов.

Насколько я понял - если в файле есть колонка с 60-тью непрерывными 1, то сказать "есть такая" и перейти к следующему файлу.
Может быть и не так...
Только juk-у это известно.(На то он и juk

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Голосовали:

juk

Ответов: 902

Рейтинг: 27

#21: 2012-09-08 19:05:52 ЛС | профиль | цитата

Tad писал(а):

Насколько я понял - если в файле есть колонка с 60-тью непрерывными 1, то сказать "есть такая" и перейти к следующему файлу.

Именно так, и не как иначе.

------------ Дoбавленo в 18.59:
Tad, Ну вот, еще раз плюсанул.
------------ Дoбавленo в 19.05:
Хотел еще раз Леонид,у плюсануть, опять лимит исчерпан.
------------ Дoбавленo в 19.05:
foksov, Вам тоже спасибо.

карма: 1

Время верстки: %cr_time% Текущее время: %time%

Ответов: 16884

Рейтинг: 1239

#22: 2012-09-08 19:33:55 ЛС | профиль | цитата

foksov писал(а):

продолжение схемной темы от Tad'а

foksov, я оставил такой вариант для смекалки juk-а

, но ты схавал его +

juk, самый оптимальный вариант (и быстрый) от foksov.

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Ответов: 1376

Рейтинг: 197

#23: 2012-09-08 19:36:58 ЛС | профиль | цитата

[offtop]

Tad писал(а):

я оставил такой вариант для смекалки juk-а

предупреждать надо

[/offtop]

карма: 1

Ответов: 8926

Рейтинг: 823

#24: 2012-09-08 21:04:22 ЛС | профиль | цитата

juk писал(а):

Хотел еще раз Леонид,у плюсануть, опять лимит исчерпан.

карма: 19

Голосовали:

ashkalov, juk

Форумы Помощь по пакетуПодсчет символов в строке ← Ctrl12Ctrl →


Сообщение ...
Прикрепленные файлы (файлы не залиты)