Beep() - музыка из динамика

@Temirlan90 · Регистрация: 30.09.2010

Author24 — интернет-сервис помощи студентам

Сидел на форуме и на толкнулся на функцию Beep(). Есть ли у кого нибудь исходники с музыкой из встроенных динамиков в ПК??=)
Вот пример "Елочка"

C++

#include <windows.h>
 
int main() {
    Beep(247, 500);
    Beep(417, 500);
    Beep(417, 500);
    Beep(370, 500);
    Beep(417, 500);
    Beep(329, 500);
    Beep(247, 500);
    Beep(247, 500);
    Beep(247, 500);
    Beep(417, 500);
    Beep(417, 500);
    Beep(370, 500);
    Beep(417, 500);
    Beep(497, 500);
    Sleep(500);
    Beep(497, 500);
    Beep(277, 500);
    Beep(277, 500);
    Beep(440, 500);
    Beep(440, 500);
    Beep(417, 500);
    Beep(370, 500);
    Beep(329, 500);
    Beep(247, 500);
    Beep(417, 500);
    Beep(417, 500);
    Beep(370, 500);
    Beep(417, 500);
    Beep(329, 500);    
    system("pause >> void");
}

Добавлено через 4 часа 18 минут
Вот ещё один пример :

C++

#include <iostream>
#include <windows.h>
 
int main() {
    Beep(1480,200);   
    Beep(1568,200);   
    Beep(1568,200);   
    Beep(1568,200);      
    Beep(739.99,200);   
    Beep(783.99,200);   
    Beep(783.99,200);   
    Beep(783.99,200);         
    Beep(369.99,200);   
    Beep(392,200);   
    Beep(369.99,200);   
    Beep(392,200);   
    Beep(392,400);   
    Beep(196,400);       
    Beep(739.99,200);  
    Beep(783.99,200);   
    Beep(783.99,200);   
    Beep(739.99,200);   
    Beep(783.99,200);   
    Beep(783.99,200);   
    Beep(739.99,200);   
    Beep(783.99,200);   
    Beep(880,200);   
    Beep(830.61,200);   
    Beep(880,200);   
    Beep(987.77,400);  
    Beep(880,200);   
    Beep(783.99,200);   
    Beep(698.46,200);   
    Beep(739.99,200);   
    Beep(783.99,200);   
    Beep(783.99,200);   
    Beep(739.99,200);   
    Beep(783.99,200);   
    Beep(783.99,200);   
    Beep(739.99,200);   
    Beep(783.99,200);   
    Beep(880,200);   
    Beep(830.61,200);   
    Beep(880,200);   
    Beep(987.77,400);   
    Sleep(200);     
    Beep(1108,10);
    Beep(1174.7,200);
    Beep(1480,10);
    Beep(1568,200);   
    Sleep(200);
    Beep(739.99,200);   
    Beep(783.99,200);   
    Beep(783.99,200);   
    Beep(739.99,200);   
    Beep(783.99,200);   
    Beep(783.99,200);   
    Beep(739.99,200);   
    Beep(783.99,200);   
    Beep(880,200);   
    Beep(830.61,200);   
    Beep(880,200);   
    Beep(987.77,400);      
    Beep(880,200);   
    Beep(783.99,200);   
    Beep(698.46,200);   
    Beep(659.25,200);   
    Beep(698.46,200);   
    Beep(784,200);   
    Beep(880,400);   
    Beep(784,200);   
    Beep(698.46,200);   
    Beep(659.25,200);    
    Beep(587.33,200);   
    Beep(659.25,200);   
    Beep(698.46,200);   
    Beep(784,400);   
    Beep(698.46,200);   
    Beep(659.25,200);   
    Beep(587.33,200);       
    Beep(523.25,200);   
    Beep(587.33,200);   
    Beep(659.25,200);   
    Beep(698.46,400);   
    Beep(659.25,200);   
    Beep(587.33,200);   
    Beep(493.88,200);   
    Beep(523.25,200);    
    Sleep(400);
    Beep(349.23,400);   
    Beep(392,200);   
    Beep(329.63,200);   
    Beep(523.25,200);   
    Beep(493.88,200);   
    Beep(466.16,200);       
    Beep(440,200);   
    Beep(493.88,200);   
    Beep(523.25,200);   
    Beep(880,200);   
    Beep(493.88,200);   
    Beep(880,200);   
    Beep(1760,200);   
    Beep(440,200);      
    Beep(392,200);   
    Beep(440,200);   
    Beep(493.88,200);   
    Beep(783.99,200);   
    Beep(440,200);   
    Beep(783.99,200);   
    Beep(1568,200);   
    Beep(392,200);       
    Beep(349.23,200);   
    Beep(392,200);   
    Beep(440,200);   
    Beep(698.46,200);   
    Beep(415.2,200);   
    Beep(698.46,200);   
    Beep(1396.92,200);   
    Beep(349.23,200);      
    Beep(329.63,200);   
    Beep(311.13,200);   
    Beep(329.63,200);   
    Beep(659.25,200);   
    Beep(698.46,400);   
    Beep(783.99,400);      
    Beep(440,200);   
    Beep(493.88,200);   
    Beep(523.25,200);   
    Beep(880,200);   
    Beep(493.88,200);   
    Beep(880,200);   
    Beep(1760,200);   
    Beep(440,200);       
    Beep(392,200);   
    Beep(440,200);   
    Beep(493.88,200);   
    Beep(783.99,200);   
    Beep(440,200);   
    Beep(783.99,200);   
    Beep(1568,200);   
    Beep(392,200);       
    Beep(349.23,200);   
    Beep(392,200);   
    Beep(440,200);   
    Beep(698.46,200);   
    Beep(659.25,200);   
    Beep(698.46,200);   
    Beep(739.99,200);   
    Beep(783.99,200);   
    Beep(392,200);   
    Beep(392,200);   
    Beep(392,200);   
    Beep(392,200);   
    Beep(196,200);   
    Beep(196,200);   
    Beep(196,200);       
    Beep(185,200);   
    Beep(196,200);   
    Beep(185,200);   
    Beep(196,200);   
    Beep(207.65,200);   
    Beep(220,200);   
    Beep(233.08,200);   
    Beep(246.94,200);
    /*for(int i = 0; i < 100; i++)
            printf("\a");*/    
    system("pause >> void");
}

Неужто ни у кого нету??? Или ссылки какие нибудь.

@Somebody · 28.01.2011, 18:52

Надо, наверное, найти, какая нота имеет какую частоту:
Вот в Википедии есть
а дальше искать ноты.

@Temirlan90 · 28.01.2011, 18:57 **[ТС]**

Надо, наверное, найти, какая нота имеет какую частоту:
Вот в Википедии есть а дальше искать ноты.

Ага, если я бы в них еще что то понимал бы)))

@ser4ega · 28.01.2011, 22:38

начало из марио=)

C++

Beep (659.26,200);
          Beep (659.26,200);
          Sleep (200);
          Beep (659.26,200);
          Sleep (100);
          Beep (523.26,200);
          Beep (659.26,200);
          Sleep(200);
          Beep (783.98,200);
          Sleep(400);
          Beep (391.99,200);

AnonymC · 28.01.2011, 22:48

пианино

C++

void pianino (int freq){
                switch(getch()){
        case 'a':{system("cls");
                         Beep(500,freq);
                         }
                         break;
                         case 's':{system("cls");
                         Beep(523.25,freq);
                         }
                         break;
                         case 'd':{system("cls");
                         Beep(587.33,freq);
                         }
                         break;
                                 case 'f':{system("cls");
                         Beep(659.26,freq);
                         }
                         break;
                                 case 'g':{system("cls");
                         Beep(698.46,freq);
                         }
                         break;
                                 case 'h':{system("cls");
                         Beep(783.99,freq);
                         }
                         break;
                                 case 'j':{system("cls");
                         Beep(880,freq);
                         }
                         break;
                                 case 'k':{system("cls");
                         Beep(987.77,freq);
                         }
                         break;
                
        }
}

Добавлено через 4 минуты
а у меня что то звука нет..ни в наушниках, ни из сис.динамика

@Iron Bug · 28.01.2011, 23:10

Сообщение от ^Tecktonik_KiLLeR

а у меня что то звука нет..ни в наушниках, ни из сис.динамика

это под вендой работает вроде, а под линём надо через управление пищалкой делать. я помню, что эта задача всплывала и её уже решали.
вот одно из решений, кстати:
http://www.frank-buss.de/beep/index.html
но там, помнится, были какие-то траблы даже с таким решением. нужно было какой-то особый драйвер для звука ставить или что-то вроде.

@x1Mike7x · 29.01.2011, 00:30

В "Ёлочке" как-то немного нелогично растянут код, потому что, например, этот фрагмент:

C

    Beep(497, 500);
    Beep(277, 500);
    Beep(277, 500);
    Beep(440, 500);
    Beep(440, 500);
    Beep(417, 500);

...можно переписать так:

C

    Beep(497, 500);
    Beep(277, 1000);
    Beep(440, 1000);
    Beep(417, 500);

но это такое...))

@Iron Bug · 29.01.2011, 00:38

Сообщение от x1Mike7x

В "Ёлочке" как-то немного нелогично растянут код

не, объединять их нельзя. просто между нотами должны быть маленькие паузы. стакатто. примерно по 1/64 длительности "целой" ноты. а то будет каша.

@x1Mike7x · 29.01.2011, 01:14

Сообщение от Iron Bug

не, объединять их нельзя. просто между нотами должны быть маленькие паузы. стакатто. примерно по 1/64 длительности "целой" ноты. а то будет каша.

Ну тогда нужно сделать:

C

1
2
3

    Beep(277, 500);
    Sleep(1.0/64 * 500);
    Beep(277, 500);

потому что не думаю, что пауза (причём незаметная глазом/ухом/горлом/носом) между вызовом функций является по длительности именно "стакатто" =)

AnonymC · 29.01.2011, 10:22

Iron Bug, я никогда не буду держать в компе линукс

Вывод,у меня "венда"

@dxdy · 29.01.2011, 12:49

Не по теме:

я никогда не буду держать в компе линукс

Не говори "Ап" пока не перепрыгнул :D

@Temirlan90 · 29.01.2011, 14:49 **[ТС]**

Может у кого нибудь есть исходники?=)

@+c+ · 29.01.2011, 15:01

попробуй ради интереса, если хочеш закрепить знания по этому вопросу, придумай что-то похожее на пианино! Что-то в этом роде:

Код

#define KEYDOWN(vk_code) ((GetAsyncKeyState(vk_code) & 0x8000) ? 1 : 0)
#define KEYUP(vk_code)   ((GetAsyncKeyState(vk_code) & 0x8000) ? 0 : 1)
while(!KEYDOWN(VK_ESCAPE))
...

и в цикле обработка клавиш. Можно даже играть и сразу записывать код Beep - герцы в переменную! и потом прослушать запись

@Temirlan90 · 29.01.2011, 15:03 **[ТС]**

А есть у кого нибудь готовое?

AnonymC · 29.01.2011, 17:03

Temirlan90, думаю тебе будет лучше скачать Вирт. пианино...там и для проф-ов будет

@x1Mike7x · 29.01.2011, 18:26

Программа воспроизводящая звуки

@alfiya69 · 05.02.2011, 18:10

помогите)
мне вообще нужно разработать блок-схему алгоритма и ПРОГРАММУ на языке Ассемблере К580, воспроизводящюю при помощи встроенного генератора мелодию "Кузнечик"

@Temirlan90 · 05.02.2011, 18:12 **[ТС]**

alfiya69, Вам сюда https://www.cyberforum.ru/assembler/

@alfiya69 · 05.02.2011, 18:22

что-то там ничего нет((((

@Temirlan90 · 05.02.2011, 18:23 **[ТС]**

Не по теме:

alfiya69, лично, я Вам ничем не могу помочь. Я в ассемблера мало чего понимаю.

@Somebody 2835 / 1644 / 254 Регистрация: 03.12.2007 Сообщений: 4,222
	28.01.2011, 18:52	2
	Надо, наверное, найти, какая нота имеет какую частоту: Вот в Википедии есть а дальше искать ноты. 0

@Temirlan90 137 / 137 / 25 Регистрация: 30.09.2010 Сообщений: 333
	28.01.2011, 18:57 [ТС]	3
	Надо, наверное, найти, какая нота имеет какую частоту: Вот в Википедии есть а дальше искать ноты. Ага, если я бы в них еще что то понимал бы))) 0

@Iron Bug 22 / 22 / 2 Регистрация: 06.12.2010 Сообщений: 125
	28.01.2011, 23:10	6
	Сообщение от ^Tecktonik_KiLLeR а у меня что то звука нет..ни в наушниках, ни из сис.динамика это под вендой работает вроде, а под линём надо через управление пищалкой делать. я помню, что эта задача всплывала и её уже решали. вот одно из решений, кстати: http://www.frank-buss.de/beep/index.html но там, помнится, были какие-то траблы даже с таким решением. нужно было какой-то особый драйвер для звука ставить или что-то вроде. 0

@Iron Bug 22 / 22 / 2 Регистрация: 06.12.2010 Сообщений: 125
	29.01.2011, 00:38	8
	Сообщение от x1Mike7x В "Ёлочке" как-то немного нелогично растянут код не, объединять их нельзя. просто между нотами должны быть маленькие паузы. стакатто. примерно по 1/64 длительности "целой" ноты. а то будет каша. 0

AnonymC 1183 / 468 / 87 Регистрация: 23.06.2009 Сообщений: 6,390
	29.01.2011, 10:22	10
	Iron Bug, я никогда не буду держать в компе линуксВывод,у меня "венда" 0

@dxdy
	29.01.2011, 12:49 #11
	Не по теме: я никогда не буду держать в компе линукс Не говори "Ап" пока не перепрыгнул :D 1

@Temirlan90 137 / 137 / 25 Регистрация: 30.09.2010 Сообщений: 333
	29.01.2011, 14:49 [ТС]	12
	Может у кого нибудь есть исходники?=) 0

@+c+ 112 / 22 / 3 Регистрация: 20.11.2010 Сообщений: 1,294
	29.01.2011, 15:01	13
	попробуй ради интереса, если хочеш закрепить знания по этому вопросу, придумай что-то похожее на пианино! Что-то в этом роде: Код #define KEYDOWN(vk_code) ((GetAsyncKeyState(vk_code) & 0x8000) ? 1 : 0) #define KEYUP(vk_code) ((GetAsyncKeyState(vk_code) & 0x8000) ? 0 : 1) while(!KEYDOWN(VK_ESCAPE)) ... и в цикле обработка клавиш. Можно даже играть и сразу записывать код Beep - герцы в переменную! и потом прослушать запись 1

@Temirlan90 137 / 137 / 25 Регистрация: 30.09.2010 Сообщений: 333
	29.01.2011, 15:03 [ТС]	14
	А есть у кого нибудь готовое? 1

AnonymC 1183 / 468 / 87 Регистрация: 23.06.2009 Сообщений: 6,390
	29.01.2011, 17:03	15
	Temirlan90, думаю тебе будет лучше скачать Вирт. пианино...там и для проф-ов будет 1

@x1Mike7x 222 / 135 / 19 Регистрация: 06.11.2010 Сообщений: 234
	29.01.2011, 18:26	16
	Программа воспроизводящая звуки 0

@alfiya69 1 / 1 / 0 Регистрация: 11.12.2010 Сообщений: 14
	05.02.2011, 18:10	17
	помогите) мне вообще нужно разработать блок-схему алгоритма и ПРОГРАММУ на языке Ассемблере К580, воспроизводящюю при помощи встроенного генератора мелодию "Кузнечик" 0

@Temirlan90 137 / 137 / 25 Регистрация: 30.09.2010 Сообщений: 333
	05.02.2011, 18:12 [ТС]	18
	alfiya69, Вам сюда https://www.cyberforum.ru/assembler/ 1

@alfiya69 1 / 1 / 0 Регистрация: 11.12.2010 Сообщений: 14
	05.02.2011, 18:22	19
	что-то там ничего нет(((( 0

@Temirlan90
	05.02.2011, 18:23 [ТС] Beep() - музыка из динамика #20
	Не по теме: alfiya69, лично, я Вам ничем не могу помочь. Я в ассемблера мало чего понимаю. 1