仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）
0.png (18.02 KB, 下載次數: 31)
下載附件
2019-6-24 01:34 上傳
單片機源程序如下:
- #include<reg51.h>
- #define uchar unsigned char
- #define uint unsigned int
- sbit beep=P2^7;
- uchar song_tone[]={212,212,190,212,159,169,212,212,190,212,142,159,212,212,106,126,159,169,190,119,119,126,159,142,159,0};
- uchar song_long[]={9,3,12,12,12,24,9,3,12,12,12,24,9,3,12,12,12,12,12,9,3,12,12,12,24,0} ;
- void delayms(uint n)
- {
- uchar i;
- while(n--)
- {
- for(i=0;i<120;i++);
- }
- }
- void play()
- {
- uint i=0,j,k;
- while(song_tone[i]!=0||song_long[i]!=0)
- {
- for(j=0;j<song_long[i]*20;j++)
- {
- beep=~beep;
- //}
- for(k=0;k<song_tone[i]/3;k++) ;
- }//{
- delayms(10);
- i++;
- }
- }
- void main()
- {
- beep=0;
- while(1)
- {
- play();
- delayms(1000);
- }
- }
所有資料51hei提供下載:
愛心燈.zip
(99.1 KB, 下載次數: 39)
2019-6-22 15:29 上傳
點擊文件名下載附件
愛心燈 下載積分: 黑幣 -5
|
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
