Вверх ↑
Этот топик читают: Гость
Ответов: 1
Рейтинг: 0
#1: 2018-10-17 19:35:11 ЛС | профиль | цитата
Добрый вечер.
Помогите с написанием программы так как я с этой программой столкнулся впервые.
В общем, есть поле на котором 34 клетки и 18 различных букв. некоторые буквы встречаются два, три а то и четыре раза. Есть мячик который может упасть на поле случайным образом с равной долей вероятности на любую клетку. Нужна программка которая высчитывает вероятность сбора всех определенных слов из букв, но при этом если мяч упал на букву то эта буква блокируется, и желательно чтобы можно было изменить количество различных букв и удалить или добавить слова.
Благодарю за любую оказанную помощь.
карма: 0

0
Ответов: 1926
Рейтинг: 172
#2: 2018-10-17 20:23:56 ЛС | профиль | цитата
Kirill2121, почему ты решил выбрать для этого именно hiasm? Мне кажется, вполне подойдёт и обычный excel (макросы), форумов по нему гораздо больше, помогут быстрее.
карма: 9
0
Ответов: 632
Рейтинг: 4
#3: 2018-10-17 20:27:31 ЛС | профиль | цитата
Kirill2121 писал(а):
Добрый вечер.
Помогите с написанием программы так как я с этой программой столкнулся впервые.
В общем, есть поле на котором 34 клетки и 18 различных букв. некоторые буквы встречаются два, три а то и четыре раза. Есть мячик который может упасть на поле случайным образом с равной долей вероятности на любую клетку. Нужна программка которая высчитывает вероятность сбора всех определенных слов из букв, но при этом если мяч упал на букву то эта буква блокируется, и желательно чтобы можно было изменить количество различных букв и удалить или добавить слова.
Благодарю за любую оказанную помощь.

скоро сделаю.
карма: 0

0
Ответов: 632
Рейтинг: 4
#4: 2018-10-17 21:32:01 ЛС | профиль | цитата
готова!
https://cloud.mail.ru/public/4qSb/9xW8Esm8n
карма: 0

-1
Голосовали:sla8a
Ответов: 2236
Рейтинг: 676
#5: 2018-10-17 23:52:57 ЛС | профиль | цитата
Vadimluk1 писал(а):
готова!
Да не выкладывайте вы такие "схемы"! Желание помочь это конечно хорошо, но это не помощь.

Редактировалось 1 раз(а), последний 2018-10-18 00:04:26
карма: 11

0
Ответов: 632
Рейтинг: 4
#6: 2018-10-18 13:11:06 ЛС | профиль | цитата
sla8a писал(а):
Vadimluk1 писал(а):
готова!
Да не выкладывайте вы такие "схемы"! Желание помочь это конечно хорошо, но это не помощь.

Если все умничают и не кто не помогает, то даже не очень красивая схема может вполне спасти!
карма: 0

0
Ответов: 2236
Рейтинг: 676
#7: 2018-10-19 00:50:48 ЛС | профиль | цитата
Vadimluk1 писал(а):
не очень красивая схема
Вы себе льстите. Дела не в красоте, вы не помогаете выкладывая это нагромождение ненужных элементов. Вы своими схемами приносите больше вреда, чем пользы! Дабы не "бла бла бла" ошибки вашей схемы:
1. Наплевательское отношение к схеме. Накидать в кучу элементов и сплести их связями это не схема.
2. 21 Font можно заменить одним.
3. 42 doData можно заменить одним списком.
4. Использование такого количества и так LineBreak не есть хорошо.
Vadimluk1 писал(а):
не кто не помогает
Помочь и подсказать это одно, а делать это уже совсем другое.

Редактировалось 1 раз(а), последний 2018-10-21 23:10:13
карма: 11

0
Ответов: 203
Рейтинг: 2
#8: 2018-10-19 08:26:57 ЛС | профиль | цитата
Тут особо не чего страшного нет. Просто человек в силу своего юного возраста не умеет мыслить логически, вот такой же порядок в голове как и на схеме. У меня с дочкой пока тоже самое. Думаю надо просто ему больше учиться. Может игры типа Factorio могут помощь. И да, схема ужас. Удачи Вам в дальнейшем развитии.
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#9: 2018-10-20 14:50:21 ЛС | профиль | цитата
Vadimluk1,

Add(MainForm,2953706,28,126)
{
Width=479
Height=357
Position=1
link(onCreate,810385:doRandomize,[])
}
Add(StrList,9871275,385,287)
{
Strings=#1: |1:А|1:Б|1:В|1:Г|1:Д|1:Е|1:Ё|1:Ж|1:З|1:И|1:Й|1:М|1:Н|1:К|1:Т|1:Р|1:П|1:О|1:З|1:Х|1:Э|
Point(Array)
}
Add(Random,911835,196,280)
{
Max=21
Point(doRandomWithoutRepeats)
link(onRandom,4882251:doWork2,[])
}
Add(Button,10555776,21,182)
{
Left=15
Top=30
link(onClick,1679107:doEvent1,[])
}
Add(Edit,14930206,987,392)
{
Left=70
Top=110
Width=185
Font=[Courier New,10,1,0,204]
Text=""
}
Add(Hub,1679107,63,182)
{
OutCount=6
link(onEvent2,1682323:doClear,[(312,195)(312,293)])
link(onEvent3,579777:doEvent,[(127,202)(127,300)])
link(onEvent4,14336987:doClear,[])
link(onEvent5,11628113:doFont,[(105,216)(105,384)])
link(onEvent6,8555710:doEvent,[(86,223)(86,335)])
}
Add(StrList,1682323,336,280)
{
Point(Array)
}
Add(ArrayEnum,2754767,336,336)
{
link(onItem,3544190:doRead,[])
link(onEndEnum,3051047:doEvent,[(375,349)(375,398)])
link(Array,1682323:Array,[])
}
Add(ArrayRW,3544190,385,336)
{
link(onRead,14336987:doStrCat,[(424,342)(424,202)])
link(Array,9871275:Array,[])
}
Add(Random,15809012,469,399)
{
Min=2
Max=10
Point(doRandomWithoutRepeats)
link(onRandom,13304753:doCopy,[])
}
Add(Copy,13304753,525,399)
{
link(onCopy,3099162:doEvent2,[(568,405)(568,307)])
link(Str,8863431:Var2,[])
link(Count,15809012:Random,[(545,387)(514,387)(514,441)(475,441)])
}
Add(StrList,15101947,231,119)
{
Strings=#17:0;17;16;10;3;6;15|9:0;5;18;12|8:0;12;7;5|11:0;16;1;12;6|
Point(Array)
Point(onGetString)
Point(doGetString)
link(onGetString,6948114:doEnum,[])
}
Add(Label,6661841,63,553)
{
Left=50
Top=150
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="А"
AutoSize=1
Alignment=2
Point(doFont)
Point(doSetFocus)
Point(PHandle)
}
Add(Label,2051362,154,553)
{
Left=90
Top=150
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="Б"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,7733614,238,553)
{
Left=125
Top=150
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="В"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,8691309,322,553)
{
Left=160
Top=150
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="Г"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,14628091,413,553)
{
Left=195
Top=150
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="Д"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,8130980,497,553)
{
Left=235
Top=150
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="Е"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,8752230,588,553)
{
Left=270
Top=150
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="Ё"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,15156500,672,553)
{
Left=305
Top=150
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="Ж"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,1752274,756,553)
{
Left=340
Top=150
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="З"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,3238332,63,602)
{
Left=50
Top=200
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="И"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,2115920,154,602)
{
Left=90
Top=200
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="Й"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,14430792,238,602)
{
Left=125
Top=200
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="М"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,3524232,322,602)
{
Left=160
Top=200
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="Н"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,4939962,413,602)
{
Left=190
Top=200
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="К"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,5356664,497,602)
{
Left=230
Top=200
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="Т"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,5919492,588,602)
{
Left=265
Top=200
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="Р"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,13274850,672,602)
{
Left=305
Top=200
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="П"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,3457518,756,602)
{
Left=340
Top=200
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="О"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,16627627,63,651)
{
Left=50
Top=250
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="З"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,11822323,154,651)
{
Left=90
Top=250
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="Х"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Label,10713661,238,651)
{
Left=125
Top=250
Width=20
Height=27
Font=[Courier New,16,1,0,204]
Caption="Э"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(StrCat,14336987,497,196)
{
Point(doClear)
link(Str1,8863431:Var1,[(503,184)(531,184)])
}
Add(GetDataEx,8863431,525,231)
{
Angle=3
link(Data,14336987:Result,[(503,236)])
}
Add(Str_Enum,14832564,721,315)
{
Delimiter=""
link(onEnum,2208418:doAdd,[(800,321)(800,293)])
link(onEndEnum,13023284:doData,[(803,328)(803,342)])
}
Add(StrList,2208418,812,287)
{
Point(Array)
Point(Count)
Point(EndIdx)
}
Add(Hub,3099162,581,294)
{
InCount=2
OutCount=4
link(onEvent1,2208418:doClear,[])
link(onEvent2,2473683:doReset,[(680,307)(680,398)])
link(onEvent3,7623057:In,[])
link(onEvent4,14832564:doEnum,[])
}
Add(StrList,1093717,910,287)
{
Strings=#1:А|1:Б|1:В|1:Г|1:Д|1:Е|1:Ё|1:Ж|1:З|1:И|1:Й|1:М|1:Н|1:К|1:Т|1:Р|1:П|1:О|1:З|1:Х|1:Э|
Point(doGetIndex)
Point(onGetIndex)
link(onGetIndex,6635115:doEvent1,[])
}
Add(IndexToChanel,13875425,1043,336)
{
Count=21
Point(Data)
link(onEvent1,8500476:In,[])
link(onEvent2,3857488:In,[])
link(onEvent3,5322609:In,[])
link(onEvent4,12730910:In,[])
link(onEvent5,7112460:In,[])
link(onEvent6,1747933:In,[])
link(onEvent7,10625157:In,[])
link(onEvent8,10487357:In,[])
link(onEvent9,16559551:In,[])
link(onEvent10,2633781:In,[])
link(onEvent11,16700187:In,[])
link(onEvent12,13673677:In,[])
link(onEvent13,589583:In,[])
link(onEvent14,16505457:In,[])
link(onEvent15,11487536:In,[])
link(onEvent16,4643307:In,[])
link(onEvent17,4452355:In,[])
link(onEvent18,12706901:In,[])
link(onEvent19,337247:In,[])
link(onEvent20,5830037:In,[])
link(onEvent21,11686259:In,[])
link(Data,11410883:Value,[])
}
Add(Hub,6167302,182,378)
{
OutCount=21
link(onEvent1,4788235:In,[])
link(onEvent2,7357810:In,[])
link(onEvent3,14309097:In,[])
link(onEvent4,2744460:In,[])
link(onEvent5,11771094:In,[])
link(onEvent6,1861773:In,[])
link(onEvent7,5686857:In,[])
link(onEvent8,15297290:In,[])
link(onEvent9,14172644:In,[])
link(onEvent10,2587530:In,[])
link(onEvent11,7845303:In,[])
link(onEvent12,5034888:In,[])
link(onEvent13,904665:In,[])
link(onEvent14,9951702:In,[])
link(onEvent15,9858962:In,[])
link(onEvent16,8775504:In,[])
link(onEvent17,12663772:In,[])
link(onEvent18,14280417:In,[])
link(onEvent19,6991568:In,[])
link(onEvent20,8087121:In,[])
link(onEvent21,5915331:In,[])
}
Add(Font,11628113,133,378)
{
Font=[Courier New,16,1,0,204]
link(onFont,6167302:doEvent1,[])
}
Add(LineBreak,16446947,14,560)
{
Caption=""
Color=-16777203
link(Out,8324227:doWork2,[])
Primary=[4788235,196,-182]
}
Add(LineBreak,5041779,98,560)
{
Caption=""
Color=-16777203
link(Out,14639181:doWork2,[])
Primary=[7357810,112,-175]
}
Add(LineBreak,12416474,189,560)
{
Caption=""
Color=-16777203
link(Out,763465:doWork2,[])
Primary=[14309097,21,-168]
}
Add(LineBreak,12437951,273,560)
{
Caption=""
Color=-16777203
link(Out,9705347:doWork2,[])
Primary=[2744460,-63,-161]
}
Add(LineBreak,1140652,364,560)
{
Caption=""
Color=-16777203
link(Out,5237446:doWork2,[])
Primary=[11771094,-154,-154]
}
Add(LineBreak,16234588,448,560)
{
Caption=""
Color=-16777203
link(Out,10521607:doWork2,[])
Primary=[1861773,-238,-147]
}
Add(LineBreak,10327290,539,560)
{
Caption=""
Color=-16777203
link(Out,12051640:doWork2,[])
Primary=[5686857,-329,-140]
}
Add(LineBreak,15833410,623,560)
{
Caption=""
Color=-16777203
link(Out,6159356:doWork2,[])
Primary=[15297290,-413,-133]
}
Add(LineBreak,1444016,707,560)
{
Caption=""
Color=-16777203
link(Out,5200564:doWork2,[])
Primary=[14172644,-497,-126]
}
Add(LineBreak,14157801,14,609)
{
Caption=""
Color=-16777203
link(Out,8949373:doWork2,[])
Primary=[2587530,196,-168]
}
Add(LineBreak,13594221,105,609)
{
Caption=""
Color=-16777203
link(Out,4898538:doWork2,[])
Primary=[7845303,105,-161]
}
Add(LineBreak,8590066,189,609)
{
Caption=""
Color=-16777203
link(Out,12334686:doWork2,[])
Primary=[5034888,21,-154]
}
Add(LineBreak,8932686,273,609)
{
Caption=""
Color=-16777203
link(Out,5087490:doWork2,[])
Primary=[904665,-63,-147]
}
Add(LineBreak,4363246,364,609)
{
Caption=""
Color=-16777203
link(Out,15014586:doWork2,[])
Primary=[9951702,-154,-140]
}
Add(LineBreak,10220340,448,609)
{
Caption=""
Color=-16777203
link(Out,9451302:doWork2,[])
Primary=[9858962,-238,-133]
}
Add(LineBreak,1267270,539,609)
{
Caption=""
Color=-16777203
link(Out,12870799:doWork2,[])
Primary=[8775504,-329,-126]
}
Add(LineBreak,1554214,623,609)
{
Caption=""
Color=-16777203
link(Out,20089:doWork2,[])
Primary=[12663772,-413,-119]
}
Add(LineBreak,4383510,707,609)
{
Caption=""
Color=-16777203
link(Out,8521536:doWork2,[])
Primary=[14280417,-497,-112]
}
Add(LineBreak,881836,98,658)
{
Caption=""
Color=-16777203
link(Out,10790016:doWork2,[])
Primary=[8087121,112,-147]
}
Add(LineBreak,11102732,189,658)
{
Caption=""
Color=-16777203
link(Out,16447624:doWork2,[])
Primary=[5915331,21,-140]
}
Add(LineBreak,13146164,14,658)
{
Caption=""
Color=-16777203
link(Out,445248:doWork2,[])
Primary=[6991568,196,-154]
}
Add(Font,9578683,994,294)
{
Font=[Courier New,16,1,65280,204]
link(onFont,11410883:doValue,[])
}
Add(CounterEx,2473683,770,385)
{
Default=-1
Point(doReset)
Point(doMax)
link(onNext,16560515:doRead,[])
}
Add(ArrayRW,16560515,840,385)
{
link(onRead,1611503:doEvent1,[])
link(Array,2208418:Array,[(846,368)(818,368)])
}
Add(Hub,4408380,742,399)
{
link(onEvent1,2473683:doMax,[])
link(onEvent2,3857077:doData,[(766,412)(766,440)])
}
Add(Timer,959750,623,385)
{
Interval=500
Enable=1
AutoStop=1
Point(doAutoStop)
Point(onStop)
link(onTimer,2473683:doNext,[])
link(onStop,10881364:doData,[(663,398)(663,426)])
}
Add(DoData,3857077,819,434)
{
Point(Data)
link(onEventData,1226838:doEvent1,[(866,440)(866,479)(577,479)(577,405)])
link(Data,2208418:Count,[])
}
Add(Hub,1226838,595,399)
{
link(onEvent1,959750:doAutoStop,[])
link(onEvent2,959750:doTimer,[(616,412)(616,391)])
}
Add(Hub,1611503,882,385)
{
link(onEvent1,1093717:doGetIndex,[(903,391)(903,307)])
link(onEvent2,13565297:doStrCat,[])
}
Add(StrCat,13565297,931,392)
{
Point(doClear)
link(onStrCat,14930206:doText,[])
link(Str1,13565297:Result,[(937,380)(968,380)(968,432)(937,432)])
}
Add(LineBreak,12494416,889,399)
{
link(Out,13565297:doClear,[])
Primary=[7623057,-280,-91]
}
Add(LineBreak,975296,14,567)
{
Color=65280
link(Out,8324227:doWork3,[(53,573)])
Primary=[8500476,1078,-231]
}
Add(LineBreak,11333260,189,665)
{
Color=65280
link(Out,16447624:doWork3,[(228,671)])
Primary=[11686259,903,-189]
}
Add(LineBreak,9780545,98,665)
{
Color=65280
link(Out,10790016:doWork3,[(137,671)])
Primary=[5830037,1029,-196]
}
Add(LineBreak,7365371,14,665)
{
Color=65280
link(Out,445248:doWork3,[(53,671)])
Primary=[337247,1148,-203]
}
Add(LineBreak,10865394,707,616)
{
Color=65280
link(Out,8521536:doWork3,[(746,622)])
Primary=[12706901,490,-161]
}
Add(LineBreak,7278748,623,616)
{
Color=65280
link(Out,20089:doWork3,[(662,622)])
Primary=[4452355,609,-168]
}
Add(LineBreak,15732728,539,616)
{
Color=65280
link(Out,12870799:doWork3,[(578,622)])
Primary=[4643307,728,-175]
}
Add(LineBreak,4700392,448,616)
{
Color=65280
link(Out,9451302:doWork3,[(487,622)])
Primary=[11487536,784,-182]
}
Add(LineBreak,16149578,273,616)
{
Color=65280
link(Out,5087490:doWork3,[(312,622)])
Primary=[589583,889,-196]
}
Add(LineBreak,11152971,364,616)
{
Color=65280
link(Out,15014586:doWork3,[(403,622)])
Primary=[16505457,833,-189]
}
Add(LineBreak,9460775,105,616)
{
Color=65280
link(Out,4898538:doWork3,[(144,622)])
Primary=[16700187,987,-210]
}
Add(LineBreak,5665641,189,616)
{
Color=65280
link(Out,12334686:doWork3,[(228,622)])
Primary=[13673677,938,-203]
}
Add(LineBreak,13635477,707,567)
{
Color=65280
link(Out,5200564:doWork3,[(746,573)])
Primary=[16559551,455,-175]
}
Add(LineBreak,7373442,623,567)
{
Color=65280
link(Out,6159356:doWork3,[(662,573)])
Primary=[10487357,574,-182]
}
Add(LineBreak,12730614,539,567)
{
Color=65280
link(Out,12051640:doWork3,[(578,573)])
Primary=[10625157,693,-189]
}
Add(LineBreak,11991793,14,616)
{
Color=65280
link(Out,8949373:doWork3,[(53,622)])
Primary=[2633781,1113,-217]
}
Add(LineBreak,2623936,448,567)
{
Color=65280
link(Out,10521607:doWork3,[(487,573)])
Primary=[1747933,819,-196]
}
Add(LineBreak,8343163,364,567)
{
Color=65280
link(Out,5237446:doWork3,[(403,573)])
Primary=[7112460,868,-203]
}
Add(LineBreak,16185004,273,567)
{
Color=65280
link(Out,9705347:doWork3,[(312,573)])
Primary=[12730910,924,-210]
}
Add(LineBreak,12355983,189,567)
{
Color=65280
link(Out,763465:doWork3,[(228,573)])
Primary=[5322609,973,-217]
}
Add(LineBreak,5163034,98,567)
{
Color=65280
link(Out,14639181:doWork3,[(137,573)])
Primary=[3857488,1029,-224]
}
Add(Label,10132341,1211,259)
{
Left=305
Top=105
Width=46
Height=28
Font=[MS Sans Serif,14,0,16711680,1]
Caption="МЯЧ"
Point(doLeft)
Point(doTop)
}
Add(CheckBox,8521835,231,224)
{
Left=115
Top=55
Width=115
Caption="случайно"
}
Add(IndexToChanel,579777,133,294)
{
Point(Index)
link(onEvent1,810385:doRandom,[(175,300)(175,139)])
link(onEvent2,911835:doRandomWithoutRepeats,[])
link(Index,15292995:Var1,[(139,271)])
}
Add(Random,810385,182,133)
{
Max=3
Point(doRandomWithoutRepeats)
link(onRandom,15101947:doGetString,[])
}
Add(IndexToChanel,3051047,427,392)
{
Point(Index)
link(onEvent1,9809219:doData,[(473,398)(473,300)])
link(onEvent2,15809012:doRandom,[])
link(Index,15292995:Var3,[(433,271)])
}
Add(GetDataEx,15292995,231,266)
{
link(Data,8521835:Checked,[])
}
Add(DoData,9809219,532,294)
{
Point(Data)
link(onEventData,3099162:doEvent1,[])
link(Data,8863431:Var3,[(538,236)])
}
Add(Str_Enum,6948114,280,119)
{
link(onEnum,4882251:doWork1,[(326,125)])
link(onEndEnum,16067465:doWork1,[(319,132)])
}
Add(IndexToChanel,8555710,231,329)
{
Point(Index)
link(onEvent2,16067465:doWork2,[])
link(Index,15292995:Var2,[])
}
Add(HubEx,12870799,574,609)
{
link(onEvent,5919492:doFont,[])
}
Add(HubEx,20089,658,609)
{
link(onEvent,13274850:doFont,[])
}
Add(HubEx,8521536,742,609)
{
link(onEvent,3457518:doFont,[])
}
Add(HubEx,9451302,483,609)
{
link(onEvent,5356664:doFont,[])
}
Add(HubEx,15014586,399,609)
{
link(onEvent,4939962:doFont,[])
}
Add(HubEx,5087490,308,609)
{
link(onEvent,3524232:doFont,[])
}
Add(HubEx,12334686,224,609)
{
link(onEvent,14430792:doFont,[])
}
Add(HubEx,4898538,140,609)
{
link(onEvent,2115920:doFont,[])
}
Add(HubEx,8949373,49,609)
{
link(onEvent,3238332:doFont,[])
}
Add(HubEx,10790016,133,658)
{
link(onEvent,11822323:doFont,[])
}
Add(HubEx,445248,49,658)
{
link(onEvent,16627627:doFont,[])
}
Add(HubEx,16447624,224,658)
{
link(onEvent,10713661:doFont,[])
}
Add(HubEx,8324227,49,560)
{
link(onEvent,6661841:doFont,[])
}
Add(HubEx,14639181,133,560)
{
link(onEvent,2051362:doFont,[])
}
Add(HubEx,5200564,742,560)
{
link(onEvent,1752274:doFont,[])
}
Add(HubEx,6159356,658,560)
{
link(onEvent,15156500:doFont,[])
}
Add(HubEx,12051640,574,560)
{
link(onEvent,8752230:doFont,[])
}
Add(HubEx,10521607,483,560)
{
link(onEvent,8130980:doFont,[])
}
Add(HubEx,5237446,399,560)
{
link(onEvent,14628091:doFont,[])
}
Add(HubEx,9705347,308,560)
{
link(onEvent,8691309:doFont,[])
}
Add(HubEx,763465,224,560)
{
link(onEvent,7733614:doFont,[])
}
Add(HubEx,16067465,315,336)
{
link(onEvent,2754767:doEnum,[])
}
Add(StrList,2555584,1085,273)
{
Strings=#6:30;150|6:74;150|7:109;150|7:144;150|7:179;150|7:219;150|7:254;150|7:289;150|7:324;150|6:30;200|6:74;200|7:109;200|7:144;200|7:179;200|7:219;200|7:254;200|7:289;200|7:324;200|6:30;250|6:74;250|7:109;250|7:305;105|
Point(onGetString)
Point(doGetString)
link(onGetString,4787096:doSplit,[])
}
Add(StrPart,4787096,1134,273)
{
Char=";"
link(onSplit,10132341:doTop,[])
link(onPart,10132341:doLeft,[(1187,286)(1187,272)])
}
Add(Hub,6635115,959,287)
{
OutCount=3
link(onEvent1,13596535:doWork2,[])
link(onEvent2,9578683:doFont,[])
link(onEvent3,13875425:doEvent,[(977,307)(977,342)])
}
Add(Memory,11410883,1043,294)
{
}
Add(HubEx,4882251,322,280)
{
link(onEvent,1682323:doAdd,[])
}
Add(DoData,10881364,679,420)
{
Data=Integer(21)
link(onEventData,1622264:In,[])
}
Add(HubEx,13596535,1050,287)
{
link(onEvent,2555584:doGetString,[])
}
Add(LineBreak,5225060,994,266)
{
link(Out,13596535:doWork1,[(1054,272)])
Primary=[1622264,-273,154]
}
Add(DoData,13023284,854,336)
{
Point(Data)
link(onEventData,4408380:doEvent1,[(898,342)(898,374)(730,374)(730,405)])
link(Data,2208418:EndIdx,[(860,328)(832,328)])
}


Я бы делал как-то так

Add(MainForm,2953706,14,35)
{
Position=1
link(onCreate,7174680:doEvent1,[])
}
Add(For,11899112,140,63)
{
End=35
link(onEvent,2462083:doRandom,[])
link(onStop,4496329:doResize,[(180,76)(180,104)])
}
Add(ChildPanelEx,13513837,490,42)
{
Mode=1
}
BEGIN_SDK
Add(EditMultiEx,9271718,21,21)
{
WorkCount=#7:##clear|5:##add|8:##select|7:doColor|
EventCount=#8:onChange|
VarCount=#7:##index|5:Value|
DataCount=#3:Str|
Point(##clear)
Point(##index)
Point(##add)
Point(##select)
link(##add,15753282:doValue,[(63,34)(63,41)])
link(doColor,5208401:doColor,[])
link(Value,15753282:Value,[(34,144)(111,144)])
}
Add(Panel,5208401,168,35)
{
Left=330
Top=220
Width=30
Height=30
Color=0
Font=[Courier New,16,1,16777215,204]
Layout="parent.grid"
BevelInner=0
BevelWidth=0
Alignment=2
Point(doColor)
}
Add(Memory,15753282,105,35)
{
link(onData,5208401:doCaption,[])
}
END_SDK
Add(GridLayout,4496329,266,98)
{
Name="grid"
Space=2
Padding=30
Rows=6
Cols=6
}
Add(StrList,9871275,266,49)
{
Strings=#1:А|1:Б|1:В|1:Г|1:Д|1:Е|1:Ё|1:Ж|1:З|1:И|1:Й|1:М|1:Н|1:К|1:Т|1:Р|1:П|1:О|1:З|1:Х|1:Э|1:Ю|1:Я|1:А|1:Б|1:В|1:Г|1:Д|1:Е|1:Ё|1:Ж|1:З|1:И|1:Й|1:М|1:О|1:А|1:Б|1:В|1:Г|1:Д|1:Е|1:Ё|1:Ж|1:З|1:И|1:Й|1:М|1:Н|1:К|1:Т|1:Р|1:П|1:О|1:З|1:Х|1:Э|1:Ю|1:Я|1:А|1:Б|1:В|1:Г|1:Д|1:Е|1:Ё|1:Ж|1:З|1:И|1:Й|1:М|1:О|1:А|1:Б|1:В|1:Г|1:Д|1:Е|1:Ё|1:Ж|1:З|1:И|1:Й|1:М|1:Н|1:К|1:Т|1:Р|1:П|1:О|1:З|1:Х|1:Э|1:Ю|1:Я|1:А|1:Б|1:В|1:Г|1:Д|1:Е|1:Ё|1:Ж|1:З|1:И|1:Й|1:М|1:О|
Point(Array)
Point(doGetString)
Point(onGetString)
link(onGetString,13513837:##add,[])
}
Add(Random,2462083,217,63)
{
link(onRandom,9871275:doGetString,[])
}
Add(Button,4638028,14,84)
{
Left=30
Top=5
Width=190
Font=[Courier New,8,1,0,204]
Caption="Сменить набор знаков"
link(onClick,69376:doEvent2,[(93,90)(93,69)])
}
Add(Hub,69376,105,56)
{
InCount=2
link(onEvent1,13513837:##clear,[(236,62)(236,48)])
link(onEvent2,11899112:doFor,[])
}
Add(Hub,7174680,70,49)
{
link(onEvent1,2462083:doRandomize,[(199,55)(199,76)])
link(onEvent2,69376:doEvent1,[])
}
Add(Edit,5031540,553,189)
{
Left=30
Top=225
Width=190
Text=""
}
Add(Button,13950135,14,175)
{
Left=285
Top=5
Font=[MS Sans Serif,8,1,0,1]
Caption="Пуск"
Data=Integer(0)
link(onClick,7322294:doEvent1,[])
}
Add(Random,9639495,154,175)
{
Max=35
Quality=1
Point(doRandomWithoutRepeats)
link(onRandom,4842923:doAdd,[])
}
Add(Hub,8210889,308,175)
{
link(onEvent1,11190748:doWork2,[(334,181)(334,69)])
link(onEvent2,397007:doData,[])
}
Add(DoData,397007,336,182)
{
Data=Integer(255)
link(onEventData,16461911:doEvent1,[])
}
Add(StrList,4842923,266,175)
{
Point(doGetString)
Point(onGetString)
link(onGetString,8210889:doEvent1,[])
}
Add(Hub,7322294,119,175)
{
OutCount=6
link(onEvent1,6755994:doFor,[(144,181)(144,146)])
link(onEvent3,4842923:doClear,[(199,195)(199,188)])
link(onEvent4,9639495:doRandomWithoutRepeats,[])
link(onEvent5,4548064:doReset,[(196,209)(196,230)])
link(onEvent6,9312120:doTimer,[(143,216)(143,223)])
}
Add(CounterEx,4548064,210,217)
{
Min=-1
Default=-1
Point(doReset)
link(onNext,4842923:doGetString,[(261,223)(261,195)])
}
Add(Timer,9312120,154,217)
{
Enable=1
AutoStop=5
link(onTimer,4548064:doNext,[])
}
Add(Hub,16461911,427,182)
{
link(onEvent1,3044959:doWork3,[(452,188)])
link(onEvent2,9487735:doStrCat,[])
}
Add(StrCat,9487735,490,189)
{
Point(doClear)
link(onStrCat,5031540:doText,[])
link(Str1,9487735:Result,[(496,177)(484,177)(484,233)(496,233)])
link(Str2,13513837:Value,[])
}
Add(For,6755994,343,140)
{
End=35
link(onEvent,5476690:doEvent1,[])
link(onStop,9487735:doClear,[(383,153)(383,202)])
}
Add(HubEx,11190748,406,63)
{
link(onEvent,13513837:##select,[(451,69)(451,62)])
}
Add(DoData,2217481,413,147)
{
Data=Integer(0)
link(onEventData,3044959:doWork2,[])
}
Add(HubEx,3044959,448,147)
{
Angle=3
link(onEvent,13513837:doColor,[(452,69)])
}
Add(Hub,5476690,385,140)
{
link(onEvent1,11190748:doWork3,[(410,146)])
link(onEvent2,2217481:doData,[])
}


Редактировалось 2 раз(а), последний 2018-10-20 17:57:28
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
9
Сообщение
...
Прикрепленные файлы
(файлы не залиты)