Вверх ↑
Этот топик читают: Гость
Ответов: 463
Рейтинг: 9
#1: 2011-05-23 11:28:31 ЛС | профиль | цитата
Приветствую!
Вопрос такой, можно ли создать что-то похожее на кардиограмму - график по задаваемым параметрам: ритм (скорость ударов), амплитуда.
Поскольку это одиночные и сложноватые (для меня не-математика) импульсы, я просто не представляю как они описываются математически.
Пожалуйста просто направьте в какую сторону копать.
Add(LED,10488238,385,511)
{
Left=1230
Top=590
Color=-16777215
ColorOn=65280
ColorOff=255
Point(onClick)
link(onClick,13072513:doWork1,[])
}
Add(Timer,5793891,112,567)
{
Interval=1500
link(onTimer,12350345:doEvent1,[])
}
Add(Hub,12350345,217,567)
{
link(onEvent1,10488238:doChangeValue,[(264,573)(264,517)])
link(onEvent2,11431799:doCalc,[(301,580)(301,629)])
}
Add(ChildForm,13072513,441,518)
{
}
BEGIN_SDK
Add(EditMulti,2704831,21,21)
{
WorkCount=1
link(doWork1,15059345:doVisible,[(45,27)(45,146)])
}
Add(MainForm,15059345,70,112)
{
Left=35
Top=105
Width=684
Height=463
Visible=1
Position=1
Point(doVisible)
}
END_SDK
Add(Grapher,6480582,434,623)
{
Left=25
Top=200
Width=1225
Height=190
GridColor=0
AxisColor=0
link(ValueY,11431799:Result,[(440,611)(415,611)(415,673)(377,673)])
}
Add(FastMathParse,11431799,371,623)
{
MathStr="(%1*Sin%2)+(0.5*Sin%2)+ (0.25*Sin%2)"
link(onResult,6480582:doAdd,[])
link(X1,10360343:Text,[(377,611)(363,611)])
link(X2,6365900:Text,[(384,611)(405,611)])
}
Add(Edit,10360343,357,567)
{
Left=440
Top=140
}
Add(Edit,6365900,399,567)
{
Left=510
Top=140
}


Я задаю четные гармоники, но вот как задать частоту ? Как добиться периода в 0.5 сек?
карма: 0

0
Ответов: 3889
Рейтинг: 362
#2: 2011-05-23 11:36:19 ЛС | профиль | цитата
ajaxii, В начале импульса даёте значительное приращение счётчику (координата Y, если считать снизу, т.е. точка "подпрыгнет" на приращение), тикающему к нулю с течением времени (таймер). Промежутки между импульсами замеряете опять же таймером. Всё это время график плавно прокручивается (тот же таймер, что уменьшает первый счётчик).
карма: 1

1
Голосовали:ajaxii
Ответов: 463
Рейтинг: 9
#3: 2011-05-23 11:39:10 ЛС | профиль | цитата
1nd1g0, спасибо за ответ , попробую. А будет ли такая система анимирована? то бишь будет ли график двигаться? Его надо все время перерисовывать как я понимаю?
карма: 0

0
Ответов: 3889
Рейтинг: 362
#4: 2011-05-23 11:47:16 ЛС | профиль | цитата
ajaxii, у нас же есть компонент "график", который сам прокручивается по достижении отобразимого предела. Если что-то альтернативное хочется нарисовать - не проблема, прокрутка (сдвиг картинки) у нас тоже есть.
карма: 1

0
Ответов: 8961
Рейтинг: 824
#5: 2011-05-23 15:45:23 ЛС | профиль | цитата
ajaxii, один из вариантов (за правильность самой кардиограммы не ручаюсь, по памяти -- медицинскую кнжку потерял при переездах, а новой не завёл, тьфу-тьфу, не сглазить )code_24106.txt
карма: 19

1
файлы: 1code_24106.txt [1.4KB] [156]
Голосовали:ajaxii
Ответов: 463
Рейтинг: 9
#6: 2011-05-23 15:49:14 ЛС | профиль | цитата
code_24107.txt
вот чего я добился, но мне нужен именно импульс похожий на сердечный помогите пожалуйста с формулами(ряд Фурье) и периодом между импульсами (настраиваемым)
------------ Дoбавленo в 15.49:
Леонид, это намного ближе к истине, я так понимаю что не формулой а ручками удобнее задавать ... Все равно СПАСИБО Леонид!
карма: 0

0
файлы: 1code_24107.txt [1.6KB] [157]
Ответов: 8961
Рейтинг: 824
#7: 2011-05-23 20:20:23 ЛС | профиль | цитата
ajaxii, ну если очень хочется, то можно и через Фурье (для более чёткой работы нужно в образце увеличить число точек до 200--300) и звук другой cardgraf.rar
карма: 19

2
файлы: 1cardgraf.rar [19.1KB] [121]
Голосовали:ajaxii, Tad
Ответов: 463
Рейтинг: 9
#8: 2011-05-24 00:50:06 ЛС | профиль | цитата
Леонид, просто снимаю шляпу!!! Вау, вот это труд! Помнится лет так 20 назад изучая фурье и ряды, рисовали всякие импулься, очень хорошо помню что если брать только четные гармоники, то будет пила а если нечетные - прямоугольник. Ну а Леонид просто весь ряд как я понимаю брал? (Бегло смотрел схему сильно не вникал) но очень поучительно. СПАСИБИЩЕ!
Решение данной задачки займет у меня еще какое-то время, но вот поучится есть чему и на чем, за что большая благодарность.
карма: 0

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