Вверх ↑
Этот топик читают: Гость
Ответов: 2059
Рейтинг: 131
#46: 2013-11-09 11:25:41 ЛС | профиль | цитата
Да, виноват!
Чегото совсем запутался с файлами.
Я правлю в самом Hiasm, а потом переписываю в папку с компонентом.
Чего то не сработало.
http://forum.hiasm.com/forum_serv.php?q=56&id=3630

элемент comutator не найден (это то что под счетчиком), так и еще какая то точка

Я поставил IndexToChanel. В правой вкладке, где вкладка "точки" поставь галочку на index.
Пример в архиве.
карма: 6

0
Ответов: 257
Рейтинг: -2
#47: 2013-11-09 13:07:30 ЛС | профиль | цитата
Наконец то оно заработало) Спасибо. А вот этот трассировщик который там появился, случаем с помощью него нельзя эту запутанную схему "облегчить"?
------------ Дoбавленo в 13.07:
и заодно вопрос - как добавить слова в словарь? Я так понимаю если он там не находит слова - он его вообще не выводит. Вот например "порван передний левый внешний пыльник шруса" , шрус - он не знает.
карма: 0

0
Ответов: 2059
Рейтинг: 131
#48: 2013-11-09 14:24:44 ЛС | профиль | цитата
Наконец то оно заработало)

Слава богу!

А вот этот трассировщик который там появился

Я его пока ещё не доделал.
Надо подумать, как его поизящней сделать.

как добавить слова в словарь?

Просто добавляются слова только для перевода, пример в er.sml.
А в нашем случае этого не достаточно.
Для этого нужна программка, по моемому MorphWizard называется.
Пакет содержит программу редактирования исходников морф. словарей, а также программу генерации бинарного варианта словарей.
Рааньше на aot.ru была, потом кудато этот пост перенесли.
Можно поискать. Но там всё далеко не просто.
В принципе компонент "понимает" такие предложения:
Хливкие шорьки пырялись по наве, и хрюкотали зелюки, как мюмзики в мове.
Компонент поймёт где какая часть речи,но простую форму не выдаст.
Надо подумать, может без словаря можно сдесать.
------------ Дoбавленo в 14.24:
Я ошибся всё ибез словаря работает.
И из моего примера вполне нормальные простые формы получаются.
Так что, - прошу пордону. И словари не надо мучать.
В твоём примере слову шурс ничего не принадлежит.
Оно само принадлежит слову пыльник.
Чтобы оно тоже выводилось надо делать как, я говорил раньше.
Ну и эту можно дополнить.
Паралельно прилагательным, надо искать и существительные в винительном и родительном падежах.
Как-то так:

Make(delphi)
ver(4.04 build 185)
Add(MainForm,1650821,56,161)
{
Width=529
Height=404
link(onCreate,945197:doSetLanguage,[(293,181)(293,216)])
}
Add(ListBox,5543210,63,217)
{
Left=5
Top=10
Width=505
Height=160
Strings=#32:стучит в правом переднем рычаге.|77:Тем более поразительной среди всего этого хаоса казалась тонкая прямая линия.|52:замена правого переднего рычага и левой задней ноги.|43:порван передний левый внешний пыльник шруса|61:Из темноты раздавались странные крики, шорохи и встряхивание.|72:Хливкие шорьки пырялись по наве, и хрюкотали зелюки, как мюмзики в мове.|
DataType=1
link(onClick,7948982:doEvent1,[])
}
Add(ListBox,8311011,800,424)
{
Left=245
Top=180
Width=265
Height=185
}
Add(Hub,7948982,112,224)
{
OutCount=4
link(onEvent1,8311011:doClear,[(438,230)(438,437)])
link(onEvent2,945197:doSetText,[(217,237)(217,223)])
link(onEvent3,945197:doNumOffer,[(217,244)(217,237)])
link(onEvent4,8871095:doFor,[(217,251)(217,440)])
}
Add(Morphology,945197,308,210)
{
link(onNumWord,12220201:doValue,[(520,230)(520,356)])
link(onNumWordConnect,9178194:doCompare,[(386,244)(386,447)])
link(NumOffer,10125215:Value,[(321,174)(293,174)])
link(Mode,14131824:Value,[])
}
Add(For,8871095,308,434)
{
link(onEvent,12198169:doCompare,[(373,440)(373,265)])
link(End,945197:Count_Words,[])
}
Add(ComparisonAttributes,12198169,462,259)
{
Mode=2
Mask="1"
link(onTrue,3339762:doEvent1,[])
}
Add(For,14952044,525,392)
{
link(onEvent,945197:doIConnect,[(569,398)(569,335)(296,335)(296,272)])
link(onStop,14114462:doReset,[(615,405)(615,342)])
link(End,945197:Count_Connect,[(538,306)(342,306)])
}
Add(ComparisonAttributes,9178194,406,441)
{
Mode=2
Mask="3"
link(onFalse,8065439:doCompare,[(446,447)(446,461)])
link(onTrue,9845869:doWork2,[])
}
Add(PointHint,11649182,140,147)
{
Info=#17:Загружает словарь|
Frame=1
Width=120
}
Add(PointHint,286333,140,189)
{
Info=#14:Входная строка|
Frame=1
Width=120
}
Add(PointHint,2591212,140,273)
{
Info=#18:Обязательно нужно!|16:Заполняет массив|15:адресами слов в|18:данном предложении|
Frame=1
VAlign=0
Width=127
Height=60
}
Add(PointHint,7872888,63,448)
{
Info=#37:Запускаем перебор слов в предложении.|
Frame=1
Width=225
}
Add(PointHint,8019754,427,168)
{
Info=#34:Сравниваем все слова в предложении|45:с маской (морф-атрибут) и находим его индекс.|
Frame=1
VAlign=0
Width=211
Height=39
}
Add(PointHint,7064423,126,343)
{
Info=#21:В точку doGetConnect |19:подаём индекс слова|18:для которого будем|13:искать связи.|
Frame=1
VAlign=0
Width=127
Height=60
}
Add(PointHint,8019867,245,511)
{
Info=#44:Сравниваем все связи с маской (морф-атрибут)|21:и получаем их индекс.|40:По этому индексу выводим слова в таблицу|34:через точки doNumWord и onNumWord.|
Frame=1
VAlign=0
HAlign=0
Width=253
Height=81
}
Add(PointHint,9197259,532,497)
{
Info=#25:Перебор всех связей слова|23:через точку doIConnect.|
Frame=1
VAlign=0
HAlign=0
Width=148
}
Add(Memory,14131824,336,140)
{
Default=Integer(1)
}
Add(Hub,3339762,518,266)
{
OutCount=3
link(onEvent1,12787019:doEvent1,[(567,272)(567,318)(415,318)(415,363)])
link(onEvent2,945197:doGetConnect,[(584,279)(584,328)(291,328)(291,265)])
link(onEvent3,14952044:doFor,[(544,286)(544,342)(513,342)(513,398)])
}
Add(Memory,12220201,728,350)
{
}
Add(DoData,13794249,728,420)
{
link(onEventData,8101017:doWork2,[(769,426)(769,430)])
link(Data,8241610:Var2,[])
}
Add(Memory,10125215,287,126)
{
Default=Integer(0)
}
Add(Hub,16547076,539,448)
{
OutCount=3
link(onEvent1,3796868:doEvent1,[(574,454)(574,377)])
link(onEvent2,12787019:doEvent2,[(598,461)(598,415)(415,415)(415,370)])
link(onEvent3,5516962:doData,[])
}
Add(Hub,12787019,427,357)
{
InCount=2
OutCount=1
link(onEvent1,945197:doNumWord,[(453,363)(453,297)(286,297)(286,244)])
}
Add(DoData,5516962,686,462)
{
link(onEventData,8101017:doWork3,[(781,468)])
link(Data,8241610:Var1,[(692,397)])
}
Add(GetDataEx,8241610,728,392)
{
link(Data,12220201:Value,[])
}
Add(HubEx,8101017,777,424)
{
link(onEvent,8311011:doAdd,[])
}
Add(Hub,3796868,630,371)
{
link(onEvent1,14114462:doNext,[(653,377)(653,328)])
link(onEvent2,13452458:doEvent,[])
}
Add(Counter,14114462,672,322)
{
}
Add(IndexToChanel,13452458,672,378)
{
Point(Index)
link(onEvent2,13794249:doData,[(716,391)(716,426)])
link(Index,14114462:Count,[])
}
Add(ComparisonAttributes,8065439,469,455)
{
Mode=2
Mask="1 26"
link(onTrue,9845869:doWork3,[(522,468)])
}
Add(HubEx,9845869,518,448)
{
link(onEvent,16547076:doEvent1,[])
}
карма: 6

0
Ответов: 2059
Рейтинг: 131
#49: 2013-11-13 20:52:01 ЛС | профиль | цитата
Добавлено два компонента:
Tracerouter - Отслеживает ближайшие связи слова заданного его индексом.
MorphOn - Компонент вычисляет морфологические атрибуты слова и выдаёт их в поток.
Пришлось скорректировать основной компонент Morphology, так что его надо обновить.
Обновил архивы: Morphology.rar http://yadi.sk/d/SbjAz1ySCdjEb и Morphology1.rar
http://forum.hiasm.com/forum_serv.php?q=56&id=3634, в последнем нет словарей и dll.
Всего компонентов четыре.
Кроме основного - Morphology, все компоненты "не тяжелые", т.е. можно применять как хабы.
Примеры:

Make(delphi)
ver(4.04 build 185)
Add(MainForm,2953706,84,182)
{
Width=783
Height=299
link(onCreate,9116510:doEvent1,[])
}
Add(Morphology,2493666,343,287)
{
link(Str,8963013:Text,[(349,256)(346,256)])
}
Add(Tracerouter,4731542,364,490)
{
Point(Mode)
link(onNumWordConnect,9873066:doNumWord,[])
}
Add(Memo,8963013,340,180)
{
Left=10
Top=10
Width=385
Height=170
Strings=#398:Ему снился белый космос с темными пятнами звезд и черный катафалк, нарезающий круги вокруг Юпитера. Красный глаз Большого Пятна следил за этими маневрами пристально и недобро. При этом глаз пел песенку на мотив какого-то детского мультфильма: «Я ураган и ты ураган. Оба мы с тобою ураганы». Из задней дверцы катафалка высовывался цилиндрический гроб, похожий на вторую ступень ракетного ускорителя.|
ScrollBars=2
}
Add(Hub,6413747,168,280)
{
OutCount=3
link(onEvent1,2493666:doSetText,[(262,286)(262,300)])
link(onEvent2,2493666:doNumOffer,[(262,293)(262,314)])
link(onEvent3,8460297:doData,[(301,300)(301,384)])
}
Add(Memo,7832675,673,479)
{
Left=595
Top=10
Width=165
Height=200
}
Add(DoData,8460297,420,378)
{
link(onEventData,1022768:doMax,[(461,384)(461,418)(415,418)(415,447)])
link(Data,2493666:Count_Words,[(426,362)(356,362)])
}
Add(TrackBar,1022768,427,427)
{
Left=10
Top=185
Width=385
Point(doMax)
link(onPosition,1788306:doEvent1,[])
}
Add(Memo,4657202,676,390)
{
Left=415
Top=10
Width=165
Height=200
}
Add(Hub,1788306,483,427)
{
OutCount=4
link(onEvent1,4657202:doClear,[(597,433)(597,403)])
link(onEvent2,8090845:doNumWord,[(570,440)(570,349)])
link(onEvent3,7832675:doClear,[(585,447)(585,492)])
link(onEvent4,4731542:doTracertShort,[(509,454)(509,475)(352,475)(352,496)])
}
Add(Button,13124768,84,266)
{
Left=30
Top=225
link(onClick,6717929:doWork2,[])
}
Add(Hub,9116510,154,196)
{
link(onEvent1,2493666:doSetLanguage,[(284,202)(284,293)])
link(onEvent2,6717929:doWork1,[(180,209)(180,247)(156,247)])
}
Add(HubEx,6717929,152,266)
{
Angle=1
link(onEvent,6413747:doEvent1,[(156,286)])
}
Add(MorphOn,8090845,581,343)
{
Point(Mode)
link(onAttribWord,4657202:doAdd,[(645,349)(645,396)])
}
Add(MorphOn,9873066,504,490)
{
Point(Mode)
link(onAttribWord,7832675:doAdd,[(604,496)(604,485)])
}


Make(delphi)
ver(4.04 build 185)
Add(MainForm,1650821,84,154)
{
Width=529
Height=404
link(onCreate,945197:doSetLanguage,[(258,174)(258,202)])
}
Add(ListBox,5543210,84,210)
{
Left=5
Top=10
Width=505
Height=160
Strings=#32:стучит в правом переднем рычаге.|77:Тем более поразительной среди всего этого хаоса казалась тонкая прямая линия.|52:замена правого переднего рычага и левой задней ноги.|43:порван передний левый внешний пыльник шруса|61:Из темноты раздавались странные крики, шорохи и встряхивание.|72:Хливкие шорьки пырялись по наве, и хрюкотали зелюки, как мюмзики в мове.|
DataType=1
link(onClick,7948982:doEvent1,[])
}
Add(ListBox,8311011,723,417)
{
Left=245
Top=180
Width=265
Height=185
}
Add(Hub,7948982,140,217)
{
OutCount=4
link(onEvent1,8311011:doClear,[(198,223)(198,181)(473,181)(473,430)])
link(onEvent2,945197:doSetText,[(229,230)(229,209)])
link(onEvent3,945197:doNumOffer,[(245,237)(245,223)])
link(onEvent4,8871095:doFor,[(245,244)(245,342)])
}
Add(Morphology,945197,266,196)
{
link(NumOffer,10125215:Value,[])
}
Add(For,8871095,266,336)
{
link(onEvent,12198169:doCompare,[(324,342)(324,244)])
link(End,945197:Count_Words,[])
}
Add(Memory,10125215,273,140)
{
Default=Integer(0)
}
Add(ComparisonAttributes,12198169,364,238)
{
Mode=2
Mask="1"
link(onTrue,51809:doEvent1,[])
}
Add(Hub,51809,413,245)
{
OutCount=3
link(onEvent1,15503811:doValue,[(481,251)(481,216)])
link(onEvent2,14334352:doTracertShort,[(439,258)(439,284)(334,284)(334,307)])
link(onEvent3,14114462:doReset,[(501,265)(501,251)])
}
Add(ComparisonAttributes,8161119,406,301)
{
Mode=2
Mask="3"
link(onTrue,13918117:doEvent1,[])
}
Add(Tracerouter,14334352,343,301)
{
Mode=2
link(onNumWordConnect,8161119:doCompare,[])
}
Add(MorphOn,2271327,511,392)
{
Mode=1
Point(Mode)
link(onAttribWord,6451184:doWork2,[])
}
Add(Hub,13918117,483,308)
{
link(onEvent1,14114462:doNext,[(512,314)(512,237)])
link(onEvent2,13452458:doEvent,[(518,321)(518,300)])
}
Add(DoData,11896272,574,322)
{
link(onEventData,3102348:doEvent1,[])
link(Data,15503811:Value,[])
}
Add(Memory,15503811,574,210)
{
}
Add(Counter,14114462,525,231)
{
}
Add(IndexToChanel,13452458,525,294)
{
Point(Index)
link(onEvent2,11896272:doData,[(565,307)(565,328)])
link(Index,14114462:Count,[])
}
Add(Hub,3102348,616,322)
{
link(onEvent1,11363038:doNumWord,[])
link(onEvent2,12266660:doTracertShort,[(642,335)(642,367)(366,367)(366,398)])
}
Add(MorphOn,11363038,672,322)
{
Mode=1
Point(Mode)
link(onAttribWord,6451184:doWork1,[(714,328)])
}
Add(HubEx,6451184,710,392)
{
Angle=1
link(onEvent,8311011:doAdd,[(714,423)])
}
Add(Tracerouter,12266660,378,392)
{
Mode=2
link(onNumWordConnect,2154521:doCompare,[])
}
Add(ComparisonAttributes,2154521,427,392)
{
Mode=2
Mask="11"
link(onFalse,2271327:doNumWord,[])
}
карма: 6

0
Ответов: 704
Рейтинг: 7
#50: 2014-06-10 15:19:56 ЛС | профиль | цитата
Совсем пропал файл словарей. Перезалейте.
карма: 0

0
Ответов: 704
Рейтинг: 7
#51: 2014-06-23 22:23:31 ЛС | профиль | цитата
Словарей не осталось у кого?
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#52: 2014-06-27 13:52:48 правка | ЛС | профиль | цитата


Редактировалось 5 раз(а), последний 2021-06-22 14:18:38
карма: 0

0
Ответов: 704
Рейтинг: 7
#53: 2014-06-27 22:06:30 ЛС | профиль | цитата
г. И.С., dll со словарями, как я понял. Ну и в том же месте, где словари, и она сейчас ))
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#54: 2014-06-29 09:55:53 правка | ЛС | профиль | цитата


Редактировалось 5 раз(а), последний 2021-06-22 14:18:38
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#55: 2014-06-29 12:40:01 правка | ЛС | профиль | цитата


Редактировалось 5 раз(а), последний 2021-06-22 14:18:38
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#56: 2014-07-01 03:13:04 правка | ЛС | профиль | цитата


Редактировалось 5 раз(а), последний 2021-06-22 14:18:29
карма: 0

0
Ответов: 2059
Рейтинг: 131
#57: 2016-03-25 00:23:58 ЛС | профиль | цитата
Обновление от 25.03.2016 https://yadi.sk/d/0hEnpxy-qTL5L
карма: 6

1
Голосовали:Nickname
Ответов: 92
Рейтинг: 0
#58: 2017-11-11 10:45:10 ЛС | профиль | цитата
flint2 писал(а):
Обновление от 25.03.2016 https://yadi.sk/d/0hEnpxy-qTL5L

Не могли бы вы перезалить?
карма: 0

0
Ответов: 2059
Рейтинг: 131
#59: 2017-11-11 12:12:19 ЛС | профиль | цитата
Однако, шмон начался.
https://yadi.sk/d/O_cIajv63Pbhc6
Однако, длинная будет.
карма: 6

0
59
Сообщение
...
Прикрепленные файлы
(файлы не залиты)