HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуCommutator, диапазон каналов? ← Ctrl12Ctrl →
Этот топик читают: Гость
Ответов: 1376
Рейтинг: 198
#16: 2013-03-30 10:46:41 ЛС | профиль | цитата
nesco, [flood]А если компоненту ChannalToIndex прикрутить точку, то немного удобнее было бы, лишний Memory не болтался бы, для каналов >2 [/flood]
карма: 1

0
Ответов: 9906
Рейтинг: 351
#17: 2013-03-30 11:46:42 ЛС | профиль | цитата
Вообще-то я всегда был противником приделывания usb-порта к штопору.
Рукосуйство все это.

"а если приделать... а вот еще добввить..." -- дурдом на каникулах
карма: 9

0
Разработчик
Ответов: 26322
Рейтинг: 2147
#18: 2013-03-30 12:44:09 ЛС | профиль | цитата
Tad писал(а):
Не понял юмора

Упс! 

Add(MainForm,6609510,357,168)
{
}
Add(Edit,10036881,413,210)
{
 Left=35
 Top=30
 Text="-1"
}
Add(Button,9639862,301,266)
{
 Left=30
 Top=70
 Caption=">>"
 link(onClick,14064421:doData,[])
}
Add(Edit,5346580,357,210)
{
 Left=115
 Top=30
 Text="150"
 MaxLenField=1
}
Add(Label,13019774,413,168)
{
 Left=20
 Top=10
 Width=150
 Height=20
 Caption="        Канал               Данные    "
 AutoSize=1
}
Add(MultiElementEx,1844477,406,266)
{
 link(onEvent,3581845:Cable,[])
 link(Index,10036881:Text,[])
}
BEGIN_SDK
  Add(EditMultiEx,4598509,21,21)
  {
   WorkCount=#7:doEvent|0:|
   EventCount=#7:onEvent|0:|
   DataCount=#4:Data|5:Index|
   Width=454
   Height=221
   VOffset=35
   HOffset=21
   link(doEvent,12385825:doValue,[])
  }
  Add(IndexToChanel,5765865,378,182)
  {
   Count=5
   Point(Data)
   Point(EndIdx)
   link(onEvent1,8173869:Wire1,[])
   link(onEvent2,8173869:Wire2,[])
   link(onEvent3,8173869:Wire3,[])
   link(onEvent4,8173869:Wire4,[])
   link(onEvent5,8173869:Wire5,[])
   link(Data,12385825:Value,[(384,173)(48,173)])
  }
  Add(For,15680118,259,182)
  {
   link(onEvent,5765865:doEvent,[])
   link(Start,12848207:Data,[])
   link(End,2432431:Var,[(272,166)(314,166)])
  }
  Add(Replace,15341812,140,56)
  {
   SubStr=" "
   link(onReplace,5646015:doSplit,[])
   link(Str,4598509:Index,[(146,40)(55,40)])
  }
  Add(GetIndexData,2432431,308,119)
  {
   Count=3
   link(onIndex,15680118:doFor,[(347,125)(347,223)(249,223)(249,188)])
   link(Data1,6721285:Value,[])
   link(Data2,5646015:Part1,[(321,110)(202,110)])
   link(Data3,5765865:EndIdx,[(328,110)(356,110)(356,229)(384,229)])
  }
  Add(ChanelToIndex,12848207,259,119)
  {
   Count=3
   Point(Data)
   link(onIndex,2432431:doIndex,[])
  }
  Add(MultiStrPart,5646015,196,56)
  {
   Char="-"
   Count=1
   Direct=1
   Point(onNotFound)
   link(onSplit,16368857:doCase,[(235,62)(235,48)(186,48)(186,132)])
   link(onNotFound,6721285:doValue,[])
  }
  Add(Memory,12385825,42,56)
  {
   Point(Data)
   link(onData,1989454:doData,[])
   link(Data,4598509:Data,[])
  }
  Add(CableWork,8173869,434,182)
  {
   Count=5
   link(Cable,4598509:onEvent,[(459,188)(459,62)])
  }
  Add(DoData,1989454,91,56)
  {
   link(onEventData,15341812:doReplace,[])
  }
  Add(Memory,6721285,308,63)
  {
   link(onData,12848207:doWork1,[(347,69)(347,55)(249,55)(249,125)])
  }
  Add(Case,16368857,196,126)
  {
   Value=String()
   DataOnTrue=Integer(0)
   link(onNextCase,12848207:doWork2,[])
   link(onTrue,12848207:doWork3,[])
  }
  Add(Icon,12064728,42,182)
  {
   @Hint=#5:#main|
   Icon=[ZIP5E07000078DA636060044209090610C9E0C1CEC020C6C0C0A001C4402106030688380828B0330C4AB064C10220A2DC1086FF0C40448951704328348A5AE650CB5F540CE7419812D07491176268BAC88B414C5DD432875AFEA262380F1B305AFE0CDDF2E73F187C06E28740CC00C50FA16210701EC86E078A31C803BDC1CFF0BFFDF9C3FFE73F03E57F0225FFE0D70F008891DF50]
  }
END_SDK
Add(Edit,7446813,518,266)
{
 Left=115
 Top=70
 Text=""
}
Add(Edit,906816,518,301)
{
 Left=115
 Top=95
 Text=""
}
Add(Edit,158500,518,336)
{
 Left=115
 Top=120
 Text=""
}
Add(Edit,11918236,518,371)
{
 Left=115
 Top=145
 Text=""
}
Add(Edit,1558021,518,406)
{
 Left=115
 Top=170
 Text=""
}
Add(CableEvent,3581845,455,266)
{
 Count=5
 link(Wire1,7446813:doText,[])
 link(Wire2,906816:doText,[(508,279)(508,307)])
 link(Wire3,158500:doText,[(501,286)(501,342)])
 link(Wire4,11918236:doText,[(494,293)(494,377)])
 link(Wire5,1558021:doText,[(487,300)(487,412)])
}
Add(DoData,14064421,357,266)
{
 link(onEventData,1844477:doEvent,[])
 link(Data,5346580:Text,[])
}


Немного усовершенствовал и добавил иконку
карма: 22

0
Ответов: 8975
Рейтинг: 824
#19: 2013-03-30 12:56:50 ЛС | профиль | цитата
Galkov, "Хороший рационализатор -- мёртвый рационализатор!"
"Встретишь рационализатора -- убей его!"
карма: 19

0
Ответов: 16884
Рейтинг: 1239
#20: 2013-03-30 15:42:44 ЛС | профиль | цитата
nesco писал(а):
Немного усовершенствовал и добавил иконку
Иконка - это хорошо. А вот, что там делает DoData не могу понять.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26322
Рейтинг: 2147
#21: 2013-03-30 15:51:43 ЛС | профиль | цитата
Tad писал(а):
А вот, что там делает DoData не могу понять.

Если его убрать, то входные данные попадут в Replace, в качестве замены. Я сам попался на этот прикол, в DestStr стоит пустая строка, что означает брать данные из потока. Replace и DoData, кончно же, можно выкинуть, но тогда нельзя будет ставит пробелы в диапазоне
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#22: 2013-03-30 17:27:27 ЛС | профиль | цитата
nesco писал(а):
Если его убрать
Убрал и... нормально работает.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26322
Рейтинг: 2147
#23: 2013-03-30 17:37:57 ЛС | профиль | цитата
Tad писал(а):
Убрал и... нормально работает

Этого не может быть при установленном диапазоне с пробелами перед и после разделителя. Посмотри, что показывает debug. Там ясно видно, что пробел заменился на 150. В остальных режимах это не критично.

Add(MainForm,6609510,357,168)
{
}
Add(Edit,10036881,413,210)
{
 Left=35
 Top=30
 Text="2 - 3"
}
Add(Button,9639862,301,266)
{
 Left=30
 Top=70
 Caption=">>"
 link(onClick,14064421:doData,[])
}
Add(Edit,5346580,357,210)
{
 Left=115
 Top=30
 Text="150"
 MaxLenField=1
}
Add(Label,13019774,413,168)
{
 Left=20
 Top=10
 Width=150
 Height=20
 Caption="        Канал               Данные    "
 AutoSize=1
}
Add(MultiElementEx,1844477,406,266)
{
 link(onEvent,3581845:Cable,[])
 link(Index,10036881:Text,[])
}
BEGIN_SDK
  Add(EditMultiEx,4598509,21,21)
  {
   WorkCount=#7:doEvent|0:|
   EventCount=#7:onEvent|0:|
   DataCount=#4:Data|5:Index|
   Width=454
   Height=221
   VOffset=35
   HOffset=21
   link(doEvent,12385825:doValue,[])
  }
  Add(IndexToChanel,5765865,378,182)
  {
   Count=5
   Point(Data)
   Point(EndIdx)
   link(onEvent1,8173869:Wire1,[])
   link(onEvent2,8173869:Wire2,[])
   link(onEvent3,8173869:Wire3,[])
   link(onEvent4,8173869:Wire4,[])
   link(onEvent5,8173869:Wire5,[])
   link(Data,12385825:Value,[(384,173)(48,173)])
  }
  Add(For,15680118,259,182)
  {
   link(onEvent,5765865:doEvent,[])
   link(Start,12848207:Data,[])
   link(End,2432431:Var,[(272,166)(314,166)])
  }
  Add(Replace,15341812,140,56)
  {
   SubStr=" "
   link(onReplace,10647327:doEvent,[])
   link(Str,4598509:Index,[(146,40)(55,40)])
  }
  Add(GetIndexData,2432431,308,119)
  {
   Count=3
   link(onIndex,15680118:doFor,[(347,125)(347,223)(249,223)(249,188)])
   link(Data1,6721285:Value,[])
   link(Data2,5646015:Part1,[(321,110)(202,110)])
   link(Data3,5765865:EndIdx,[(328,110)(356,110)(356,229)(384,229)])
  }
  Add(ChanelToIndex,12848207,259,119)
  {
   Count=3
   Point(Data)
   link(onIndex,2432431:doIndex,[])
  }
  Add(MultiStrPart,5646015,196,56)
  {
   Char="-"
   Count=1
   Direct=1
   Point(onNotFound)
   link(onSplit,16368857:doCase,[(235,62)(235,48)(186,48)(186,132)])
   link(onNotFound,6721285:doValue,[])
  }
  Add(Memory,12385825,42,56)
  {
   Point(Data)
   link(onData,15341812:doReplace,[])
   link(Data,4598509:Data,[])
  }
  Add(CableWork,8173869,434,182)
  {
   Count=5
   link(Cable,4598509:onEvent,[(459,188)(459,62)])
  }
  Add(Memory,6721285,308,63)
  {
   link(onData,12848207:doWork1,[(347,69)(347,55)(249,55)(249,125)])
  }
  Add(Case,16368857,196,126)
  {
   Value=String()
   DataOnTrue=Integer(0)
   link(onNextCase,12848207:doWork2,[])
   link(onTrue,12848207:doWork3,[])
  }
  Add(Icon,12064728,42,182)
  {
   @Hint=#5:#main|
   Icon=[ZIP5E07000078DA636060044209090610C9E0C1CEC020C6C0C0A001C4402106030688380828B0330C4AB064C10220A2DC1086FF0C40448951704328348A5AE650CB5F540CE7419812D07491176268BAC88B414C5DD432875AFEA262380F1B305AFE0CDDF2E73F187C06E28740CC00C50FA16210701EC86E078A31C803BDC1CFF0BFFDF9C3FFE73F03E57F0225FFE0D70F008891DF50]
  }
  Add(Debug,10647327,175,56)
  {
   link(onEvent,5646015:doSplit,[])
  }
END_SDK
Add(Edit,7446813,518,266)
{
 Left=115
 Top=70
 Text=""
}
Add(Edit,906816,518,301)
{
 Left=115
 Top=95
 Text=""
}
Add(Edit,158500,518,336)
{
 Left=115
 Top=120
 Text=""
}
Add(Edit,11918236,518,371)
{
 Left=115
 Top=145
 Text=""
}
Add(Edit,1558021,518,406)
{
 Left=115
 Top=170
 Text=""
}
Add(CableEvent,3581845,455,266)
{
 Count=5
 link(Wire1,7446813:doText,[])
 link(Wire2,906816:doText,[(508,279)(508,307)])
 link(Wire3,158500:doText,[(501,286)(501,342)])
 link(Wire4,11918236:doText,[(494,293)(494,377)])
 link(Wire5,1558021:doText,[(487,300)(487,412)])
}
Add(DoData,14064421,357,266)
{
 link(onEventData,1844477:doEvent,[])
 link(Data,5346580:Text,[])
}
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#24: 2013-03-30 17:52:13 ЛС | профиль | цитата
Да хоть сто пробелов - я, например напоролся на такое:
code_30721.txt
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_30721.txt [3.6KB] [176]
Разработчик
Ответов: 26322
Рейтинг: 2147
#25: 2013-03-30 18:26:07 ЛС | профиль | цитата
Tad писал(а):
Да хоть сто пробелов - я, например напоролся на такое

А что не так, это же работает
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#26: 2013-03-30 19:13:23 ЛС | профиль | цитата
nesco писал(а):
это же работает
Я не против.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26322
Рейтинг: 2147
#27: 2013-03-30 19:18:57 ЛС | профиль | цитата
Последний пример с исправлениями от Tad-a

Add(MainForm,6609510,350,189)
{
 Position=1
}
Add(Edit,10036881,406,231)
{
 Left=35
 Top=30
 Text="2 - 3"
}
Add(Button,9639862,259,322)
{
 Left=30
 Top=70
 Caption=">>"
 Data=String()
 link(onClick,16009005:doEvent1,[])
}
Add(Edit,5346580,350,231)
{
 Left=115
 Top=30
 Text="150"
 MaxLenField=1
}
Add(Label,13019774,406,189)
{
 Left=20
 Top=10
 Width=150
 Height=20
 Caption="        Канал               Данные    "
 AutoSize=1
}
Add(MultiElementEx,1844477,399,329)
{
 link(onEvent,3581845:Cable,[])
 link(Index,10036881:Text,[])
}
BEGIN_SDK
  Add(EditMultiEx,4598509,21,21)
  {
   WorkCount=#7:doEvent|0:|
   EventCount=#7:onEvent|0:|
   DataCount=#4:Data|5:Index|
   Width=412
   Height=221
   VOffset=35
   HOffset=21
   link(doEvent,12385825:doValue,[])
  }
  Add(IndexToChanel,5765865,329,182)
  {
   Count=5
   Point(Data)
   Point(EndIdx)
   link(onEvent1,8173869:Wire1,[])
   link(onEvent2,8173869:Wire2,[])
   link(onEvent3,8173869:Wire3,[])
   link(onEvent4,8173869:Wire4,[])
   link(onEvent5,8173869:Wire5,[])
   link(Data,12385825:Value,[(335,173)(48,173)])
  }
  Add(For,15680118,210,182)
  {
   link(onEvent,5765865:doEvent,[])
   link(Start,12848207:Data,[])
   link(End,2432431:Var,[(223,166)(265,166)])
  }
  Add(Replace,15341812,91,56)
  {
   SubStr=" "
   DestStr="-"
   link(onReplace,5646015:doSplit,[])
   link(Str,4598509:Index,[(97,38)(55,38)])
  }
  Add(GetIndexData,2432431,259,119)
  {
   Count=3
   link(onIndex,15680118:doFor,[(298,125)(298,223)(200,223)(200,188)])
   link(Data1,6721285:Value,[])
   link(Data2,5646015:Part1,[(272,110)(153,110)])
   link(Data3,5765865:EndIdx,[(279,110)(307,110)(307,229)(335,229)])
  }
  Add(ChanelToIndex,12848207,210,119)
  {
   Count=3
   Point(Data)
   link(onIndex,2432431:doIndex,[])
  }
  Add(MultiStrPart,5646015,147,56)
  {
   Char="-"
   Count=1
   Direct=1
   Point(onNotFound)
   link(onSplit,16368857:doCase,[(186,62)(186,48)(137,48)(137,132)])
   link(onNotFound,6721285:doValue,[])
  }
  Add(Memory,12385825,42,56)
  {
   Point(Data)
   link(onData,15341812:doReplace,[])
   link(Data,4598509:Data,[])
  }
  Add(CableWork,8173869,385,182)
  {
   Count=5
   link(Cable,4598509:onEvent,[(410,188)(410,62)])
  }
  Add(Memory,6721285,259,63)
  {
   link(onData,12848207:doWork1,[(298,69)(298,55)(200,55)(200,125)])
  }
  Add(Case,16368857,147,126)
  {
   Value=String()
   DataOnTrue=Integer(0)
   link(onNextCase,12848207:doWork2,[])
   link(onTrue,12848207:doWork3,[])
  }
  Add(Icon,12064728,42,182)
  {
   @Hint=#5:#main|
   Icon=[ZIP5E07000078DA636060044209090610C9E0C1CEC020C6C0C0A001C4402106030688380828B0330C4AB064C10220A2DC1086FF0C40448951704328348A5AE650CB5F540CE7419812D07491176268BAC88B414C5DD432875AFEA262380F1B305AFE0CDDF2E73F187C06E28740CC00C50FA16210701EC86E078A31C803BDC1CFF0BFFDF9C3FFE73F03E57F0225FFE0D70F008891DF50]
  }
END_SDK
Add(Edit,7446813,546,329)
{
 Left=115
 Top=70
 Text=""
}
Add(Edit,906816,546,364)
{
 Left=115
 Top=95
 Text=""
}
Add(Edit,158500,546,399)
{
 Left=115
 Top=120
 Text=""
}
Add(Edit,11918236,546,434)
{
 Left=115
 Top=145
 Text=""
}
Add(Edit,1558021,546,469)
{
 Left=115
 Top=170
 Text=""
}
Add(CableEvent,3581845,441,329)
{
 Count=5
 link(Wire1,7446813:doText,[])
 link(Wire2,906816:doText,[(494,342)(494,370)])
 link(Wire3,158500:doText,[(487,349)(487,405)])
 link(Wire4,11918236:doText,[(480,356)(480,440)])
 link(Wire5,1558021:doText,[(473,363)(473,475)])
}
Add(DoData,14064421,350,329)
{
 link(onEventData,1844477:doEvent,[])
 link(Data,5346580:Text,[])
}
Add(Hub,16009005,308,322)
{
 link(onEvent1,1011770:doEvent1,[(333,328)(333,286)])
 link(onEvent2,14064421:doData,[])
}
Add(Hub,1011770,441,280)
{
 OutCount=5
 link(onEvent1,7446813:doText2,[(529,286)(529,342)])
 link(onEvent2,906816:doText2,[(522,293)(522,377)])
 link(onEvent3,158500:doText2,[(515,300)(515,412)])
 link(onEvent4,11918236:doText2,[(508,307)(508,447)])
 link(onEvent5,1558021:doText2,[(501,314)(501,482)])
}
карма: 22

0
Ответов: 655
Рейтинг: 18
#28: 2013-04-04 19:45:05 ЛС | профиль | цитата
Всем огромное спасибо!!
карма: 0

0
28
ФорумыПомощь по пакетуCommutator, диапазон каналов? ← Ctrl12Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2025
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика