Programmist
Поддерживаю Mesh, напишите сначала сюда формулы по которым будете делать преобразование разберитесь что и как, тут народ кто в теме думаю поможет, можно по идее в том же маткаде/матлабе это прогнать, а уж потом можно кодировать.

Programmist

Вот это уже понятно, только как из простой data получить data.re и data.im

Если data чисто реальноая то, data.re = data, data.im = 0, с соответствующим упрощением формул.

Если data в IQ формате то, data.re = I, data.im = Q .

что дальше делать с I и Q?

Берём комплексное FFT и смотрим спектр при различных частотах комплексной синусоиды, думаем головой и делаем выводы.

Mesh
Мои резалты посотрите
Где мне их смотреть? все скрины выше вот с этой записи: [url= http://doris.kiev.ua/RS/FREQ/IQ/0-200.wav] http://doris.kiev.ua/RS/FREQ/IQ/0-200.wav[/url]

petr0v
Спасибо, сегодня все попробую. Что получится, формулы (код на Паскале) напишу.

DVE
напишите сначала сюда формулы по которым будете делать преобразование
Да если я их мог написать, наверно и не спрашивал. Мне эти формулы самому и нужны :)

Programmist Вторая вещалка из моей АМ i/q я её ложил. Следом вы положили её ж. Вы со своей даж на слух разницу не видите что ли?! А вы вобще чеките свои резалты с другими резалтами людей сами? Или всё на уровне "мне нравится значит работает класно"?

Mesh
Ага, понятно, это про первый файл. Значит все дело в неправильном сносе.

Programmist Значит все дело в неправильном сносе. Ага, или не ту половину взяли. :-) Лана, тут чёто больше похоже уже на ЖЖ с темой, "как форум Programmistа уговаривал книжки почитать". Разберётесь если захотите.

Вопрос-то не сложный, ну включились "тормоза", что с того :)
Значится так (с упрощением формул):

for n:= 0 to Length(DataArray) do
begin
OutArray_I[n]:= CosArray[n] * DataArray[n];
OutArray_Q[n]:= SinArray[n] * DataArray[n];
end;

Получаю два массива (OutArray_I и OutArray_Q), а нужен один, с реальной датой, (спектр смотрит совсем другой модуль).
И выходит так, что комплексная синусоида это два массива: В одном синусоида, а в другом косинусоида нужной частоты сдвига.

Programmist

Вы слишком торопитесь делать не поняв, ключевой момент посмотреть что происходит со спектром при умножении на комплексную синусоиду, разумеется в общем случае спектр считать комплексным FFT, смотреть как положительные так и отрицательные частоты. Не должно вам какое-то мнимое удобство готового модуля диктовать что делать, наоборот вы сами должны делать то что нужно. Вся дата комплексная, у реальной просто мнимая часть равна нулю, но она всегда есть и надо понимать как это на спектр влияет.

petr0v
Хорошо, я посмотрю, но хоть с комплексной синусоидой я правильный вывод сделал, что это два массива: синус и косинус?

Mesh
"как форум Programmistа уговаривал книжки почитать".
Книжки я могу читать потом и долго, а сейчас нужна рабочая программа, а если быть еще точней не хватает 5 строчек кода.

Programmist

комплексное число x = a + i*b
x.re = a, x.im = b

комплексная синусоида e^(i*2*pi*f*t) = cos(2*pi*f*t) + i*sin(2*pi*f*t) по формуле Эйлера

complex_sin.re = cos(2*pi*f*t)

complex_sin.im = sin(2*pi*f*t)


комплексное число

формула Эйлера

petr0v
Спасибо, теперь хоть понятно, что такое комплексная синусоида.

Programmist Книжки я могу читать потом и долго, а сейчас нужна рабочая программа, а если быть еще точней не хватает 5 строчек кода. да как же потом!!!!!! Что Вы такое говорите? Всегда было так: сначала книги, потом программы!!!!! Наоборот никак не получится, природу не обманешь.

Наоборот никак не получится, природу не обманешь. Ну такое Фурье, Жан Батист Жозефу позволено.

mikasa76
природу не обманешь
Так не интересно. Всегда должно быть немного "чудес" :))

Programmist Книжки я могу читать потом и долго, Да я понял, понял. :-) а сейчас нужна рабочая программа, Рабочей она не будет. Эт будет пародия на работу, что собсно щас и есть. :) Може давно как б уже сказать, что вы не програмер как это думается в России, а типикал кодер как это принято за бугром? То бишь вам нуно разжёваное алгоритмо, которое вы собсно и перенсёте на Дельфи? Причём что прикольно, базик алгоритмы разжёваны уже в книжках, а вам нуно-то всего лишь дожевать это. И к ста не факт, что и перенести то вы можете номано, затыки на кажной букве i, чи запятой эт не дело. Но я хз, как долго тут кому понравится дожёвывать за вас, сами вы отказываетеся шевелить челюстями. :-) Ну эт имхо ессно, и как водится оно непральное. :)

Mesh
Може давно как б уже сказать, что вы не програмер как это думается в России, а типикал кодер как это принято за бугром?
Совершенно верно, не програмер и даже не кодер. Ник здесь совершенно ни о чем не говорит, да и кстати, там написана моя профессия.

Programmist Да лано, всё нормально. Пишите, пишите чё вы там пишите, меня не слухайте. А то я ещё буду виноват, что не родилось суперпроги. :-)

Mesh
Пишите, пишите чё вы там пишите, меня не слухайте
Дык а кого еще слухать-то? Здесь в теме от силы пять человек наберется :)
Это же не деген и даже не "китаенвуд", мало кому интересно.

RadioKoteg Ну такое Фурье, Жан Батист Жозефу позволено. Ну он то как раз понимал, что сделал, в отличие от того совета, где представлял работу ))))))))))

Programmist Дык а кого еще слухать-то? Ну как кого слухать? Мне тут ники перечислять что ли? ;-) Но вы ж как бы это слухать не хотите. Я усё понимаю, хотся и раз и в дамках и там бла-бла и фи-фи-фи, ну блин ну не бывает так. :)

Дык а кого еще слухать-то? Здесь в теме от силы пять человек наберется :)
Это же не деген и даже не "китаенвуд", мало кому интересно.
При нынешнем детсадовском уровне обсуждения просто говорить не о чем и не с кем.

asv При нынешнем детсадовском уровне обсуждения просто говорить не о чем и не с кем. Да и не говорите, был тут на форуме некто "професионал" belkin, он тож самое говорил и допытывался "как вы это в вафах всё видете"? Недавно тут толи доцент, толи кандидат наук залетал, типо срочно скажите ему алгоритм опознавания сигналиков, тож наверно "профи" не иначе? Оно знаете некоторые "профи" о себе слишком хорошо думают, я б сказал необосновано хорошо. :-) Ну да эт отдельная тема. А так оно то да, не детсадовский уровень в дисерах, а не на форумах. :)

При нынешнем детсадовском уровне обсуждения просто говорить не о чем и не с кем.
Да оно и не особо надо, не было ее и не будет. Не самая необходимая вещь в хозяйстве. А у кого уровень не детсадовский, тот пусть сам себе пишет, имхо :)

не детсадовский уровень в дисерах, а не на форумах. :)
К сожалению, в дисерах тоже иногда чудные вещи случается встретить.

asv Согласен на все 100. Верить никому нельзя. Особливо в это смутное время, когда "гениев" на кажном углу пачками, они и раньше эт бывало, но сейчас эт кошмар какой-то. :-)

Ещё снобизму многовато или такая позиция "а я знаю как делать но не скажу"... ;)

petr0v У, эк куда вас потянуло. :) А ещё тупизму многовато чи лени, написано как делать в книжках, но читать ни-ни, не царское дело типо. :-) Царское типо кодить. Эт форум, никто никому ничего не должен, и уж точно никто не должен читать и пересказывать за кого-то, а то у одних как бы время дорого, на читку видети ли жалко, а другие типо спят и видят как бы кому чего в рот положить, имхо ессно. ;)

Mesh

...а другие типо спят и видят как бы кому чего в рот положить...

Старинный анекдот в тему:

Разговор 2-х преподавателей:
- Ну и группа мне в этом году попалась тупая!
- А что так?
- Представляешь себе, объясняю теорему - не понимают! Объясняю второй раз - не понимают!! В третий раз объясняю. Сам уже понял. А они не понимают...

Как говорится в каждой шутке есть доля шуки... ;)

petr0v Да понятно, конешно всё с условностями. Анек к стати да, бывает и такое. :) Ну да эт нормал то, ничего такого тут нет.

Ещё снобизму многовато или такая позиция "а я знаю как делать но не скажу"... ;)
Мне кажется, объяснять на техническом форуме человеку, который занимается спектральным анализом, что такое i (в смысле примитивный корень четвертой степени из единицы) - это уже перебор. Даже бог, говорят, помогает только тем, кто помогает себе сам.

То же самое касается и детсадовской психологии - взять набор готовых блоков, слепить их вместе, не разбираясь, как же они должны работать, и получить чудесный результат - что это, как не детсадовские мечты?

А кодить мы все тут и сами умеем, и неплохо.