欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

標題: 單片機音樂發生器 proteus仿真 [打印本頁]
作者: wuzi008    時間: 2021-3-26 13:34
標題: 單片機音樂發生器 proteus仿真
  1. #include <reg51.h>
  2. #include <string.h>
  3. #define uchar unsigned char
  4. #define uint unsigned int
  5. sbit SDA=P1^0;          //DS1302 數據線
  6. sbit CLK=P1^1;          //DSB1302 時鐘線
  7. sbit RST=P1^2;          //DS1302 復位線
  8. sbit RS=P2^0;           //LCD 寄存器選擇
  9. sbit RW=P2^1;          //LCD 讀/寫控制
  10. sbit EN=P2^2;          //LCD 啟用
  11. sbit K1=P3^4;          //選擇
  12. sbit K2=P3^5;          //加
  13. sbit K3=P3^6;          //減
  14. sbit K4=P3^7;          //確定
  15. uchar tCount=0;
  16. uchar dat;             //定義參數
  17. //一年中每個月的天數，二月的天數由年份決定
  18. uchar MonthsDays[]={31,0,31,30,31,30,31,31,30,31,30,31};
  19. //周日，周一到周六{0,1-6} [讀取 DS1302 時分別是 1-7]
  20. uchar *WEEK[]={"SUN","MON","TUS","WEN","THU","FRI","SAT"};
  21. //LCD 顯示緩沖
  22. uchar LCD_DSY_BUFFER1[]={"0019 00-00-00  "};
  23. uchar LCD_DSY_BUFFER2[]={"HWW   00:00:00 "};
  24. uchar DateTime[7]; //所讀取的日期時間
  25. char Adjust_Index=-1;//當前調節的時間對象：秒，分，時，日，月，年(0,1,2,3,4,6)
  26. uchar Change_Flag[]="-MHDM-Y";
  27. //（分，時，日，月，年） （不調節秒周）
  28. //延時，向 DS1302 寫、讀一字節以及從 DS1302 指定位置度、寫數據的程序
  29. //延時---------------------------------------------------
  30. void DelayMS(uint x)
  31. {
  32.   uchar i;
  33.   while(x--)  for(i=0;i<120;i++);
  34. }
  35. //向 DS1302 寫入一個字節
  36. void Write_A_Byte_TO_DS1302(uchar x)
  37. {
  38.   uchar i;
  39.   for(i=0;i<8;i++)
  40.   {
  41.      SDA=x&1;CLK=1; CLK=0; x>>=1;
  42.   }
  43. }
  44. //從 DA1302 讀取一字節---------------------------------------
  45. uchar Get_A_Byte_FROM_DS1302()
  46. {
  47.   uchar i,b,t;
  48.   for(i=0;i<8;i++)
  49.   {
  50.      b>>=1; t=SDA;b|=t<<7;CLK=1;CLK=0;
  51.   }
  52.   //BCD 碼轉換
  53.   return b/16*10+b%16;
  54. }
  55. //從 DS1302 指定的位置讀數據--------------------------------------
  56. uchar Read_Data(uchar addr)
  57. {
  58.   uchar dat;
  59.   RST=0;CLK=0;RST=1;
  60.   Write_A_Byte_TO_DS1302(addr);
  61.   dat=Get_A_Byte_FROM_DS1302();
  62.   CLK=1;RST=0;
  63.   return dat;
  64. }
  65. // 向 DS1302 某地址寫入數據-------------------------------------------
  66. void Write_DS1302(uchar addr,uchar dat)
  67. {
  68.   CLK=0;RST=1;
  69.   Write_A_Byte_TO_DS1302(addr);
  70.   Write_A_Byte_TO_DS1302(dat);
  71.   CLK=0;RST=0;
  72. }
  73. //-------------------------------------------
  74. //------設置時間-------------------------------------
  75. void SET_DS1302()
  76. {
  77. uchar i;
  78. Write_DS1302(0x8E,0x00); //寫控制字，取消寫保護
  79. for(i=1;i<7;i++) //分時日月年依次寫入
  80. {
  81.   //分的起始地址 10000010（0x82）,后面續依次是時.日.月.周.年.寫入地址每次遞增 2  
  82.   Write_DS1302(0x80+ 2*i,(DateTime[i]/10<<4)|(DateTime[i]%10)); }
  83.   Write_DS1302(0x8E,0x80);//加保護
  84. }
  85. //---------------------------------------------------
  86. //讀取當前日期時間
  87. //---------------------------------------------------
  88. void GetTime()
  89. {
  90.   uchar i;
  91.   for(i=0;i<7;i++)
  92.   {
  93.    DateTime[i]=Read_Data(0x81+2*i);
  94.   }
  95. }
  96. //---------------------------------------------------
  97. //1602LCD 的若干顯示控制代碼
  98. //uchar Read_LCD_State() 讀 LCD 狀態
  99. uchar Read_LCD_State()
  100. {
  101.   uchar state;
  102.   RS=0;RW=1;EN=1;DelayMS(1);state=P0;EN=0;DelayMS(1);
  103.   return state;
  104. }
  105. //void LCD_Busy_Wait() 忙等待

  107. void LCD_Busy_Wait()
  108. {
  109.   while((Read_LCD_State()&0x80)==0x80);
  110.   DelayMS(5);
  111. }
  112. //void  Write_LCD_Data(uchar dat) 向 LCD 寫數據
  113. void Write_LCD_Data(uchar dat)
  114. {
  115.   LCD_Busy_Wait();
  116.   RS=1;RW=0;EN=0;P0=dat;EN=1;DelayMS(1);EN=0;
  117. }
  118. //void  Write_LCD_Command(uchar cmd) 寫 LCD 指令
  119. void  Write_LCD_Command(uchar cmd)
  120. {
  121.   LCD_Busy_Wait();
  122.   RS=0;RW=0;EN=0;P0=cmd;EN=1;DelayMS(1);EN=0;
  123. }
  124. // Void  Init_LCD()  LCD 初始化
  125. void  Init_LCD()
  126. {
  127.   Write_LCD_Command(0x38);DelayMS(1);
  128.   Write_LCD_Command(0x01);DelayMS(1);
  129.   Write_LCD_Command(0x06);DelayMS(1);
  130.   Write_LCD_Command(0x0c);DelayMS(1);
  131. }
  132. //void Set_LCD_POS(uchar P) 設置液晶顯示位置
  133. void Set_LCD_POS(uchar p)
  134. {
  135.   Write_LCD_Command(p|0x80);
  136. }
  137. //------------------------------------------------------
  138. //在 LCD 上顯示字符串
  139. void Display_LCD_String(uchar p,uchar *s)
  140. {
  141.   uchar i;
  142.   Set_LCD_POS(p);
  143.   for(i=0;i<16;i++)
  144.   {
  145.   Write_LCD_Data(s[i]); DelayMS(1);
  146.   }
  147. }
  148. //-----------------------------------------------------------
  149. //日期與時間值轉換為數字字符
  150. void Format_DateTime(uchar d,uchar *a)
  151. {
  152.   a[0]=d/10+'0';a[1]=d%10+'0';
  153. }
  154. //----------------------------------------------------------
  155. //判斷是否為閏年
  156. uchar isLeapYear(uint y)
  157. {
  158.   return(y%4==0&y%100!=0)||(y%400==0);
  159. }
  160. //-----------------------------------------------------------
  161. //求自 2000.1.1 開始的任何一天是星期幾
  162. //函數沒有通過,求出總天數后再求星期幾
  163. //因為求總天數可能會超越 uint 的范圍
  164. void RefreshWeekDay()
  165. {  
  166.   uint i,d,w=5;
  167.   //已知 1999.12.31 是周五
  168.   for(i=2000;i<2000+DateTime[6];i++)
  169.   {
  170.         d=isLeapYear(i)?366:365;
  171.         w=(w+d)%7;
  172.   }
  173. d=0;
  174. for(i=1;i<DateTime[4];i++) d+=MonthsDays[i];
  175. d+=DateTime[3];
  176. //保存星期,0~6 表示星期日至周六,為了與DS1302 的星期格式匹配,返回值需要加 1 DateTime[5]=(w+d)%7+1;
  177. }
  178. //----------------------------------------------------------
  179. void DateTime_Adjust(char x)
  180. {
  181.   switch(Adjust_Index)
  182.   {
  183.     case 6://年 00-99
  184.          if(x==1&DateTime[6]<99) DateTime[6]++;
  185.          if(x==-1&DateTime[6]>0) DateTime[6]--;
  186.          //獲取 2 月天數
  187.          MonthsDays[2]=isLeapYear(2000+DateTime[6])?29:28;
  188.          //如果年份變化后當前月份的天數大于上限則設為上限
  189.          if(DateTime[3]>MonthsDays[DateTime[4]])
  190.          DateTime[3]=MonthsDays[DateTime[4]]; RefreshWeekDay();
  191.          //刷新星期
  192.         break;
  193.     case 4:
  194.         //月 01-12
  195.         if(x==1&DateTime[4]<12)  DateTime[4]++;
  196.         if(x==-1&DateTime[4]>1)  DateTime[4]--;
  197.         //獲取 2 月天數
  198.          MonthsDays[2]=isLeapYear(2000+DateTime[6])?29:28;
  199.          //如果月份變化后當前月份的天數大于上限則設為上限
  200.          if(DateTime[3]>MonthsDays[DateTime[4]])
  201.          DateTime[3]=MonthsDays[DateTime[4]];
  202.          RefreshWeekDay();
  203.          //刷新星期
  204.          break;
  205.         case 3://日00-28/29/30/31;調節之前首先根據年份得出該年中2月的天數        
  206.               MonthsDays[2]=isLeapYear(2000+DateTime[6])?29:28;
  207.           //根據當前月份決定調節日期的上限
  208.           if(x==1&DateTime[3]<MonthsDays[DateTime[4]])  DateTime[3]++;
  209.           if(x==-1&DateTime[3]>0)  DateTime[3]--;
  210.           RefreshWeekDay();//刷新星期
  211.           break;
  212.     case 2://時
  213.           if(x==1&DateTime[2]<23) DateTime[2]++;
  214.           if(x==-1&DateTime[2]>0) DateTime[2]--;
  215.           break;
  216.     case 1://分
  217.           if(x==1&DateTime[1]<59)  DateTime[1]++;
  218.           if(x==-1&DateTime[1]>0)  DateTime[1]--;
  219.           break;
  220.   }
  221. }
  222. //---------------------------------------------------------
  223. //定時器 0 每秒刷新 LCD 顯示
  224. void T0_INT() interrupt 1
  225. {
  226.   TH0=-50000/256;
  227.   TL0=-50000%256;
  228.   if(++tCount!=2) return;
  229.   tCount=0;
  230.   //按指定的格式生成待顯示的日期時間串
  231.   Format_DateTime(DateTime[6],LCD_DSY_BUFFER1+5);   
  232.   Format_DateTime(DateTime[4],LCD_DSY_BUFFER1+8);   
  233.   Format_DateTime(DateTime[3],LCD_DSY_BUFFER1+11);
  234.   //星期 strcpy(LCD_DSY_BUFFER1+13,WEEK[DateTime[5]-1]);
  235.   //時分秒
  236.   Format_DateTime(DateTime[2],LCD_DSY_BUFFER2+5);   
  237.   Format_DateTime(DateTime[1],LCD_DSY_BUFFER2+8);  
  238.   Format_DateTime(DateTime[0],LCD_DSY_BUFFER2+11);
  239.   //顯示年月日，星期，時分秒
  240.   Display_LCD_String(0x00,LCD_DSY_BUFFER1);  
  241.   Display_LCD_String(0x40,LCD_DSY_BUFFER2);
  242. }
  243.   //---鍵盤中斷（INT0）-----------------------------------------
  244. void EX_INT0() interrupt 0
  245. {
  246.   if(K1==0) //選擇調整對象（Y M D H M）
  247.   {
  248.     while(K1==0);
  249.         if(Adjust_Index==-1||Adjust_Index==1) Adjust_Index=7;
  250.         Adjust_Index--;
  251.     if(Adjust_Index==5) Adjust_Index=4;//跳過對星期的調節
  252.     LCD_DSY_BUFFER2[13]='[';
  253.     LCD_DSY_BUFFER2[14]=Change_Flag[Adjust_Index];
  254.         LCD_DSY_BUFFER2[15]=']';
  255.         }
  256.         else if(K2==0)//加
  257.    {
  258.      while(K2==0); DateTime_Adjust(1);
  259.    }
  260.    else if(K3==0)//減
  261.    {
  262.      while(K3==0); DateTime_Adjust(-1);
  263.    }
  264.    else if(K4==0)//確定
  265. {
  266.   while(K4==0); SET_DS1302(); //將調整后的時間寫入 1302
  267.   LCD_DSY_BUFFER2[13]=' ';
  268.   LCD_DSY_BUFFER2[14]=' ';
  269.   LCD_DSY_BUFFER2[15]=' ';
  270.   Adjust_Index=-1;
  271. //操作索引重設為-1，時間繼續正常顯示
  272. }
  273. }
  274. //---------------------------------------------------------------
  275. //主程序 void main()
  276. void main()
  277. {
  278.   Init_LCD();//液晶初始化
  279.   IE=0x83; //允許INT0,T0中斷
  280.   IP=0x01;
  281.   IT0=0x01;
  282.   TMOD=0x01;
  283.   TH0=-50000/256;
  284.   TL0=-50000%256;
  285.   TR0=1;
  286.   while(1)
  287.   {
  288.   //如果為執行調整操作則正常讀取當前時間
  289.   if(Adjust_Index==-1) GetTime();
  290.   }
  291. }
復制代碼

新建 WinRAR 壓縮文件.rar

14.79 KB, 下載次數: 5, 下載積分: 黑幣 -5





歡迎光臨 (http://www.raoushi.com/bbs/) Powered by Discuz! X3.1