Звук и модем

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Ariman
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 817
Зарегистрирован: 02.09.2003 (Вт) 16:23
Откуда: Великая наша держава, г.Москва

Звук и модем

Сообщение Ariman » 01.06.2004 (Вт) 21:02

Давно уже интересуюсь, все никак не могу понять.
Как работает программа, которая некоторый wav выводит в телефонную линию спомощью модема? Как это сделать?
И можно ли сделать это в реал-тайм(т.е. есть какая-то прога, обрабатывающая звук, и мы этот звук без записи сразу выводим в линию)?

И второй вопрос: как сделаны войс-чейнджеры, пусть самые простые, типа FunnyVoice. Там всего один параметр - pitch.
Программа получает звук через микрофон и сразу выводит в колонки....

Буду очень благодарен, если мне объяснят, как сделать хотя бы одну из этих программ

bonch
Новичок
Новичок
 
Сообщения: 44
Зарегистрирован: 17.09.2002 (Вт) 12:24
Откуда: Moldova

Сообщение bonch » 04.06.2004 (Пт) 12:01

Как я думаю (почти уверен).
Для этого должен быть особый модем (Voice Modem). ...Есть что-то типа таких Voice/Fax/V90(???) Modem...
там при спец софте (типа SIMANTEC) можно организовать автоответчик. Так вот используя MSComm можно посылать туда определённые АТ команды (найденные до этого на просторах сети специально для твоего модема). ну что-то типа
Код: Выделить всё
Private Sub MSComm1_OnComm()
answ=mscomm1.input
If answ="???"' then  'определяем что произошёл ответ

'???-У каждого модема должен быть какой-то евент который говорит об изменении на линии.*
MSComm1.Output = "AT+spetial command c:\sample.wav"
end if
end sub


*- Знаю точно GSM Ericsson при условии что до этого был активизирован мониториг за стоянием соединения:
AT+что-то,
выдает при ответе что-то типа:
+1.2.3.5
где какая-то из цифр обозначает "состояние ответа". Это из спецификации телефона.
Ну если надыбаешь что, расскажи - покажи

AlexJ
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 04.06.2004 (Пт) 12:59

Засунь звук в модем!!!!!!!!!!!!!!!!

Сообщение AlexJ » 04.06.2004 (Пт) 19:43

Шарясь INetу надыбал OCX только он БЫЛ! demo. Пришлось его крякнуть. Теперь он полноцено рабочий без глюков.
Думаю это то что тебе надо.

Короче стебя ПИВО.
Вложения
voiceangel.rar
(459.02 Кб) Скачиваний: 136

Ariman
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 817
Зарегистрирован: 02.09.2003 (Вт) 16:23
Откуда: Великая наша держава, г.Москва

Сообщение Ariman » 04.06.2004 (Пт) 21:46

Одну секунду! Что значит "я его крякнул"? Может, ты у себя дома его и крякнул, вот только для вызова метода INITIALIZE, без которого ничего не фурычет, требуется строка-аргумет pwd, которая является паролем для зарегистрированной версии...
У меня ее нет. А ты ее нашел?
Если да, то сообщи плз.

А вообще, мне нужен не контрол, а пример, как это написать самому....

AlexJ
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 04.06.2004 (Пт) 12:59

На счет крякнул...

Сообщение AlexJ » 06.06.2004 (Вс) 9:52

Кпри каждом RUN or EXIT он выкидывал окошко "Hello" теперь его нет.
Попробуй вытащить оригинал, в контроле "ОБ" есть адрес. Если в нем
нет того о чем спрашиваеш тоды ОЙ.
Меня больше интересовал вопрос записи WAV, поэтому в модемные дебри я несувался.

AlexJ
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 04.06.2004 (Пт) 12:59

Оригинал OCX

Сообщение AlexJ » 06.06.2004 (Вс) 10:20

Вот оригинал.
Вложения
voiceangel_4.rar
(82.79 Кб) Скачиваний: 109

AlexJ
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 04.06.2004 (Пт) 12:59

Дополнение

Сообщение AlexJ » 06.06.2004 (Вс) 13:14

Погонял его еще, вроде как все инициализируетя.
Судя по предыдущей куче крякнутых тагого рода контролов
они полностью полнофункционалные.
У тебя вообще из примера чета работает?
И вобще какой смысл демонстрировать возможности контрола,
не давая в нем самих возможностей. Это 1-е.
2-е: В HELPE(voiceangel.chm) автор просит прислать свои наблюдения
по проблемам работы контрола со всякого рода модемами.
Вопрос, зачем если контрол не полнофункциональный?
Так что проблема у тебя в другом.
Проверь на другом модеме.
У меня Generic SoftK56 не voice поэтому звуковые фишки роверить не могу. Но запись и воспроизведение WAV-работает, Ring-и отлавливает, FAX-запрос слушает.

Ariman
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 817
Зарегистрирован: 02.09.2003 (Вт) 16:23
Откуда: Великая наша держава, г.Москва

Сообщение Ariman » 06.06.2004 (Вс) 15:02

Будь у тебя даже voice-modem ты бы проверить не смог.
Т.К. все фичи, связанные с voice-modemом доступны только после Initialize с правильным паролем. Если же написать в качестве пароля белиберду, то программа по-прежнему будет работать нормально, но вот функции будут отключены.

Впрочем, я решу свою проблему аппаратными средствами, каплю шнур, подключу звуковой выход ко входу модема(т.е. гнездо для колонок к гнезду для микрофона модема).
После этого воспользуюсь прогой FunnyVoice, которая изменяет голос и выдает его из колонок+VentaFax&voice, которая позволит использовать подключенный к модему микрофон.
В итоге, можно будет разговаривать с людьми изменённым голосом....

Но все же мне хочется самому написать прогу, которая решала бы все это программно, а не аппаратно.............

AlexJ
Начинающий
Начинающий
 
Сообщения: 8
Зарегистрирован: 04.06.2004 (Пт) 12:59

Вот еще штуковина.

Сообщение AlexJ » 06.06.2004 (Вс) 19:59

Вроде без контролов. Только код.
Че это я незнаю, но чота с модемом и звуком.
http://www.bandwidthsaver.com/downloads/Dialgo1.zip


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 32

    TopList