------------ Дoбавленo в 15.58:
Тогда, вот так работает
Add(MainForm,3011605,231,259)
{
Width=565
}
Add(Memo,7766550,385,217)
{
Left=10
Top=5
Width=455
Height=250
Font=[MS Sans Serif,10,0,0,1]
FileName="Original.txt"
Strings=#98:ДОбрый вЕчер! В эфИре - «ВЕсти» из ПетербУрга. В стУдии новостЕй Игорь Страхов. КОротко о глАвном.|0:|85:ВулканИческое Облако над ЕврОпой. ПЕпел ИслАндии изменИл расписАние рЕйсов в ПУлково.|70:МОжно потрАтить бОльше. В городскОм правИтельстве корректИруют бюджЕт.|81:ЛЕнин - снОва с нАми. БрОнзовый вождь вернУлся на плОщадь у ФинлЯндского вокзАла.|94:СлИшком бЫстро рослА и мешАла жить другИм. В Зоопарк из Океанариума переехала реликтовая рыба.|77:Масштабная выставка Исаака Левитана. Русский музей отмечает юбилей художника.|0:|
Point(onKeyDown)
Point(SelText)
Point(doSetSelect)
link(onKeyDown,4019486:doCheckMask,[(460,230)(460,339)(394,339)(394,307)])
}
Add(MultiElementEx,4019486,406,301)
{
link(onEvent,7766550:doSetSelect,[(451,314)(451,199)(373,199)(373,265)])
link(Data,7766550:SelText,[])
}
BEGIN_SDK
Add(EditMultiEx,9457069,28,21)
{
WorkCount=#11:doCheckMask|
EventCount=#8:onEvent1|7:onEvent|
DataCount=#4:Data|
Width=318
Height=249
VOffset=196
HOffset=105
link(doCheckMask,10403116:doCheckMask,[])
}
Add(MultiElementEx,12888806,133,182)
{
@Hint=#56:Переводит кириллические символы в верхний/нижний регистр|
link(ResultString,8160523:doWork2,[])
link(Data,9457069:Data,[])
}
BEGIN_SDK
Add(EditMultiEx,1610369,21,21)
{
WorkCount=#4:doUp|6:doDown|
EventCount=#12:ResultString|0:|
DataCount=#4:Data|
Width=426
Height=270
VOffset=56
HOffset=35
link(doUp,10405018:doWork2,[])
link(doDown,10405018:doWork3,[])
}
Add(Shape,15843163,35,224)
{
Width=277
Text="а-я== 224-255 А-Я== 192-223 Ё== 168 ё== 184 "
PWidth=2
}
Add(StrCase,3040051,266,133)
{
Type=1
link(onModify,8570262:doWork2,[])
}
Add(StrCase,7786281,266,175)
{
link(onModify,8570262:doWork3,[(333,181)])
}
Add(HubEx,8570262,329,133)
{
link(onEvent,402667:doStrCat,[(352,139)(352,69)])
}
Add(Str_Enum,9992685,56,126)
{
Delimiter=""
link(onEnum,10707034:doConvert,[])
link(String,1610369:Data,[])
}
Add(MathParse,10321937,154,126)
{
MathStr="((%1 = 168) + (%1 = 184) + (%1 >= 192) * (%1 <= 255)) * %2"
link(onResult,11377910:doEvent,[])
link(X2,1494482:Value,[])
}
Add(Convertor,10707034,105,126)
{
Mode=3
link(onResult,10321937:doCalc,[])
}
Add(StrCat,402667,371,63)
{
Point(doClear)
link(Str1,14681209:Var1,[(377,54)(411,54)(411,107)])
}
Add(DoData,14419447,371,119)
{
link(onEventData,1610369:ResultString,[(419,125)(419,83)])
link(Data,14681209:Var2,[])
}
Add(GetDataEx,14681209,371,102)
{
link(Data,402667:Result,[])
}
Add(Hub,6142680,231,70)
{
OutCount=3
link(onEvent1,402667:doClear,[])
link(onEvent2,9992685:doEnum,[(260,83)(260,39)(39,39)(39,132)])
link(onEvent3,14419447:doData,[(364,90)(364,125)])
}
Add(Memory,1494482,161,70)
{
link(onData,6142680:doEvent1,[])
}
Add(ChanelToIndex,10405018,105,70)
{
Count=3
link(onIndex,1494482:doValue,[])
}
Add(IndexToChanel,11377910,210,126)
{
Count=3
Point(Data)
link(onEvent1,8570262:doWork1,[(254,132)(254,121)(333,121)])
link(onEvent2,3040051:doModify,[])
link(onEvent3,7786281:doModify,[(254,146)(254,181)])
link(Data,9992685:Part,[(216,114)(195,114)(195,170)(69,170)])
}
END_SDK
Add(KeyMask,2531088,56,175)
{
@Hint=#7:Ctrl-Up|
Ctrl=1
Key=38
link(onFalse,13703566:doCheckMask,[(100,181)(100,160)(44,160)(44,139)])
link(onTrue,12888806:doUp,[])
AddHint(50,-17,47,13,@Hint)
}
Add(KeyMask,10403116,56,217)
{
@Hint=#9:Ctrl-Down|
Ctrl=1
Key=40
link(onFalse,2531088:doCheckMask,[(100,223)(100,202)(44,202)(44,181)])
link(onTrue,12888806:doDown,[(110,230)(110,195)])
AddHint(52,18,61,13,@Hint)
}
Add(Check,6781570,217,182)
{
Caption="doSetSelect"
link(onEvent,9457069:onEvent,[(312,188)(312,230)])
}
Add(KeyMask,11074046,56,91)
{
@Hint=#2:F3|
Key=114
link(onFalse,2952773:doCheckMask,[(100,97)(100,76)(44,76)(44,55)])
link(onTrue,7640352:doData,[])
AddHint(50,-18,27,13,@Hint)
}
Add(KeyMask,13703566,56,133)
{
@Hint=#2:F2|
Key=113
link(onFalse,11074046:doCheckMask,[(100,139)(100,118)(44,118)(44,97)])
link(onTrue,13047884:doWork,[])
AddHint(48,-17,27,13,@Hint)
}
Add(KeyMask,2952773,56,49)
{
@Hint=#2:F4|
Key=115
link(onTrue,16014019:doData,[])
AddHint(49,-16,27,13,@Hint)
}
Add(Check,13047884,147,140)
{
Caption="Parse"
link(onEvent,9457069:onEvent1,[(320,146)(320,223)])
}
Add(DoData,7640352,147,98)
{
Data=String(*\\*\13\10)
link(onEventData,10933775:doWork2,[])
}
Add(HubEx,8160523,196,182)
{
link(onEvent,6781570:doWork,[])
}
Add(DoData,16014019,147,56)
{
Data=String(\13\10=====\13\10)
link(onEventData,10933775:doWork1,[(200,62)])
}
Add(HubEx,10933775,196,98)
{
Angle=1
link(onEvent,8160523:doWork1,[])
}
END_SDK
Add(Button,12153148,231,301)
{
Left=470
Top=10
Width=80
Caption="ударЕние"
link(onClick,15389493:doLoad,[])
}
Add(MultiElementEx,15389493,294,301)
{
@Hint=#190:Переводит ВО ВСЁМ ИСХОДНОМ ТЕКСТЕ кириллические слова в нижний регистр со 2-й буквы (т.е. устраняет ударения из текста, форматированного для телесуфлёра) и возвращает обратно в исходное окно|0:|14:Новая редакция|
link(Data,7766550:Array,[(300,285)(405,285)])
link(onEvent4,7766550:doText,[(356,307)(356,244)])
AddHint(-215,45,200,104,@Hint)
}
BEGIN_SDK
Add(EditMultiEx,1610369,28,91)
{
WorkCount=#6:doLoad|0:|
EventCount=#8:onEvent4|
DataCount=#4:Data|
Width=713
Height=277
VOffset=28
HOffset=42
link(doLoad,2545313:doEvent1,[])
}
Add(InfoTip,14515840,28,14)
{
Info=#190:Переводит ВО ВСЁМ ИСХОДНОМ ТЕКСТЕ кириллические слова в нижний регистр со 2-й буквы (т.е. устраняет ударения из текста, форматированного для телесуфлёра) и возвращает обратно в исходное окно|
Width=358
Height=60
}
Add(StrCase,3040051,539,210)
{
link(onModify,8570262:doWork2,[])
}
Add(HubEx,8570262,581,210)
{
link(onEvent,402667:doStrCat,[])
}
Add(Str_Enum,9992685,287,196)
{
Delimiter=""
link(onEnum,6752549:doEvent1,[])
}
Add(Convertor,10707034,371,154)
{
Mode=3
link(onResult,10321937:doCalc,[])
}
Add(StrCat,402667,623,210)
{
Point(doClear)
link(Str1,14681209:Var1,[(629,201)(608,201)(608,254)])
}
Add(GetDataEx,14681209,623,249)
{
link(Data,402667:Result,[])
}
Add(Hub,6142680,126,126)
{
OutCount=3
link(onEvent1,402667:doClear,[(601,132)(601,223)])
link(onEvent2,1961720:doEnum,[(150,139)(150,174)])
link(onEvent3,5683228:doTrim,[(594,146)(594,272)])
}
Add(Str_Enum,1961720,161,168)
{
Delimiter=" "
link(onEnum,10077282:doStrCat,[])
}
Add(MathParse,10321937,413,154)
{
DataCount=1
MathStr="(%1 = 168) + (%1 = 184) + (%1 >= 192) * (%1 <= 255)"
ResultType=0
link(onResult,8306629:doCase,[])
}
Add(StrCat,10077282,203,168)
{
Str2=" "
link(onStrCat,13276338:doEvent1,[])
}
Add(Trim,5683228,623,266)
{
Char=" "
link(onTrim,9824336:doAdd,[])
link(Text,14681209:Var2,[])
}
Add(Hub,6752549,336,196)
{
link(onEvent1,10707034:doConvert,[(360,202)(360,160)])
link(onEvent2,5987410:doEvent,[])
}
Add(ArrayEnum,7677271,70,126)
{
link(onItem,6142680:doEvent1,[])
link(onEndEnum,8975739:doData,[(118,139)(118,335)])
link(Array,1610369:Data,[])
}
Add(Counter,10115951,497,154)
{
Max=1000
Default=1
}
Add(IndexToChanel,5987410,413,203)
{
Point(Index)
Point(Data)
link(onEvent1,8570262:doWork1,[(585,209)])
link(onEvent2,5628265:doCompare,[])
link(Index,10321937:Result,[])
link(Data,9992685:Part,[(426,194)(457,194)(457,242)(300,242)])
}
Add(Hub,13276338,245,168)
{
link(onEvent1,10115951:doReset,[])
link(onEvent2,9992685:doEnum,[(273,181)(273,202)])
}
Add(If_else,5628265,497,210)
{
Type=2
Op2=Integer(1)
link(onTrue,3040051:doModify,[])
link(onFalse,8570262:doWork3,[(585,223)])
link(Op1,10115951:Count,[])
}
Add(Case,8306629,455,154)
{
DataOnTrue=Integer(0)
link(onNextCase,10115951:doNext,[])
}
Add(StrList,9824336,679,266)
{
}
Add(DoData,8975739,679,329)
{
link(onEventData,1610369:onEvent4,[(726,335)(726,125)])
link(Data,9824336:Text,[])
}
Add(Hub,2545313,42,119)
{
link(onEvent1,9824336:doClear,[(659,125)(659,279)])
link(onEvent2,7677271:doEnum,[])
}
END_SDK
Add(Button,11969675,231,217)
{
Left=470
Top=45
Width=80
Data=String(dgxdrxd)
link(onClick,7766550:doAdd,[])
}