Add(MainForm,2953706,280,217)
{
}
Add(Button,12317080,280,266)
{
Left=15
Top=15
Data=String($GPGGA,004241.47,5532.8492,N,03729.0987,E,1,04,2.0,-0015,M,,,,*31)
link(onClick,14880075:doEvent1,[])
}
Add(Label,1949808,462,336)
{
Left=150
Top=60
link(Text,2896044:Value1,[])
}
Add(Label,11513507,469,343)
{
Left=150
Top=75
link(Text,2896044:Value2,[])
}
Add(Label,7790563,476,350)
{
Left=150
Top=95
link(Text,2896044:Value3,[])
}
Add(Label,6920568,483,357)
{
Left=150
Top=115
link(Text,2896044:Value4,[])
}
Add(Label,13130245,490,364)
{
Left=150
Top=135
link(Text,2896044:Value5,[])
}
Add(Label,12341243,497,371)
{
Left=150
Top=150
link(Text,2896044:Value6,[])
}
Add(Label,650700,504,378)
{
Left=150
Top=165
link(Text,2896044:Value7,[])
}
Add(Label,10560247,511,385)
{
Left=150
Top=185
link(Text,2896044:Value8,[])
}
Add(Label,2039090,518,392)
{
Left=150
Top=200
link(Text,2896044:Value9,[])
}
Add(Label,5915212,525,399)
{
Left=150
Top=215
link(Text,2896044:Value10,[])
}
Add(Label,16651668,532,406)
{
Left=150
Top=230
link(Text,2896044:Value11,[])
}
Add(Label,444110,539,413)
{
Left=150
Top=245
link(Text,2896044:Value12,[])
}
Add(Label,11231507,546,420)
{
Left=150
Top=260
link(Text,2896044:Value13,[])
}
Add(Label,174371,553,427)
{
Left=150
Top=275
link(Text,2896044:Value14,[])
}
Add(Label,6633718,560,434)
{
Left=150
Top=290
link(Text,2896044:Value15,[])
}
Add(Label,3726760,413,217)
{
Left=85
Top=20
}
Add(Hub,14880075,336,266)
{
OutCount=3
link(onEvent1,3726760:doText,[(387,272)(387,223)])
link(onEvent2,7862850:doMT,[])
link(onEvent3,799726:doEvent1,[(384,286)(384,342)])
}
Add(Hub,799726,399,336)
{
OutCount=15
link(onEvent1,1949808:doText,[])
link(onEvent2,11513507:doText,[])
link(onEvent3,7790563:doText,[])
link(onEvent4,6920568:doText,[])
link(onEvent5,13130245:doText,[])
link(onEvent6,12341243:doText,[])
link(onEvent7,650700:doText,[])
link(onEvent8,10560247:doText,[])
link(onEvent9,2039090:doText,[])
link(onEvent10,5915212:doText,[])
link(onEvent11,16651668:doText,[])
link(onEvent12,444110:doText,[])
link(onEvent13,11231507:doText,[])
link(onEvent14,174371:doText,[])
link(onEvent15,6633718:doText,[])
}
Add(MT_String,7862850,413,266)
{
Delimeter=","
link(onResult,2896044:doValue,[])
}
Add(MT_MultiMem,2896044,462,266)
{
Count=15
}
Этот топик читают: Гость
Разработчик
Ответов: 26163
Рейтинг: 2127
|
|||
Мдяяя...
|
|||
карма: 22 |
|
Ответов: 16884
Рейтинг: 1239
|
|||
Мдяяя... Не ново.
Это я использую (вынужнен) давно. Хотя бы здесь http://www.hiasm.com/xf//getfile/10658 Интересно, кто, идя в магаин, берет рубли, заходит в обменный пункт, меняет на доллары, дальше заходит в другой обменник меняет доллары на рубли и наконец заходит в магазин. (описано то что делается в данном случае при применении MT |
|||
карма: 25 |
|
Ответов: 1328
Рейтинг: 69
|
|||
nesco, Я так сначала и делал, но когда стал брать со строки только время для синхронизации в предыдущей проге, потехоньку перешел на StrPart, а по коду и быстродействию, что лучше использовать 2 компонента МТ или например 4 StrPart?
|
|||
карма: 2 |
|
Разработчик
Ответов: 26163
Рейтинг: 2127
|
|||
Tad писал(а): Мдяяя... Не новоА я и не говорил, что ново. Tad, есть набор штатных компонентов, которыми это можно реализовать (и не сложно). Знаешь, что я тебе скажу -- с твоим подходом я бы давно писал для себя на IC, а то -- рубли, доллары, у нас и так тут, млин, во всем пакете доллары на тугрики меняют, и обратно. Скажи, не первй раз спрашиваю -- зачем тебе HiAsm, с таким подходом (я помню разговор про автомобили) ------------ Дoбавленo: Konst, ну естественно -- 4 StrPart будут работать быстрее 2-х МТ, но разве об этом разговор, переходите на FASM или FTCG, кто вам мешает, там будет гораздо большее быстродействие |
|||
карма: 22 |
|
Ответов: 16884
Рейтинг: 1239
|
|||
nesco писал(а): Скажи, не первй раз спрашиваю -- зачем тебе HiAsm, с таким подходом Народная мудрость писал(а): Если в споре нечем крыть - можешь еще обозвать оппонента |
|||
карма: 25 |
| ||
Голосовали: | Валерий |
Разработчик
Ответов: 26163
Рейтинг: 2127
|
|||
Tad писал(а): с подтекстомНе вижу подтекста... Ладно, забей, без обид, не повод это для ругани Tad писал(а): Я же тебя ни разу не спрашивал зачем тебе HiAsmНо я отвечу, он мне нужен для развития, это стало моим хобби, вот и все, и никаких подтекстов. Я могу без проблем перейти на Delphi, но у меня к нему нет никакого интереса. Поставленную мне задачу, я реализовал с помощью HiAsma, а сейчас помогаю народу познать сей прекрасный инструмент. |
|||
карма: 22 |
|
Ответов: 16884
Рейтинг: 1239
|
|||
nesco писал(а): а сейчас помогаю народу познать сей прекрасный инструментnesco, я никогда не держу обид и, помоему, никогда не ругаюсь.. Кстати о птичках. Для того чтобы расшифровать сигналы правильно (ведущие нули тоже участвуют) - нужно "открыть третью точку", которая преобразует строку в MT без учета типов и попутно можно вспомнить сколько я воевал и получил оценок за эту точку. К примеру: 1-й блок (отсчет с 0) 004241.47 - это время в формате hhmmss.ss . Если применить твою схему то прийдется добавить несколько компонент для добавления нолей спереди (вед время может быть и 000001.00) code_10740.txt |
|||
карма: 25 |
| ||
файлы: 1 | code_10740.txt [2.3KB] [230] |
Разработчик
Ответов: 26163
Рейтинг: 2127
|
|||
Tad писал(а): нужно "открыть третью точку"Ты имеешь ввиду doMTString, ну да, надо ее использовать, но я же просто пример привел, совсем отвлеченный от темы |
|||
карма: 22 |
|
Ответов: 16884
Рейтинг: 1239
|
|||
nesco писал(а): Ты имеешь ввиду doMTStringКстати Konst писал(а): но когда стал брать со строки только время для синхронизации$GPGGA,004241.47,5532.8492,N,03729.0987,E,1,04,2.0,-0015,M,,,,*31 параметры строго определенной длины.
Например к долготе в этом пакете спереди добавлен ноль, потому что она может быть и 3-х значной, тоже и с кол. спутников (04) так как их может быть до 12. Т.е. запятые расположены в строго фиксированых позициях Так что
------------ Дoбавленo: Вот Konst, может пригодится (чтобы мышкой не считал )
|
|||
карма: 25 |
| ||
Голосовали: | Konst |
Ответов: 1328
Рейтинг: 69
|
|||
Tad, спасибо, может и пригодится nesco, я про StrPart, почему спрашивал-при нынешнем копировании с нажатым Ctrl совсем не состовляет труда наклепать хоть 20 штук, и если нет никакой разницы зачем заморачиваться? Мне они на поли не мешают
code_10741.txt |
|||
карма: 2 |
| ||
файлы: 1 | code_10741.txt [790B] [254] |
Разработчик
Ответов: 26163
Рейтинг: 2127
|
|||
Konst писал(а): если нет никакой разницы зачем заморачиваться?Я показал пример, как можно на штатных компонентах сделать компонент Tada, к тебе это никакого отношения не имело |
|||
карма: 22 |
|
Ответов: 1328
Рейтинг: 69
|
|||
nesco, да я не спорю, мне просто было интересно, есть ли в итоге, после компиляции программы, какая нибудь разница.
Для пользователей, бывает тяжело определиться какой компонент или способ выбрать - по внешнему виду это не определишь, и по кол-ву для меня без разницы поставить 2 компонента или 10, но нужно стремиться к лучшему |
|||
карма: 2 |
|
Ответов: 16884
Рейтинг: 1239
|
|||
nesco писал(а): Я показал пример, как можно на штатных компонентах сделать компонент TadaKonst, а хочешь я могу показать примеры ! не применения специализированых компонент : как из Math сделать Counter . Кроме Math понадобятся еще 2-е If_else и 2-е Memory. как скопировать, удалить или вставить символы в строку с нужной позиции . Copy, Insert, Delete - ненужны. Форматированную строку получить тоже запросто (не применяя FormatStr). nesco, извини, но nesco писал(а): как можно на штатных компонентах сделать Чем больше штатных специализированых компонент - тем лучше. Не подумай, что я воюю за присвоение этому компоненту звания ШТАТНОГО . НЕТ. А рассказывать, что на фига санки - с горки можно съехать и на голой заднице... Можно, но сам не поедешь. |
|||
карма: 25 |
| ||
Голосовали: | Konst, Валерий |
Разработчик
Ответов: 26163
Рейтинг: 2127
|
|||
Tad писал(а): Чем больше штатных специализированых компонент - тем лучшене согласен -- уже сейчас в их количестве виснут. Кому нужны узко специализированные компоненты, тот может их для себя сделать, для других -- не факт, что надо. |
|||
карма: 22 |
|
Ответов: 1328
Рейтинг: 69
|
|||
Tad писал(а): Konst, а хочешь я могу показать примеры ! не применения специализированых компонент :
как из Math сделать Counter . Кроме Math понадобятся еще 2-е If_else и 2-е Memory. как скопировать, удалить или вставить символы в строку с нужной позиции . Copy, Insert, Delete - ненужны. Форматированную строку получить тоже запросто (не применяя FormatStr). Tad, конечно выложи, только лучше не сдесь, а в этюды |
|||
карма: 2 |
|