Телесистемы
 Разработка, производство и продажа радиоэлектронной аппаратуры
На главную   | Карта сайта | Пишите нам | В избранное
Требуется программист в Зеленограде
- обработка данных с датчиков; ColdFire; 40 тыс.
e-mail:jobsmp@pochta.ru

Телесистемы | Электроника | Конференция «Микроконтроллеры и их применение»

пользуйся

Отправлено ,,, 02 декабря 2008 г. 18:19
В ответ на: Сигнал для будильника нужен примитивный отправлено <font color=gray>ВМФ</font> 02 декабря 2008 г. 16:06

// Ноты

‎#define CEL ‎32 ‎// ‎1/1‎
‎#define SEM‎ ‎16‎ ‎// ‎1/2‎
‎#define QV‎ 8‎ ‎ //‎ ‎1/4‎
‎#define D_Cr‎ ‎6 ‎// ‎3/16‎
‎#define Cr‎ 4‎ ‎// ‎1/8‎
‎#define Qu‎ ‎2 ‎// ‎1/16‎
‎#define SQ‎ ‎1 ‎// ‎1/32‎

‎#define C1‎ ‎262 // ‎-> До‎
‎#define Cis1‎ 278 // ‎-> До Диез‎
‎#define D1‎ ‎294 // ‎-> Ре‎
‎#define Dis1‎ 312 // ‎-> Ре Диез‎
‎#define E1‎ ‎330 // ‎-> Ми‎
‎#define F1‎ ‎350 // ‎-> Фа‎
‎#define Fis1‎ ‎370 //‎ ‎-> Фа Диез‎
‎#define G1‎ ‎392 // ‎-> Соль‎
‎#define Gis1‎ 416 // ‎-> Соль Диез‎
‎#define A1‎ ‎440 // ‎-> Ля‎
‎#define Ais1‎ 467 // ‎-> Ля Диез‎
‎#define H1‎ ‎495 // ‎-> Си‎

‎#define C2‎ ‎523 //‎ -> До‎
‎#define Cis2‎ ‎554 // ‎-> До Диез‎
‎#define D2‎ ‎588 // ‎-> Ре‎
‎#define Dis2‎ 623 // ‎-> Ре Диез‎
‎#define E2‎ 660 // ‎-> Ми‎
‎#define F2‎ ‎699 // ‎-> Фа‎
‎#define Fis2‎ 741 //‎ ‎-> Фа Диез‎
‎#define G2‎ ‎785 //‎ -> Соль‎
‎#define Gis2‎ 830 // ‎-> Соль Диез‎
‎#define A2‎ ‎880 // ‎-> Ля‎
‎#define H2‎ ‎988 // ‎-> Си‎

‎#define C3‎ ‎1048 // -> До‎
‎#define Cis3‎ ‎1112 // -> До Диез‎
‎#define D3‎ ‎1176 // -> Ре‎
‎#define Dis3‎ ‎1248 // -> Ре Диез‎
‎#define‎ E3‎ ‎1320 //‎ -> Ми‎
‎#define‎ F3 ‎1400 // -> Фа‎
‎#define Fis3‎ ‎1480 // -> Фа Диез‎

‎#define Silence‎ 0

typedef struct ‎
‎{‎
‎ short frq;‎
short dur;‎
‎} mus;

// Собственно мелодии

‎/* "Бумер" */‎
‎#define BUMER_LAENGE 35‎
const mus Bumer[BUMER_LAENGE] =‎
‎{‎
‎{ Silence, SQ },‎
‎{ E2, Cr },‎
‎{ G2, QV },‎
‎{ Silence, SEM },‎
‎{ G2, Cr },‎
‎{ E2, QV },‎
‎{ Silence, SEM },‎
‎{ A2, Cr },‎
‎{ G2, Cr },‎
‎{ A2, Cr },‎
‎{ G2, Cr },‎
‎{ A2, Cr },‎
‎{ G2, Cr },‎
‎{ A2, Cr },‎
‎ { G2, Cr },‎
‎{ A2, Cr },‎
‎{ H2, QV },‎
‎{ Silence, SEM },‎
‎{ E2, Cr },‎
‎{ G2, QV },‎
‎{ Silence, SEM },‎
‎{ G2, Cr },‎
‎{ E2, QV },‎
‎{ Silence, SEM },‎
‎{ A2, Cr },‎
‎{ G2, Cr },‎
‎{ A2, Cr },‎
‎{ G2, Cr },‎
‎{ A2, Cr },‎
‎{ G2, Cr },‎
‎{ A2, Cr },‎
‎{ G2, Cr },‎
‎{ A2, Cr },‎
‎{ H2, QV },‎
‎{ Silence, SQ }‎
‎};‎

‎/* "Листья" */‎
‎#define LIST_LAENGE 50‎
const mus List [LIST_LAENGE] =‎
‎{
‎{ Silence, SQ },‎
‎{ A2, QV },‎
‎{ H2, QV },‎
‎{ C3, QV },‎
‎{ H2, D_Cr },‎
‎{ A2, SEM },‎
‎{ E2, 3 },‎
‎{ C3, QV },‎
‎{ H2, D_Cr },‎
‎{ A2, QV },‎
‎{ E2, QV },‎
‎{ G2, SEM },‎
‎{ F2, CEL },‎
‎{ H1, QV },‎
‎{ C2, QV },‎
‎{ E2, QV },‎
‎{ D2, D_Cr },‎
‎{ H1, SEM },‎
‎{ E1, 3 },‎
‎{ E2, QV },‎
‎{ D2, D_Cr },‎
‎{ C2, QV },‎
‎{ Gis1, 12 },‎
‎{ H1, SEM },‎
‎{ A1, CEL },‎
‎{ A2, QV },‎
‎{ H2, QV },‎
‎ { C3, QV },‎
‎{ H2, D_Cr },‎
‎{ A2, SEM },‎
‎{ E2, 3 },‎
‎{ C3, D_Cr },‎
‎{ H2, QV },‎
‎{ A2, QV },‎
‎{ E2, 12 },‎
‎{ G2, SEM },‎
‎{ F2, CEL },‎
‎{ H1, QV },‎
‎{ C2, QV },‎
‎{ E2, QV },‎
‎{ D2, D_Cr },‎
‎{ H1, SEM },‎
‎{ E1, 3 },‎
‎ { E2, QV },‎
‎{ D2, QV },‎
‎{ C2, QV },‎
‎{ Gis1, QV },‎
‎{ H1, SEM },‎
‎{ A1, CEL },‎
‎{ Silence, Qu }‎
‎};‎

‎/* "Служебный роман" */‎
‎#define ROMAN_LAENGE 44‎
const mus Roman [ROMAN_LAENGE] =‎
‎{‎
‎ { Silence, SQ },‎
‎{ C2, Cr },‎
‎{ F2, Cr },‎
‎{ G2, Cr },‎
‎{ Gis2, Cr },‎
‎{ G2, Cr },‎
‎{ G2, Cr },‎
‎{ F2, Cr },‎
‎{ F2, Cr },‎
‎{ E2, Cr },‎
‎{ D2, Cr },‎
‎{ E2, Cr },‎
‎{ F2, QV },‎
‎{ Silence, 12 },‎
‎{ C2, Cr },‎
‎{ Cis2, Cr },‎
‎{ C2, Cr },‎
‎{ Ais1, QV },‎
‎{ Silence, 12 },‎
‎{ F2, Cr },‎
‎{ G2, Cr },‎
‎{ F2, Cr },‎
‎{ E2, QV },‎
‎{ Silence, 12 },‎
‎{ C2, Cr },‎
‎{ F2, Cr },‎
‎{ G2, Cr },‎
‎{ Gis2, Cr },‎
‎{ G2, Cr },‎
‎{ G2, Cr },‎
‎{ F2, Cr },‎
‎{ F2, Cr },‎
‎{ E2, Cr },‎
‎{ D2, Cr },‎
‎{ E2, Cr },‎
‎{ F2, QV },‎
‎{ Silence, 12 },‎
‎{ F2, Cr },‎
‎{ G2, Cr },‎
‎{ Gis2, Cr },‎
‎{ G2, SEM },‎
‎{ F2, QV },‎
‎{ G2, QV },‎
‎{ Silence, SQ }‎
‎};‎


Составить ответ | Вернуться на конференцию

Ответы


Отправка ответа
Имя*: 
Пароль: 
E-mail: 
Тема*:

Сообщение:

Ссылка на URL: 
URL изображения: 

если вы незарегистрированный на форуме пользователь, то
для успешного добавления сообщения заполните поле, как указано ниже:
введите число 654:

Перейти к списку ответов | Конференция | Раздел "Электроника" | Главная страница | Карта сайта

Rambler's Top100 Рейтинг@Mail.ru
 
Web telesys.ru