
et entre le mi et le fa !!

on ne dit pas MI# (du moins en principe d'apres A.DANHAUSER) ..
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
temp=100
; au clair de la lune
Beep_(do(2),temp)
Beep_(do(2),temp)
Beep_(do(2),temp)
Beep_(re(2),temp)
Beep_(mi(2),temp*2)
Beep_(re(2),temp*2)
Beep_(do(2),temp)
Beep_(mi(2),temp)
Beep_(re(2),temp)
Beep_(re(2),temp)
Beep_(do(2),temp*2)
Beep_(re(2),temp)
Beep_(re(2),temp)
Beep_(re(2),temp)
Beep_(re(2),temp)
Beep_(la(1),temp*2)
Beep_(la(1),temp*2)
Beep_(re(2),temp)
Beep_(do(2),temp)
Beep_(la_d(1),temp)
Beep_(la(1),temp)
Beep_(sol(1),temp*2)
Beep_(do(2),temp)
Beep_(do(2),temp)
Beep_(do(2),temp)
Beep_(re(2),temp)
Beep_(mi(2),temp*2)
Beep_(re(2),temp*2)
Beep_(do(2),temp)
Beep_(mi(2),temp)
Beep_(re(2),temp)
Beep_(re(2),temp)
Beep_(do(2),temp*2)