Вверх ↑
Этот топик читают: Гость
Ответов: 899
Рейтинг: 43
#31: 2010-01-27 15:16:58 ЛС | профиль | цитата
Ivann писал(а):
не там после = надо всё удалять

HiAsm в руки и вперед - StrList >> ArrayEnum >> StrPart(char >> StrList

карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 16884
Рейтинг: 1239
#32: 2010-01-27 15:25:46 ЛС | профиль | цитата
Ivann писал(а):
Tad, что значит пустое сообщение
нет слов
Ivann писал(а):
не там после = надо всё удалять
проблема?
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 3349
Рейтинг: 233
#33: 2010-01-27 15:29:11 ЛС | профиль | цитата
unalex, да знаю я
Tad, нет проблем
карма: 1

0
Гость
Ответов: 17029
Рейтинг: 0
#34: 2010-01-27 16:54:47 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 16:40:09
карма: 0

0
Ответов: 4641
Рейтинг: 334
#35: 2010-01-27 17:22:17 ЛС | профиль | цитата
Ivann, ну не торопись ты с выпуском новых версий программ... тем более в exe.
тут экзешники не кому не нужны.
А вот лучше прочти внимательно вот это
Рекомендации построения схем HiAsm
Стандарт построения схем HiAsm

т.к твои схемы из 10 элементов не помещаются в мой монитор. 800*600
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 3349
Рейтинг: 233
#36: 2010-01-27 18:19:40 ЛС | профиль | цитата
ладно, exe архивировать не буду
------------ Дoбавленo в 18.24:
Ravilr, я скоро выпущю новую версию, у неё будет окуратная схема, обещаю.
карма: 1

0
Разработчик
Ответов: 26153
Рейтинг: 2127
#37: 2010-01-27 19:09:56 ЛС | профиль | цитата
Ivann писал(а):
у неё будет окуратная схема, обещаю

Гы. Поверим на слово
карма: 22

0
Ответов: 1161
Рейтинг: 160
#38: 2010-01-27 19:10:42 ЛС | профиль | цитата
Ivann писал(а):
окуратная

Аккуратная, а то что-то на окурок смахивает...
карма: 0

0
Ответов: 3349
Рейтинг: 233
#39: 2010-01-27 20:30:41 ЛС | профиль | цитата
Новая версия:
1) Уменьшеная схема (по прозьбе Ravilr )
2) Два справочника Полный и Упрощёный, т.к. полным начинает тормазить
http://ivan.moy.su/Antimat32.rar
Скриншот

[img]http://ivan.moy.su/Screenshort.jpg[/img]
карма: 1

0
Ответов: 4641
Рейтинг: 334
#40: 2010-01-27 20:37:18 ЛС | профиль | цитата
Ivann писал(а):
Скриншот

у меня хиасм какой то не такой

------------ Дoбавленo в 20.39:
Ivann, посиди ка денек над схемой и подумай что да как и посмотри как другие делают, а потом выкладывай свою бетту версии 000000000001b
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
файлы: 1uhh.png [17.6KB] [327]
Ответов: 899
Рейтинг: 43
#41: 2010-01-27 22:27:03 ЛС | профиль | цитата
Ivann,
1 - не нужно использовать LineBreak без острой на то необходимости

2 - про криво проложенные связи уже сказал Ravilr
старайся чтобы связи были короче, не накладывались друг на друга, где возможно используй продвинутые хабы, если данные передаются в потоке, не нужно их дублировать на верхние точки, и т.д.

3а - переработай словарь, там много лишнего
пример в словаре есть
а ну тебя в **зду
а ну тебя к **аной матери
а ну тебя на *уй
если в списке уже есть слова **зду, **аной, *уй все будет работать нормально

3б - задумайся над словообразованием
именительный - **зда
родительный - **зды
дательный - **зде
винительный - **зду
творительный - **здой
падежный - о **зде
вданном случае чтобы база слов не росла, достаточно использовать корень слова, игнорируя приставки, суффиксы и окончания

3с - учитывай разные словоформы
слово **зда, например, может быть записана как 3,14зда, песда, пилотка, пелотка, пелодка....


вобщем работы еще ооооочень много


------------ Дoбавленo в 23.57:
Add(IndexToChanel,7715874,336,301)
{
link(onEvent1,6425935:doWork2,[])
}
Add(ChildForm,6749316,434,294)
{
}
BEGIN_SDK
Add(EditMulti,14578348,21,21)
{
WorkCount=1
Width=412
link(doWork1,6370274:doVisible,[(49,27)(49,139)])
}
Add(MainForm,6370274,70,105)
{
Left=35
Top=105
Width=348
Height=230
Visible=1
BorderStyle=3
Point(doVisible)
link(onCreate,2599745:doLoad,[])
}
Add(ListBox,2599745,287,91)
{
Left=10
Top=10
Width=160
Height=175
Sort=0
Point(Index)
link(Str,1800767:Text,[(293,68)(195,68)])
link(FileName,8401402:Value,[])
}
Add(Button,11422800,224,154)
{
Left=180
Top=15
Width=150
Caption="Удалить выделенное"
link(onClick,8049669:doData,[])
}
Add(Edit,1800767,189,28)
{
Left=180
Top=65
Width=150
Text=""
}
Add(Button,13507359,226,91)
{
Left=180
Top=90
Width=150
Caption="Добавить в базу"
link(onClick,2599745:doAdd,[])
}
Add(Memory,8401402,294,28)
{
Default=String(censored.lst)
}
Add(DoData,8049669,308,154)
{
link(onEventData,2599745:doDelete,[(359,160)(359,81)(275,81)(275,111)])
link(Data,2599745:Index,[])
}
Add(Button,13777628,119,133)
{
Left=180
Top=165
Width=150
Caption="Сохранить изменения"
link(onClick,8340616:doEvent1,[])
}
Add(Hub,8340616,175,133)
{
link(onEvent1,2599745:doSave,[(238,139)(238,132)])
link(onEvent2,6370274:doClose,[(199,146)(199,176)(58,176)(58,132)])
}
END_SDK
Add(ChanelToIndex,6425935,385,294)
{
link(onIndex,6749316:doWork1,[])
}
Add(MenuEx,6402039,287,301)
{
Menu=#18:Редактировать базу|
Bitmaps=[]
link(MenuItemIdx,7715874:doEvent,[])
}
Add(Memo,48585,224,210)
{
Top=105
Width=392
Height=161
Align=5
Point(onMouseDown)
Point(Position)
Point(onKeyDown)
Point(doSetSelStart)
Point(SelText)
link(onMouseDown,14427489:doEvent,[])
link(onKeyDown,8336593:doCompare,[(279,230)(279,454)])
}
Add(MainForm,11978161,441,371)
{
link(onCreate,11132116:doFileExists,[])
}
Add(PopupMenuEx,16634778,336,231)
{
Menu=#3:Мат|
Bitmaps=[]
PictureLeft=[ZIP3604000078DA73F235636100033320D600620128666450804840E591C1FFFFFFF16262D4E0D34BAC3DB8F4EFDFBF9F68FD0C1F90D8AF50ED6778895D1D363318EE01F129A8FE0F50FA2454FC030137DC05E2FD40BC004D3F887F0062064EBD403782ED41D22BFFE22B83FE93F708334EFD47F10B8AFE8740BC0B556FFCF5FB0C8DE72E33C4DFB80F11DF055187E1E70F50B76F41E83700DADB74FE0A380E4034186C4184037A58A0DB2F07B51FA4370166FF4E4CFB51E2EC14AAFFE55E7E6530784C9CFFB1863F0C2C848ADF239C86C0669C84FA650B943E4538FE31D2DF43A89E07103E31E90F9F9964E52102FA01E5934A83]
link(MenuItemIdx,10042479:doLength,[])
}
Add(If_else,8336593,287,448)
{
Op2=Integer(32)
link(onTrue,16012110:doEvent1,[])
link(onFalse,15654102:doNext,[(329,461)(329,489)])
}
Add(Copy,3214584,378,448)
{
link(onCopy,13125225:doValue,[])
link(Str,2284626:Var2,[])
link(Position,923570:Result,[])
link(Count,15654102:Count,[(398,436)(428,436)(428,525)(384,525)])
}
Add(Counter,15654102,378,483)
{
}
Add(Hub,16012110,336,448)
{
OutCount=3
link(onEvent1,3214584:doCopy,[])
link(onEvent2,923570:doOperation,[(366,461)(366,377)])
link(onEvent3,15654102:doReset,[(364,468)(364,503)])
}
Add(Math,923570,385,371)
{
Op2=2
link(Op1,48585:Position,[(391,359)(251,359)])
}
Add(Replace,189249,847,448)
{
DestStr="<censored>"
link(onReplace,4032654:doEvent1,[(886,454)(886,530)(163,530)(163,440)])
link(Str,2284626:Var3,[(853,418)])
link(Sub_str,2385482:Var3,[(860,425)])
}
Add(StrList,16700579,672,343)
{
Strings=#5:бляд*|5:пизд*|3:хуй|
Point(doSort)
link(Str,370868:Var3,[(678,201)])
link(FileName,2398251:Var3,[(685,327)])
}
Add(ArrayEnum,22166,686,448)
{
link(onItem,14101644:doEvent1,[])
link(Array,16700579:Array,[])
}
Add(Memory,13125225,546,448)
{
link(onData,22166:doEnum,[])
}
Add(GetDataEx,2284626,378,413)
{
Angle=3
link(Data,6301504:Var3,[])
}
Add(Hub,4032654,175,434)
{
link(onEvent1,48585:doText,[(203,440)(203,237)])
link(onEvent2,1948176:doLength,[])
}
Add(Length,1948176,224,441)
{
link(onLength,48585:doSetSelStart,[(268,447)(268,366)(212,366)(212,258)])
link(Str,6301504:Var2,[])
}
Add(GetDataEx,6301504,224,413)
{
link(Data,48585:Text,[])
}
Add(IndexToChanel,14427489,287,217)
{
link(onEvent1,8531336:doWork1,[(641,223)])
link(onEvent2,16634778:doPopupHere,[(327,230)(327,237)])
}
Add(DoData,6437131,469,231)
{
link(onEventData,1545770:doString,[])
link(Data,370868:Var2,[])
}
Add(Length,10042479,378,231)
{
link(onLength,5620424:doCompare,[])
link(Str,16465273:Var2,[])
}
Add(If_else,5620424,420,231)
{
Type=5
link(onTrue,6437131:doData,[])
}
Add(GetDataEx,16465273,378,196)
{
Angle=3
link(Data,48585:SelText,[(300,201)(300,280)(258,280)])
}
Add(Message,9353653,553,231)
{
Caption="Обновление базы"
Type=1
Icon=2
Point(onOK)
link(onOK,4568963:doEvent1,[(597,244)(597,349)])
}
Add(GetDataEx,370868,469,196)
{
Angle=3
link(Data,16465273:Var3,[])
}
Add(StrMask,7353300,784,441)
{
Point(doMask)
link(onTrue,189249:doReplace,[])
link(Str,2385482:Var2,[])
}
Add(Hub,14101644,742,448)
{
link(onEvent1,7353300:doMask,[])
link(onEvent2,7353300:doCompare,[(770,461)(770,447)])
}
Add(GetDataEx,2385482,784,420)
{
Angle=3
link(Data,13125225:Value,[(589,425)(589,492)(552,492)])
}
Add(FileTools,11132116,490,364)
{
link(onEnd,12995938:doEvent,[])
link(FileName,2398251:Var2,[])
}
Add(IndexToChanel,12995938,546,364)
{
link(onEvent2,16700579:doLoad,[])
}
Add(Memory,8401402,490,280)
{
Default=String(censored.lst)
}
Add(GetDataEx,2398251,490,322)
{
link(Data,8401402:Value,[])
}
Add(FormatStr,1545770,511,231)
{
DataCount=1
Mask="Добавить в базу слово %1?"
link(onFString,9353653:doMessage,[])
}
Add(Hub,4568963,609,343)
{
OutCount=3
link(onEvent1,16700579:doAdd,[])
link(onEvent2,16700579:doSort,[(633,356)(633,391)])
link(onEvent3,8531336:doWork2,[])
}
Add(HubEx,8531336,637,357)
{
link(onEvent,16700579:doSave,[(647,363)(647,384)])
}


------------ Дoбавленo в 00.02:
вот вторая схема - она такая же, но с глюком

Add(Memo,48585,126,168)
{
Top=105
Width=392
Height=161
Align=5
Point(onMouseDown)
Point(Position)
Point(onKeyDown)
Point(doSetSelStart)
Point(SelText)
link(onMouseDown,14427489:doEvent,[])
link(onKeyDown,8336593:doCompare,[(181,188)(181,412)])
}
Add(MainForm,11978161,343,329)
{
link(onCreate,11132116:doFileExists,[])
}
Add(PopupMenuEx,16634778,238,189)
{
Menu=#3:Мат|
Bitmaps=[]
PictureLeft=[ZIP3604000078DA73F235636100033320D600620128666450804840E591C1FFFFFFF16262D4E0D34BAC3DB8F4EFDFBF9F68FD0C1F90D8AF50ED6778895D1D363318EE01F129A8FE0F50FA2454FC030137DC05E2FD40BC004D3F887F0062064EBD403782ED41D22BFFE22B83FE93F708334EFD47F10B8AFE8740BC0B556FFCF5FB0C8DE72E33C4DFB80F11DF055187E1E70F50B76F41E83700DADB74FE0A380E4034186C4184037A58A0DB2F07B51FA4370166FF4E4CFB51E2EC14AAFFE55E7E6530784C9CFFB1863F0C2C848ADF239C86C0669C84FA650B943E4538FE31D2DF43A89E07103E31E90F9F9964E52102FA01E5934A83]
link(MenuItemIdx,10042479:doLength,[])
}
Add(If_else,8336593,189,406)
{
Op2=Integer(32)
link(onTrue,16012110:doEvent1,[])
link(onFalse,15654102:doNext,[(231,419)(231,447)])
}
Add(Copy,3214584,280,406)
{
link(onCopy,13125225:doValue,[])
link(Str,2284626:Var2,[])
link(Position,923570:Result,[])
link(Count,15654102:Count,[(300,394)(330,394)(330,483)(286,483)])
}
Add(Counter,15654102,280,441)
{
}
Add(Hub,16012110,238,406)
{
OutCount=3
link(onEvent1,3214584:doCopy,[])
link(onEvent2,923570:doOperation,[(268,419)(268,335)])
link(onEvent3,15654102:doReset,[(266,426)(266,461)])
}
Add(Math,923570,287,329)
{
Op2=2
link(Op1,48585:Position,[(293,317)(153,317)])
}
Add(Replace,189249,749,406)
{
DestStr="<censored>"
link(onReplace,4032654:doEvent1,[(788,412)(788,488)(65,488)(65,398)])
link(Str,2284626:Var3,[(755,376)])
link(Sub_str,2385482:Var3,[(762,383)])
}
Add(StrList,16700579,574,301)
{
Strings=#5:бляд*|5:пизд*|3:хуй|
Point(doSort)
link(Str,370868:Var3,[(580,159)])
link(FileName,2398251:Var3,[(587,285)])
}
Add(ArrayEnum,22166,588,406)
{
link(onItem,14101644:doEvent1,[])
link(Array,16700579:Array,[])
}
Add(Memory,13125225,448,406)
{
link(onData,22166:doEnum,[])
}
Add(GetDataEx,2284626,280,371)
{
Angle=3
link(Data,6301504:Var3,[])
}
Add(Hub,4032654,77,392)
{
link(onEvent1,48585:doText,[(105,398)(105,195)])
link(onEvent2,1948176:doLength,[])
}
Add(Length,1948176,126,399)
{
link(onLength,48585:doSetSelStart,[(170,405)(170,324)(114,324)(114,216)])
link(Str,6301504:Var2,[])
}
Add(GetDataEx,6301504,126,371)
{
link(Data,48585:Text,[])
}
Add(IndexToChanel,14427489,189,175)
{
link(onEvent1,8531336:doWork1,[(543,181)])
link(onEvent2,16634778:doPopupHere,[(229,188)(229,195)])
}
Add(DoData,6437131,371,189)
{
link(onEventData,1545770:doString,[])
link(Data,370868:Var2,[])
}
Add(Length,10042479,280,189)
{
link(onLength,5620424:doCompare,[])
link(Str,16465273:Var2,[])
}
Add(If_else,5620424,322,189)
{
Type=5
link(onTrue,6437131:doData,[])
}
Add(GetDataEx,16465273,280,154)
{
Angle=3
link(Data,48585:SelText,[(202,159)(202,238)(160,238)])
}
Add(Message,9353653,455,189)
{
Caption="Обновление базы"
Type=1
Icon=2
Point(onOK)
link(onOK,4568963:doEvent1,[(499,202)(499,307)])
}
Add(GetDataEx,370868,371,154)
{
Angle=3
link(Data,16465273:Var3,[])
}
Add(StrMask,7353300,686,399)
{
Point(doMask)
link(onTrue,189249:doReplace,[])
link(Str,2385482:Var2,[])
}
Add(Hub,14101644,644,406)
{
link(onEvent1,7353300:doMask,[])
link(onEvent2,7353300:doCompare,[(672,419)(672,405)])
}
Add(GetDataEx,2385482,686,378)
{
Angle=3
link(Data,13125225:Value,[(491,383)(491,450)(454,450)])
}
Add(FileTools,11132116,392,322)
{
link(onEnd,12995938:doEvent,[])
link(FileName,2398251:Var2,[])
}
Add(IndexToChanel,12995938,448,322)
{
link(onEvent2,16700579:doLoad,[])
}
Add(Memory,8401402,392,238)
{
Default=String(censored.lst)
}
Add(GetDataEx,2398251,392,280)
{
link(Data,8401402:Value,[])
}
Add(FormatStr,1545770,413,189)
{
DataCount=1
Mask="Добавить в базу слово %1?"
link(onFString,9353653:doMessage,[])
}
Add(IndexToChanel,7715874,329,91)
{
link(onEvent2,6425935:doWork2,[])
}
Add(ChildForm,6749316,441,91)
{
}
BEGIN_SDK
Add(EditMulti,14578348,21,21)
{
WorkCount=1
Width=412
link(doWork1,6370274:doVisible,[(49,27)(49,139)])
}
Add(MainForm,6370274,70,105)
{
Left=35
Top=105
Width=348
Height=230
Visible=1
BorderStyle=3
Point(doVisible)
link(onCreate,2599745:doLoad,[])
}
Add(ListBox,2599745,287,91)
{
Left=10
Top=10
Width=160
Height=175
Sort=0
Point(Index)
link(Str,1800767:Text,[(293,68)(195,68)])
link(FileName,8401402:Value,[])
}
Add(Button,11422800,224,154)
{
Left=180
Top=15
Width=150
Caption="Удалить выделенное"
link(onClick,8049669:doData,[])
}
Add(Edit,1800767,189,28)
{
Left=180
Top=65
Width=150
Text=""
}
Add(Button,13507359,226,91)
{
Left=180
Top=90
Width=150
Caption="Добавить в базу"
link(onClick,2599745:doAdd,[])
}
Add(Memory,8401402,294,28)
{
Default=String(censored.lst)
}
Add(DoData,8049669,308,154)
{
link(onEventData,2599745:doDelete,[(359,160)(359,81)(275,81)(275,111)])
link(Data,2599745:Index,[])
}
Add(Button,13777628,119,133)
{
Left=180
Top=165
Width=150
Caption="Сохранить изменения"
link(onClick,8340616:doEvent1,[])
}
Add(Hub,8340616,175,133)
{
link(onEvent1,2599745:doSave,[(238,139)(238,132)])
link(onEvent2,6370274:doClose,[(199,146)(199,176)(58,176)(58,132)])
}
END_SDK
Add(ChanelToIndex,6425935,378,91)
{
link(onIndex,6749316:doWork1,[])
}
Add(Hub,4568963,511,301)
{
OutCount=3
link(onEvent1,16700579:doAdd,[])
link(onEvent2,16700579:doSort,[(535,314)(535,349)])
link(onEvent3,8531336:doWork2,[])
}
Add(HubEx,8531336,539,315)
{
link(onEvent,16700579:doSave,[(549,321)(549,342)])
}
Add(MenuEx,6402039,280,91)
{
Menu=#18:Редактировать базу|
Bitmaps=['Bitmap'=[]]
link(MenuItemIdx,7715874:doEvent,[])
}

главное меню не отображается, наверное это зависит от того в какой последовательности ставились компоненты
что скажут специалисты по данному вопросу? это баг или фича?

карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 16884
Рейтинг: 1239
#42: 2010-01-28 00:12:51 ЛС | профиль | цитата
Ravilr писал(а):
у меня хиасм какой то не такой
такой. Ну лень человеку думать.
Ivann, вот так смотрится твой мультик если чуть-чуть подумать.

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1ssh.png [8.1KB] [291]
Разработчик
Ответов: 26153
Рейтинг: 2127
#43: 2010-01-28 00:19:01 ЛС | профиль | цитата
Tad писал(а):
вот так смотрится твой мультик если чуть-чуть подумать

Верхние точки можно и не двигать было так далеко, напротив Str-точки смотрелись бы лучше, если еще и поменять некоторые местами.
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#44: 2010-01-28 00:29:27 ЛС | профиль | цитата
Да порядок точек менять было лень. А входные и дата точки поменять не мешало бы.
Оставил на милость автора - может додумается. если не хочет чтобы я не сказал, что исполнение схемы... и т.д.

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26153
Рейтинг: 2127
#45: 2010-01-28 01:11:13 ЛС | профиль | цитата
А я его еще уменьшил бы, вообще цуцмель был бы. А выложи свой мультик, если не жалко, или ты его стер уже
------------ Дoбавленo в 01.15:
unalex писал(а):
главное меню не отображается, наверное это зависит от того в какой последовательности ставились компоненты

Да зависит. Попробуй перместить компонент на задний план. Главное меню всегда должно быть первым
карма: 22

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