Вверх ↑
Ответов: 1841
Рейтинг: 370
#1: 2010-01-29 13:18:42 ЛС | профиль | цитата
Tad писал(а):
Посмотрел - у меня "лудше"


Add(MainForm,5658159,98,119)
{
Width=213
Height=324
link(onCreate,11313542:doEvent1,[])
}
Add(Random,10279481,231,126)
{
Min=65
Max=90
link(onRandom,10466341:doConvert,[])
}
Add(Hub,11313542,147,133)
{
link(onEvent1,10279481:doRandomize,[])
link(onEvent2,7518253:doTimer,[])
}
Add(Timer,7518253,175,140)
{
Interval=15
Enable=1
link(onTimer,10279481:doRandom,[(219,146)(219,132)])
}
Add(Convertor,10466341,283,126)
{
Mode=4
link(onResult,10180839:doStrCat,[])
}
Add(Memo,15752100,511,133)
{
Left=25
Top=15
Width=150
Height=240
ScrollBars=2
link(Str,5406836:Var3,[(517,119)(426,119)(426,170)])
}
Add(Length,8052815,385,126)
{
link(onLength,3616185:doCase,[])
}
Add(StrCat,10180839,336,126)
{
Point(doClear)
link(onStrCat,8052815:doLength,[])
link(Str1,5406836:Var1,[(342,114)(330,114)(330,170)])
}
Add(Case,3616185,433,126)
{
Value=Integer(4)
link(onTrue,12121380:doEvent1,[])
}
Add(Hub,12121380,479,133)
{
link(onEvent1,15752100:doAdd,[])
link(onEvent2,10180839:doClear,[(499,146)(499,164)(324,164)(324,139)])
}
Add(GetDataEx,5406836,336,165)
{
link(Data,10180839:Result,[])
}

карма: 1
0