Add(MainForm,2953706,21,105)
{
}
Add(Edit,8624299,294,147)
{
Left=30
Top=20
Width=300
Text="Паяц Дональд Фредович"
}
Add(Button,6783099,224,203)
{
Left=160
Top=80
Caption="Пуск"
link(onClick,552811:do_padeg,[])
}
Add(Message,1033379,378,210)
{
Message="ФИО не указано!"
}
Add(Edit,8329931,401,152)
{
Left=30
Top=130
Width=300
Text=""
}
Add(MultiElementEx,552811,294,203)
{
@Hint=#46:Склонение Ф.И.О сотрудника в родительный падеж|
@Color=43690
Mode=2
link(on_padeg_fio,8329931:doText2,[(370,209)(370,162)(379,162)])
link(onError,1033379:doMessage,[])
link(FIO,8624299:Text,[])
AddHint(53,92,179,26,@Hint)
}
BEGIN_SDK
Add(EditMultiEx,11025541,21,21)
{
WorkCount=#8:do_padeg|
EventCount=#12:on_padeg_fio|7:onError|
DataCount=#3:FIO|
Width=1749
Height=704
VOffset=150
HOffset=50
link(do_padeg,2099877:doTrim,[(31,177)(31,174)])
}
Add(RE_Check,11231197,1057,224)
{
Expression="(ий|ой)$"
FullStrCheck=1
link(onMatch,12086233:doDelete,[])
link(onDismatch,11530385:doCheck,[])
}
Add(RE_Check,14748065,784,147)
{
Expression="(о|е|и|у|ю|ых|их)$"
FullStrCheck=1
link(onMatch,14458627:doWork1,[(984,153)])
link(onDismatch,499638:doCheck,[])
}
Add(RE_Check,4232789,756,245)
{
Expression="(ова|ева|ёва|ына|ина)$"
FullStrCheck=1
link(onMatch,1430598:doDelete,[])
link(onDismatch,9650972:doCheck,[(801,258)(801,277)(745,277)(745,293)])
}
Add(StrCat,13944606,847,245)
{
Str2="ой"
link(onStrCat,10271215:doWork2,[])
}
Add(Copy,13697374,1099,308)
{
Count=2
Direction=1
link(onCopy,2272785:doMultiReplace,[])
}
Add(Delete,1430598,805,245)
{
Count=1
Direction=1
link(onDelete,13944606:doStrCat,[])
}
Add(RE_Check,13955330,847,294)
{
Expression="ая$"
FullStrCheck=1
link(onMatch,13102123:doDelete,[])
link(onDismatch,2202284:doEvent,[])
}
Add(StrCat,4605872,931,294)
{
Str2="ой"
link(onStrCat,7322130:doWork3,[(977,300)])
}
Add(Delete,13102123,889,294)
{
Count=2
Direction=1
link(onDelete,4605872:doStrCat,[])
}
Add(StrCat,12399093,1148,224)
{
Str2="ого"
link(onStrCat,13699603:doWork3,[(1187,230)])
}
Add(Delete,12086233,1106,224)
{
Count=2
Direction=1
link(onDelete,12399093:doStrCat,[])
}
Add(MultiReplace,2272785,1148,308)
{
ReplaceList="ея=ей;\r\nия=ию;\r\nый=ой;\r\nяя=ей;\r\nка=ки;"
Mode=1
}
Add(Copy,12954879,1547,238)
{
Count=2
Direction=1
link(onCopy,1866439:doMultiReplace,[])
}
Add(MultiReplace,1866439,1596,238)
{
ReplaceList="ея=еи;\r\nия=ии;\r\nый=ого;\r\nий=ого;\r\nец=ца;\r\nка=ки;\r\nха=хи;\r\nча=чи;"
Mode=1
}
Add(MultiStrData,9711460,140,168)
{
Char=" "
From=2
Count=1
link(onPart1,9142970:doCheck,[])
}
Add(Memory,16774396,560,168)
{
@Color=65450
}
Add(Hub,14752133,434,147)
{
link(onEvent1,12873967:doData,[(511,153)(511,244)])
link(onEvent2,11793699:doWork2,[])
}
Add(Hub,3312409,469,168)
{
link(onEvent1,9379662:doWork2,[])
link(onEvent2,8217005:doWork2,[])
}
Add(Hub,14809457,434,126)
{
link(onEvent1,11793699:doWork1,[(501,132)])
link(onEvent2,8217005:doWork1,[(494,139)])
}
Add(Memory,8126829,560,238)
{
@Hint=#3:Пол|
Default=Integer(0)
AddHint(49,12,35,13,@Hint)
}
Add(IndexToChanel,2202284,987,301)
{
Point(Index)
Point(Data)
link(onEvent1,11231197:doCheck,[(1025,307)(1025,279)(1050,279)(1050,230)])
link(onEvent2,15868760:doEvent1,[])
link(Index,14412044:Var,[])
}
Add(LineBreak,7844787,560,287)
{
Caption="idx_sex"
Type=1
link(Data,6859106:Var2,[])
Primary=[14412044,427,-28]
}
Add(Hub,1810081,1659,238)
{
InCount=2
OutCount=1
link(onEvent1,14255306:doValue,[])
}
Add(Hub,13244573,84,168)
{
link(onEvent1,9711460:doSplit,[])
link(onEvent2,16213164:doSplit,[(122,181)(122,223)])
}
Add(DoData,12873967,518,238)
{
Data=Integer(1)
link(onEventData,8126829:doValue,[])
}
Add(HubEx,7322130,973,245)
{
link(onEvent,8389462:doWork2,[])
}
Add(Delete,206534,1092,357)
{
Count=2
Direction=1
link(onDelete,13897835:doStrCat,[])
}
Add(StrCat,13897835,1141,357)
{
link(onStrCat,13385314:doWork3,[(1649,363)])
link(Str2,2272785:Result,[])
}
Add(Hub,15868760,1029,308)
{
link(onEvent1,13697374:doCopy,[])
link(onEvent2,206534:doDelete,[(1065,321)(1065,363)])
}
Add(Delete,12377982,1540,280)
{
Count=2
Direction=1
link(onDelete,1077202:doStrCat,[])
}
Add(StrCat,1077202,1589,280)
{
link(onStrCat,8389462:doWork3,[(1635,286)])
link(Str2,1866439:Result,[])
}
Add(HubEx,8389462,1631,245)
{
link(onEvent,13385314:doWork2,[])
}
Add(HubEx,13385314,1645,245)
{
link(onEvent,1810081:doEvent2,[])
}
Add(HubEx,8217005,490,175)
{
Angle=1
link(onEvent,8126829:doClear,[(494,251)])
}
Add(HubEx,9379662,497,168)
{
link(onEvent,16774396:doValue,[])
}
Add(RE_Replace,2258857,903,525)
{
Expression="^Лев$"
ReplaceStr="Льв"
link(onReplace,10978860:doReplace,[(954,531)(954,552)(926,552)(926,531)])
}
Add(LineBreak,1967236,735,147)
{
Caption="snm"
link(Out,14748065:doCheck,[])
Primary=[15538563,-497,70]
}
Add(LineBreak,12437808,574,455)
{
Caption="nm"
link(Out,5927608:doCheck,[])
Primary=[13469818,-336,-224]
}
Add(RE_Check,5927608,623,455)
{
Expression="(га|ка|ха|ша|ща|жа)$"
FullStrCheck=1
link(onMatch,7966657:doDelete,[])
link(onDismatch,12817248:doCheck,[(667,468)(667,524)])
}
Add(Delete,7966657,679,455)
{
Count=1
Direction=1
link(onDelete,10428947:doStrCat,[])
}
Add(StrCat,10428947,721,455)
{
Str2="и"
link(onStrCat,6489291:doWork1,[(802,461)])
}
Add(RE_Check,12817248,672,518)
{
Expression="(ш|щ|ж|ч)$"
FullStrCheck=1
link(onMatch,5604965:doDelete,[])
link(onDismatch,2523479:doEvent,[])
}
Add(Delete,5604965,721,518)
{
Count=1
Direction=1
link(onDelete,13501458:doStrCat,[])
}
Add(StrCat,13501458,763,518)
{
Str2="и"
link(onStrCat,6489291:doWork2,[])
}
Add(IndexToChanel,2523479,812,525)
{
Point(Index)
Point(Data)
link(onEvent1,9393180:doCheck,[])
link(onEvent2,3960577:doEvent1,[(860,538)(860,629)])
link(Index,11671672:Var,[])
}
Add(LineBreak,6939502,609,287)
{
Caption="idx_sex"
Type=1
link(Data,6859106:Var3,[(615,278)])
Primary=[11671672,203,203]
}
Add(GetDataEx,6859106,560,273)
{
link(Data,8126829:Value,[])
}
Add(Copy,4879000,1078,623)
{
Count=1
Direction=1
link(onCopy,9222107:doMultiReplace,[])
}
Add(MultiReplace,9222107,1127,623)
{
ReplaceList="ь=и;\r\nа=ы;\r\nя=и;"
}
Add(Copy,11376173,1078,532)
{
Count=1
Direction=1
link(onCopy,11506141:doMultiReplace,[])
}
Add(MultiReplace,11506141,1134,532)
{
ReplaceList="й=я;\r\nь=я;\r\nа=ы;"
}
Add(Delete,13107377,1071,672)
{
Count=1
Direction=1
link(onDelete,15618249:doStrCat,[])
}
Add(StrCat,15618249,1120,672)
{
link(onStrCat,3881595:doWork3,[(1208,678)])
link(Str2,9222107:Result,[])
}
Add(Hub,3960577,1029,623)
{
link(onEvent1,4879000:doCopy,[])
link(onEvent2,13107377:doDelete,[(1057,636)(1057,678)])
}
Add(Delete,12901104,1078,574)
{
Count=1
Direction=1
link(onDelete,13987519:doStrCat,[])
}
Add(StrCat,13987519,1127,574)
{
link(onStrCat,3881595:doWork2,[])
link(Str2,11506141:Result,[])
}
Add(HubEx,3881595,1204,574)
{
link(onEvent,4593990:doEvent2,[])
}
Add(Hub,3379375,1029,532)
{
link(onEvent1,11376173:doCopy,[])
link(onEvent2,12901104:doDelete,[(1061,545)(1061,580)])
}
Add(Hub,4593990,1225,567)
{
InCount=2
OutCount=1
link(onEvent1,2549086:doCompare,[])
}
Add(RE_Check,9393180,861,525)
{
Expression="(д|з|к|л|м|н|п|р|с|т|ф|ч|ш|щ|ц|ж|в|б|г)$"
FullStrCheck=1
link(onMatch,2258857:doReplace,[])
link(onDismatch,3379375:doEvent1,[])
}
Add(StrCat,15587775,987,525)
{
Str2="а"
link(onStrCat,5251891:doWork2,[])
}
Add(HubEx,5251891,1022,525)
{
link(onEvent,4593990:doEvent1,[(1181,531)(1181,573)])
}
Add(HubEx,6489291,798,518)
{
link(onEvent,5251891:doWork1,[(1026,524)])
}
Add(FormatStr,1701990,1358,574)
{
@Color=65450
DataCount=3
Mask="%1\r\n %2 %3"
link(onFString,15643151:In,[])
link(Str1,1942711:Var2,[])
link(Str3,4745903:Var,[])
}
Add(Memory,14255306,1694,238)
{
@Color=65450
}
Add(MultiStrData,16213164,140,217)
{
Char=" "
link(onPart1,15538563:In,[])
link(onPart2,13469818:In,[(223,230)(223,237)])
}
Add(InfoTip,13823864,35,91)
{
@Hint=#41:Распределение сотрудников по обязанностям|
Info=#8:Отчество|
Width=638
Height=235
}
Add(InfoTip,16453227,686,105)
{
@Hint=#41:Распределение сотрудников по обязанностям|
Info=#44:Фамилия (сначало мужской род, потом женский)|
Width=1065
Height=305
}
Add(InfoTip,14255599,553,434)
{
@Hint=#41:Распределение сотрудников по обязанностям|
Info=#37:Имя (idx: 0- мужской род, 1- женский)|
Width=687
Height=277
}
Add(If_else,2549086,1267,567)
{
link(onTrue,14673594:In,[])
link(onFalse,1701990:doString,[])
link(Op1,1942711:Var1,[(1273,558)])
}
Add(Trim,2099877,42,168)
{
Mode=7
link(onTrim,13244573:doEvent1,[])
link(Text,11025541:FIO,[(48,119)(77,119)])
}
Add(RE_Replace,10978860,945,525)
{
Expression="^Павел$"
ReplaceStr="Павл"
link(onReplace,15587775:doStrCat,[])
}
Add(RE_Check,9142970,189,168)
{
Expression="ч$"
FullStrCheck=1
link(onMatch,13821348:doStrCat,[])
link(onDismatch,4609934:doCheck,[])
}
Add(RE_Check,4609934,231,175)
{
Expression="а$"
FullStrCheck=1
link(onMatch,6260178:doDelete,[])
link(onDismatch,14809457:doEvent1,[(380,188)(380,132)])
}
Add(LineBreak,2508056,560,210)
{
Caption="otch"
Type=1
link(Data,16774396:Value,[])
Primary=[4745903,812,329]
}
Add(StrCat,13821348,420,168)
{
Str2="а"
link(onStrCat,3312409:doEvent1,[])
}
Add(Delete,6260178,273,175)
{
Count=1
Direction=1
link(onDelete,1004973:doStrCat,[])
}
Add(StrCat,1004973,322,175)
{
Str2="ы"
link(onStrCat,14752133:doEvent1,[(391,181)(391,153)])
}
Add(HubEx,11793699,497,154)
{
Angle=1
link(onEvent,9379662:doWork1,[])
}
Add(RE_Check,499638,840,154)
{
Expression="(ща|ша|ка)$"
FullStrCheck=1
link(onMatch,16533430:doDelete,[])
link(onDismatch,4232789:doCheck,[(884,167)(884,209)(744,209)(744,251)])
}
Add(Delete,16533430,889,154)
{
Count=1
Direction=1
link(onDelete,11332827:doStrCat,[])
}
Add(StrCat,11332827,931,154)
{
Str2="и"
link(onStrCat,14458627:doWork2,[])
}
Add(HubEx,14458627,980,154)
{
Angle=1
link(onEvent,13699603:doWork2,[(984,216)])
}
Add(RE_Check,9650972,756,287)
{
Expression="(ов|ев|ёв|ын|ин)$"
FullStrCheck=1
link(onMatch,15404694:doStrCat,[])
link(onDismatch,13955330:doCheck,[])
}
Add(StrCat,15404694,805,287)
{
Str2="а"
link(onStrCat,10271215:doWork3,[(893,293)])
}
Add(HubEx,10271215,889,245)
{
link(onEvent,7322130:doWork2,[])
}
Add(RE_Check,11530385,1204,231)
{
Expression="(б|в|г|д|з|и|л|м|н|п|р|с|т|ф|ец|иц|ац)$"
FullStrCheck=1
link(onMatch,16084031:doWork2,[])
link(onDismatch,4064814:doCheck,[(1241,244)(1241,258)])
}
Add(StrCat,7792081,1344,231)
{
Str2="ы"
link(onStrCat,13083549:doWork3,[(1565,237)])
}
Add(HubEx,13083549,1561,210)
{
link(onEvent,1810081:doEvent1,[(1652,216)(1652,244)])
}
Add(InfoTip,13655333,1197,196)
{
@Hint=#41:Распределение сотрудников по обязанностям|
Info=#51:созвучные существительным мужского рода 2 склонения|
Width=316
Height=123
}
Add(LineBreak,480686,1631,182)
{
link(Out,11025541:on_padeg_fio,[(1667,188)(1667,177)])
Primary=[15643151,-231,392]
}
Add(LineBreak,5210606,1631,189)
{
link(Out,11025541:onError,[(1667,195)(1667,184)])
Primary=[14673594,-203,378]
}
Add(HubEx,13699603,1183,210)
{
link(onEvent,9516531:doWork2,[])
}
Add(RE_Check,4064814,1246,252)
{
@Hint=#28:Безударные на последний слог|
Expression="(б|в|г|д|з|л|м|н|п|р|с|т|ф|ц)а$"
FullStrCheck=1
link(onMatch,5190204:doDelete,[])
link(onDismatch,12346943:doCheck,[])
AddHint(-49,43,175,13,@Hint)
}
Add(Delete,5190204,1295,252)
{
Count=1
Direction=1
link(onDelete,16084031:doWork3,[(1334,258)])
}
Add(HubEx,16084031,1330,231)
{
link(onEvent,7792081:doStrCat,[])
}
Add(Delete,5539079,1421,259)
{
Count=1
Direction=1
link(onDelete,15192642:doStrCat,[])
}
Add(HubEx,9516531,1526,210)
{
link(onEvent,13083549:doWork2,[])
}
Add(RE_Check,12346943,1379,259)
{
Expression="(б|в|г|д|з|л|м|н|п|р|с|т|ф|ц)ь$"
FullStrCheck=1
link(onMatch,5539079:doDelete,[])
link(onDismatch,219068:doEvent1,[])
}
Add(StrCat,15192642,1463,259)
{
Str2="я"
link(onStrCat,9516531:doWork3,[(1530,265)])
}
Add(GetDataEx,1942711,1358,553)
{
link(Data,14255306:Value,[(1364,411)(1700,411)])
}
Add(Hub,219068,1519,266)
{
link(onEvent1,12954879:doCopy,[(1536,272)(1536,244)])
link(onEvent2,12377982:doDelete,[(1537,279)(1537,286)])
}
END_SDK
Редактировалось 6 раз(а), последний 2025-03-20 08:09:20
Поиск
Друзья
Администрация