標(biāo)題: 基于51單片機的多功能萬年歷PCB工程+電路原理圖+源程序 [打印本頁]
作者: 夢想天空    時間: 2018-3-25 19:46
標(biāo)題: 基于51單片機的多功能萬年歷PCB工程+電路原理圖+源程序
Altium Designer畫的12864萬年歷電路原理圖和PCB圖如下：(51hei附件中可下載工程文件)

單片機源程序如下:
  1. #include<reg52.h>
  2. #define uchar unsigned char
  3. #define uint unsigned int
  4. /************************12864端口定義*******************************************/
  5. #define dataport P0   //12864數(shù)據(jù)口
  6. sbit rs=P2^0; //指令/數(shù)據(jù)端口
  7. sbit rw=P2^1; //讀/寫端口
  8. sbit en=P2^2; //使能端口
  9. sbit psb=P2^3; //并口/串口端口（本萬年歷采用并口）
  10. sbit rst=P2^5; //復(fù)位端口
  11. /********************************************************************************/
  12. /***********************DS1302端口定義*******************************************/
  13. sbit clock_rst=P3^7;  //1302復(fù)位管腳定義
  14. sbit clock_dat=P2^6;  //1302I/O管腳定義
  15. sbit clock_clk=P2^7;  //1302時鐘管腳定義  
  16. /***************寄存器定義（用于記錄1302IO的輸入和輸出）*************************/
  17. sbit a0=ACC^0;
  18. sbit a1=ACC^1;
  19. sbit a2=ACC^2;
  20. sbit a3=ACC^3;
  21. sbit a4=ACC^4;
  22. sbit a5=ACC^5;
  23. sbit a6=ACC^6;
  24. sbit a7=ACC^7;
  25. /********************DS18B20端口定義*********************************************/
  26. /********************************************************************************/
  27. sbit DQ=P3^4; //DS18B20數(shù)據(jù)端口
  28. /********************************************************************************/
  29. /******************18B20全局變量定義*********************************************/
  30. uchar temp;     //溫度全局變量（整數(shù)部分）
  31. uint xs;     //溫度全局變量（小數(shù)部分）
  32. /********************************************************************************/

  34. /**********************1302全局變量定義******************************************/
  35. uchar sec,min,hour,day,month,week,year1,year2=20;//秒，分，時，日，月，星期，年
  36. /************************蜂鳴器端口定義******************************************/
  37. sbit beep=P3^5;
  38. uchar num;
  39. /***********************按鍵定義*************************************************/
  40. sbit key1=P3^0;
  41. sbit key2=P3^1;
  42. sbit key3=P3^2;
  43. sbit key4=P3^3;
  44. uchar set=0; //set=0時顯示首頁，1時顯示次頁
  45. uchar status=0;//按鍵功能選擇定義（年0，月1，日2，時3，分4 ）
  46. /********************************************************************************/
  47. uchar code month_week[12]={6,2,3,6,1,4,6,2,5,7,3,5}; //2000年各月頭天星期表
  48. uchar code year_code[300]={0x0C,0x96,0x45, /*2000*/  0x4d,0x4A,0xB8, /*2001*/   //2002~2099年農(nóng)歷表
  49. 0x0d,0x4A,0x4C, /*2002*/   0x0d,0xA5,0x41, /*2003*/  0x25,0xAA,0xB6, /*2004*/
  50. 0x05,0x6A,0x49, /*2005*/   0x7A,0xAd,0xBd, /*2006*/  0x02,0x5d,0x52, /*2007*/
  51. 0x09,0x2d,0x47, /*2008*/   0x5C,0x95,0xBA, /*2009*/  0x0A,0x95,0x4e, /*2010*/
  52. 0x0B,0x4A,0x43, /*2011*/   0x4B,0x55,0x37, /*2012*/  0x0A,0xd5,0x4A, /*2013*/
  53. 0x95,0x5A,0xBf, /*2014*/   0x04,0xBA,0x53, /*2015*/  0x0A,0x5B,0x48, /*2016*/
  54. 0x65,0x2B,0xBC, /*2017*/   0x05,0x2B,0x50, /*2018*/  0x0A,0x93,0x45, /*2019*/
  55. 0x47,0x4A,0xB9, /*2020*/   0x06,0xAA,0x4C, /*2021*/  0x0A,0xd5,0x41, /*2022*/
  56. 0x24,0xdA,0xB6, /*2023*/   0x04,0xB6,0x4A, /*2024*/  0x69,0x57,0x3d, /*2025*/
  57. 0x0A,0x4e,0x51, /*2026*/   0x0d,0x26,0x46, /*2027*/  0x5e,0x93,0x3A, /*2028*/
  58. 0x0d,0x53,0x4d, /*2029*/   0x05,0xAA,0x43, /*2030*/ 0x36,0xB5,0x37, /*2031*/
  59. 0x09,0x6d,0x4B, /*2032*/   0xB4,0xAe,0xBf, /*2033*/  0x04,0xAd,0x53, /*2034*/
  60. 0x0A,0x4d,0x48, /*2035*/   0x6d,0x25,0xBC, /*2036*/  0x0d,0x25,0x4f, /*2037*/
  61. 0x0d,0x52,0x44, /*2038*/   0x5d,0xAA,0x38, /*2039*/  0x0B,0x5A,0x4C, /*2040*/
  62. 0x05,0x6d,0x41, /*2041*/   0x24,0xAd,0xB6, /*2042*/  0x04,0x9B,0x4A, /*2043*/
  63. 0x7A,0x4B,0xBe, /*2044*/   0x0A,0x4B,0x51, /*2045*/  0x0A,0xA5,0x46, /*2046*/
  64. 0x5B,0x52,0xBA, /*2047*/   0x06,0xd2,0x4e, /*2048*/  0x0A,0xdA,0x42, /*2049*/
  65. 0x35,0x5B,0x37, /*2050*/   0x09,0x37,0x4B, /*2051*/  0x84,0x97,0xC1, /*2052*/
  66. 0x04,0x97,0x53, /*2053*/   0x06,0x4B,0x48, /*2054*/  0x66,0xA5,0x3C, /*2055*/
  67. 0x0e,0xA5,0x4f, /*2056*/   0x06,0xB2,0x44, /*2057*/  0x4A,0xB6,0x38, /*2058*/
  68. 0x0A,0xAe,0x4C, /*2059*/   0x09,0x2e,0x42, /*2060*/  0x3C,0x97,0x35, /*2061*/
  69. 0x0C,0x96,0x49, /*2062*/   0x7d,0x4A,0xBd, /*2063*/  0x0d,0x4A,0x51, /*2064*/
  70. 0x0d,0xA5,0x45, /*2065*/   0x55,0xAA,0xBA, /*2066*/  0x05,0x6A,0x4e, /*2067*/
  71. 0x0A,0x6d,0x43, /*2068*/   0x45,0x2e,0xB7, /*2069*/  0x05,0x2d,0x4B, /*2070*/
  72. 0x8A,0x95,0xBf, /*2071*/   0x0A,0x95,0x53, /*2072*/  0x0B,0x4A,0x47, /*2073*/
  73. 0x6B,0x55,0x3B, /*2074*/   0x0A,0xd5,0x4f, /*2075*/  0x05,0x5A,0x45, /*2076*/
  74. 0x4A,0x5d,0x38, /*2077*/   0x0A,0x5B,0x4C, /*2078*/  0x05,0x2B,0x42, /*2079*/
  75. 0x3A,0x93,0xB6, /*2080*/   0x06,0x93,0x49, /*2081*/  0x77,0x29,0xBd, /*2082*/
  76. 0x06,0xAA,0x51, /*2083*/   0x0A,0xd5,0x46, /*2084*/  0x54,0xdA,0xBA, /*2085*/
  77. 0x04,0xB6,0x4e, /*2086*/   0x0A,0x57,0x43, /*2087*/  0x45,0x27,0x38, /*2088*/
  78. 0x0d,0x26,0x4A, /*2089*/   0x8e,0x93,0x3e, /*2090*/  0x0d,0x52,0x52, /*2091*/
  79. 0x0d,0xAA,0x47, /*2092*/   0x66,0xB5,0x3B, /*2093*/  0x05,0x6d,0x4f, /*2094*/
  80. 0x04,0xAe,0x45, /*2095*/   0x4A,0x4e,0xB9, /*2096*/  0x0A,0x4d,0x4C, /*2097*/
  81. 0x0d,0x15,0x41, /*2098*/   0x2d,0x92,0xB5, /*2099*/
  82. };
  83. uint code month_day1[12]={0,31,59,90,120,151,181,212,243,273,304,334};//平年月份累計天數(shù)表
  84. uint code month_day2[12]={0,31,60,91,121,152,182,213,244,274,305,335};//閏年月份累計天數(shù)表
  85. uint table_addr; //查農(nóng)歷表的地址全局變量
  86. uchar year1_n,month_n,day_n; //農(nóng)歷年月日全局變量
  87. uchar month_r;  //農(nóng)歷閏月全局變量，無時為0
  88. /**********************延時函數(shù)*************************************************/
  89. void delay(uint t)  
  90. {
  91. uint b;
  92. for(;t;t--)
  93.   for(b=0;b<121;b++);
  94. }
  95. /*******************************************************************************/
  96. /**************************12864子函數(shù)******************************************/
  97. /**********************檢查忙信號子函數(shù)*****************************************/
  98. void busy()  
  99. {
  100. rs=0;  //指令操作
  101. rw=1;  //讀操作
  102. dataport=0xff; //數(shù)據(jù)端口置位
  103. en=1;  //使能
  104. while(dataport&0x80); //等待數(shù)據(jù)端口位7為0
  105. en=0;  //取消使能
  106. }
  107. /************************寫指令函數(shù)*********************************************/
  108. void write_code(uchar c)   
  109. {
  110. busy();   //檢查忙標(biāo)志
  111. rs=0;   //指令操作
  112. rw=0;   //寫操作
  113. dataport=c;  //送指令到端口
  114. en=1;   //使能
  115. delay(1);  //稍微延時
  116. en=0;   //取消使能
  117. }
  118. /************************寫數(shù)據(jù)函數(shù)*********************************************/
  119. void write_data(uchar d)   
  120. {
  121. busy();   //檢查忙標(biāo)志
  122. rs=1;   //數(shù)據(jù)操作
  123. rw=0;   //寫操作
  124. dataport=d;  //送數(shù)據(jù)到端口
  125. en=1;   //使能
  126. delay(1);  //稍微延時
  127. en=0;   //取消延時
  128. }
  129. /***********************寫漢字**************************************************/
  130. void write_hz(uchar *hz)
  131. {         
  132. while(*hz>0)
  133. {
  134.   write_data(*hz); //寫入漢字
  135.   hz++;
  136. }
  137. }

  139. /***************************初始化12864*****************************************/
  140. void init_12864()  
  141. {
  142. psb=1;        //并口方式
  143. rst=1;        //復(fù)位端置高
  144. write_code(0x30); //8位數(shù)據(jù)傳送，基本指令操作
  145. delay(10);
  146. write_code(0x0c); //無光標(biāo)，不反白
  147. delay(10);   
  148. write_code(0x01); //清除顯示
  149. delay(10);
  150. write_code(0x40); //光標(biāo)左移，字符不動
  151. delay(10);
  152. }                  
  153. /*******************************************************************************/
  154. /*************************DS1302子函數(shù)******************************************/
  155. /************************1302寫驅(qū)動函數(shù)*****************************************/
  156. void write_clock(uchar dat)
  157. {
  158. ACC=dat;
  159. clock_dat=a0; clock_clk=1; clock_clk=0; //數(shù)據(jù)在上升沿變化
  160. clock_dat=a1; clock_clk=1; clock_clk=0; //下降沿寫入1302
  161. clock_dat=a2; clock_clk=1; clock_clk=0;
  162. clock_dat=a3; clock_clk=1; clock_clk=0;
  163. clock_dat=a4; clock_clk=1; clock_clk=0;
  164. clock_dat=a5; clock_clk=1; clock_clk=0;
  165. clock_dat=a6; clock_clk=1; clock_clk=0;
  166. clock_dat=a7; clock_clk=1; clock_clk=0;
  167. }
  168. /************************1302讀驅(qū)動函數(shù)*****************************************/
  169. uchar read_clock()
  170. {
  171. clock_dat=1;   //輸出賦1
  172. a0=clock_dat;clock_clk=1; clock_clk=0;  //位0為1，讀1302
  173. a1=clock_dat;clock_clk=1; clock_clk=0; //下降沿讀出有效
  174.     a2=clock_dat;clock_clk=1; clock_clk=0;
  175. a3=clock_dat;clock_clk=1; clock_clk=0;
  176.     a4=clock_dat;clock_clk=1; clock_clk=0;
  177. a5=clock_dat;clock_clk=1; clock_clk=0;
  178. a6=clock_dat;clock_clk=1; clock_clk=0;
  179. a7=clock_dat;clock_clk=1; clock_clk=0;
  180. return(ACC);
  181. }
  182. /***************************寫數(shù)據(jù)入1302****************************************/
  183. void write_dat_clock(uchar add,uchar dat)
  184. {
  185. clock_clk=0;
  186. clock_rst=0; //時鐘脈沖為低時
  187. clock_rst=1; //復(fù)位端才能置高
  188. write_clock(add); //寫入地址（命令字節(jié)）
  189. write_clock(dat); //寫入數(shù)據(jù)
  190. clock_rst=0; //終止數(shù)據(jù)傳送
  191. clock_clk=1;
  192. }
  193. /***************************從1302讀出數(shù)據(jù)**************************************/
  194. uchar read_dat_clock(uchar add)
  195. {
  196. uchar dat=0; //定義數(shù)據(jù)儲存變量
  197. clock_clk=0;
  198. clock_rst=0;
  199. clock_rst=1;
  200. write_clock(add); //寫入要讀數(shù)據(jù)的地址
  201. dat=read_clock(); //讀出數(shù)據(jù)
  202. clock_rst=0; //終止數(shù)據(jù)傳送
  203. clock_clk=1;
  204. return dat;  //返回數(shù)據(jù)
  205. }
  206. /**************************設(shè)置初始時間函數(shù)*************************************/
  207. void set_time()
  208. {
  209. write_dat_clock(0x8e,0x00);  //允許寫操作
  210. write_dat_clock(0x8c,0x09);  //年
  211. write_dat_clock(0x8a,0x03);  //星期
  212. write_dat_clock(0x88,0x10);  //月
  213. write_dat_clock(0x86,0x14);  //日
  214. write_dat_clock(0x84,0x21);  //小時
  215. write_dat_clock(0x82,0x56);  //分
  216. write_dat_clock(0x80,0x00);  //秒，且振蕩器工作
  217. //write_dat_clock(0x90,0xa5);  //充電
  218. write_dat_clock(0x8e,0x80);  //禁止寫操作
  219. }
  220. /*****************************讀取時間******************************************/
  221. void get_time()
  222. {
  223. sec=read_dat_clock(0x81);    //讀取秒
  224. sec=(sec>>4)*10+(sec&0x0f);  //秒二進制轉(zhuǎn)換
  225. min=read_dat_clock(0x83);    //讀取分鐘
  226. min=(min>>4)*10+(min&0x0f);  //分二進制轉(zhuǎn)換
  227. hour=read_dat_clock(0x85);   //讀取小時
  228. hour=(hour>>4)*10+(hour&0x0f);//小時二進制轉(zhuǎn)換
  229. day=read_dat_clock(0x87);     //讀取日期
  230. day=(day>>4)*10+(day&0x0f);   //日期二進制轉(zhuǎn)換
  231. month=read_dat_clock(0x89);   //讀取月份
  232. month=(month>>4)*10+(month&0x0f);//月二進制轉(zhuǎn)換
  233. week=read_dat_clock(0x8b);    //讀取星期
  234. week=(week>>4)*10+(week&0x0f);//星期二進制轉(zhuǎn)換
  235. year1=read_dat_clock(0x8d);     //讀取年份
  236. year1=(year1>>4)*10+(year1&0x0f); //年份二進制轉(zhuǎn)換
  237. }         
  238. /*************************DS18B20各子函數(shù)***************************************/  
  239. /*************************DS18B20延時函數(shù)***************************************/
  240. void delay_DS18B20(uint i)
  241. {
  242. for(;i;i--);
  243. }
  244. /*************************DS18B20初始化函數(shù)*************************************/
  245. init_DS18B20()  
  246. {  
  247. DQ=1;       //DQ復(fù)位
  248. delay_DS18B20(1);   //稍作延時
  249. DQ=0;       //產(chǎn)生復(fù)位脈沖
  250. delay_DS18B20(160); //精確延時，大于480us
  251. DQ=1;       //拉高總線
  252. delay_DS18B20(5);   //等待20us左右
  253. while(DQ);      //等待DS18B20發(fā)出存在脈沖
  254. delay_DS18B20(30); //脈沖持續(xù)100us左右
  255. }
  256. /*****************************寫一個字節(jié)****************************************/
  257. void write_onechar(uchar dat)
  258. {
  259. uchar i;
  260. for(i=8;i>0;i--)
  261. {
  262.   DQ=0;
  263.   DQ=dat&0x01;
  264.   delay_DS18B20(3);
  265.   DQ=1;
  266.   dat>>=1;
  267. }
  268. }
  269. /*****************************讀一個字節(jié)****************************************/
  270. uchar read_onechar()
  271. {
  272. uchar i;
  273. uchar dat;
  274. for(i=8;i>0;i--)
  275. {
  276.   DQ=0;    //總線拉低
  277.   dat>>=1; //維持一個指令時間
  278.   DQ=1;    //拉高總線
  279.   if(DQ)  //讀數(shù)據(jù)
  280.    dat|=0x80;
  281.   delay_DS18B20(20); //維持60us
  282. }
  283. return dat;
  284. }
  285. /*************************讀取溫度數(shù)值******************************************/
  286. uchar read_tem()
  287. {
  288. uchar ltemp;          //定義溫度低字節(jié)
  289. uchar htemp;          //定義溫度高字節(jié)
  290. uchar t;           //定義溫度整數(shù)部分返回值
  291. init_DS18B20();
  292. write_onechar(0xcc);  //跳過讀序號列號的操作
  293. write_onechar(0x44);  // 啟動溫度轉(zhuǎn)換
  294. init_DS18B20();
  295. write_onechar(0xcc);  //跳過讀序號列號的操作
  296. write_onechar(0xbe);  //讀取溫度寄存器
  297. ltemp=read_onechar(); //讀取溫度低字節(jié)
  298. htemp=read_onechar(); //讀取溫度高字節(jié)
  299. ltemp=ltemp>>4;       //低字節(jié)右移4位，去掉小數(shù)位
  300. t=htemp<<4;        //高字節(jié)左移4位，去掉符號位
  301. t|=ltemp;        //合并整數(shù)部分
  302. xs=ltemp&0x0f;       //小數(shù)部分賦予xs
  303. xs*=0.625;        //計算小數(shù)部分的數(shù)值
  304. return t;        //返回溫度整數(shù)部分?jǐn)?shù)值
  305. }
  306. /******************************************************************************/
  307. /*****************************按鍵功能函數(shù)*************************************/
  308. void key_1()     //選擇變量函數(shù)
  309. {
  310. key1=1;
  311. if(key1==0)
  312. {
  313.   delay(10);
  314.   if(key1==0)
  315.   {
  316.    if(++status>5)status=0; //1控制年的變化，2控制月的變化,3控制日的變化
  317.   }       //4控制時的變化，5控制分的變化
  318.   while(key1==0);
  319. }
  320. }
  321. /******************************************************************************/
  322. void key_2()       //加函數(shù)
  323. {
  324. key2=1;
  325. if(key2==0)
  326. {
  327.   delay(10);
  328.   if(key2==0)
  329.   {
  330.    switch(status)
  331.    {
  332.     case 1:if(++year1>99)year1=0;break;
  333.     case 2:if(++month>12)month=1;break;
  334.     case 3:if(++day>31)day=1;break;
  335.     case 4:if(++hour>=24)hour=0;break;
  336.     case 5:if(++min>=60)min=0;break;
  337.    }
  338.   }
  339.   while(key2==0);
  340. }
  341. }
  342. /*****************************************************************************/
  343. void key_3()//減函數(shù)
  344. {
  345. key3=1;
  346. if(key3==0)
  347. {
  348.   delay(10);
  349.   if(key3==0)
  350.   {
  351.    switch(status)
  352.    {
  353.     case 1:if((year1--)<=0)year1=99;break;
  354.     case 2:if((month--)<=1)month=12;break;
  355.     case 3:if((day--)<=1)day=31;break;
  356.     case 4:if((hour--)<=0)hour=23;break;
  357.     case 5:if((min--)<=0)min=59;break;
  358.    }
  359.   }
  360.   while(key3==0);
  361. }
  362. }
  363. /*****************************************************************************/
  364. key_4()     //選擇變量函數(shù)
  365. {
  366. key4=1;
  367. if(key4==0)
  368. {
  369.   delay(10);
  370.   if(key4==0)
  371.   {
  372.    if(++set>1)set=0;//0顯示首頁，1顯示次頁
  373.   }
  374.   write_code(0x01); //清除一下顯示屏
  375.   while(key4==0);
  376. }
  377. }
  378. /*****************************************************************************/
  379. void key_time()    //按鍵設(shè)置時間的處理
  380. {
  381. write_dat_clock(0x8e,0x00);  //允許寫操作
  382. write_dat_clock(0x8c,(year1/10)*16+year1%10);  //年
  383. write_dat_clock(0x8a,(week/10)*16+week%10);  //星期
  384. write_dat_clock(0x88,(month/10)*16+month%10);  //月
  385. write_dat_clock(0x86,(day/10)*16+day%10);  //日
  386. write_dat_clock(0x84,(hour/10)*16+hour%10);  //小時
  387. write_dat_clock(0x82,(min/10)*16+min%10);  //分
  388. write_dat_clock(0x8e,0x80);  //禁止寫操作
  389. }
  390. /*****************************************************************************/
  391. /***********************平閏年設(shè)定********************************************/
  392. bit prp(uchar y)
  393. {
  394. uint temp;
  395. temp=2000+y;
  396. if(((temp%4)==0)&&((temp%100)!=0)||((temp%400)==0))
  397.   return 1;
  398. else
  399.   return 0;
  400. }
  401. /***********************某年月日星期設(shè)定**************************************/
  402. void d_week()
  403. {
  404. uchar x,y;
  405. x=year1/4;
  406. y=year1%4;
  407. if(month<3)
  408.   week=((x*5+2+(y-1)+(day-1))%7+month_week[month-1])%7;
  409. else
  410.   week=((x*5+y+(day-1))%7+month_week[month-1])%7;
  411. }
  412. /***********************某年月日農(nóng)歷設(shè)定**************************************/
  413. uchar get_moon_day(uchar m,uint ta)//農(nóng)歷月天數(shù)判定函數(shù)
  414. {
  415. uchar temp;
  416. switch(m)
  417. {
  418.   case 1:temp=year_code[ta]&0x08;break;
  419.   case 2:temp=year_code[ta]&0x04;break;
  420.   case 3:temp=year_code[ta]&0x02;break;
  421.   case 4:temp=year_code[ta]&0x01;break;
  422.   case 5:temp=year_code[ta+1]&0x80;break;
  423.   case 6:temp=year_code[ta+1]&0x40;break;
  424.   case 7:temp=year_code[ta+1]&0x20;break;
  425.   case 8:temp=year_code[ta+1]&0x10;break;
  426.   case 9:temp=year_code[ta+2]&0x08;break;
  427.   case 10:temp=year_code[ta+2]&0x04;break;
  428.   case 11:temp=year_code[ta+2]&0x02;break;
  429.   case 12:temp=year_code[ta+2]&0x01;break;
  430.   case 13:temp=year_code[ta+2]&0x80;break;
  431. }
  432. if(temp==0)
  433.   return 29;
  434. else
  435.   return 30;
  436. }
  437. /**********************某年農(nóng)歷閏月設(shè)定**************************************/
  438. uchar get_month_r(uchar y)
  439. {
  440. uchar temp,ta;
  441. ta=y*3;
  442. temp=(year_code[ta]&0xf0)>>4;
  443. return temp;
  444. }
  445. /*********************陽歷轉(zhuǎn)化農(nóng)歷*******************************************/
  446. void convert_yinyan(uchar year1,uchar month,uchar day)
  447. {
  448. uchar month_n1,day_n1;//春節(jié)公歷月日
  449. uint temp1,temp2;     //值轉(zhuǎn)移變量
  450. table_addr=year1*3;
  451. month_n1=(year_code[table_addr+2]&0x60)>>5;//農(nóng)歷正月所在月數(shù)
  452. day_n1=year_code[table_addr+2]&0x1f;    //農(nóng)歷正月所在當(dāng)月日數(shù)
  453. month_r=get_month_r(year1);  //計算當(dāng)年閏月
  454. if(month_n1==1)   //春節(jié)離當(dāng)年元旦天數(shù)
  455.   temp1=day_n1-1;
  456. else
  457.   temp1=30+day_n1-1;
  458. if(prp(year1))//次年是否為閏年
  459.   temp2=month_day2[month-1]+day-1;
  460. else
  461.   temp2=month_day1[month-1]+day-1;
  462. if(temp2>=temp1)//次月日在春節(jié)后否
  463. {
  464.   year1_n=year1;
  465.   month_n=1;
  466.   temp2=temp2-temp1;
  467.   temp1=get_moon_day(month_n,table_addr); //當(dāng)月天數(shù)計算
  468.   while(temp2>=temp1)
  469.   {
  470.    month_n++;
  471.    temp2=temp2-temp1;
  472.    temp1=get_moon_day(month_n,table_addr);
  473.   }
  474.   day_n=temp2+1;
  475. }
  476. else
  477. {
  478.   year1_n=year1-1;
  479.   temp1=temp1-temp2;
  480.   table_addr=table_addr-3;
  481.   month_r=get_month_r(year1-1);
  482.   if(month_r==0)   //若當(dāng)年沒有閏月
  483.    month_n=12;
  484.   else
  485.    month_n=13;
  486.   temp2=get_moon_day(month_n,table_addr);
  487.   while(temp1>=temp2)
  488.   {
  489.    month_n--;
  490.    temp1=temp1-temp2;
  491.    temp2=get_moon_day(month_n,table_addr);
  492.   }
  493. }


  496. }

  498. /***********************特殊功能子函數(shù)***************************************/
  499. /**************************星期設(shè)定******************************************/
  500. void xingqi()
  501. {
  502. d_week();
  503. switch(week)
  504. {
  505.   case 1:write_hz("一");break;
  506.   case 2:write_hz("二");break;
  507.   case 3:write_data(0xc8);write_data(0xfd);break;
  508.   case 4:write_hz("四");break;
  509.   case 5:write_hz("五");break;
  510.   case 6:write_hz("六");break;
  511.   case 0:write_hz("日");break;
  512.   default:break;
  513. }
  514. }
  515. /*************************生肖年設(shè)定*****************************************/
  516. void shengxiao()
  517. {
  518. uchar sx=year1%12;
  519. switch(sx)
  520. {
  521.   case 0:write_hz("龍");break;
  522.   case 1:write_hz("蛇");break;
  523.   case 2:write_hz("馬");break;
  524.   case 3:write_hz("羊");break;
  525.   case 4:write_hz("猴");break;
  526.   case 5:write_hz("雞");break;
  527.   case 6:write_hz("狗");break;
  528.   case 7:write_hz("豬");break;
  529.   case 8:write_hz("鼠");break;
  530.   case 9:write_hz("牛");break;
  531.   case 10:write_hz("虎");break;
  532.   case 11:write_hz("兔");break;
  533.   default:break;
  534. }
  535. }
  536. /************************天干地支設(shè)定****************************************/
  537. void tgdz()
  538. {
  539. uchar tiangan=year1_n%10;
  540. uchar dizhi=year1_n%12;
  541. switch(tiangan)
  542. {
  543.   case 4:write_hz("甲");break;
  544.   case 5:write_hz("乙");break;
  545.   case 6:write_hz("丙");break;
  546.   case 7:write_hz("丁");break;
  547.   case 8:write_hz("戊");break;
  548.   case 9:write_hz("己");break;
  549.   case 0:write_data(0xb8);write_data(0xfd);break;
  550.   case 1:write_hz("辛");break;
  551.   case 2:write_hz("壬");break;
  552.   case 3:write_hz("葵");break;
  553.   default:break;
  554. }
  555. switch(dizhi)
  556. {
  557.   case 8:write_hz("子");break;
  558.   case 9:write_hz("丑");break;
  559.   case 10:write_hz("寅");break;
  560.   case 11:write_hz("卯");break;
  561.   case 0:write_hz("辰");break;
  562.   case 1:write_hz("巳");break;
  563.   case 2:write_hz("午");break;
  564.   case 3:write_hz("未");break;
  565.   case 4:write_hz("申");break;
  566.   case 5:write_hz("酉");break;
  567.   case 6:write_hz("戌");break;
  568.   case 7:write_hz("亥");break;
  569.   default:break;
  570. }
  571. }
  572. /*******************農(nóng)歷月設(shè)定**********************************************/
  573. void nongli_m()
  574. {
  575. if(month_n==0)
  576. {
  577.   switch(month_n)
  578.   {
  579.    case 1: write_hz("    ");write_data(0xd5);write_data(0xfd);break;  //正
  580.    case 2: write_hz("    二");break;
  581.    case 3: write_hz("    ");write_data(0xc8);write_data(0xfd);break;  //三
  582.    case 4: write_hz("    四");break;
  583.    case 5: write_hz("    五");break;
  584.    case 6: write_hz("    六");break;
  585.    case 7: write_hz("    七");break;
  586.    case 8: write_hz("    八");break;
  587.    case 9: write_hz("    九");break;
  588.    case 10:write_hz("    十");break;
  589.    case 11:write_hz("  十一");break;
  590.    case 12:write_hz("  十二");break;
  591.   }
  592. }
  593. else
  594. {
  595.   if((month_n-1)==month_r)
  596.   {
  597.    switch(month_n-1)
  598.    {
  599.     case 1: write_hz("  閏一");break;
  600.     case 2: write_hz("  閏二");break;
  601.     case 3: write_hz("  閏");write_data(0xc8);write_data(0xfd);break;
  602.     case 4: write_hz("  閏四");break;
  603.     case 5: write_hz("  閏五");break;
  604.     case 6: write_hz("  閏六");break;
  605.     case 7: write_hz("  閏七");break;
  606.     case 8: write_hz("  閏八");break;
  607.     case 9: write_hz("  閏九");break;
  608.     case 10:write_hz("  閏十");break;
  609.     case 11:write_hz("閏十一");break;
  610.     case 12:write_hz("閏十二");break;
  611.    }
  612.   }
  613.   else if(month_n<=month_r)
  614.   {
  615.    switch(month_n)
  616.    {
  617.     case 1: write_hz("    ");write_data(0xd5);write_data(0xfd);break;
  618.     case 2: write_hz("    二");break;
  619.     case 3: write_hz("    ");write_data(0xc8);write_data(0xfd);break;
  620.     case 4: write_hz("    四");break;
  621.     case 5: write_hz("    五");break;
  622.     case 6: write_hz("    六");break;
  623.     case 7: write_hz("    七");break;
  624.     case 8: write_hz("    八");break;
  625.     case 9: write_hz("    九");break;
  626.     case 10:write_hz("    十");break;
  627.     case 11:write_hz("  十一");break;
  628.     case 12:write_hz("  十二");break;
  629.    }
  630.   }
  631.   else
  632.   {
  633.    switch(month_n-1)
  634.    {
  635.     case 2: write_hz("    二");break;
  636.     case 3: write_hz("    ");write_data(0xc8);write_data(0xfd);break;
  637.     case 4: write_hz("    四");break;
  638.     case 5: write_hz("    五");break;
  639.     case 6: write_hz("    六");break;
  640.     case 7: write_hz("    七");break;
  641.     case 8: write_hz("    八");break;
  642.     case 9: write_hz("    九");break;
  643.     case 10:write_hz("    十");break;
  644.     case 11:write_hz("  十一");break;
  645.     case 12:write_hz("  十二");break;
  646.    }
  647.   }
  648. }
  649. }
  650. /***********************農(nóng)歷日設(shè)定******************************************/
  651. void nongli_d()
  652. {
  653. switch(day_n)
  654. {
  655.   case 1: write_hz("初一  ");break;
  656.   case 2: write_hz("初二  ");break;
  657.   case 3: write_hz("初");write_data(0xc8);write_data(0xfd);write_hz("  ");break;
  658.   case 4: write_hz("初四  ");break;
  659.   case 5: write_hz("初五  ");break;
  660.   case 6: write_hz("初六  ");break;
  661.   case 7: write_hz("初七  ");break;
  662.   case 8: write_hz("初八  ");break;
  663.   case 9: write_hz("初九  ");break;
  664.   case 10:write_hz("初十  ");break;
  665.   case 11:write_hz("十一  ");break;
  666.   case 12:write_hz("十二  ");break;
  667.   case 13:write_hz("十");write_data(0xc8);write_data(0xfd);write_hz("  ");break;
  668.   case 14:write_hz("十四  ");break;
  669.   case 15:write_hz("十五  ");break;
  670.   case 16:write_hz("十六  ");break;
  671.   case 17:write_hz("十七  ");break;
  672.   case 18:write_hz("十八  ");break;
  673.   case 19:write_hz("十九  ");break;
  674.   case 20:write_hz("廿十  ");break;
  675.   case 21:write_hz("廿十一");break;
  676.   case 22:write_hz("廿十二");break;
  677.   case 23:write_hz("廿十");write_data(0xc8);write_data(0xfd);break;
  678.   case 24:write_hz("廿十四");break;
  679.   case 25:write_hz("廿十五");break;
  680.   case 26:write_hz("廿十六");break;
  681.   case 27:write_hz("廿十七");break;
  682.   case 28:write_hz("廿十八");break;
  683.   case 29:write_hz("廿十九");break;
  684.   case 30:write_data(0xc8);write_data(0xfd);write_hz("十");write_hz("  ");break;
  685. }
  686. }

  688. /************************節(jié)日函數(shù)*******************************************/
  689. void holiday()
  690. {  
  691. while(1){
  692. if(status==1)          {write_hz("    調(diào)整年份    ");break;}
  693. if(status==2)          {write_hz("    調(diào)整月份    ");break;}
  694. if(status==3)          {write_hz("    調(diào)整日期    ");break;}
  695. if(status==4)          {write_hz("    調(diào)整小時    ");break;}
  696. if(status==5)          {write_hz("    調(diào)整分鐘    ");break;}
  697. if(month==1&&day==1)   {write_hz("    新年元旦    ");break;}
  698. if(month==2&&day==14)  {write_hz("  今日情人節(jié)    ");break;}
  699. if(month==3&&day==8)   {write_hz("  國際婦女節(jié)    ");break;}
  700. if(month==3&&day==12)  {write_hz("  中國植樹節(jié)    ");break;}
  701. if(month==3&&day==15)  {write_hz("世界消費者權(quán)益日");break;}
  702. if(month==4&&day==1)   {write_hz("    愚人節(jié)      ");break;}
  703. if(month==5&&day==1)   {write_hz("  國際勞動節(jié)    ");break;}
  704. if(month==5&&day==4)   {write_hz("  中國青年節(jié)    ");break;}
  705. if(month==5&&day==8)   {write_hz("  世界紅十字日  ");break;}
  706. if(month==5&&day==12)  {write_hz("  國際護士節(jié)    ");break;}
  707. if(month==6&&day==1)   {write_hz("  國際兒童節(jié)    ");break;}
  708. if(month==6&&day==26)  {write_hz("  國際禁毒日    ");break;}
  709. if(month==7&&day==1)   {write_hz("中國共產(chǎn)黨誕生日");break;}
  710. if(month==7&&day==7)   {write_hz("抗日戰(zhàn)爭紀(jì)念日  ");break;}
  711. if(month==8&&day==1)   {write_hz("  中國建軍節(jié)    ");break;}
  712. if(month==8&&day==12)  {write_hz("  國際青年節(jié)    ");break;}
  713. if(month==9&&day==10)  {write_hz("  中國教師節(jié)    ");break;}
  714. if(month==10&&day==1)  {write_hz("    國慶節(jié)      ");break;}
  715. if(month==10&&day==24) {write_hz("    聯(lián)合國日    ");break;}
  716. if(month==10&&day==31) {write_hz("    萬圣節(jié)      ");break;}
  717. if(month==12&&day==1)  {write_hz("  世界艾滋病日  ");break;}
  718. if(month==12&&day==25) {write_hz("    圣誕節(jié)      ");break;}
  719. if(hour>=4&&hour<6)    {write_hz("凌晨了，ZZZ~~~");break;}
  720. if(hour>=6&&hour<8)    {write_hz("主人，早上好！");break;}
  721. if(hour>=8&&hour<12)   {write_hz("__●__上午▲▲__");break;}
  722. if(hour==12)           {write_hz("午休時間到咯~");break;}
  723. if(hour>=13&&hour<18)  {write_hz("下午茶時間^_^");break;}
  724. if(hour>=18&&hour<22)  {write_hz("  晚上了額  ~");break;}
  725. if(hour>=22&&hour<=23) {write_hz("該準(zhǔn)備睡咯~~~");break;}
  726. if(hour>=0&&hour<4)    {write_hz("你，睡了嗎？Z~");break;}

  728. }  
  729. }
  730. /**************************整點半點報時函數(shù)**********************************/
  731. void time()
  732. {
  733. get_time();
  734. if(min==0&&sec==0)
  735. {
  736.   num=0;
  737.   delay(500);
  738. }
  739. if(min==0)
  740. {
  741.   if(hour==0)
  742.   {   
  743.    if(num<12)
  744.    {
  745.     beep=0;
  746.     delay(1000);
  747.     beep=1;
  748.     num=num+1;
  749.    }
  750.   }
  751.   if(hour>0&&hour<13)
  752.   {
  753.    if(num<hour)
  754.    {
  755.     beep=0;
  756.     delay(1000);
  757.     beep=1;
  758.     num=num+1;
  759.    }
  760.   }
  761.   if(hour>12&&hour<24)
  762.   {
  763.    if(num<hour-12)
  764.    {
  765.     beep=0;
  766.     delay(1000);
  767.     beep=1;
  768.     num=num+1;
  769.    }
  770. ……………………

  772. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復(fù)制代碼


所有資料51hei提供下載:
基于51單片機的多功能萬年歷.rar (4.67 MB, 下載次數(shù): 124)



作者: zszs666    時間: 2020-6-11 09:37
很好 不錯的
作者: 784772531    時間: 2020-10-13 15:23
這個之前做過一個沒有成功 估計是程序問題
作者: huacaizi    時間: 2021-4-24 20:34
這個主控還沒有畫出來的，AT89C52，不是很完美
作者: 流浪的魚    時間: 2022-4-6 08:13
看起來不錯
作者: feishor    時間: 2022-4-8 13:29
看起來不錯，先看看，謝了
作者: yygdzjs    時間: 2022-5-4 17:31
萬年歷的代碼還可以參考一下.



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