Hello, RASH <bear_fami***@m*****.ru>!

On Fri, 28 Jan 2005 00:06:53 +0600 you wrote:

> 1 вопрос: Сидел я как-то устанавливал любимую Nero запускаю
> кейгенератор, а там такая красивая мелодия из колонок звучит, просто
> наслаждение одно (раньше я замечал, но что-то не шибко внимание на это
> обращал). Так вот файлик этот всего ничего весит, каким же макером
> туда запихали музычку, может ноты прямо в коде написали, тогда как это
> можно сделать?? Хотелось бы узнать.

Ищи инфу по поводу mod (Amiga module). Скорее всего там то же самое, но
семплы хранятся не в коде, а генерируются на лету.

Можно почитать статьи создателей 64k демок. http://scene.org/ предостави
т все необходимые ссылки.

> 2 вопрос: Сижу слушаю обычную Winampу, и захотелось мне Чистой музыки
> без слов. Как можно из файла любого аудиоформата вытащить музыку, если
> это песня со словами. Я попробовал Соунд Фордж, никаких результатов,
> нашел в Нейре функцию (для аудио дисков) называется караоке,
> приглушает слова, но эффект небольшой, да и музыка искажается, что же
> можно сделать?? Тоже очень интересно.

Ничего. Голос очень сложно идентифицировать, т.к. он имеет очень сложную
частотную струкруру.

Привет RASH,

Thursday, January 27, 2005, 9:06:53 PM, вы писали:

R> 1 вопрос: Сидел я как-то устанавливал любимую Nero запускаю
R> кейгенератор, а там такая красивая мелодия из колонок звучит, просто
R> наслаждение одно (раньше я замечал, но что-то не шибко внимание на это
R> обращал). Так вот файлик этот всего ничего весит, каким же макером
R> туда запихали музычку, может ноты прямо в коде написали, тогда как это
R> можно сделать?? Хотелось бы узнать.
Используй формат MIDI - это фактически "ноты в коде" и весит немного.
Для проигрования нотных партий и с последующим формирования MIDI-файла
используй программу Finale 2001. В MIDI (по-моему) существует 128
инструментов - правильный подбор инструментов -> классная мелодия. А
MIDI на Delphi проигрывать не так уж и сложно: через стандартны или
JEDI компоненты.
R> 2 вопрос: Сижу слушаю обычную Winampу, и захотелось мне Чистой музыки
R> без слов. Как можно из файла любого аудиоформата вытащить музыку, если
R> это песня со словами. Я попробовал Соунд Фордж, никаких результатов,
R> нашел в Нейре функцию (для аудио дисков) называется караоке,
R> приглушает слова, но эффект небольшой, да и музыка искажается, что же
R> можно сделать?? Тоже очень интересно.
Ничего: голос (в аудио-потоке) ничем не отличается от музыки в
соответствующем волновом диапазоне. Ты можешь только заглушить или
вырезать этот диапазон, оставив только басы и писщалку, но это уже
искажения :(
Выход: искать караоке версию данной композиции.

Афоризм напоследок: Дураки - лучшие мужья для женщин.
28 января 2005 г. 21:21:59

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 3978
Возраст листа : 495 (дней)
Количество подписчиков : 523
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/306636
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

Здравствуйте !

> А кто-нить знает что энто за ошибка:
> OLE error 8275A638

Ну, наверно, ошибка COM библиотек или OLE.

> Может есть какой-нить сайтик где эти ошибки лежат с описанием. Ну
> например ткните меня в раздел на microsoft.com

Есть в винде функция FormatMessage - она в большинстве случаев
выдает сообщение для заданного кода. Надо только параметры
соответствующие указать.

Вообще, есть в VC утилита. Называется Error Lookup (наверно сделана
на основе FormatMessage) - также выдает текст по коду ошибки.
Если надо - пиши в личку, закину (систему только что переставил,
VC еще не стоит, поэтому сейчас что это за ошибка сказать не могу
точно).

На мелкософте, кстати, лежит вот утилитка:
http://www.microsoft.com/downloads/details.aspx?FamilyId=BE596899-7BB8-4208-

B7FC-09E02A13696C&displaylang=en

должно быть - то что надо (судя по описанию).

> PS: В win2k все нормально.

Аааа... ну это наверно что то типа "метод не реализован",
либо "интерфейс не реализован", или "свойство не поддерживается".

--
С уважением, Вахтуров Виктор.

Номер выпуска : 3977
Возраст листа : 495 (дней)
Количество подписчиков : 523
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/306532
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

Здравствуйте, RASH.

Вы писали 28 января 2005 г., 0:06:53:

R> 1 вопрос: Так вот файлик этот всего ничего весит, каким же макером
R> туда запихали музычку, может ноты прямо в коде написали, тогда как это
R> можно сделать?
А какое расширение у файла? Есть очень компактные форматы с потерей
качества.
R> 2 вопрос: Как можно из файла любого аудиоформата вытащить музыку, если
R> это песня со словами.

В некоторых случаях голос идет отдельным потоком, тогда его можно
убрать, иначе только исключая частоты характерные для голоса.
Соответственно в этом случае постродает и музыка.

Приветствую вас, RASH!

Вы писали 27 января 2005 г., 21:06:53:

R> Привет всем!!

R> У меня есть несколько вопросов, кто заинтересуется прошу
R> поучавствовать:
R> 1 вопрос: Сидел я как-то устанавливал любимую Nero запускаю
R> кейгенератор, а там такая красивая мелодия из колонок звучит, просто
R> наслаждение одно (раньше я замечал, но что-то не шибко внимание на это
R> обращал). Так вот файлик этот всего ничего весит, каким же макером
R> туда запихали музычку, может ноты прямо в коде написали, тогда как это
R> можно сделать?? Хотелось бы узнать.

Если музыка синтезаторная, то ничего удивительного, потому как файлы
MIDI (где как раз ноты, а точнее инструкции синтезатору, и
записываются), а если музыка в аудио-формате, то скорее всего частотта
дискретизации понижена, битрейт, и ещё сжато в какой-нибудь mp3 или
подобное...

R> 2 вопрос: Сижу слушаю обычную Winampу, и захотелось мне Чистой музыки
R> без слов. Как можно из файла любого аудиоформата вытащить музыку, если
R> это песня со словами. Я попробовал Соунд Фордж, никаких результатов,
R> нашел в Нейре функцию (для аудио дисков) называется караоке,
R> приглушает слова, но эффект небольшой, да и музыка искажается, что же
R> можно сделать?? Тоже очень интересно.

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

А какое рельное значение возвращает у тебя функция после вызова?
здесь (http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winsock/winsock/wsaasyncselect_2.asp)
есть исчерпывающая во многом инфа по этой функции и коды возвращаемых значений
(правда на буржуйском:(()

Номер выпуска : 3974
Возраст листа : 495 (дней)
Количество подписчиков : 523
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/306524
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

Glad to greet, RASH!

You seem to have written (Thursday, January 27, 2005):

R> обращал). Так вот файлик этот всего ничего весит, каким же макером
R> туда запихали музычку, может ноты прямо в коде написали, тогда как это
R> можно сделать?? Хотелось бы узнать.

Не знаю какой у тебя конкретно кряк (я ничего не слышал), но вот
возможный вариант:

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

Если интересно, посмотри мою предварительную версию генератора
инструментов (300 Кб):
http://www.smuta.boom.ru/abhorus/degen.htm

Вообще не знаю, выдел ли ты 64к демы, но во многих муззон на очень
высоком уровне.
Вот зайди на www.pouet.net и скачай топ-10 (учти, там не все 64К).
Добро пожаловать на Демосцену =) .

R> 2 вопрос: Сижу слушаю обычную Winampу, и захотелось мне Чистой музыки
R> без слов. Как можно из файла любого аудиоформата вытащить музыку, если
R> это песня со словами. Я попробовал Соунд Фордж, никаких результатов,

Результатов добиться можно, если поиграться с фильтрацией, но они
будут не лучше Неры.

R> нашел в Нейре функцию (для аудио дисков) называется караоке,
R> приглушает слова, но эффект небольшой, да и музыка искажается, что же
R> можно сделать?? Тоже очень интересно.

Опять же не хочу углубляться в физику/математику (делаю отсыл на
преобразование Фурье ;) ). Короче, энергия среднего голоска
сосредоточена на низких частотах (200 Гц - 2 КГц), вот энергию этих
частотных составляющих и надо уменьшать (полосовой режекторный фильтр).
Другое дело, когда всё записано на разные дорожки, а потом
микшируется. Тут бы ты мог контролировать какой канал отрубать, но
это не наш случай.

Alles Gute!

...In Code We Trust...

Здравствуйте, Александр.

Вы писали 27 января 2005 г., 22:33:05:

АТ> Единственное что WM_PAINT придется ловить у Form1, но это если не
АТ> хочется разбираться (ведь замена Hanlde на Panel1.Handle большого
АТ> понимания не требует) т.к. OnPaint Panel-а поймать не очень сложно.

Во всяком случае библиотека GL и GLU выводят на панель тока так.

Тем более что FormPaint перерисует и панель.. ))

Hello comp,

проблема с сокетами на WinAPI. Вот фрагмент программы - инициализация сервера
(вызывается в WM_CREATE):

bool StartSockets()
{
if(WSAStartup(0x0202, &g_wsaData))
return 0;

g_hListenSocket = socket(AF_INET,SOCK_STREAM,0);
if(INVALID_SOCKET == g_hListenSocket)
return 0;

sockaddr_in local_addr;
local_addr.sin_family=AF_INET;
local_addr.sin_port=htons(MY_PORT);
local_addr.sin_addr.s_addr=0;
if (SOCKET_ERROR == bind(g_hListenSocket, (sockaddr *) &local_addr, sizeof(local_addr)))
return 0;

if(SOCKET_ERROR == WSAAsyncSelect(g_hListenSocket, g_hWnd, WM_SERVER_ACCEPT,
FD_ACCEPT | FD_CLOSE))
return 0;

if (SOCKET_ERROR == listen(g_hListenSocket, 0x100))
return 0;

// успешно
return 1;
}

все проходит успешно. Сервер ведет себя так, как будто он работает,
т.е. клиенты могут к нему подконнеститься и т.д. Но почему-то
сообщение WM_SERVER_ACCEPT (WM_USER+3) в WindowProc не приходит! Т.е.
я не могу отловить момент, когда клиент хочет подключиться к серверу,
с тем чтобы подключить его функцией accept.
В чем может быть дело? Может быть, неправильное использование
WSAAsyncSelect? Соответствующий аналог для UDP, а также с использованием MFC
CSocket для TCP прекрасно работает, но мне нужно именно WinAPI.

Аллоха, All!
В этот знаменательный день 28 января 2005 г.
пиво ударило мне в голову, и я наскреб:

А кто-нить знает что энто за ошибка:
OLE error 8275A638

Выдает моя программа в Win98:
1) Программа на Delphi 5
2) Юзает WebBrowser (оболочка IE)
3) Юзает ShellFolder (ISHellFolder и все в таком духе + OLECheck на
функции SH****)

Скорее всего ошибка выдается на вызовах OLECheck(SH****) но проверить
это не могу.

Может есть какой-нить сайтик где эти ошибки лежат с описанием. Ну
например ткните меня в раздел на microsoft.com

PS: В win2k все нормально.

Здоровеньки булы, rddvl!

26 января 2005 г., среда, 21:40:56 (GMT+05:00), пришел ко мне
почтальон Почкин и всучил письмо с пометкой "Delphi OpenGL",
в котором сообщалось следующее:

r> Нельзя выводить на panel.

А попробовать - религия мешает?

r> D3D можно,

Да вроде uses ... OpenGL ...

r> а вот OpenGL умеет рендерить только
r> в окно.

А что езмь Panel? Не окно случаем?

r> То есть берешь контекст ОКНА,

Так? DC := GetDC (Panel1.Handle);

r> а затем вызываешь glViewport с
r> нужными параметрами для вывода в определенную область окна.

Так? glViewPort (0, 0, Panel1.ClientWidth, Panel1.ClientHeight);

Единственное что WM_PAINT придется ловить у Form1, но это если не
хочется разбираться (ведь замена Hanlde на Panel1.Handle большого
понимания не требует) т.к. OnPaint Panel-а поймать не очень сложно.