Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2016-10-17 09:35:46 ЛС | профиль | цитата
ser_davkin, а как тебе такой вариант ?


Add(MainForm,2953706,91,182)
{
Width=536
Height=134
}
Add(Edit,15108714,154,77)
{
Left=70
Top=35
Width=155
Text="Лукашенко"
}
Add(Button,2697809,91,133)
{
Left=270
Top=35
link(onClick,1140567:doModify,[])
}
Add(Edit,469831,483,196)
{
Left=345
Top=35
}
Add(MultiReplace,12229033,203,133)
{
ReplaceList="а=1;\r\nи=1;\r\nс=1;\r\nъ=1;\r\nб=2;\r\nй=2;\r\nт=2;\r\nы=2;\r\nв=3;\r\nк=3;\r\nу=3;\r\nь=3;\r\nг=4;\r\nл=4;\r\nф=4;\r\nэ=4;\r\nд=5;\r\nм=5;\r\nх=5;\r\nю=5;\r\nе=6;\r\nн=6;\r\nц=6;\r\nя=6;\r\nё=7;\r\nо=7;\r\nч=7;\r\nж=8;\r\nп=8;\r\nш=8;\r\nз=9;\r\nр=9;\r\nщ=9;"
link(onResult,8881502:doEvent2,[])
}
Add(StrCase,1140567,154,133)
{
link(onModify,12229033:doMultiReplace,[])
link(Str,15108714:Text,[])
}
Add(Str_Enum,6862845,315,133)
{
Delimiter=""
link(onEnum,7434692:doOperation,[])
link(onEndEnum,6093190:doData,[(369,146)(369,195)])
}
Add(ChangeMon,6093190,392,189)
{
Point(onNoData)
link(onData,8881502:doEvent1,[(448,195)(448,109)(277,109)(277,132)])
link(Data,15514636:Var2,[])
link(onNoData,469831:doText,[])
}
Add(Math,7434692,392,133)
{
Point(doClear)
link(Op2,15514636:Var3,[(405,121)(435,121)(435,176)])
}
Add(GetDataEx,15514636,392,171)
{
link(Data,7434692:Result,[])
}
Add(Hub,8881502,287,126)
{
InCount=2
link(onEvent1,7434692:doClear,[(378,132)(378,146)])
link(onEvent2,6862845:doEnum,[])
}
Add(InfoTip,2934529,252,84)
{
Info=#11:Сумма цифр.|
Width=211
Height=144
}

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