سلام- چطوري مي شه يك موزيك انتظار تلفن عالي با ميكزوكنترلر ساخت ؟ آيا به مدارات واسطي براي جاري شدن موزيك روي خط وجود داره ؟
توجه: این یک موضوع قدیمی است که آخرین پست ارسالی آن مربوط به 5414 روز قبل است . لطفا فقط پاسخ ها ، سوالات و درخواست های 100 درصد مرتبط را به آن ارسال کنید و برای درخواست ها و سوالات جدید موضوع جدیدی را ایجاد کنید
موزيك انتظار تلفن
سلام- چطوري مي شه يك موزيك انتظار تلفن عالي با ميكزوكنترلر ساخت ؟ آيا به مدارات واسطي براي جاري شدن موزيك روي خط وجود داره ؟
سلام
شما میتوانید از آی سی UM66 که ای سی ملودی هست استفاده کنید
با خود میکرو هم میتونید ملودی تولید کنید
صدا رو هم با یه چوک آبی براحتی میتونید روی خط ارسال کنید
سلام مي دونم كه بايد از 66 استفاده كرد اما چطوري با ميكرو ملودي توليد كرد واون رو روي خط ارسال كرد نقشه مدار وبرنامه ميكرو ؟
'************************************************* ******************************
'* Description : DIGITAL MELODY PLAYER *
'* Revision : 1.0 *
'* Controller : ATMEGA8 *
'* Compiler : BASCOM-AVR 1.11.8.7 DEMO *
'* Author : Rubashka Vasiliy , Ukraine , 2007 *
'* Web : HTTP://WWW.LEDEFFECTS.NET *
'************************************************* ******************************
' _______________ |*_/*|________
' | ___________ | ||_/-_|______ |
' | | | | | | | |
' | | 0 0 | | | | 0 0 | |
' | | - | | | | - | |
' | | ___/ | | | | ___/ | |
' | |___ ___| | | |___________| |
' |_____|_/|_____| |_______________|
' _|__|/ |_|_.............._|________|_
' / ********** / **********
' / ************ / ************
' - - - - - - - - - - - - - - - - - - - - -
' __________________________________________________ _____________
' | |C||D| | |F||G||A| | |C||D| | |F||G||A| | |C||D| | |F||G||A| |
' | |1||1| | |1||1||1| | |2||2| | |2||2||2| | |3||3| | |3||3||3| | |
' | |#||#| | |#||#||#| | |#||#| | |#||#||#| | |#||#| | |#||#||#| | |
' | | | | | | | | | | | | | | | | | | | | | | |
' |C1|D1|E1|F1|G1|A1|H1|C2|D2|E2|F2|G2|A2|H2|C3|D3|E 3|F3|G3|A3|H3| |
' |__|__|__|__|__|__|__|__|__|__|__|__|__|__|__|__|_ _|__|__|__|__| |
' __________________________________________|
'
'************************************************* ******************************
' Conditional marking a writing the tunes compatible with telephones "Siemens"
'************************************************* ******************************
'
' ***** NOTES *****
'
' A - La
' Ais(#) - La diez
' B(H) - Si
' Ñ - Do
' Ñis(#) - Do diez
' D - Re
' Dis(#) - Re diez
' E - Mi
' F - Fa
' Fis(#) - Fa diez
' G - Sol
' Gis(#) - Sol diez
'
' ***** OKTAVE *****
'
' 1 - 1 octave
' 2 - 2 octave
' 3 - 3 octave
'
' ***** DURATION OF PAUSES *****
'
' P(1/1) - 2 ñåê - Wait 2
' P(1/2) - 1 ñåê - Wait 1
' P(1/4) - 0,5 ñåê - Waitms 500
' P(1/8) - 0,25 ñåê - Waitms 250
' P(1/16) - 0,125 ñåê - Waitms 125
' P(1/32) - 0,0625 ñåê - Waitms 63
'
' ***** DURATION OF NOTES *****
'
' (1/1) - 2 sec
' (1/2) - 1 sec
' (1/4) - 0,5 sec
' (1/8) - 0,25 sec
' (1/16) - 0,125 sec
' (1/32) - 0,0625 sec
'
' ***** FORMAT TO FUNCTIONS SOUND *****
'
' Sound Speaker , Pulses , Periods
' Speaker - port for generations of sound
' Periods - sound frequency (1-65535)
' Pulses - duration of sound (1-65535)
'
' Periods = Abc[F_crystal / (k * F_nota)]
' Pulses = Abc[(T_period * F_crystal) / (k * Periods)]
'
' F_crystal - clockrate of controller, Hz
' F_nota - frequency a notes, Hz
' k = 12 - amount of tacts, for which is formed one period of sound
' T_period - duration of sounding a notes, sec
' Abc - function of truncation whole number
'
'================================================= ==============================
' Table of values Pulses,Periods for 3 octaves at frequency of quartz 8000000 Hz
'================================================= ==============================
'Note|Freqvency|Periods|Pulses 1/1|Pulses 1/2|Pulses 1/4|Pulses 1/8|Pulses 1/16|
'================================================= ==============================
' C1 | 261,63 | 2548 | 523 | 262 | 131 | 65 | 33 |
'Cis1| 277,18 | 2405 | 554 | 277 | 139 | 69 | 35 |
' D1 | 293,66 | 2270 | 587 | 294 | 147 | 73 | 37 |
'Dis1| 311,13 | 2143 | 622 | 311 | 156 | 78 | 39 |
' E1 | 329,63 | 2022 | 659 | 330 | 165 | 82 | 41 |
' F1 | 349,23 | 1909 | 698 | 349 | 175 | 87 | 44 |
'Fis1| 369,99 | 1802 | 740 | 370 | 185 | 92 | 46 |
' G1 | 392,00 | 1701 | 784 | 392 | 196 | 98 | 49 |
'Gis1| 415,30 | 1605 | 831 | 415 | 208 | 104 | 52 |
' A1 | 440,00 | 1515 | 880 | 440 | 220 | 110 | 55 |
'Ais1| 466,16 | 1430 | 932 | 466 | 233 | 117 | 58 |
' B1 | 493,88 | 1350 | 988 | 494 | 247 | 124 | 62 |
'================================================= ==============================
' C2 | 523,25 | 1274 | 1047 | 523 | 262 | 131 | 65 |
'Cis2| 554,36 | 1203 | 1109 | 554 | 277 | 139 | 69 |
' D2 | 587,32 | 1135 | 1175 | 587 | 294 | 147 | 73 |
'Dis2| 622,26 | 1071 | 1245 | 622 | 311 | 156 | 78 |
' E2 | 659,26 | 1011 | 1319 | 659 | 330 | 165 | 82 |
' F2 | 698,46 | 954 | 1397 | 698 | 349 | 175 | 87 |
'Fis2| 739,98 | 901 | 1480 | 740 | 370 | 185 | 92 |
' G2 | 784,00 | 850 | 1568 | 784 | 392 | 196 | 98 |
'Gis2| 830,60 | 803 | 1661 | 831 | 415 | 208 | 104 |
' A2 | 880,00 | 758 | 1720 | 880 | 440 | 220 | 110 |
'Ais2| 932,32 | 715 | 1865 | 932 | 466 | 233 | 117 |
' B2 | 987,75 | 675 | 1976 | 988 | 494 | 247 | 124 |
'================================================= ==============================
' C3 | 1046,50 | 637 | 2093 | 1047 | 523 | 262 | 131 |
'Cis3| 1108,70 | 601 | 2218 | 1109 | 554 | 277 | 139 |
' D3 | 1174,60 | 566 | 2350 | 1175 | 587 | 294 | 147 |
'Dis3| 1244,50 | 536 | 2490 | 1245 | 622 | 311 | 156 |
' E3 | 1318,50 | 483 | 2638 | 1319 | 659 | 330 | 165 |
' F3 | 1396,90 | 477 | 2794 | 1397 | 698 | 349 | 175 |
'Fis3| 1480,00 | 450 | 2960 | 1480 | 740 | 370 | 185 |
' G3 | 1568,00 | 425 | 3136 | 1568 | 784 | 392 | 196 |
'Gis3| 1661,20 | 401 | 3322 | 1661 | 831 | 415 | 208 |
' A3 | 1720,00 | 388 | 3440 | 1720 | 880 | 440 | 220 |
'Ais3| 1864,60 | 358 | 3730 | 1865 | 932 | 466 | 233 |
' B3 | 1975,50 | 337 | 3952 | 1976 | 988 | 494 | 247 |
'================================================= ==============================
$regfile = "m8def.dat"
$crystal = 8000000
Config Portb.0 = Output
Speaker Alias Portb.0
'================================================= ==============================
' _______
' | ____ |_____| |
' PB.0|----|____|----|+ -|----| GND
' | |___| |
' | 100 Îì Speaker
'
'================================================= ==============================
Do
'Europe :: Final Countdown
Sound Speaker , 124 , 675 'H2(1/16)
Sound Speaker , 110 , 758 'A2(1/16)
Sound Speaker , 248 , 675 'H2(1/8)
Waitms 125 'P(1/16)
Sound Speaker , 165 , 1011 'E2(1/8)
Waitms 250 'P(1/8)
Waitms 125 'P(1/16)
Sound Speaker , 131 , 637 'C3(1/16)
Sound Speaker , 124 , 675 'H2(1/16)
Sound Speaker , 131 , 637 'C3(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 124 , 675 'H2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 220 , 758 'A2(1/8)
Waitms 125 'P(1/16)
Waitms 250 'P(1/8)
Sound Speaker , 131 , 637 'C3(1/16)
Sound Speaker , 124 , 675 'H2(1/16)
Sound Speaker , 262 , 637 'C3(1/8)
Waitms 125 'P(1/16)
Sound Speaker , 165 , 1011 'E2(1/8)
Waitms 250 'P(1/8)
Waitms 125 'P(1/16)
Sound Speaker , 110 , 758 'A2(1/16)
Sound Speaker , 98 , 850 'G2(1/16)
Sound Speaker , 110 , 758 'A2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 98 , 850 'G2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 92 , 901 'Fis2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 110 , 758 'A2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 196 , 850 'G2(1/8)
Wait 2
'Corona :: Rythm of The Night
Sound Speaker , 65 , 1274 'C2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 87 , 954 'F2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 98 , 850 'G2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 87 , 954 'F2(1/16)
Sound Speaker , 117 , 715 'Ais2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 110 , 758 'A2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 98 , 850 'G2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 110 , 758 'A2(1/16)
Sound Speaker , 87 , 954 'F2(1/16)
Waitms 125 'P(1/16)
Wait 2
'Jean Michel Jarre :: Oxygene 10
Sound Speaker , 131 , 637 'C3(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 92 , 901 'Fis2(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 131 , 637 'C3(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 92 , 901 'Fis2(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 117 , 715 'Ais2(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 92 , 901 'Fis2(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 104 , 803 'Gis2(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 92 , 901 'Fis2(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 98 , 850 'G2(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 92 , 901 'Fis2(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 98 , 850 'G2(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 92 , 901 'Fis2(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 98 , 850 'G2(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 92 , 901 'Fis2(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 98 , 850 'G2(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Sound Speaker , 92 , 901 'Fis2(1/16)
Sound Speaker , 65 , 1274 'C2(1/16)
Wait 2
'Titanic: Theme
Sound Speaker , 131 , 637 'C3(1/16)
Sound Speaker , 147 , 566 'D3(1/16)
Sound Speaker , 330 , 483 'E3(1/8)
Waitms 125 'P(1/16)
Sound Speaker , 175 , 477 'F3(1/16)
Sound Speaker , 165 , 483 'E3(1/16)
Sound Speaker , 147 , 566 'D3(1/16)
Sound Speaker , 131 , 637 'C3(1/16)
Sound Speaker , 147 , 566 'D3(1/16)
Sound Speaker , 392 , 425 'G3(1/8)
Waitms 125 'P(1/16)
Sound Speaker , 165 , 483 'E3(1/16)
Sound Speaker , 147 , 566 'D3(1/16)
Sound Speaker , 262 , 637 'C3(1/8)
Waitms 125 'P(1/16)
Sound Speaker , 110 , 758 'A2(1/16)
Sound Speaker , 87 , 954 'F2(1/16)
Sound Speaker , 196 , 850 'G2(1/8)
Waitms 125 'P(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 131 , 637 'C3(1/16)
Sound Speaker , 147 , 566 'D3(1/16)
Sound Speaker , 330 , 483 'E3(1/8)
Waitms 125 'P(1/16)
Sound Speaker , 175 , 477 'F3(1/16)
Sound Speaker , 165 , 483 'E3(1/16)
Sound Speaker , 147 , 566 'D3(1/16)
Sound Speaker , 131 , 637 'C3(1/16)
Sound Speaker , 147 , 566 'D3(1/16)
Sound Speaker , 392 , 425 'G3(1/8)
Waitms 125 'P(1/16)
Sound Speaker , 165 , 483 'E3(1/16)
Sound Speaker , 196 , 425 'G3(1/16)
Sound Speaker , 440 , 388 'A3(1/8)
Waitms 125 'P(1/16)
Sound Speaker , 196 , 425 'G3(1/16)
Sound Speaker , 165 , 483 'E3(1/16)
Sound Speaker , 294 , 566 'D3(1/8)
Wait 2
Loop
دوست عزيز سپاس – ولي به زبان سي چطوري ميشه برنامه موزيك نوشت ؟ واينكه منظورتون از چوك آبي براي ارسال صدا روي خط چيه ؟ ميشه نقششو قرار بدين !
با سی که نمیدونم چه جوریه
برای چوک آبی یک سرش دو سیم داره که وصل میشه به خط
اون سر دیگش سه سیم داره که وسطی و یکی از کناری ها وصل میشه یه منبع صوت
مجوز های ارسال و ویرایش
پاسخ با نقل قول