PureBasic

Avez-vous déjà fait de mini "mélodie" avec l'API beep de ce type là

#durer = 100
Beep_(1000, #durer): Beep_(2000, #durer) : Beep_(3000, #durer) :Beep_(4000, #durer)

mélodie est un bien grand mot mais j'ai pas trouvé mieux

Je suis interessé par ce genre de son

Si vous en avez, merci de les partager

je sais plus qui a deja posté ça ! :

Code : Tout sélectionner

 do1=100
re=200
mi=300
fa=400
sol=500
la=600
si=700



 

Beep_(sol,250)
Beep_(sol,250)
Beep_(sol,250)
Beep_(la,250)
Beep_(si,500)
Beep_(la,500)
Beep_(sol,250)
Beep_(si,250)
Beep_(la,250)
Beep_(la,250)
Beep_(sol,500)
Delay (500)
Beep_(la,250)
Beep_(la,250)
Beep_(la,250)
Beep_(la,250)
Beep_(mi,500)
Beep_(mi,500)
Beep_(la,250)
Beep_(sol,250)
Beep_(fa,250)
Beep_(mi,250)
Beep_(re,1000)

Beep_(sol,250)
Beep_(sol,250)
Beep_(sol,250)
Beep_(la,250)
Beep_(si,500)
Beep_(la,500)
Beep_(sol,250)
Beep_(si,250)
Beep_(la,250)
Beep_(la,250)
Beep_(fa,1000)
Delay (2000)

Oui je l'ai écouté mais je veux une durée courte

Il doit bien traîner des bouts de codes sur des ordis

Denis a écrit :Oui je l'ai écouté mais je veux une durée courte

??? durée courte ??

si on écoute

Code : Tout sélectionner

#durer = 100
Beep_(1000, #durer): Beep_(2000, #durer) : Beep_(3000, #durer) :Beep_(4000, #durer)

c'est assez court

le blem chez moi c'est que beep_() ne donne aucun son !

(win xp pro) .... faudra que je verifie si mon speaker interne est branché

Ben moi nonplus ça donne rien sauf un beep windows, mais c parce que je suis sous 98.

gansta93 a écrit :Ben moi nonplus ça donne rien sauf un beep windows, mais c parce que je suis sous 98.

Ca fait ça sous Win98 ?

Etrange...

Je confirme...

Dri

Dr. Dri a écrit :Je confirme...

Dri

Alors le code posté plus haut avec plusieurs notes, vous n'entendez pratiquement rien ?

Moi j'ai le ding.wav qui se joue...

Dri

C normal, l'API Beep_() n'est pas suportée de la même manière sous architecture 9X que sous l'architecture NT.
Sous 9X, les paramètres de durée et de fréquence sont ignorées, contrairement à nt. @Dobro : sous XP Pro, oui ça doit être un problème avec ton haut-parleur interne.

d'apres comparaisons avec ma Guitare la fonction beep_
fonctionne avec les vrais frequences du son !!
certain vont penser que je debarque , mais en Stos Basic par exemple les
frequences données dans le bouquin sont completement differente ! ...

voici le lien qui donne le tableau des frequences qui fonctionnent avec la fonction Beep

http://musiweb.free.fr/tableaux/tableau ... _hertz.htm

ps : c'etait bien mon hp qui n'etait pas branché !!

voici la gamme par demi ton traduit en purebasic
j'ai volontairement arrondi les frequences ,car il semble que l'api n'accepte pas des flotants en parametre ! ..
j'ai choisi d'utiliser les tableaux (dim) car cela permet de mettre facilement l'octave dans le nom de variable sans que cela complique l'affichage et la lecture de celle-ci

bien sur do_d veux dire "do diese" (do#)
petit rapelle pour les nul en musique

il n'y a pas de demi ton entre le SI et le DO et entre le MI et le FA ...

en musique la difference de son entre (par exemple) un ré bemol et un do#
s'appellle un "Coma" , bien sur sur les instruments "tempéré" ce coma n'existe pas, car il sagit de la meme touche (pour un piano) ou la meme case pour une guitare, mais a son importance pour les instrument "fretless" comme le violon ou la contrebass .... voila voila , dormirez moins bete ce soir ..

Code : Tout sélectionner



; codé par Dobro
; en pure v 3.93


Dim do.l(7)
Dim do_d.l(7)
Dim re.l(7)
Dim re_d.l(7)
Dim mi.l(7)
Dim fa.l(7)
Dim fa_d.l(7)
Dim sol.l(7)
Dim sol_d.l(7)
Dim la.l(7)
Dim la_d.l(7)
Dim si.l(7)


do(0)=65:do(1)=131:do(2)=262:do(3)=523:do(4)=1046:do(5)=2093:do(6)=4186
do_d(0)=69:do_d(1)=139:do_d(2)=277:do_d(3)=554:do_d(4)=1108:do_d(5)=2217:do_d(6)=4435
re(0)=73:re(1)=146:re(2)=294:re(3)=587:re(4)=1174:re(5)=2344:re(6)=4698
re_d(0)=77:re_d(1)=156:re_d(2)=311:re_d(3)=622:re_d(4)=1244:re_d(5)=2489:re_d(6)=4978
mi(0)=82:mi(1)=165:mi(2)=330:mi(3)=659:mi(4)=1318:mi(5)=2937:mi(6)=5274
fa(0)=87:fa(1)=175:fa(2)=349:fa(3)=698:fa(4)=1397:fa(5)=2794:fa(6)=5588
fa_d(0)=92:fa_d(1)=185:fa_d(2)=370:fa_d(3)=740:fa_d(4)=1480:fa_d(5)=2960:fa_d(6)=5920
sol(0)=97:sol(1)=196:sol(2)=392:sol(3)=784:sol(4)=1568:sol(5)=3136:sol(6)=6271
sol_d(0)=104:sol_d(1)=208:sol_d(2)=415:sol_d(3)=830:sol_d(4)=1661:sol_d(5)=3322:sol_d(6)=6645
la(0)=110:la(1)=220:la(2)=440:la(3)=880:la(4)=1760:la(5)=3520:la(6)=7040
la_d(0)=116:la_d(1)=233:la_d(2)=466:la_d(3)=932:la_d(4)=1864:la_d(5)=3729:la_d(6)=7458
si(0)=123:si(1)=247:si(2)=494:si(3)=988:si(4)=1975:si(5)=3951:si(6)=7902



; octave 0 (basse)
Beep_(do(0),500)
Beep_(do_d(0),500)
Beep_(re(0),500)
Beep_(re_d(0),500)
Beep_(mi(0),500)
Beep_(fa(0),500)
Beep_(fa_d(0),500)
Beep_(sol(0),500)
Beep_(sol_d(0),500)
Beep_(la(0),500)
Beep_(la_d(0),500)
Beep_(si(0),500)


; octave 1 (basse)
Beep_(do(1),500)
Beep_(do_d(1),500)
Beep_(re(1),500)
Beep_(re_d(1),500)
Beep_(mi(1),500)
Beep_(fa(1),500)
Beep_(fa_d(1),500)
Beep_(sol(1),500)
Beep_(sol_d(1),500)
Beep_(la(1),500)
Beep_(la_d(1),500)
Beep_(si(1),500)

; octave 2 (octave moyen le plus courament employé)
Beep_(do(2),500)
Beep_(do_d(2),500)
Beep_(re(2),500)
Beep_(re_d(2),500)
Beep_(mi(2),500)
Beep_(fa(2),500)
Beep_(fa_d(2),500)
Beep_(sol(2),500)
Beep_(sol_d(2),500)
Beep_(la(2),500)
Beep_(la_d(2),500)
Beep_(si(2),500)

; octave 3
Beep_(do(3),500)
Beep_(do_d(3),500)
Beep_(re(3),500)
Beep_(re_d(3),500)
Beep_(mi(3),500)
Beep_(fa(3),500)
Beep_(fa_d(3),500)
Beep_(sol(3),500)
Beep_(sol_d(3),500)
Beep_(la(3),500)
Beep_(la_d(3),500)
Beep_(si(3),500)

; octave 4
Beep_(do(4),500)
Beep_(do_d(4),500)
Beep_(re(4),500)
Beep_(re_d(4),500)
Beep_(mi(4),500)
Beep_(fa(4),500)
Beep_(fa_d(4),500)
Beep_(sol(4),500)
Beep_(sol_d(4),500)
Beep_(la(4),500)
Beep_(la_d(4),500)
Beep_(si(4),500)

; octave 5
Beep_(do(5),500)
Beep_(do_d(5),500)
Beep_(re(5),500)
Beep_(re_d(5),500)
Beep_(mi(5),500)
Beep_(fa(5),500)
Beep_(fa_d(5),500)
Beep_(sol(5),500)
Beep_(sol_d(5),500)
Beep_(la(5),500)
Beep_(la_d(5),500)
Beep_(si(5),500)

; octave 6
Beep_(do(6),500)
Beep_(do_d(6),500)
Beep_(re(6),500)
Beep_(re_d(6),500)
Beep_(mi(6),500)
Beep_(fa(6),500)
Beep_(fa_d(6),500)
Beep_(sol(6),500)
Beep_(sol_d(6),500)
Beep_(la(6),500)
Beep_(la_d(6),500)
Beep_(si(6),500)

petit rappel pour les nuls en musique il n'y a pas de demi ton entre le SI et le DO et entre le MI et le FA ...

Hum hum Je crois que si au contraire

7. Les altérations
Vous vous demandez surement, si les touches blanches du piano correspondent au 7 notes vues précedemment, à quoi peuvent bien correspondre les touches noires ?
Tons et demi-tons

En fait, l’écart entre les sept notes que nous avons vues n’est pas toujours le même.

L’intervalle entre un Do et le Do qui se situe juste au dessus de lui est appelé un Octave (Do Ré Mi Fa Sol La Si Do). L’octave est une mesure fixe de la différence de hauteur entre le premier Do et le second.

Un octave est décomposé en 12 demi tons. Ces demis tons sont l’unité de hauteur de note la plus petite utilisé dans la musique occidentale. L’écart entre les notes peut être d’un ton ou d’un demi-ton.

Pour connaitre l’écart entre ces notes, il suffit de regarder un piano. Si on part du Do, et que l’on remonte, en prenant à la fois les touches blanches et les noires, la hauteur du son joué montera d’un demi-ton à chaque touche. On en déduit donc que l’écart entre Do et Ré est d’un ton, alors que l’écart etre mi et fa, par exemple, est d’un demi-ton, car il n’y a pas de touche noires entre ces deux notes.

Les écarts d’un ton sont : Do et Ré, Ré et Mi, Fa et Sol, Sol et Si.

Les écarts d’un demi ton sont : Mi et Fa, Si et Do.

http://www.nicedays.net/article19.html
Allez tu as été plus vite que la musique

Si mi la ré sol do Fa

PureBasic

Mini beep/ mélodie

Mini beep/ mélodie