Add(MainForm,6168812,77,119)
{
Left=20
Top=105
Width=296
Height=281
Position=1
link(onCreate,10511176:doEvent1,[])
}
Add(ArrayEnum,11530578,217,140)
{
link(onItem,12950487:doConvert,[])
link(onEndEnum,9387158:doEnum,[(261,153)(261,219)(205,219)(205,286)])
link(Array,533869:Array,[])
}
Add(StrList,10534379,343,140)
{
}
Add(ListBox,533869,203,70)
{
Left=10
Top=35
Width=130
Height=155
TabOrder=-1
Strings=#7:0010000|7:0111000|7:0110000|7:0000010|7:0100010|
}
Add(Convertor,12950487,273,140)
{
Mode=7
link(onResult,10534379:doAdd,[])
}
Add(StrList,1659569,343,280)
{
}
Add(ListBox,2303860,203,210)
{
Left=145
Top=35
Width=130
Height=155
TabOrder=-1
Strings=#7:0001000|7:0011000|7:0110000|7:0110010|7:0100010|
}
Add(ArrayEnum,9387158,217,280)
{
link(onItem,15685451:doConvert,[])
link(onEndEnum,2361031:doEnum,[(303,293)(303,216)])
link(Array,2303860:Array,[])
}
Add(Convertor,15685451,273,280)
{
Mode=7
link(onResult,1659569:doAdd,[])
}
Add(ArrayEnum,2361031,357,210)
{
link(onItem,1185272:doRead,[(401,216)(401,286)(345,286)(345,356)])
link(onEndEnum,12521979:doData,[(411,223)(411,363)])
link(Array,10534379:Array,[])
}
Add(ArrayRW,1185272,357,350)
{
link(onRead,12521979:doOperation1,[])
link(Array,1659569:Array,[])
link(Index,2361031:Index,[])
}
Add(Edit,15479895,518,343)
{
Left=160
Top=195
Width=30
Text=""
}
Add(MultiElementEx,12521979,434,343)
{
@Hint=#11:Coincidence|
link(onEventData,15479895:doText,[])
link(onResult,1846163:doText,[(492,356)(492,391)])
link(Op2,2361031:Item,[(440,293)(363,293)])
}
BEGIN_SDK
Add(EditMultiEx,16634185,21,21)
{
WorkCount=#11:doOperation|12:doOperation1|6:doData|
EventCount=#11:onEventData|8:onResult|
DataCount=#3:Op2|
Width=489
Height=291
link(doOperation,10001985:doClear,[(269,27)(269,97)])
link(doOperation1,5611236:doOperation,[(35,34)(35,76)])
link(doData,1227567:doEvent1,[(245,41)(245,209)])
}
Add(Math,5611236,49,70)
{
OpType=6
ResultType=0
link(onResult,13113798:doEvent1,[])
link(Op2,16634185:Op2,[(62,46)(27,46)])
}
Add(Hub,13113798,98,70)
{
OutCount=3
link(onEvent1,10949165:doBits,[])
link(onEvent2,7134683:doCalc,[(184,83)(184,160)])
}
Add(Memory,7725410,287,105)
{
}
Add(Memory,14433286,280,98)
{
}
Add(Memory,11543668,273,91)
{
}
Add(Memory,5639956,266,84)
{
}
Add(Memory,2800136,259,77)
{
}
Add(Memory,7989143,252,70)
{
}
Add(Math,9717891,364,154)
{
Op1=1
ResultType=0
link(onResult,10001985:doValue,[(408,160)(408,129)(359,129)(359,90)])
link(Op2,14671923:Var2,[])
}
Add(Memory,10001985,371,84)
{
Default=Integer(0)
}
Add(MathParse,7134683,252,154)
{
DataCount=6
MathStr="%1+%2+%3+%4+%5+%6"
ResultType=0
link(onResult,9717891:doOperation,[])
link(X1,7989143:Value,[])
link(X2,2800136:Value,[])
link(X3,5639956:Value,[])
link(X4,11543668:Value,[])
link(X5,14433286:Value,[])
link(X6,7725410:Value,[])
}
Add(IntToBits,10949165,175,70)
{
Count=6
Data_0=Integer(0)
Data_1=Integer(1)
link(onBit1,7989143:doValue,[])
link(onBit2,2800136:doValue,[])
link(onBit3,5639956:doValue,[])
link(onBit4,11543668:doValue,[])
link(onBit5,14433286:doValue,[])
link(onBit6,7725410:doValue,[])
}
Add(MathParse,11146612,406,252)
{
MathStr="%1*100 div 35"
link(onResult,16634185:onResult,[(474,258)(474,34)])
link(X1,8057683:Result,[])
}
Add(Hub,1227567,322,203)
{
link(onEvent1,8057683:doOperation,[])
link(onEvent2,11146612:doCalc,[(380,216)(380,258)])
}
Add(GetDataEx,14671923,364,126)
{
link(Data,10001985:Value,[])
}
Add(Math,8057683,406,203)
{
OpType=1
Op1=35
ResultType=0
link(onResult,16634185:onEventData,[(474,209)(474,27)])
link(Op2,14671923:Var3,[(419,135)])
}
END_SDK
Add(Hub,10511176,140,133)
{
OutCount=3
link(onEvent1,12521979:doOperation,[(303,139)(303,349)])
link(onEvent2,11530578:doEnum,[])
}
Add(Label,926163,119,21)
{
Left=45
Top=10
Width=55
Height=17
Font=[MS Sans Serif,8,1,0,1]
Caption="One Cow"
}
Add(Label,1363523,203,21)
{
Left=185
Top=10
Width=56
Height=17
Font=[MS Sans Serif,8,1,0,1]
Caption="Tow Cow"
}
Add(Label,13461899,245,21)
{
Left=80
Top=205
Width=74
Height=17
Font=[MS Sans Serif,8,1,0,1]
Caption="Coincidence"
}
Add(Edit,1846163,518,385)
{
Left=160
Top=215
Width=30
Text=""
}
Add(Label,1893345,161,21)
{
Left=195
Top=217
Width=13
Height=17
Font=[MS Sans Serif,8,1,0,1]
Caption="%"
}
Этот топик читают: Гость
Разработчик
Ответов: 26151
Рейтинг: 2127
|
|||
Вариант с IntToBits
|
|||
карма: 22 |
|
Ответов: 8926
Рейтинг: 823
|
|||
карма: 19 |
| ||
файлы: 1 | code_8350.txt [5.6KB] [484] |
Разработчик
Ответов: 26151
Рейтинг: 2127
|
|||
Ну вот, одни советники и пытаются выступить, видимо, только у них и есть интерес к оттачиванию методов оптимизации алгоритмов. Остальные пользователи, что-то приутихли.
|
|||
карма: 22 |
|
Ответов: 899
Рейтинг: 43
|
|||
Мой вариант, доработанный
|
|||
карма: 0 |
| ||
Голосовали: | Stasie |
Разработчик
Ответов: 26151
Рейтинг: 2127
|
|||
unalex, что-то у меня от коров остались одни голени на холодец
А так, неплохо. Есть и поголовная идентификация и стадная, да и интерфейс -- дружественный. |
|||
карма: 22 |
|
Ответов: 899
Рейтинг: 43
|
|||
nesco, сейчас исправлю(я как раз пост редактировал, не ту схемку сунул)
[size=-2]------ Добавлено в 23:29 nesco писал(а): Есть и поголовная идентификация и стадная, да и интерфейс -- дружественныйПосильная помощь народному хозяйству |
|||
карма: 0 |
| ||
файлы: 1 | Cow.sha [118.7KB] [533] | ||
Голосовали: | Валерий |
Разработчик
Ответов: 26151
Рейтинг: 2127
|
|||
unalex, ну вот, уже лучше, холодец наваристей будет
|
|||
карма: 22 |
| ||
файлы: 1 | cow_002.jpg [6.2KB] [438] |
Ответов: 899
Рейтинг: 43
|
|||
Хе, а я только что открывал у меня полный суповой набор
|
|||
карма: 0 |
|
Ответов: 16884
Рейтинг: 1239
|
|||
nesco писал(а): а ссылку на источник дать забыл в наши дни в некоторых случаях используется и упрощенная запись римских чисел: например, в программе Microsoft Excel при преобразовании арабских цифр в римские при помощи функции "РИМСКОЕ()" можно использовать несколько видов представления чисел, от классического до сильно упрощенного (так, число 499 может быть записано как CDXCIX, LDVLIV, XDIX, VDIV или ID).
http://www.cross-plus-a.com/rus/html/voc7rom.htm Это все к тому о чем ты говорил выше - не корректно поставлена задача. |
|||
карма: 25 |
|
Ответов: 899
Рейтинг: 43
|
|||
nesco, а что такое
nesco писал(а): метод определения линейного синдрома битовых ошибок второй матрицы, по отношению к первойобъясни(те) в нескольких словах, как он работает, может пригодится [size=-2]------ Добавлено в 23:42 можно использовать несколько видов представления чисел, от классического до сильно упрощенного (так, число 499 может быть записано как CDXCIX, LDVLIV, XDIX, VDIV или ID)
читаю, аж страшно становится |
|||
карма: 0 |
|
Разработчик
Ответов: 26151
Рейтинг: 2127
|
|||
unalex,
Это -- "умное" название обычного XOR'а. Да пошутил я, просто, хотя, именно это метод широко используется для определения ошибок. Tad, остановимся на методе классического преобразования десятичной в Римскую, и расширенной для обратного. С чертой -- пролет, никак у нас ее не поставить и не передать. |
|||
карма: 22 |
|
Ответов: 16884
Рейтинг: 1239
|
|||
nesco, Твой компонент переводит любой вариант римских правильно. Все ОК
------------ Дoбавленo: unalex писал(а): читаю, аж страшно становится |
|||
карма: 25 |
|
Ответов: 5446
Рейтинг: 323
|
|||
А черту можно скобками (квадратными например) изобразить
|
|||
карма: 1 |
|
Разработчик
Ответов: 26151
Рейтинг: 2127
|
|||
iarspider писал(а): А черту можно скобками (квадратными например) изобразить------------ Дoбавленo: iarspider, я тут подумал -- а может проще разделителем, типа "тире". |
|||
карма: 22 |
|
Ответов: 16884
Рейтинг: 1239
|
|||
nesco, а миллион - двойная черта. Но ничего в голову не приходит
|
|||
карма: 25 |
|