Ви не увійшли. Будь ласка, увійдіть або зареєструйтесь.
Ласкаво просимо вас на україномовний форум з програмування, веб-дизайну, SEO та всього пов'язаного з інтернетом та комп'ютерами.
Будемо вдячні, якщо ви поділитись посиланням на Replace.org.ua на інших ресурсах.
Для того щоб створювати теми та надсилати повідомлення вам потрібно Зареєструватись.
Український форум програмістів → C++ → Ноти та C++
Для відправлення відповіді ви повинні увійти або зареєструватися
Необхідна ваша допомога, потрібно реалізувати програму, яка б програвала ноти за допомогою MIDI.
Наприклад є стрічка з нотами: 8g1 4c2 8.g1 16a1 4b1 8e1 8e1 4a1 8.g1 16f1 4g1 8c1 8c1 4d1 8d1 8e1 4f1 чи щось, подібне, ми її зчитуєм (всерівно звідки, чи файлу, чи форми, чи з самого коду програми), а далі через міді вони програються)
Дякую.
ні, я лише прошу допомогти мені з реалізацією саме програвання нот і тільки.
- потрібно реалізувати програму, яка б програвала ноти
- Тобто ви хочете щоб ми написали за вас програму?
- прошу допомогти мені з реалізацією саме програвання нот і тільки.
Або я півсонний, або тема - лауреат на переміщення до Залу Слави. 
Як варіант згодуйте АПІ функції PlaySound готовий міді файл
Очі.завидющі, в тому то й справа, що варіант не зовсім підходить)
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include <tchar.h>
#include <windows.h>
#include <iostream.h>
#include <mmsystem.h>
//---------------------------------------------------------------------------
#pragma argsused
int _tmain(int argc, _TCHAR* argv[])
{
HMIDIOUT handle;
unsigned int DEFAULT_DEVICE = 0; // Default MIDI Device
DWORD NoteC = 0x00403c90;
DWORD NoteE = 0x00404090;
DWORD NoteG = 0x00404390;
if(!midiOutOpen(&handle, DEFAULT_DEVICE, 0,0, CALLBACK_NULL))
{
midiOutShortMsg(handle, NoteC);
Sleep(250);
midiOutShortMsg(handle, NoteE);
Sleep(250);
midiOutShortMsg(handle, NoteG);
Sleep(1500);
}
else
cout << "Error Opening Default MIDI Device" << endl;
return 0;
}
//---------------------------------------------------------------------------ось дещо найшов, під білдер переробив, працює) залишилось, зробити так, щоб звучало більше ніж три рази і все те що задам, якось через потік?. Ну а форму прикрутити, то вже не складає проблем)
Зчитайте рядок, розпарсіть у масив елементів Нота і Пауза (або як зручніше) і в циклі по масиву юзаєте midiOutShortMsg().
З.І: та, і вибачаюся - тема таки не з "халявопитних". Тож то я півсонний був.
@Equa
Вірним шляхом, йдете, камраде. Я раджу подивитись ще на страшне породження Chiptune (чиптюну) - Music Macro Language, який так люблять японці. І помолившись на зорі каменюкам, додайте його до своєї програми. Я впевнений, що бібліотеки існують для будь-якої мови програмування.
Дуже вдячний за корисні відповіді)
Bartash, Так швидше за все і зроблю, щось не маю бажання придумувати "ровер")
Та й справа тут на більш-менш курсову)
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include <tchar.h>
#include <windows.h>
#include <iostream.h>
#include <mmsystem.h>
//---------------------------------------------------------------------------
#pragma argsused
int _tmain(int argc, _TCHAR* argv[])
{
HMIDIOUT handle;
unsigned int DEFAULT_DEVICE = 0; // Default MIDI Device
DWORD Note1;
unsigned int i = 0;
unsigned int a[]={
0x007f3c90,
0x60003c90,
0x007f3e90,
0x60003e90,
0x007f4090,
0x60004090,
0x007f4190,
0x60004190,
0x097f4390,
0x60004590,
0x007f4590,
0x60004590,
0x007f4790,
0x60004790,
0x007f4890,
0x60004890,
0};
if(!midiOutOpen(&handle, DEFAULT_DEVICE, 0,0, CALLBACK_NULL))
{
while(a[i])
{
Note1=a[i];
midiOutShortMsg(handle, Note1);
Sleep(250);
i++;
}
}
else
cout << "Error Opening Default MIDI Device" << endl;
return 0;
}
//---------------------------------------------------------------------------На швидку руку, вийшло щось таке)
Ще підкажіть будь ласка, як інструмент з піаніно на щось інше змінити, пробував через midiOutCacheDrumPatches, це або не те, що треба, або в мене з ним щось "не клеїться")))
Ця функція лише для зовнішніх пристроїв.
This function applies only to internal MIDI synthesizer devices.
Гляньте на midiOutGetDevCaps та midiOutGetNumDevs. Тобто останньою функцією створюєте список інструментів й обираєте потрібний за допомогою midiOutGetDevCaps.
Equa
Ви ж використовуєте
unsigned int DEFAULT_DEVICE = 0; // Default MIDI DeviceUPD:
як інструмент з піаніно на щось інше змінити
додайте перед надсиланням месседжу з нотами цей код:
int Instrument = 128 -1; //instrument from the list below
int Volume = 10;
midiOutShortMsg(handle, (Volume << 16) | (Instrument << 8) | 0xC0); // Set instrumentUPD_2: До речі, якщо Вам цікаво, то за допомогою цієї таблиці можна отримати повний контроль над міді пристроєм
Ще підкажіть будь ласка, як інструмент з піаніно на щось інше змінити, пробував через midiOutCacheDrumPatches, це або не те, що треба, або в мене з ним щось "не клеїться")))
А ще раз можна, будь-ласка? Не зрозумів формулювання цілі. 
Стандартний інструмент - піаніно, а Equa треба інший - саксофон, наприклад. Що тут неясно?
Стандартний інструмент - піаніно, а Equa треба інший - саксофон, наприклад. Що тут неясно?
Та вже прокурив. Попередній пост Chemist-i серед ночі не вгледів.
Шановний Bartash, щож Ви не спите ночами?
Шановний Bartash, щож Ви не спите ночами?
Перегнав на форму, добавив зміну інструментів через вибір в комбобокс, зміну довжини ноти.
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit2.h"
#include <windows.h>
#include <iostream.h>
#include <mmsystem.h>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
HMIDIOUT handle; //ініціалізуємо midi
void __fastcall TForm2::Button1Click(TObject *Sender)
{
unsigned int DEFAULT_DEVICE = 0; // MIDI пристрій по-замовчуванню
DWORD Note1; //наша нота
int Instrument; //ініціалізуємо змінну інструментів
//Вибираєм інструмент
switch(ComboBox1->ItemIndex)
{
case 0 :
Instrument = 1;
break;
case 1 :
Instrument = 28;
break;
case 2:
Instrument = 118;
break;
case 3:
Instrument = 66;
break;
}
int Volume = 10;
unsigned int i = 0;
unsigned int a[]={
0x60003e90,
0x60003c90,
0x007f3e90,
0x497f5390,
0x60004590,
0x007f4590,
0x60004590,
0x007f4790,
0x60004790,
0x007f4890,
0x60004890,
0x60004190,
0x097f4390,
0x60004590,
0x007f4590,
0x60004590,
0x007f4790,
0x60004790,
0x007f4890,
0x60004890,
0};
if(!midiOutOpen(&handle, DEFAULT_DEVICE, 0,0, CALLBACK_NULL))
{
midiOutShortMsg(handle, (Volume << 16) | (Instrument << 8) | 0xC0); // Set instrument
while(a[i])
{
Note1=a[i];
midiOutShortMsg(handle, Note1);
Sleep(StrToInt( Edit1->Text));
i++;
}
}
else
Edit2->Text="Не ініціалізовано MIDI пристрій";
midiOutClose(handle);
}
//---------------------------------------------------------------------------Ще би тепер з нотами розібратись, в якому форматі їх вводити в поле мемо, і як адекватно перегнати в вигляд типу "0x60003e90", пробував підставляти ці самі числа в десятковому вигляді, теж працює
Equa
Я б Вам радив зробити простенький інтерпретатор, наприклад:
SetInst( Piano );
1e3 2d2 3e7 3g8;
end;Де, SetInst - зрозуміло,
1e3 - нота Мі, третьої октави ціла,
2d2 - нота Ре, другої октави половинна,
3e7 - нота Мі, сьомої октави четвертна,
3g8 - нота Соль, восьмої октави четвертна;
Інтерпретується це досить просто у борляндії є AnsiCompareText та AnsiCompareStr (не пам_ятаю як з ними працювати) але суть ясна, розбиваєте весь рядок на "слова" (які одділяються одне від одного пробілами та службовими символами (всіякими "<>=-()@" і т.д.) у якийсь массивчик, після чого кожну ноту обробляєте (можна у циклі) спочатку довжина (встановлюється затримка), потім сама нота, і потім октава.
Розбор на Вашому прикладі (0x60003e90) - тут 3E h = 62 dec -> D4 (converter тут) - це нота Ре четвертої октави.
upd: якщо хочте виділити саму ноту у змінну - можна зробити так:
unsigned char Note = 0x3е;
unsigned int Note1 = 0x60003e90 | Note << 8;і потім Note1 підставляєте у міді месседж
Корисні лінки:
Тривалість нот;
Самі ноти (обережно москалі)
Виправив повідомлення, трохи не правильно привів тлумачення ноти ( у 0x60003e90 )
Для відправлення відповіді ви повинні увійти або зареєструватися