【正文】 p=temp|0x80。 else temp=tempamp。0x7f。delay(5)。 SCL=1。delay(10)。temp=temp1。 return(DS1302_BCD_to_DEC(temp))。 } void set_ds1302(unsigned char dat,unsigned char adress) { DS1302_start()。DS1302_writebyte(adress)。 delay(100)。 DS1302_writebyte(dat/10*16|dat%10)。DS1302_stop()。delay_ms(10)。 } unsigned char read_ds1302(unsigned char adress) { unsigned char dat=0。 DS1302_start()。 //miao DS1302_writebyte(adress)。delay(10)。dat = DS1302_readbyte()。 DS1302_stop()。delay(50)。return dat。 西南石油大學本科畢業(yè)設計（論文） 34 } void main() { unsigned char i,m,sign=0,scan=0。 unsigned int num=0,temp1=0,temp2=0。 clear_screen()。screen_int()。 for(i = 0。 i 8。 i++) { set_ds1302(sec,0x80)。 set_ds1302(min,0x82)。set_ds1302(hour,0x84)。 set_ds1302(day,0x86)。set_ds1302(mon,0x88)。set_ds1302(week,0x8a)。 set_ds1302(year,0x8c)。 } while(1) { puts_char(2,5, :ov)。puts_char(2,3, :ov)。 puts_char(1,6,ov)。puts_char(1,4,ov)。 delay(100)。 sec=read_ds1302(0x81)。 puts_data(2,6,2,sec)。 min=read_ds1302(0x83)。 puts_data(2,4,2,min)。 hour=read_ds1302(0x85)。 puts_data(2,2,2,hour)。 day=read_ds1302(0x87)。 puts_data(1,7,2,day)。 mon=read_ds1302(0x89)。 puts_data(1,5,2,mon)。 week=read_ds1302(0x8b)。 switch(week) { case 1: puts_char(3,2,星期一 ov)。 break。 case 2: puts_char(3,2,星期二 ov)。 break。 case 3: puts_char(3,2,星期叁 ov)。 break。 case 4: puts_char(3,2,星期四 ov)。 break。 case 5: puts_char(3,2,星期五 ov)。 break。 case 6: puts_char(3,2,星期六 ov)。 break。 電子萬年歷 的設計 35 case 7: puts_char(3,2,星期天 ov)。 break。 } year=read_ds1302(0x8d)。 puts_data(1,2,4,2021+year)。 switch(year%12) { case 0: puts_char(3,6,龍年 ov)。break。 case 1: puts_char(3,6,蛇年 ov)。break。 case 2: puts_char(3,6,馬年 ov)。break。 case 3: puts_char(3,6,羊年 ov)。break。 case 4: puts_char(3,6,猴年 ov)。break。 case 5: puts_char(3,6,雞年 ov)。break。 case 6: puts_char(3,6,狗年 ov)。break。 case 7: puts_char(3,6,豬年 ov)。break。 case 8: puts_char(3,6,鼠年 ov)。break。 case 9: puts_char(3,6,牛年 ov)。break。 case 10: puts_char(3,6,虎年 ov)。break。 case 11: puts_char(3,6,兔年 ov)。break。 default: break。 } //陽歷轉(zhuǎn)陰歷 if(year%4==0){num=runnian[mon1]+day。puts_char(1,1,閏 ov)。 } //當前號數(shù)在陽歷中的第 num 天 if(year%4!=0){num=pingnian[mon1]+day。 puts_char(1,1, ov)。 } if(numguanxibiao[year][0]) { switch(yinli_mon) { case 1: puts_char(4,4, 一 ov)。break。 case 2: puts_char(4,4, 二 ov)。break。 case 3: puts_char(4,4, 叁 ov)。break。 case 4: puts_char(4,4, 四 ov)。break。 西南石油大學本科畢業(yè)設計（論文） 36 case 5: puts_char(4,4, 五 ov)。break。 case 6: puts_char(4,4, 六 ov)。break。 case 7: puts_char(4,4, 七 ov)。break。 case 8: puts_char(4,4, 八 ov)。break。 case 9: puts_char(4,4, 九 ov)。break。 case 10: puts_char(4,4, 十 ov)。break。 case 11: puts_char(4,4, 冬 ov)。break。 case 12: puts_char(4,4, 臘 ov)。break。 default: break。 } temp1=guanxibiao[year][1]。temp2=guanxibiao[year][2]。 a=numguanxibiao[year][0]。 //a 為當前日期在陰歷中的第幾天 for(i=6。i0。i) { temp1=1。shuzu1[i]=CY。 } for(i=6。i0。i) {temp2=1。shuzu1[i+6]=CY。 } if(guanxibiao[year][3]/16==0) { i=1。m=1。 while(m) { if(shuzu1[i]==1) { if(a=29) { yinli_day=a。 yinli_mon=i。 m=0。 } else a=a29。 } 電子萬年歷 的設計 37 if(shuzu1[i]==0) { if(a=30) { yinli_day=a。 yinli_mon=i。 m=0。 } else a=a30。 }i++。 }} if(guanxibiao[year][3]/16!=0) { i=1。m=1。 while(m) { if(i=guanxibiao[year][3]/16) { if(shuzu1[i]==1) { if(a=29) { yinli_day=a。 yinli_mon=i。 m=0。 }else a=a29。 } if(shuzu1[i]==0) { if(a=30) { yinli_day=a。 yinli_mon=i。 m=0。 } else a=a30。 } 西南石油大學本科畢業(yè)設計（論文） 38 } if(i==guanxibiao[year][3]/16+1) //閏月顯示 { if(guanxibiao[year][3]%16==1) { if(a=29) { yinli_day=a。 yinli_mon=i1。 puts_char(4,4,閏 ov)。m=0。 } else a=a29。 } if(guanxibiao[year][3]%16==0) { if(a=30) { yinli_day=a。 yinli_mon=i1。 puts_char(4,4,閏 ov)； m=0。 } else a=a30。 } } if(iguanxibiao[year][3]/16+1) { if(shuzu1[i1]==1) { if(a=29) { yinli_day=a。 yinli_mon=i1。 m=0。 } else a=a29。 電子萬年歷 的設計 39 } if(shuzu1[i1]==0) { if(a=30) { yinli_day=a。 yinli_mon=i1。 m=0。 } else a=a30。 } }i++。 } } switch(yinli_day/10) { case 0: puts_char(4,7,初 ov)。break。 case 1: puts_char(4,7,一 ov)。break。 case 2: puts_char(4,7,廿 ov)。break。 case 3: puts_char(4,7,叁 ov)。break。 case 4: puts_char(4,7,四 ov)。break。 case 5: puts_char(4,7,五 ov)。break。 case 6: puts_char(4,7,六 ov)。break。 case 7: puts_char(4,7,七 ov)。break。 case 8: puts_char(4,7,八 ov)。break。 case 9: puts_char(4,7,九 ov)。break。 default: break。 } switch(yinli_day%10) { case 0: puts_char(4,8,十 ov)。break。 case 1: puts_char(4,8,一 ov)。break。 case 2: puts_char(4,8,二 ov)。break。 西南石油大學本科畢業(yè)設計（論文） 40 case 3: puts_char(4,8,叁 ov)。break。 case 4: puts_char(4,8,四 ov)。break。 case 5: puts_char(4,8,五 ov)。break。 case 6: puts_char(4,8,六 ov)。break。 case 7: puts_char(4,8,七