?? 12864萬年歷.c.bak
字號:
/*******************************************/
/* LCM128*64萬年歷 */
/* 硬件:LCM128*64 89s52 晶振:24M */
/* 制作:hyj */
/* 時間:2006.11.3 V0.1 */
/* 2006.12.4 V0.2(修正"三"顯示) */
/* 2006.12.7 V0.3(增加鬧鐘功能) */
/*******************************************/
#include<reg51.h>
#include<stdio.h>
#include<intrins.h>
#define uchar unsigned char
#define DELTA 500
bit c_moon;
bit flash,id,alarm_controls,alarm;
unsigned char k,jieqi1,jieqi2;
data uchar year_moon,month_moon,day_moon;
unsigned char year,month,day,week,hour,min,sec;
unsigned char alarm_hour,alarm_min,sec_temp;
uchar mode=0,add=1,ir_data1,ir_data2,ir_data3,ir_data4,ir_enable,count,count2=0,en=0;
code unsigned char shuzi[]={"0123456789:."};
code unsigned char riqi[]= {"年月日農歷星期室溫 鬧鐘開關"};
code unsigned char xingqi[]={" 一二33四五六日"};
code unsigned char rongli[]={"初十廿卅"};
code unsigned char shuzi2[]={"十一二33四五六七八九"};
code unsigned char shuzi3[]={" 十"};
code unsigned char shuzi4[]={" 一二33四五六七八九"};
unsigned char code inittime[]={0x48,0x21,0x15,0x11,0x11,0x06,0x06}; //初始化參數
// 秒 分 時 日 月 星期 年
code uchar san[]={
/*-- 文字: 三 --*/
/*-- 宋體12; 此字體下對應的點陣為：寬x高=16x16 --*/
0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,
0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,
};
code unsigned char jieqi[]=
{
" "
"小寒大寒"
"立春雨水"
"驚蟄春分"
"清明谷雨"
"立夏小滿"
"芒種夏至"
"小暑大暑"
"立秋處暑"
"白露秋分"
"寒露霜降"
"立冬小雪"
"大雪冬至"
};
sbit T_CLK=P3^5;
sbit T_IO =P3^6;
sbit T_RST=P3^7; //引腳定義
sbit DQ =P1^4;
sbit ACC0=ACC^0;
sbit ACC7=ACC^7;
sbit rs = P2^1;
sbit rw = P2^2;
sbit e = P2^4;
sbit psb = P2^5;
sbit rst = P3^4;
void RTInputByte(uchar); // 輸入 1Byte
uchar RTOutputByte(void); // 輸出 1Byte
void W1302(uchar, uchar); // 向DS1302寫入一個字節
uchar R1302(uchar); // 從DS1302讀出一個字節
void Set1302(unsigned char* ); // 設置初始時間
ReadTemperature(void); //讀取室溫
void Conversion(bit c,char year,char month,char day); //計算農歷日期
unsigned char calendar_calculate_solar_term_1(void); //計算當月第一個節氣對應的公歷日期
unsigned char calendar_calculate_solar_term_2(void); //計算當月第二個節氣
mode_set()
{
switch(mode)
{
case 0:mode=1;
W1302(0x8e,0x00); //允許寫操作
W1302(0x80,0x80); //寫入DS1302 時間停止
W1302(0x8e,0x80); //寫保護，禁止寫操作
TR0=1;
break;
case 1:mode=2;
break;
case 2:mode=3;
break;
case 3:mode=4;
break;
case 4:mode=5;
break;
case 5:mode=6;
break;
case 6:mode=0;
W1302(0x8e,0x00); //允許寫操作
W1302(0x80,0x00); //寫入DS1302 時間運行
W1302(0x8e,0x80); //寫保護，禁止寫操作
TR0=0;
break;
}
if(id==1)
{
switch(mode)
{
case 7:mode=8;
break;
case 8:mode=7;
break;
}
}
}
add_set()
{
uchar address,item;
uchar max,min;
if(alarm==1) {alarm=0;return;}
if(mode==0) return;
if(mode==1) {address=0x8c; max=99;min=0;} //年
if(mode==2) {address=0x88; max=12;min=1;} //月
if(mode==3) {address=0x86; max=31;min=1;} //日
if(mode==4) {address=0x8a; max=7; min=1;} //星期
if(mode==5) {address=0x84; max=23;min=0;} //小時
if(mode==6) {address=0x82; max=59;min=0;} //分鐘
if(mode==7) {address=0xc0; max=23;min=0;}
if(mode==8) {address=0xc2; max=59;min=0;}
item=R1302(address+1);
item=item/16*10+item%16;
if(add)
item++;
else
item--;
if(item<min||item==255) item=max;
if(item>max) item=min;
W1302(0x8e,0x00); //允許寫操作
W1302(address,item/10*16+item%10); //寫入DS1302 //轉成BCD碼
W1302(0x8e,0x80); //寫保護，禁止寫操作
}
ir_key()
{
switch(ir_data3)
{
case 0xe2: mode_set();
break;
case 0x52: add=1;
add_set();
break;
case 0x78: add=0;
add_set();
break;
case 0xb8: id=1;
mode=7;
TR0=1;
break;
case 0x42: id=0;
mode=0;
TR0=0;
break;
case 0xc8:if(id==1) //設置鬧鐘 開/關(必須在鬧鐘調整狀態下)
{
alarm_controls=~alarm_controls;
}
}
}
/**********************************************
遙控外部中斷程序
接收數據:ir_data1--ir_data4
倍數計數:count
DELTA :誤差
/**********************************************/
void int0remoter() interrupt 2
{
TR1=0;
if((TL1+TH1*256)==0)
{
count=0;
TL1=0;
TH1=0;
TR1=1; //開定時器
return;//有遙控信號產生中斷,退出中斷
}
if(!count)
{
if(((TL1+TH1*256)>(27000-DELTA))&&((TL1+TH1*256)<(27000+DELTA)))
{
count++;
TH1=0;
TL1=0;
TR1=1;
return;//前導碼正確,準備接收數據,退出中斷
}
count=0;
TR1=0;
TH1=0;
TL1=0;
return;//前導碼錯誤,非遙控信號,退出中斷
}
if(count<33)
{
if(count<=8)
{
if(((TL1+TH1*256)>(2250-DELTA))&&((TL1+TH1*256)<(2250+DELTA)))
{
ir_data1<<=1;
count++;
TH1=0;
TL1=0;
TR1=1;
return; //數據為0,退出中斷
}
if(((TL1+TH1*256)>(4500-DELTA))&&((TL1+TH1*256)<(4500+DELTA)))
{
ir_data1<<=1;
ir_data1|=0x01;
count++;
TH1=0;
TL1=0;
TR1=1;
return;//數據為1,退出中斷
}
count=0;
TR1=0;
TH1=0;
TL1=0;
return; //錯誤,清零退出中斷
}
if(count>8&&count<=16)
{
if(((TL1+TH1*256)>(2250-DELTA))&&((TL1+TH1*256)<(2250+DELTA)))
{
ir_data2<<=1;
count++;
TH1=0;
TL1=0;
TR1=1;
return; //數據為0,退出中斷
}
if(((TL1+TH1*256)>(4500-DELTA))&&((TL1+TH1*256)<(4500+DELTA)))
{
ir_data2<<=1;
ir_data2|=0x01;
count++;
TH1=0;
TL1=0;
TR1=1;
return;//數據為1,退出中斷
}
count=0;
TR1=0;
TH1=0;
TL1=0;
return; //錯誤,清零退出中斷
}
if(count>16&&count<=24)
{
if(((TL1+TH1*256)>(2250-DELTA))&&((TL1+TH1*256)<(2250+DELTA)))
{
ir_data3<<=1;
count++;
TH1=0;
TL1=0;
TR1=1;
return; //數據為0,退出中斷
}
if(((TL1+TH1*256)>(4500-DELTA))&&((TL1+TH1*256)<(4500+DELTA)))
{
ir_data3<<=1;
ir_data3|=0x01;
count++;
TH1=0;
TL1=0;
TR1=1;
return;//數據為1,退出中斷
}
count=0;
TR1=0;
TH1=0;
TL1=0;
return; //錯誤,清零退出中斷
}
if(count>24&&count<=32)
{
if(((TL1+TH1*256)>(2250-DELTA))&&((TL1+TH1*256)<(2250+DELTA)))
{
ir_data4<<=1;
count++;
TH1=0;
TL1=0;
TR1=1;
if(count==33)
{
EX1=0;
en=1;
ir_enable = 1;
}
return; //數據為0,退出中斷
}
if(((TL1+TH1*256)>(4500-DELTA))&&((TL1+TH1*256)<(4500+DELTA)))
{
ir_data4<<=1;
ir_data4|=0x01;
count++;
TH1=0;
TL1=0;
TR1=1;
if(count==33)
{
EX1=0;
en=1;
ir_enable = 1;
}
return;//數據為1,退出中斷
}
count=0;
TR1=0;
TH1=0;
TL1=0;
return; //錯誤,清零退出中斷
}
}
}
/********定時器中斷***********/
/* 作用:遙控接收 */
/*****************************/
void timer1_int() interrupt 3
{
if(en!=0)
{
en--;
TL1=0;
TH1=0;
}
EX1=1;
count=0;
TR1=0;
TH1=0;
TL1=0;
}
/**********定時器中斷***********/
/* 作用:調時閃動定時 */
/* 閃動時間:50(ms)*20(次) */
/*******************************/
void timer0_int() interrupt 1
{
TH0=0x3c; //50ms定時
TL0=0xb0;
if(count2++>=20)
{
count2=0;
flash=~flash;
}
}
/*************************/
/* 延時函數 */
/*************************/
void delay(unsigned char cnt)
{
unsigned char i;
while(cnt--!=0)
for(i=10;i!=0;i--);
}
/***********************/
/* LCM12864忙檢測 */
/***********************/
void tase_busy()
{
rs=0;
_nop_();
_nop_();
rw=1;
_nop_();
_nop_();
e=1;
_nop_();
_nop_();
while(P07==1);
e=0;
}
/***********************/
/* LCM12864發送指令 */
/***********************/
void send_dictate(unsigned char interim)
{
tase_busy();
rs=0;
_nop_();
_nop_();
rw=0;
_nop_();
_nop_();
P0=interim;
e=1;
delay(1);
e=0;
}
/***********************/
/* LCM12864發送數據 */
/***********************/
void send_data(unsigned char interim)
{
tase_busy();
rs=1;
_nop_();
_nop_();
rw=0;
_nop_();
_nop_();
P0=interim;
e=1;
_nop_();
_nop_();
e=0;
}
/***********************/
/* 讀取DS1302時間并轉 */
/* 換成10進制 */
/***********************/
init()
{
alarm_hour=R1302(0xc1);
alarm_hour=alarm_hour/16*10+alarm_hour%16;
alarm_min=R1302(0xc3);
alarm_min=alarm_min/16*10+alarm_min%16;
sec=R1302(0x81);
sec=sec/16*10+sec%16;
min=R1302(0x83);
min=min/16*10+min%16;
hour=R1302(0x85);
hour=hour/16*10+hour%16;
day=R1302(0x87);
day=day/16*10+day%16;
week=R1302(0x8b);
month=R1302(0x89);
month=month/16*10+month%16;
year=R1302(0x8d);
year=year/16*10+year%16;
Conversion(0,year,month,day);
jieqi1= calendar_calculate_solar_term_1();
jieqi2= calendar_calculate_solar_term_2();
}
/***************************/
/* 寫12864_CGROM(未使用) */
/***************************/
void cgram()
{
uchar addr=0x40;
uchar k;
for(k=1;k<32;k+=2)
{
send_dictate(addr);
send_data(san[k]);
send_data(san[k-1]);
addr++;
}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -