Разделитель должен быть? "'"
--- Добавлено в 2019-08-27 13:27:16
Сейчас добавил морфологический анализ, все работает. Осталось только придумать, как перебирать "All_Forms.txt", что бы найти по морфологическому анализу такое же слова.
Add(MainForm,6641460,56,133)
{
link(onCreate,5663974:doEvent1,[])
}
Add(HashTableString,3717231,385,210)
{
Char="#"
FileName="All_Forms.txt"
link(onString,12001889:doWork2,[(433,223)(433,216)])
}
Add(Edit,15729039,224,196)
{
Left=10
Top=15
Width=365
Text="скакать"
link(onEnter,6348243:doModify,[])
}
Add(Memo,3908912,658,182)
{
Top=65
Width=380
Height=200
ScrollBars=2
}
Add(KeyboardLayout,4453736,329,112)
{
}
Add(Hub,5663974,168,147)
{
OutCount=3
link(onEvent1,4453736:doRussianKbd,[(228,153)(228,125)])
link(onEvent2,12556189:doSetLanguage,[(385,160)(385,300)])
link(onEvent3,3717231:doLoad,[(284,167)(284,244)])
}
Add(Hub,2806354,357,203)
{
link(onEvent1,3908912:doClear,[(431,209)(431,195)])
link(onEvent2,3717231:doKey,[])
}
Add(StrPart,8580401,476,210)
{
Char=","
link(onSplit,12001889:doWork1,[(520,216)(520,207)(452,207)])
link(onPart,13738678:doReplace,[])
}
Add(HubEx,12001889,448,210)
{
link(onEvent,8580401:doSplit,[])
}
Add(Replace,13738678,532,217)
{
SubStr="'"
link(onReplace,10712754:doValue,[(580,223)(580,160)])
}
Add(Morphology,12556189,588,294)
{
link(onNumWord,7372922:doStrCat,[(652,314)(652,349)(569,349)(569,384)])
link(StrT,10515923:Var2,[])
link(Mode,4746043:Value,[(622,282)(643,282)])
}
Add(Memory,10712754,595,154)
{
link(onData,6678231:doEvent1,[(639,160)(639,237)(513,237)(513,314)])
}
Add(StrCat,7372922,581,378)
{
link(onStrCat,3908912:doAdd,[(618,384)(618,188)])
link(Str1,10515923:Var1,[(587,250)])
}
Add(GetDataEx,10515923,588,245)
{
link(Data,10712754:Value,[(594,240)(601,240)])
}
Add(Hub,6678231,525,308)
{
OutCount=3
link(onEvent1,12556189:doSetText,[(563,314)(563,307)])
link(onEvent2,12556189:doNumOffer,[])
link(onEvent3,12556189:doNumWord,[])
}
Add(Memory,4746043,637,238)
{
Default=Integer(2)
}
Add(StrCase,6348243,301,203)
{
link(onModify,2806354:doEvent1,[])
}
--- Добавлено в 2019-08-27 13:52:36
Сделал перебор. Осталось сделать работу по шаблонам
как здесь
|25 21 19 1 46 35|26 24 21 19 1 35|4|25 21 19 3 35|и|25 21 19 3 35|,|что|25 22 19 1 35|40 37 35 31 19 2 22 21 23 41|на|28 22 20 1 35|.
Схема
Add(Hub,15729404,651,189)
{
link(onEvent1,3362960:doClear,[])
link(onEvent2,14580701:doClear,[(913,202)(913,286)])
}
Add(MainForm,6641460,56,133)
{
Width=420
link(onCreate,5663974:doEvent1,[])
}
Add(HashTableString,3717231,392,217)
{
Char="#"
FileName="All_Forms.txt"
link(onString,12001889:doWork2,[(433,230)(433,216)])
}
Add(Edit,15729039,224,196)
{
Left=10
Top=15
Width=365
Text="скакать"
link(onEnter,6348243:doModify,[])
}
Add(KeyboardLayout,4453736,329,112)
{
}
Add(Hub,5663974,168,147)
{
OutCount=5
link(onEvent1,4453736:doRussianKbd,[(228,153)(228,125)])
link(onEvent2,12556189:doSetLanguage,[(385,160)(385,300)])
link(onEvent3,3717231:doLoad,[(284,167)(284,251)])
link(onEvent4,11776740:doLoad,[(332,174)(332,405)])
link(onEvent5,16665857:In,[])
}
Add(Hub,2806354,357,203)
{
OutCount=3
link(onEvent1,15729404:doEvent1,[(511,209)(511,195)])
link(onEvent2,14537348:In,[(381,216)(381,188)])
link(onEvent3,3717231:doKey,[])
}
Add(StrPart,8580401,476,210)
{
Char=","
link(onSplit,12001889:doWork1,[(520,216)(520,207)(452,207)])
link(onPart,13738678:doReplace,[])
}
Add(HubEx,12001889,448,210)
{
link(onEvent,8580401:doSplit,[])
}
Add(Replace,13738678,532,217)
{
SubStr="'"
link(onReplace,10712754:doValue,[(580,223)(580,160)])
}
Add(Morphology,12556189,588,294)
{
link(onNumWord,5815481:doEvent1,[])
link(StrT,10515923:Var2,[])
link(Mode,1074976:Var2,[(622,282)(643,282)])
}
Add(Memory,10712754,595,154)
{
link(onData,6678231:doEvent1,[(639,160)(639,237)(513,237)(513,314)])
}
Add(GetDataEx,10515923,588,245)
{
link(Data,10712754:Value,[(594,240)(601,240)])
}
Add(Hub,6678231,525,308)
{
OutCount=3
link(onEvent1,12556189:doSetText,[(563,314)(563,307)])
link(onEvent2,12556189:doNumOffer,[])
link(onEvent3,12556189:doNumWord,[])
}
Add(Memory,4746043,637,238)
{
Default=Integer(2)
}
Add(StrCase,6348243,301,203)
{
link(onModify,2806354:doEvent1,[])
}
Add(StrList,11776740,483,371)
{
FileName="All_Forms.txt"
}
Add(StrList,5258094,707,259)
{
Point(doGetString)
Point(onGetString)
link(onGetString,6830505:doValue,[(755,272)(755,300)])
}
Add(LineBreak,2094053,665,266)
{
link(Out,5258094:doClear,[])
Primary=[14537348,-273,-84]
}
Add(ListBox,3362960,686,182)
{
Left=10
Top=40
Width=190
Height=195
link(onClick,7231859:doEvent1,[(730,195)])
}
Add(Hub,5815481,651,308)
{
link(onEvent1,12231190:doStrCat,[(675,314)])
link(onEvent2,5258094:doAdd,[(686,321)(686,265)])
}
Add(Memory,6830505,770,294)
{
link(onData,12748182:doEnum,[(814,300)(836,321)(836,359)(632,359)(632,398)])
}
Add(ArrayEnum,12748182,644,392)
{
link(onItem,12173983:doSplit,[])
link(Array,11776740:Array,[(650,380)(576,380)(576,428)(503,428)])
}
Add(StrPart,12173983,714,392)
{
Char="#"
link(onSplit,3113500:doWork2,[(752,398)(752,405)])
}
Add(StrPart,13716556,784,399)
{
Char=","
link(onSplit,3113500:doWork1,[(828,405)(828,396)(760,396)])
link(onPart,3527154:doReplace,[])
}
Add(Replace,3527154,840,406)
{
SubStr="'"
link(onReplace,10323115:doValue,[(884,412)(884,293)])
}
Add(Morphology,15575172,1001,350)
{
link(onNumWord,7471720:doCompare,[])
link(StrT,3194297:Var2,[(1007,342)(916,342)])
link(Mode,235684:Var,[(1035,332)(1007,332)])
}
Add(LineBreak,7427493,959,350)
{
link(Out,15575172:doSetLanguage,[])
Primary=[16665857,-763,-175]
}
Add(Hub,5401568,945,364)
{
OutCount=3
link(onEvent1,15575172:doSetText,[(980,370)(980,363)])
link(onEvent2,15575172:doNumOffer,[])
link(onEvent3,15575172:doNumWord,[])
}
Add(HubEx,3113500,756,399)
{
link(onEvent,13716556:doSplit,[])
}
Add(Memory,10323115,896,287)
{
link(onData,5401568:doEvent1,[(936,293)(936,370)])
}
Add(If_else,7471720,1092,364)
{
link(onTrue,407871:doValue,[(1132,384)])
link(Op2,6830505:Value,[(1105,345)(776,345)])
}
Add(ListBox,14580701,1162,273)
{
Left=205
Top=40
Width=190
Height=195
}
Add(GetDataEx,3194297,910,326)
{
Angle=3
link(Data,10323115:Value,[(902,331)])
}
Add(GetDataEx,1074976,637,273)
{
link(Data,4746043:Value,[])
}
Add(LineBreak,9964751,644,294)
{
Type=1
link(Data,1074976:Var3,[(650,278)])
Primary=[235684,357,7]
}
Add(CounterEx,8458376,1141,329)
{
Max=10
Point(onThroughMax)
link(onNext,4178127:doStrCat,[(1185,335)(1185,307)(1150,307)])
link(onThroughMax,12748182:doStop,[(1185,342)(1185,374)(632,374)(632,405)])
}
Add(StrCat,12231190,672,231)
{
link(onStrCat,3362960:doAdd,[(716,237)(716,213)(674,213)(674,188)])
link(Str1,10515923:Var1,[(678,219)(585,219)(585,250)])
}
Add(Memory,407871,1148,378)
{
link(onData,8458376:doNext,[(1132,335)])
}
Add(StrCat,4178127,1120,287)
{
link(onStrCat,14580701:doAdd,[(1150,279)])
link(Str1,3194297:Var3,[(1126,275)(1022,275)(1022,331)])
link(Str2,407871:Value,[(1133,275)(1143,275)(1143,422)(1154,422)])
}
Add(Hub,7231859,728,203)
{
link(onEvent2,5258094:doGetString,[(754,216)(754,262)(695,262)(695,307)])
}