Вверх ↑
Этот топик читают: Гость
Ответов: 871
Рейтинг: 322
#1: 2016-11-06 21:15:10 ЛС | профиль | цитата
Племяшка, даже камеру заклеила чтобы компьютер не подглядывал.
Фокус первый

Add(MainForm,2953706,315,133)
{
Width=629
Height=432
Color=12639424
Caption="Математический фокус 1"
BorderStyle=3
Position=1
link(onCreate,11789807:doWork1,[])
}
Add(ChildPanel,11789807,371,147)
{
}
BEGIN_SDK
Add(EditMulti,4275331,21,21)
{
WorkCount=1
Width=678
Height=319
link(doWork1,5416932:doEvent1,[])
}
Add(Panel,3004575,98,35)
{
Left=15
Width=600
Height=399
Color=12639424
BorderWidth=0
BevelWidth=0
}
Add(Button,5913685,112,259)
{
Left=270
Top=60
Width=65
Height=50
Caption=""
Point(doCaption)
link(onClick,1944797:doData,[])
}
Add(MultiElementEx,9643669,252,112)
{
}
BEGIN_SDK
Add(EditMultiEx,2634137,14,21)
{
WorkCount=#8:doEvent1|8:doRandom|
Width=636
Height=214
link(doEvent1,14179863:doEvent1,[(35,27)(35,41)])
link(doRandom,13754695:doRandom,[(26,34)(26,188)])
}
Add(StrList,15917,231,49)
{
Strings=#1:A|1:B|1:C|1:D|1:E|1:F|1:G|1:H|1:I|1:J|1:K|1:L|1:M|1:N|1:O|1:P|1:Q|1:R|1:S|1:T|1:U|1:V|1:W|1:X|1:Y|1:Z|
}
Add(For,14577238,147,105)
{
End=2
link(onEvent,16393590:doRandom,[])
}
Add(Random,16393590,196,105)
{
Max=25
link(onRandom,4188350:doRead,[])
}
Add(ArrayRW,4188350,245,105)
{
link(onRead,16070490:doStrCat,[])
link(Array,15917:Array,[])
}
Add(StrCat,16070490,308,105)
{
Point(doClear)
link(onStrCat,15533928:doCompare,[])
link(Str1,16070490:Result,[(314,93)(286,93)(286,149)(314,149)])
}
Add(StrMask,15533928,350,105)
{
Mask="???"
link(onTrue,10783427:doEvent1,[])
}
Add(Hub,10783427,399,112)
{
OutCount=3
link(onEvent1,12205641:doAdd,[])
link(onEvent2,16070490:doClear,[(422,125)(422,156)(296,156)(296,118)])
link(onEvent3,239793:doValue,[])
}
Add(For,9612013,98,105)
{
End=19
link(onEvent,14577238:doFor,[])
}
Add(GlobalVar,239793,434,126)
{
Name="sim"
}
Add(StrList,12205641,490,112)
{
}
Add(Hub,14179863,56,35)
{
link(onEvent1,12205641:doClear,[(463,41)(463,125)])
link(onEvent2,9612013:doFor,[(84,48)(84,111)])
}
Add(GlobalVar,3424478,560,182)
{
Name="vse"
}
Add(ArrayRW,11904575,504,182)
{
link(onRead,3424478:doValue,[])
link(Array,12205641:Array,[])
}
Add(Random,13754695,455,182)
{
Max=19
link(onRandom,11904575:doRead,[])
}
END_SDK
Add(Hub,6220411,98,112)
{
InCount=2
OutCount=5
link(onEvent1,9643669:doEvent1,[])
link(onEvent2,13407183:##clear,[(130,125)(130,181)])
link(onEvent3,4222427:doClear,[(123,132)(123,104)])
link(onEvent4,9124540:doRandomize,[(136,139)(136,132)])
link(onEvent5,9124540:doStart,[(136,146)(136,125)])
}
Add(GlobalVar,9064511,168,217)
{
Name="sim"
}
Add(MultiElementEx,9124540,161,119)
{
link(onRead,6286488:doEvent1,[])
}
BEGIN_SDK
Add(EditMultiEx,8320285,28,21)
{
WorkCount=#7:doStart|11:doRandomize|
EventCount=#6:onRead|
Width=496
Height=228
VOffset=56
HOffset=35
link(doStart,12554549:doEvent1,[])
link(doRandomize,6970021:doRandomize,[(256,90)(256,118)])
}
Add(StrList,4338961,364,98)
{
Point(doGetString)
Point(onGetString)
link(onGetString,12120153:doAdd,[])
}
Add(For,9710409,98,98)
{
End=99
link(onEvent,4338961:doAdd,[])
link(onStop,9058500:doFor,[(145,111)(145,125)])
}
Add(Random,6970021,266,105)
{
Max=0
Point(doMax)
link(onRandom,4135268:doEvent1,[])
}
Add(For,9058500,168,119)
{
Start=99
Step=-1
link(onEvent,15570432:doEvent1,[])
}
Add(Hub,15570432,217,119)
{
link(onEvent1,6970021:doMax,[(249,125)(249,132)])
link(onEvent2,6970021:doRandom,[(249,132)(249,111)])
}
Add(Hub,4135268,322,105)
{
link(onEvent1,4338961:doGetString,[(353,111)(353,146)])
link(onEvent2,4338961:doDelete,[])
}
Add(StrList,12120153,434,105)
{
}
Add(Hub,12554549,56,77)
{
OutCount=3
link(onEvent1,12120153:doClear,[(414,83)(414,118)])
link(onEvent2,9710409:doFor,[(91,90)(91,104)])
link(onEvent3,4360376:doFor,[(83,97)(83,181)])
}
Add(For,4360376,392,175)
{
End=99
link(onEvent,15374089:doRead,[])
}
Add(ArrayRW,15374089,448,175)
{
link(onRead,8320285:onRead,[(503,181)(503,83)])
link(Array,12120153:Array,[])
}
END_SDK
Add(MultiElementEx,15864060,294,126)
{
link(onStrCat,15957959:doEvent1,[])
}
BEGIN_SDK
Add(EditMultiEx,7124589,41,21)
{
WorkCount=#9:doCompare|
EventCount=#8:onStrCat|
Width=937
Height=508
link(doCompare,9218818:doValue,[(63,27)(63,76)])
}
Add(If_else,8804442,266,77)
{
Op2=String(9)
link(onTrue,5241203:doString,[])
link(onFalse,15526548:doCompare,[(310,90)(310,132)])
}
Add(GlobalVar,11967328,329,35)
{
Name="sim"
}
Add(FormatStr,5241203,323,77)
{
Mask="%1 - %2"
link(onFString,8789798:doWork2,[])
link(Str2,2185012:Var2,[(336,73)(335,73)])
}
Add(If_else,15526548,322,126)
{
Op2=String(18)
link(onTrue,79372:doString,[])
link(onFalse,5893257:doCompare,[(366,139)(366,181)])
}
Add(FormatStr,79372,379,126)
{
Mask="%1 - %2"
link(onFString,15160853:doWork2,[])
link(Str2,6402110:Var2,[])
}
Add(If_else,5893257,378,175)
{
Op2=String(27)
link(onTrue,11170277:doString,[])
link(onFalse,14843025:doCompare,[(422,188)(422,230)])
}
Add(GlobalVar,8142509,819,434)
{
Name="vse"
}
Add(FormatStr,11170277,435,175)
{
Mask="%1 - %2"
link(onFString,12988479:doWork2,[])
link(Str2,4944874:Var2,[])
}
Add(If_else,14843025,434,224)
{
Op2=String(36)
link(onTrue,10761937:doString,[])
link(onFalse,6423176:doCompare,[(478,237)(478,279)])
}
Add(FormatStr,10761937,491,224)
{
Mask="%1 - %2"
link(onFString,7837336:doWork2,[])
link(Str2,13899524:Var2,[])
}
Add(If_else,6423176,490,273)
{
Op2=String(45)
link(onTrue,6068060:doString,[])
link(onFalse,4756181:doCompare,[(534,286)(534,328)])
}
Add(FormatStr,6068060,547,273)
{
Mask="%1 - %2"
link(onFString,4018116:doWork2,[])
link(Str2,2510794:Var2,[])
}
Add(If_else,4756181,546,322)
{
Op2=String(54)
link(onTrue,10431702:doString,[])
link(onFalse,2765328:doCompare,[(590,335)(590,377)])
}
Add(FormatStr,10431702,603,322)
{
Mask="%1 - %2"
link(onFString,2495115:doWork2,[])
link(Str2,15428642:Var2,[])
}
Add(If_else,2765328,602,371)
{
Op2=String(63)
link(onTrue,6958133:doString,[])
link(onFalse,16285444:doCompare,[(646,384)(646,426)])
}
Add(FormatStr,6958133,659,371)
{
Mask="%1 - %2"
link(onFString,1360877:doWork2,[])
link(Str2,9350370:Var2,[])
}
Add(If_else,16285444,658,420)
{
Op2=String(72)
link(onTrue,11705715:doString,[])
link(onFalse,12507120:doCompare,[(702,433)(702,475)])
}
Add(FormatStr,11705715,714,420)
{
Mask="%1 - %2"
link(onFString,6637457:doWork2,[])
link(Str2,16577958:Var2,[])
}
Add(HubEx,6637457,873,420)
{
Angle=3
link(onEvent,1360877:doWork3,[])
}
Add(HubEx,1360877,873,371)
{
Angle=3
link(onEvent,2495115:doWork3,[])
}
Add(HubEx,2495115,873,322)
{
Angle=3
link(onEvent,4018116:doWork3,[])
}
Add(HubEx,4018116,873,273)
{
Angle=3
link(onEvent,7837336:doWork3,[])
}
Add(HubEx,7837336,873,224)
{
Angle=3
link(onEvent,12988479:doWork3,[])
}
Add(HubEx,12988479,873,175)
{
Angle=3
link(onEvent,15160853:doWork3,[])
}
Add(HubEx,15160853,873,126)
{
Angle=3
link(onEvent,8789798:doWork3,[])
}
Add(HubEx,8789798,873,77)
{
Angle=3
link(onEvent,9742877:doValue,[(877,27)])
}
Add(If_else,12507120,714,469)
{
Op2=String(81)
link(onTrue,16530727:doString,[])
link(onFalse,13715716:doString,[])
}
Add(FormatStr,16530727,770,469)
{
Mask="%1 - %2"
link(onFString,12531086:doWork2,[])
link(Str2,16577958:Var3,[(783,61)])
}
Add(HubEx,12531086,873,469)
{
Angle=3
link(onEvent,6637457:doWork3,[])
}
Add(GetDataEx,2185012,329,56)
{
link(Data,11967328:Var,[])
}
Add(GetDataEx,16577958,721,56)
{
Angle=3
link(Data,9350370:Var3,[])
}
Add(GetDataEx,9350370,666,56)
{
Angle=3
link(Data,15428642:Var3,[])
}
Add(GetDataEx,15428642,610,56)
{
Angle=3
link(Data,2510794:Var3,[])
}
Add(GetDataEx,2510794,554,56)
{
Angle=3
link(Data,13899524:Var3,[])
}
Add(GetDataEx,13899524,498,56)
{
Angle=3
link(Data,4944874:Var3,[])
}
Add(GetDataEx,4944874,442,56)
{
Angle=3
link(Data,6402110:Var3,[])
}
Add(GetDataEx,6402110,386,56)
{
Angle=3
link(Data,2185012:Var3,[])
}
Add(FormatStr,13715716,812,476)
{
Mask="%1 - %2"
link(onFString,12531086:doWork3,[(877,482)])
link(Str2,8142509:Var,[])
}
Add(If_else,5003689,168,77)
{
Type=1
Op2=String(2)
link(onTrue,7272619:doString,[])
link(onFalse,16498614:doWork3,[(256,90)])
link(Op1,10429278:Result,[])
}
Add(Length,10429278,168,28)
{
}
Add(FormatStr,7272619,213,77)
{
DataCount=1
Mask="%1 "
link(onFString,16498614:doWork2,[])
link(Str1,9218818:Value,[(219,68)(157,68)(157,111)(90,111)])
}
Add(Memory,9218818,84,70)
{
link(onData,1252823:doEvent1,[])
}
Add(Hub,1252823,126,70)
{
link(onEvent1,10429278:doLength,[(149,76)(149,34)])
link(onEvent2,5003689:doCompare,[])
}
Add(HubEx,16498614,252,77)
{
link(onEvent,8804442:doCompare,[])
}
Add(GlobalVar,9742877,903,21)
{
Name="pan"
link(onValue,7124589:onStrCat,[])
}
END_SDK
Add(Hub,6286488,210,119)
{
link(onEvent1,9643669:doRandom,[])
link(onEvent2,15864060:doCompare,[])
}
Add(ChildPanelEx,13407183,385,168)
{
Mode=1
}
BEGIN_SDK
Add(EditMultiEx,10036085,21,21)
{
WorkCount=#5:##add|7:##clear|
Width=482
Point(##add)
Point(##clear)
link(##add,6929241:doEvent1,[(36,27)(36,62)])
}
Add(Panel,6560198,245,56)
{
Left=35
Top=105
Height=25
Color=12639424
BorderWidth=0
BevelWidth=0
Point(doLeft)
Point(doTop)
}
Add(DoData,13836281,196,56)
{
link(onEventData,6560198:doCaption,[])
link(Data,16538475:Var,[])
}
Add(GlobalVar,16538475,196,28)
{
Name="pan"
}
Add(Hub,6929241,56,56)
{
OutCount=3
link(onEvent1,13836281:doData,[])
link(onEvent2,8223877:doData,[])
link(onEvent3,5214963:doData,[])
}
Add(DoData,8223877,105,63)
{
link(onEventData,6560198:doLeft,[])
link(Data,16562673:Var,[])
}
Add(GlobalVar,16562673,105,35)
{
Name="x"
}
Add(DoData,5214963,147,70)
{
link(onEventData,6560198:doTop,[])
link(Data,13147503:Var,[])
}
Add(GlobalVar,13147503,147,42)
{
Name="y"
}
END_SDK
Add(Hub,15957959,336,126)
{
link(onEvent1,8537873:doOperation,[])
link(onEvent2,13407183:##add,[(368,139)(368,174)])
}
Add(GlobalVar,1568711,448,70)
{
Name="x"
link(onValue,3616571:doCompare,[])
}
Add(GlobalVar,13868083,658,84)
{
Name="y"
}
Add(If_else,3616571,497,70)
{
Op2=String(540)
link(onTrue,3455012:doEvent1,[])
}
Add(Hub,3455012,546,70)
{
link(onEvent1,4222427:doOperation,[(588,76)(588,90)])
link(onEvent2,8537873:doClear,[(572,83)(572,115)(380,115)(380,146)])
}
Add(Math,8537873,399,126)
{
Op1=-60
Op2=60
Default=-60
Point(doDefault)
Point(doClear)
link(onResult,1568711:doValue,[(439,132)(439,76)])
link(Op1,8537873:Result,[(405,109)(388,109)(388,163)(405,163)])
}
Add(Math,4222427,616,84)
{
Op1=125
Op2=25
Default=125
Point(doDefault)
Point(doClear)
link(onResult,13868083:doValue,[])
link(Op1,4222427:Result,[(622,72)(604,72)(604,125)(622,125)])
}
Add(Hub,5416932,35,21)
{
link(onEvent1,3638314:doWork1,[(59,27)])
link(onEvent2,3638314:doWork2,[])
}
Add(HubEx,3638314,55,28)
{
Angle=1
link(onEvent,6220411:doEvent1,[(59,118)])
}
Add(DoData,1944797,168,259)
{
link(onEventData,7934208:doEvent1,[])
link(Data,9064511:Var,[])
}
Add(Hub,7934208,217,259)
{
link(onEvent1,8414851:doWork2,[(242,265)(242,250)(91,250)(91,265)])
link(onEvent2,1874012:doData,[])
}
Add(Label,6656228,322,259)
{
Left=260
Top=120
Color=12639424
Visible=1
Cursor=2
Caption="Не понял, еще раз."
Point(doVisible)
link(onClick,11834859:doEvent1,[(362,265)(362,258)])
}
Add(DoData,1874012,252,266)
{
Data=Integer(1)
link(onEventData,3518774:doWork2,[])
}
Add(DoData,7108037,420,259)
{
Data=Integer(0)
link(onEventData,3518774:doWork1,[(462,265)(462,312)(305,312)])
}
Add(HubEx,3518774,301,266)
{
link(onEvent,6656228:doVisible,[])
}
Add(Hub,11834859,371,252)
{
OutCount=4
link(onEvent1,9064511:doValue,[(401,258)(401,243)(155,243)(155,223)])
link(onEvent2,7108037:doData,[])
link(onEvent3,8414851:doWork3,[(397,272)(397,303)(102,303)])
link(onEvent4,6220411:doEvent2,[(409,279)(409,206)(86,206)(86,125)])
}
Add(HubEx,8414851,98,259)
{
link(onEvent,5913685:doCaption,[])
}
Add(ChildPanelRush,751558,147,35)
{
}
BEGIN_SDK
Add(EditMultiEx,10977305,21,21)
{
}
Add(PanelRush,2554309,35,105)
{
Left=35
Top=5
Width=550
ColorFrom=12639424
ColorTo=12639424
BorderColor=12639424
BorderWidth=0
Caption="Задумайте любое двухзначное число. (например 54). Вычтите из него составляющии его цифры (например 54 - 5 - 4 = 45). Найдите это число в таблице и запомните буквы которые ему соответствуют. Вообразите эти буквы и щелкните по кнопке, на ней должны появиться эти буквы."
Glyphs=[]
}
END_SDK
END_SDK


Фокус второй

Add(MainForm,2953706,301,147)
{
Width=554
Height=357
Color=12639424
Caption="Математический фокус 2"
BorderStyle=3
Position=1
}
Add(ChildPanel,3186461,364,147)
{
}
BEGIN_SDK
Add(EditMulti,13692584,21,21)
{
Width=643
Height=452
}
Add(Panel,8733211,35,105)
{
Left=5
Top=5
Width=536
Height=323
Color=12639424
BorderWidth=0
BevelWidth=0
}
Add(Label,3615484,74,21)
{
Left=95
Top=20
Width=272
Height=17
Color=12639424
Caption="1. Загадайте четырехзначное число (например 7382)"
}
Add(Label,11656312,119,21)
{
Left=95
Top=45
Width=363
Height=17
Color=12639424
Caption="2. Теперь из цифр этого числа составте новое число (например 3278)"
}
Add(Label,14922392,161,21)
{
Left=95
Top=70
Width=343
Height=17
Color=12639424
Caption="3. Отнимите от большего из этих чисел меньшее (7382-3278=4104)"
}
Add(Label,5212861,205,21)
{
Left=95
Top=95
Width=300
Height=17
Color=12639424
Caption="4. Вычеркните одну из цифр (( ноль вычеркивать нельзя ))"
}
Add(Label,3154699,245,21)
{
Left=135
Top=125
Width=220
Height=17
Color=12639424
Caption="То есть 404-правильно а 414 неправильно"
}
Add(Label,5655159,291,21)
{
Left=95
Top=150
Width=357
Height=17
Color=12639424
Caption="5. Введите полученное число и компьюте угадает зачеркнутую цифру"
}
Add(Edit,11437318,238,119)
{
Left=235
Top=215
Color=12639424
Text=""
}
Add(Button,9880851,147,154)
{
Left=230
Top=250
Width=65
Caption="Угадать"
link(onClick,1959600:doEvent1,[])
}
Add(Str_Enum,3841451,238,182)
{
Delimiter=""
link(onEnum,1685873:doOperation,[])
link(String,11437318:Text,[])
}
Add(Label,1974851,539,182)
{
Left=310
Top=295
Width=11
Height=17
Caption="Х"
}
Add(Math,1685873,308,182)
{
Point(doClear)
link(onResult,16424669:doCompare,[])
link(Op1,8670726:Var2,[])
}
Add(Hub,1959600,196,154)
{
OutCount=4
link(onEvent1,1685873:doClear,[(284,160)(284,195)])
link(onEvent2,9609691:doClear,[(435,167)(435,195)])
link(onEvent3,10853299:doClear,[(353,174)(353,230)])
link(onEvent4,3841451:doEnum,[(224,181)(224,188)])
}
Add(MathParse,9609691,449,182)
{
DataCount=1
MathStr="9 - %1"
Point(doClear)
link(onResult,14043119:doWork2,[])
link(X1,1213929:Var2,[])
}
Add(MathParse,10853299,483,217)
{
DataCount=1
MathStr="18 - %1"
Point(doClear)
link(onResult,14043119:doWork3,[(529,223)])
link(X1,1213929:Var3,[(489,133)])
}
Add(HubEx,14043119,525,182)
{
link(onEvent,1974851:doText,[])
}
Add(Label,2727556,336,21)
{
Left=180
Top=295
Width=124
Height=17
Color=12639424
Caption="Вы зачеркнули число -- "
}
Add(If_else,16424669,371,182)
{
Type=3
link(onTrue,9609691:doCalc,[])
link(onFalse,10853299:doCalc,[(424,195)(424,223)])
link(Op2,8041376:Var,[])
}
Add(GlobalVar,8041376,378,140)
{
Name="a"
Data=Integer(9)
}
Add(GetDataEx,8670726,308,128)
{
Angle=3
link(Data,1685873:Result,[(298,133)(298,229)(314,229)])
}
Add(GetDataEx,1213929,449,128)
{
Angle=3
link(Data,8670726:Var3,[(384,133)(384,133)])
}
Add(Label,10858319,91,168)
{
Left=135
Top=175
Width=269
Height=17
Color=12639424
Caption=".... Также можно загадывать и трехзначные цифры."
}
END_SDK


карма: 1

1
Голосовали:Tad
vip
#1.1контекстная реклама от партнеров
Ответов: 1535
Рейтинг: 176
#2: 2016-11-06 22:51:21 ЛС | профиль | цитата

Add(MultiElementEx,15864060,294,126)
{
}
BEGIN_SDK
Add(EditMultiEx,7124589,41,21)
{
WorkCount=#9:doCompare|
EventCount=#8:onStrCat|
Width=545
Height=116
link(doCompare,9218818:doValue,[(63,27)(63,69)])
}
Add(If_else,5003689,175,63)
{
Type=2
Op2=Integer(2)
link(onTrue,6791366:doWork2,[])
link(onFalse,1183408:doData,[])
}
Add(Length,10429278,126,63)
{
link(onLength,5003689:doCompare,[])
}
Add(Memory,9218818,84,63)
{
link(onData,10429278:doLength,[])
}
Add(GlobalVar,9742877,518,63)
{
Name="pan"
link(onValue,7124589:onStrCat,[(575,69)(575,27)])
}
Add(MathParse,3604329,329,63)
{
DataCount=1
MathStr="(((%1=9)or(%1=18)or(%1=27)or(%1=36)or(%1=45)or(%1=54)or(%1=63)or(%1=72)or(%1=81))*%1)"
link(onResult,6109940:doCompare,[])
}
Add(If_else,6109940,371,63)
{
Type=5
link(onTrue,2350841:doString,[])
link(onFalse,8837672:doString,[])
}
Add(GlobalVar,11747809,469,35)
{
Name="vse"
}
Add(FormatStr,2350841,413,63)
{
Mask="%1 - %2"
link(onFString,1966313:doWork2,[])
link(Str2,7778838:Var,[])
}
Add(FormatStr,8837672,462,70)
{
Mask="%1 - %2"
link(onFString,1966313:doWork3,[(508,76)])
link(Str1,5435247:Value,[(468,58)(454,58)(454,107)(286,107)])
link(Str2,11747809:Var,[])
}
Add(GlobalVar,7778838,420,35)
{
Name="sim"
}
Add(Memory,5435247,280,63)
{
link(onData,3604329:doCalc,[])
}
Add(DoData,1183408,224,70)
{
link(onEventData,6791366:doWork3,[(263,76)])
link(Data,9218818:Value,[(230,51)(165,51)(165,107)(90,107)])
}
Add(HubEx,6791366,259,63)
{
link(onEvent,5435247:doValue,[])
}
Add(HubEx,1966313,504,63)
{
link(onEvent,9742877:doValue,[])
}
END_SDK



Add(ChildPanel,3186461,392,147)
{
}
BEGIN_SDK
Add(EditMulti,13692584,21,21)
{
Width=496
Height=249
}
Add(Panel,8733211,35,105)
{
Left=5
Top=5
Width=536
Height=323
Color=12639424
BorderWidth=0
BevelWidth=0
}
Add(Edit,11437318,238,112)
{
Left=235
Top=215
Color=12639424
Text=""
}
Add(Button,9880851,154,154)
{
Left=230
Top=250
Width=65
Caption="Угадать"
link(onClick,1959600:doEvent1,[])
}
Add(Str_Enum,3841451,238,161)
{
Delimiter=""
link(onEnum,1685873:doOperation,[])
link(String,11437318:Text,[])
}
Add(Label,1974851,392,161)
{
Left=310
Top=295
Width=11
Height=17
Caption="Х"
}
Add(Math,1685873,301,161)
{
Point(doClear)
link(onResult,11623319:doCalc,[])
link(Op1,1685873:Result,[(307,149)(295,149)(295,205)(307,205)])
}
Add(Hub,1959600,203,154)
{
link(onEvent1,1685873:doClear,[(284,160)(284,174)])
link(onEvent2,3841451:doEnum,[])
}
Add(MathParse,11623319,343,161)
{
DataCount=1
MathStr="((%1<=9)*(9-%1))+\r\n((%1>9)*(18-%1))"
link(onResult,1974851:doText,[])
}
Add(Memo,5300938,238,49)
{
Left=20
Top=55
Width=490
Height=145
Color=12639424
Font=[Consolas,10,0,0,204]
TabOrder=-1
WinStyle=1
Strings=#49:1. Загадайте четырехзначное число (например 7382)|67:2. Теперь из цифр этого числа составте новое число (например 3278)|62:3. Отнимите от большего из этих чисел меньшее (7382-3278=4104)|56:4. Вычеркните одну из цифр (( ноль вычеркивать нельзя ))|41:\tТо есть 404-правильно а 414 неправильно|64:5. Введите полученное число и компьюте угадает зачеркнутую цифру|25:\tВы зачеркнули число -- |50:\t.... Также можно загадывать и трехзначные цифры.|0:|
ReadOnly=0
}
END_SDK

Редактировалось 6 раз(а), последний 2016-11-06 23:17:16
карма: 1
Не так страшна ошибка, как опасность её не заметить.

0
Ответов: 8888
Рейтинг: 823
#3: 2016-11-06 23:07:59 ЛС | профиль | цитата
kamakama,
Колобки писал(а):
Ничего не понимаю!
Аналогично!

Ой.jpg
карма: 19

0
Ответов: 16884
Рейтинг: 1239
#4: 2016-11-07 00:27:42 ЛС | профиль | цитата
ser_davkin,

Add(MultiElementEx,11709301,483,182)
{
}
BEGIN_SDK
Add(EditMultiEx,10206973,41,21)
{
WorkCount=#9:doCompare|
EventCount=#8:onStrCat|
Width=377
Height=186
VOffset=49
link(doCompare,9966179:doValue,[])
}
Add(Memory,9966179,112,70)
{
link(onData,7084371:doOperation,[])
}
Add(GlobalVar,1154823,371,70)
{
Name="pan"
link(onValue,10206973:onStrCat,[])
}
Add(Math,7084371,168,70)
{
OpType=8
Op2=9
ResultType=0
link(onResult,2706964:doCompare,[])
}
Add(If_else,2706964,217,70)
{
Op2=Integer(0)
link(onTrue,8090188:doString,[])
link(onFalse,4302406:doString,[(257,83)(257,160)])
}
Add(GlobalVar,12483628,294,35)
{
Name="sim"
}
Add(FormatStr,8090188,288,70)
{
Mask="%1 - %2"
link(onFString,4120219:doWork2,[])
link(Str1,2497817:Var3,[(294,58)])
link(Str2,12483628:Var,[(301,66)(300,66)])
}
Add(GlobalVar,8134432,280,119)
{
Name="vse"
}
Add(FormatStr,4302406,273,154)
{
Mask="%1 - %2"
link(onFString,4120219:doWork3,[(347,160)])
link(Str1,2497817:Var2,[])
link(Str2,8134432:Var,[])
}
Add(GetDataEx,2497817,273,53)
{
Angle=3
link(Data,9966179:Value,[(153,58)(153,113)(118,113)])
}
Add(HubEx,4120219,343,70)
{
link(onEvent,1154823:doValue,[])
}
END_SDK


kamakama, у RND есть точка doRandomWithoutRepeats, используя которую не надо "тасовать карты" и строить "говнокод".

Редактировалось 3 раз(а), последний 2016-11-07 00:34:44
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 1821
Рейтинг: 168
#5: 2016-11-07 00:45:54 ЛС | профиль | цитата
Tad,
Рад вас видеть. Где пропадали? Уж непривычно без вас мне здесь было
карма: 5

0
Ответов: 16884
Рейтинг: 1239
#6: 2016-11-07 09:27:01 ЛС | профиль | цитата
sаmakacd,
каждый день захожу.
kamakama,


Add(MainForm,7226546,98,112)
{
Width=629
Height=472
Color=12639424
Caption="Математический фокус 1"
BorderStyle=3
Position=1
link(onCreate,11789807:doWork1,[])
}
Add(ChildPanel,11789807,154,126)
{
}
BEGIN_SDK
Add(EditMulti,4275331,21,21)
{
WorkCount=1
Width=650
Height=214
link(doWork1,14726768:doEvent1,[(35,27)(35,69)])
}
Add(Panel,3004575,392,28)
{
Left=15
Width=600
Height=436
Color=12639424
BorderWidth=0
BevelWidth=0
}
Add(Button,5913685,56,133)
{
Left=260
Top=335
Width=65
Height=50
Font=[Consolas,12,1,0,204]
Caption=""
Point(doCaption)
link(onClick,1944797:doData,[])
}
Add(MultiElementEx,9643669,546,28)
{
}
BEGIN_SDK
Add(EditMultiEx,2634137,14,21)
{
WorkCount=#8:doEvent1|8:doRandom|
Width=531
Height=214
VOffset=14
link(doEvent1,14179863:doEvent1,[])
link(doRandom,13754695:doRandom,[(38,48)(38,188)])
}
Add(StrList,15917,182,49)
{
Strings=#1:A|1:B|1:C|1:D|1:E|1:F|1:G|1:H|1:I|1:J|1:K|1:L|1:M|1:N|1:O|1:P|1:Q|1:R|1:S|1:T|1:U|1:V|1:W|1:X|1:Y|1:Z|
}
Add(Random,16393590,147,105)
{
Max=25
Point(doRandomWithoutRepeats)
link(onRandom,4188350:doRead,[])
}
Add(ArrayRW,4188350,196,105)
{
link(onRead,16070490:doStrCat,[])
link(Array,15917:Array,[])
}
Add(StrCat,16070490,259,105)
{
Point(doClear)
link(onStrCat,15533928:doCompare,[])
link(Str1,16070490:Result,[(265,93)(237,93)(237,149)(265,149)])
}
Add(StrMask,15533928,301,105)
{
Mask="???"
link(onTrue,10783427:doEvent1,[])
}
Add(Hub,10783427,350,112)
{
OutCount=3
link(onEvent1,12205641:doAdd,[])
link(onEvent2,16070490:doClear,[(373,125)(373,156)(247,156)(247,118)])
link(onEvent3,239793:doValue,[])
}
Add(For,9612013,98,126)
{
End=19
link(onEvent,16393590:doRandomWithoutRepeats,[])
}
Add(GlobalVar,239793,385,126)
{
Name="sim"
}
Add(StrList,12205641,434,112)
{
}
Add(Hub,14179863,56,35)
{
link(onEvent1,12205641:doClear,[(428,41)(428,125)])
link(onEvent2,9612013:doFor,[(84,48)(84,132)])
}
Add(GlobalVar,3424478,497,182)
{
Name="vse"
}
Add(ArrayRW,11904575,448,182)
{
link(onRead,3424478:doValue,[])
link(Array,12205641:Array,[])
}
Add(Random,13754695,385,182)
{
Max=19
link(onRandom,11904575:doRead,[])
}
END_SDK
Add(Hub,6220411,392,70)
{
InCount=2
OutCount=5
link(onEvent1,9643669:doEvent1,[(476,76)(476,34)])
link(onEvent2,13407183:##clear,[])
link(onEvent5,930261:doRandomWithoutRepeats,[(430,104)(430,111)])
}
Add(GlobalVar,9064511,112,98)
{
Name="sim"
}
Add(Hub,6286488,504,84)
{
link(onEvent1,9643669:doRandom,[(532,90)(532,41)])
link(onEvent2,11709301:doCompare,[])
}
Add(ChildPanelEx,13407183,623,70)
{
Mode=1
}
BEGIN_SDK
Add(EditMultiEx,10036085,21,21)
{
WorkCount=#5:##add|7:##clear|
Width=97
Height=88
Point(##add)
Point(##clear)
link(##add,6560198:doCaption,[(36,27)(36,62)])
}
Add(Panel,6560198,56,56)
{
Left=35
Top=105
Height=25
Color=12639424
Layout="parent.M"
BorderWidth=0
BevelInner=0
BevelWidth=0
Alignment=2
}
END_SDK
Add(Hub,15957959,595,91)
{
OutCount=3
link(onEvent1,13407183:##add,[(616,97)(616,76)])
link(onEvent3,12514314:doResize,[])
}
Add(DoData,1944797,112,133)
{
link(onEventData,7934208:doEvent1,[])
link(Data,9064511:Var,[])
}
Add(Hub,7934208,161,133)
{
link(onEvent1,8414851:doWork1,[(187,139)(187,130)(46,130)])
link(onEvent2,1415718:doWork2,[])
}
Add(Label,6656228,266,133)
{
Left=250
Top=395
Color=12639424
Visible=1
Cursor=2
Caption="Не понял, еще раз."
Point(doVisible)
link(onClick,11834859:doEvent1,[])
}
Add(Hub,11834859,315,133)
{
OutCount=5
link(onEvent1,1415718:doWork1,[(341,139)(341,127)(198,127)(198,139)])
link(onEvent2,9064511:doValue,[(345,146)(345,89)(100,89)(100,104)])
link(onEvent3,6220411:doEvent2,[(376,153)(376,83)])
link(onEvent4,8414851:doWork3,[(342,160)(342,181)(46,181)])
}
Add(HubEx,8414851,42,133)
{
link(onEvent,5913685:doCaption,[])
}
Add(MultiElementEx,11709301,546,91)
{
link(onStrCat,15957959:doEvent1,[])
}
BEGIN_SDK
Add(EditMultiEx,10206973,41,21)
{
WorkCount=#9:doCompare|
EventCount=#8:onStrCat|
Width=377
Height=186
VOffset=49
link(doCompare,9966179:doValue,[])
}
Add(Memory,9966179,112,70)
{
link(onData,7084371:doOperation,[])
}
Add(GlobalVar,1154823,371,70)
{
Name="pan"
link(onValue,10206973:onStrCat,[])
}
Add(Math,7084371,168,70)
{
OpType=8
Op2=9
ResultType=0
link(onResult,2706964:doCompare,[])
}
Add(If_else,2706964,217,70)
{
Op2=Integer(0)
link(onTrue,8090188:doString,[])
link(onFalse,4302406:doString,[(257,83)(257,160)])
}
Add(GlobalVar,12483628,294,35)
{
Name="sim"
}
Add(FormatStr,8090188,288,70)
{
Mask="%1 - %2"
link(onFString,4120219:doWork2,[])
link(Str1,2497817:Var3,[(294,58)])
link(Str2,12483628:Var,[(301,66)(300,66)])
}
Add(GlobalVar,8134432,280,119)
{
Name="vse"
}
Add(FormatStr,4302406,273,154)
{
Mask="%1 - %2"
link(onFString,4120219:doWork3,[(347,160)])
link(Str1,2497817:Var2,[])
link(Str2,8134432:Var,[])
}
Add(GetDataEx,2497817,273,53)
{
Angle=3
link(Data,9966179:Value,[(153,58)(153,113)(118,113)])
}
Add(HubEx,4120219,343,70)
{
link(onEvent,1154823:doValue,[])
}
END_SDK
Add(Random,930261,455,84)
{
Max=99
Point(doRandomWithoutRepeats)
link(onRandom,6286488:doEvent1,[])
}
Add(GridLayout,12514314,623,105)
{
Name="M"
Rows=10
Cols=10
AddMode=1
}
Add(Label,2398861,623,28)
{
Left=95
Top=255
Width=455
Height=50
Color=12639424
Caption="Задумайте любое двухзначное число. (например 54). \r\nВычтите из него составляющие его цифры (например 54 - 5 - 4 = 45). \r\nНайдите это число в таблице и запомните буквы которые ему соответствуют. \r\nВообразите эти буквы и щелкните по кнопке, на ней должны появиться эти буквы."
AutoSize=1
}
Add(ChanelToIndex,1415718,210,133)
{
link(onIndex,6656228:doVisible,[(251,139)(251,146)])
}
Add(Hub,14726768,315,63)
{
link(onEvent1,930261:doRandomize,[(433,69)(433,97)])
link(onEvent2,6220411:doEvent1,[])
}
END_SDK

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 4697
Рейтинг: 426
#7: 2016-11-07 12:15:18 ЛС | профиль | цитата
Tad, sаmakacd,
Ой, а не подскажете, что у вас за движуха с короткими предложениями в спойлерах? Это теперь стильно-модно-молодежно?
карма: 10
0
Разработчик
Ответов: 26066
Рейтинг: 2120
#8: 2016-11-07 13:17:58 ЛС | профиль | цитата
Assasin писал(а):
Ой, а не подскажете, что у вас за движуха с короткими предложениями в спойлерах? Это теперь стильно-модно-молодежно?

Похоже, это что-то типа флуда или оффтопика
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#9: 2016-11-07 23:37:39 ЛС | профиль | цитата
kamakama, думаю 37 компонент достаточно.

Add(MainForm,7226546,322,217)
{
Width=623
Height=432
Color=12639424
Caption="Математический фокус 1"
BorderStyle=3
Position=1
link(onCreate,4563130:doEvent1,[])
}
Add(Button,4800709,168,301)
{
Left=255
Top=315
Width=65
Height=50
Font=[Consolas,12,1,0,204]
Caption=""
Point(doCaption)
link(onClick,11974977:doData,[])
}
Add(MultiElementEx,5182533,749,210)
{
}
BEGIN_SDK
Add(EditMultiEx,9645247,14,21)
{
WorkCount=#8:doEvent1|8:doRandom|
VarCount=#6:String|
Width=277
Height=137
VOffset=14
HOffset=245
link(doEvent1,16614578:doEvent1,[])
link(doRandom,7398168:doGetString,[(23,48)(23,132)])
link(String,7398168:String,[])
}
Add(Random,15037153,70,84)
{
Min=1
Point(doRandomWithoutRepeats)
link(onRandom,10726599:doCopy,[])
}
Add(Hub,1378636,154,84)
{
link(onEvent1,7398168:doAdd,[])
link(onEvent2,14528048:doValue,[])
}
Add(GlobalVar,14528048,182,91)
{
Name="sim"
}
Add(StrList,7398168,238,84)
{
Point(doGetString)
Point(String)
}
Add(Hub,16614578,28,35)
{
link(onEvent1,7398168:doClear,[(225,41)(225,97)])
link(onEvent2,15037153:doRandomWithoutRepeats,[(56,48)(56,111)])
}
Add(Copy,10726599,112,84)
{
Count=3
link(onCopy,1378636:doEvent1,[])
link(Str,14294994:Text,[])
}
Add(VisualStrings,14294994,112,49)
{
Lines=#104:ABCDEFGHIJKLMNOPQRSTUVWXYZZYXWVUTSRQPONMLKJIHGFEDCBAABCDEFGHIJKLMNOPQRSTUVWXYZZYXWVUTSRQPONMLKJIHGFEDCBA|
Width=60
}
END_SDK
Add(Hub,13921664,504,238)
{
InCount=2
OutCount=7
link(onEvent1,5182533:doEvent1,[(588,244)(588,216)])
link(onEvent2,657562:doWork1,[])
link(onEvent6,7465436:doRandomWithoutRepeats,[])
link(onEvent7,13765280:doResize,[(536,286)(536,314)])
}
Add(GlobalVar,11793102,224,266)
{
Name="sim"
}
Add(Hub,10752775,616,252)
{
link(onEvent1,5182533:doRandom,[(637,258)(637,223)])
link(onEvent2,630882:doOperation,[(637,265)(637,314)])
}
Add(DoData,11974977,224,301)
{
link(onEventData,16236019:doEvent1,[])
link(Data,11793102:Var,[])
}
Add(Hub,16236019,273,301)
{
link(onEvent1,557388:doWork1,[(299,307)(299,298)(158,298)])
link(onEvent2,14588143:doWork2,[])
}
Add(Label,10624162,378,301)
{
Left=245
Top=375
Color=12639424
Visible=1
Cursor=2
Caption="Не понял, еще раз."
Point(doVisible)
link(onClick,4663824:doEvent1,[])
}
Add(Hub,4663824,427,301)
{
OutCount=4
link(onEvent1,14588143:doWork1,[(453,307)(453,295)(310,295)(310,307)])
link(onEvent2,11793102:doValue,[(457,314)(457,257)(212,257)(212,272)])
link(onEvent3,13921664:doEvent2,[(466,321)(466,251)])
link(onEvent4,557388:doWork3,[(454,328)(454,349)(158,349)])
}
Add(HubEx,557388,154,301)
{
link(onEvent,4800709:doCaption,[])
}
Add(Random,7465436,567,252)
{
Max=99
Point(doRandomWithoutRepeats)
link(onRandom,10752775:doEvent1,[])
}
Add(GridLayout,13765280,567,308)
{
Name="M"
Rows=10
Cols=10
AddMode=1
}
Add(Label,3796020,483,308)
{
Left=95
Top=5
Width=455
Height=65
Color=12639424
Caption="Задумайте любое двухзначное число. (например 54). \r\nВычтите из него составляющие его цифры (например 54 - 5 - 4 = 45). \r\nНайдите это число в таблице и запомните буквы которые ему соответствуют. \r\nВообразите эти буквы и щелкните по кнопке, на ней должны появиться эти буквы."
AutoSize=1
}
Add(ChanelToIndex,14588143,322,301)
{
link(onIndex,10624162:doVisible,[(363,307)(363,314)])
}
Add(Hub,4563130,427,231)
{
link(onEvent1,7465436:doRandomize,[(545,237)(545,265)])
link(onEvent2,13921664:doEvent1,[])
}
Add(Math,630882,644,308)
{
OpType=8
Op2=9
ResultType=0
link(onResult,4249230:doCase,[])
}
Add(GlobalVar,8201429,735,350)
{
Name="sim"
}
Add(FormatStr,1067495,728,371)
{
Mask="%1-%2"
link(onFString,14011979:doWork3,[(802,377)])
link(Str1,12548588:Var2,[])
link(Str2,8201429:Var,[])
}
Add(FormatStr,6740998,742,308)
{
Mask="%1-%2"
link(onFString,14011979:doWork2,[])
link(Str1,12548588:Var3,[(748,292)])
link(Str2,5182533:String,[])
}
Add(ChildPanel,657562,826,245)
{
}
BEGIN_SDK
Add(EditMulti,16197434,21,21)
{
WorkCount=2
link(doWork1,2476702:##clear,[(47,27)(47,90)])
link(doWork2,2476702:##add,[(59,34)(59,83)])
}
Add(Panel,10683718,35,105)
{
Top=60
Width=610
Height=245
Color=12639424
BorderWidth=0
BevelInner=0
BevelWidth=0
}
Add(ChildPanelEx,2476702,98,77)
{
Mode=1
}
BEGIN_SDK
Add(EditMultiEx,16095507,21,21)
{
WorkCount=#5:##add|7:##clear|
Width=97
Height=88
Point(##add)
Point(##clear)
link(##add,7059886:doCaption,[(36,27)(36,62)])
}
Add(Panel,7059886,56,56)
{
Left=35
Top=105
Height=25
Color=12639424
Font=[Courier New,10,1,0,204]
Layout="parent.parent.M"
BorderWidth=0
BevelInner=0
BevelWidth=0
Alignment=1
}
END_SDK
END_SDK
Add(Case,4249230,686,308)
{
Value=Integer(0)
link(onNextCase,6740998:doString,[])
link(onTrue,1067495:doString,[(727,321)(727,377)])
}
Add(GetDataEx,12548588,728,287)
{
Angle=3
link(Data,7465436:Random,[(573,292)])
}
Add(HubEx,14011979,798,308)
{
Angle=3
link(onEvent,657562:doWork2,[(802,258)])
}

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
9
Сообщение
...
Прикрепленные файлы
(файлы не залиты)