Вверх ↑
Ответов: 8948
Рейтинг: 824
#1: 2018-07-12 00:27:17 ЛС | профиль | цитата
alextulanov, вы читаете из СОМ порта по 6 байт 64 раза в секунду (шаг таймера 1/64 сек), а график вполне отрисовывает и 200 тчк/сек
(Не надо копировать текст из блокнота, нужно выделить схему в поле HiAsm скопипастить в тегах "Скролл" и "Код")


Add(MainForm,2953706,49,91)
{
}
Add(Plotter,10095585,259,133)
{
Left=25
Top=45
Width=340
Height=200
Name="MyPlotter"
}
Add(PlotLines,16437903,259,91)
{
Grapher="MyPlotter"
Step=1
MaxValues=200
}
Add(ScrollBar,641306,49,175)
{
Left=20
Top=15
Width=155
Min=5
Position=15
link(onPosition,5094567:doEvent1,[])
}
Add(Button,3314564,91,91)
{
Left=265
Top=15
Caption=">>"
link(onClick,12938763:doStart,[])
}
Add(Random,16249244,210,91)
{
Min=1
link(onRandom,16437903:doAdd,[])
}
Add(Thread,12938763,154,91)
{
Delay=15
Point(doDelay)
link(onExec,16249244:doRandom,[])
}
Add(Hub,5094567,105,175)
{
link(onEvent1,12938763:doDelay,[(144,181)(144,111)])
link(onEvent2,13580343:doOperation,[])
}
Add(Button,15431673,91,133)
{
Left=325
Top=15
Caption="II"
link(onClick,12938763:doStop,[(136,139)(136,104)])
}
Add(Label,13642728,259,182)
{
Left=180
Top=15
Caption="66 Тчк/сек"
}
Add(Math,13580343,154,182)
{
OpType=3
Op1=1000
ResultType=0
link(onResult,307447:doString,[])
}
Add(FormatStr,307447,210,182)
{
DataCount=1
Mask="%1 Тчк/сек"
link(onFString,13642728:doText,[])
}

карма: 19

0