Сейсмодатчик своими руками

[BolshoyK]

Провел несколько опытов с тем что получилось. Испытательный стенд представляет собой лампу-жираф, на которую привязал компьютерную мышь, а к мыше привязал акселерометр. Длина маятника примерно 58см (хрен его знает как определить точку изгиба мышиного провода...). Отклоняю на 5см, отпускаю. Результат на фото. Там где метка 350-360 уже перестают быть заметны колебания, а в тоже время маятник еще качается с амплитудой +-1см(отсчет от точки покоя).

[akegor]

Какой период колебаний? У этого акселерометра грубовато чутье.
Полученные +/- 1 см переведите в ускорение, хотя бы, примерно, и соотнесите с g и тугриками/g. Не впечатлит.
Я бы положил на стол и толкнул (стол), ударил бы кулаком по столешке. Что при этом видно?
Маятник из мыши с полуметровым подвесом слишком низкочастотный, как следствие - малые значения.

[BolshoyK]

akegor, удар столу не отличим от шума. Либо кто-нибудь откроет тайну как правильно работать с этим датчиком, либо экспериметы отложатся до приезда альтернативного.

[akegor]

BolshoyK, Вы так и не перешли к перемещениям. А интересно было бы посмотреть результат.

[BolshoyK]

akegor, а на каком промежутке считать перемещение? от смены до смены направления ускорения?

[akegor]

Ускорение - вторая производная от перемещения. Двойное интегрирование данных акселерометра дает перемещение по осям.

а на каком промежутке считать перемещение?

непрерывно.

[BolshoyK]

алгоритм рассчета:

AccelX = Convert.ToSingle(result[3], new CultureInfo("en-US")) / 64;
AccelY = Convert.ToSingle(result[4], new CultureInfo("en-US")) / 64;
AccelZ = Convert.ToSingle(result[5], new CultureInfo("en-US")) / 64;
time = Convert.ToSingle(result[6], new CultureInfo("en-US"));

if ((AccelX0 == 0) && (AccelY0 == 0) && (AccelZ0 == 0)) {
AccelX0 = AccelX;
AccelY0 = AccelY;
AccelZ0 = AccelZ;
}


speedX0 = speedX;
speedY0 = speedY;
speedZ0 = speedZ;
distX0 = distX;
distY0 = distY;
distZ0 = distZ;


AccelX = AccelX - AccelX0;
AccelY = AccelY - AccelY0;
AccelZ = AccelZ - AccelZ0;

speedX = speedX0 + AccelX * time;
speedY = speedY0 + AccelY * time;
speedZ = speedZ0 + AccelZ * time;

distX = distX0 + speedX0 * time + AccelX * time * time / 2;
distY = distY0 + speedY0 * time + AccelY * time * time / 2;
distZ = distZ0 + speedZ0 * time + AccelZ * time * time / 2;

textBox1.Text = AccelX.ToString();
textBox2.Text = AccelY.ToString();
textBox3.Text = AccelZ.ToString();
textBox4.Text = speedX.ToString();
textBox5.Text = speedY.ToString();
textBox6.Text = speedZ.ToString();
textBox7.Text = distX.ToString();
textBox8.Text = distY.ToString();
textBox9.Text = distZ.ToString();

За начальную точку, точку покоя, принимаем первый пакет пришедший с девайса. Чтобы получить данную картину просто поболтал акселерометром во все стороны...

[mind]

Двойное интегрирование данных акселерометра дает перемещение по осям.

А как при интегрировании Вы собираетесь вычислять постоянную ,F(x)+C?
Разве данные интегрируются? Я всегда думал что функции.....видимо ошибался....

[akegor]

BolshoyK, известная фраза Булдакова:"А что это было?"
Если привязать хрен-знает-что к хрен-знает-чему, получим хрен-поймешь.
А вот если привязать тугрики к единицам ускорения (хотя бы по "типовым" значениям из ДШ), в результате получим вменяемые результаты по перемещениям. И еще. Чтобы оценить полученный результат нужно знать, в каких границах и по какому закону проводилась "болтанка".
Или я что-то не понял?
Я бы положил на линейку и по ней переместил, скажем, на 20см в направлении "Х" за, скажем, 0.5с в одну сторону, затем в другую. Можно по всем осям аналогично, но не одновременно.
Пора уже переходить к измерениям.
А по полученной картинке уже видно, что шумы сильно не мешают, хотя без физических величин - бабушка пополам сказала.

[mind]

по какому закону проводилась "болтанка".

Вот,вот и я об этом. Хотя-бы в MathCad попробуйте........