Разработка, производство и продажа радиоэлектронной аппаратуры
|
Требуется программист в Зеленограде - обработка данных с датчиков; ColdFire; 40 тыс.
e-mail: jobsmp@pochta.ru
|
// Ноты
#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 }
};
Составить ответ | Вернуться на конференцию
Ответы