為了把KS0108系列的液晶吃透,特別製作了這款萬年曆,感覺效果還是不錯的.希望大家分享我的喜悅,畢竟有了更多志同道合的朋友支持,我才能更進一步提高.
一,原理介紹
說明:
1.單片機還是採用PIC中最經典的PIC16F877A,埠多,功能全,特別是他有8K的ROM,這是我選擇的主要原因,因為儲存液晶的字型檔需要很大的空間.
2.液晶顯示還是用的KS0108系列,主要是他性價比高,指令簡單,特別是公司也在用.
3.時鐘/日曆晶元用的DALLOS的DS1302晶元,他可以儲存從2000-2099年的日曆,及實時時鐘,可以方便的讀寫.
4.溫度測量還是用的DS18B20,這在我上一實例中已經用過,有興趣可以查閱.
5.本萬年曆可以顯示實時時鐘,精確到秒,年,月,日,星期,陰曆,溫度,生肖等,顯示的信息量大.
6,可以通過按鍵自由設定時鐘及日曆,按"設置"鍵可以在秒,分,時,日,月,星期,年之間來回切換,要設置的單元以閃爍提醒.通過"+"."-"按鍵可以把要設置的單元設定到預想狀態.
二,程序說明:
本程序有許多小的模塊,現分列如下:
1.主程序
/***************************************************
* 標題：萬年曆 *
* 作者：Wujieflash *
* 日期：2008年1月13日 *
* 說明：包含文件
***************************************************/
#include
#include "ziku.h"
#include "lcd_init.h"
#include "ds1302.h"
#include "ds18b20.h"
#include "keyscan.h"
#include "yinli.h"
//子程序
//LCD顯示空白邊框子程序
void LCDShowTable()
{
uch i;
SlectScreen(1); //寫左半屏
SetLine(0); //起使頁
SetColumn(0); //起使列
for(i=0;i
//顯示固定字元子程序
void LCDShowGudingWord()
{
Show8X16_2(0,24,s0);
Show8X16_2(0,32,s0);
Show8X16(2,1,s0);
Show8X16(2,9,s0);
Show16X16_3(6,40,ri);
Show16X32(2,24,ss0);
Show16X32(2,40,ss0);
Show8X16_2(0,64,s0);
Show8X16_2(0,72,s0);
Show8X16_2(0,80,maohao);
Show8X16_2(0,88,s0);
Show8X16_2(0,96,s0);
Show8X16_2(0,104,maohao);
Show8X16_2(0,112,s0);
Show8X16_2(0,119,s0);
Show8X16(2,80,s0);
Show8X16(2,88,s0);
Show16X16_2(4,64,shiyi);
Show16X16_2(4,80,yue);
Show16X16_2(4,95,chu);
Show16X16_2(4,111,yi);
Show16X16_3(6,72,sheng);
Show16X16_3(6,88,xiao);
Show16X16_3(6,104,shu);
Show16X16_2(0,40,nian);
Show16X16(4,2,yue);
Show16X16_3(6,8,xing);
Show16X16_3(6,24,qi);
Show16X16(2,96,danwei1);
Show8X16_2(0,8,s2);
Show8X16_2(0,16,s0);
}
/*----------------------------------------------------------*/
//TRM1初始化子程序
void TMR1init()
{
//TRM1 INITIAL
T1CON=0X30; //8分頻
TMR1IF=0; //清中斷標誌
TMR1IE=1; //使能定時器1中斷
TMR1L=0XDB; //初始值（定時0.5S）
TMR1H=0X0B;
TMR1ON=1; //開定時器1
}
//冒號閃爍子程序
void FlashMaohao()
{
static uch timecount=0;
if(TMR1IF==1)
{
TMR1ON=0;
TMR1IF=0;
TMR1L=0XDB; //重新付初值
TMR1H=0X0B;
flag++;
flag=flag%2; //閃爍標誌在0-1間翻轉
TMR1ON=1;
timecount++;
if(timecount==120)//1分鐘採樣一次溫度
{
timecount=0;
get_temp(); //溫度轉換子程序
}
}
if(flag==0)
{
Show8X16_2(0,80,maohao);
Show8X16_2(0,104,maohao);
}
if(flag==1)
{
Show8X16_2(0,80,noshu);//清除
Show8X16_2(0,104,noshu);
}
}
//主程序
void main()
{
TMR1init(); //定時器1初始化
keyinit(); //鍵盤初始化
LCDinit(); //LCD操作初始化
LCDShowTable(); //顯示空白表格
LCDShowGudingWord(); //顯示固定字元
//Set1302(DisCash); //設置初始時間（默認寫入我寫程序的時間）
get_temp(); //讀取溫度
while(1)
{
v_Get1302(clock); //讀取時間、日曆
display();
YangToYin(clock[6]/16*10+clock[6]&0x0f,clock[4]/16*10+clock[4]&0x0f,clock[3]/16*10+clock[3]&0x0f);
FlashMaohao(); //冒號閃爍
KeyScan(); //鍵盤掃描
}
}
2.測溫程序:
/***************************************************
* 標題：DS18B20測溫 *
* 作者：Wujieflash *
* 日期：2008年1月13日 *
* 說明：使用DS18B20晶元測溫 *
***************************************************/
# define DQ RC3 //定義18B20數據埠
# define DQ_DIR TRISC3 //定義18B20D口方向寄存器
# define DQ_HIGH() DQ_DIR =1 //設置數據口為輸入
# define DQ_LOW() DQ = 0; DQ_DIR = 0 //設置數據口為輸出
unsigned char TLV=0 ; //採集到的溫度高8位
unsigned char THV=0; //採集到的溫度低8位
unsigned char TZ=0; //轉換后的溫度值整數部分
//------------------------------------------------
//延時函數
//系統初始化函數
void init()
{
ADCON1=0X07; //設置A口為普通數字口
TRISA=0X00; //設置A口方向為輸出
//TRISC3=0; //設置D口方向為輸出
}
//-----------------------------------------------
//複位DS18B20函數
reset(void)
{
char presence=1;
while(presence)
{
DQ_LOW() ; //主機拉至低電平
delay(2,90); //延時503us
DQ_HIGH(); //釋放匯流排等電阻拉高匯流排,並保持15~60us
delay(2,8); //延時70us
if(DQ==1) presence=1; //沒有接收到應答信號，繼續複位
else presence=0; //接收到應答信號
delay(2,70); //延時430us
}
}
//-----------------------------------------------
//寫18b20寫位元組函數
void write_byte(uch val)
{
uch i;
uch temp;
for(i=8;i>0;i--)
{
temp=val&0x01; //最低位移出
DQ_LOW();
NOP();
NOP();
NOP();
NOP();
NOP(); //從高拉至低電平,產生寫時間隙
if(temp==1) DQ_HIGH(); //如果寫1,拉高電平
delay(2,7); //延時63us
DQ_HIGH();
NOP();
NOP();
val=val>>1; //右移一位
}
}
//------------------------------------------------
//18b20讀位元組函數
uch read_byte(void)
{
uch i;
uch value=0; //讀出溫度
static bit j;
for(i=8;i>0;i--)
{
value>>=1;
DQ_LOW();
NOP();
NOP();
NOP();
NOP(); //6us
DQ_HIGH(); //拉至高電平
NOP();
NOP();
NOP(); //4us
j=DQ;
if(j) value|=0x80;
delay(2,7); //63us
}
return(value);
}
//-------------------------------------------------
//啟動溫度轉換函數
void get_temp()
{
int i;
DQ_HIGH();
reset(); //複位等待從機應答
write_byte(0XCC); //忽略ROM匹配
write_byte(0X44); //發送溫度轉化命令
for(i=10;i>0;i--)
{
delay(201,132); //調用多次延遲函數，確保溫度轉換完成所需要的時間
}
reset(); //再次複位，等待從機應答
write_byte(0XCC); //忽略ROM匹配
write_byte(0XBE); //發送讀溫度命令
TLV=read_byte(); //讀出溫度低8
THV=read_byte(); //讀出溫度高8位
DQ_HIGH(); //釋放匯流排
TZ=(TLV>>4)|(THV<<4);
}
3.日曆顯示程序
/***************************************************
* 標題：DS1302讀寫 *
* 作者：Wujieflash *
* 日期：2008年1月14日 *
* 說明：日曆顯示範圍：2000年--2099年 *
***************************************************/
#define RST RC0
#define SCLK RC1
#define IO RC2
uch flag=0;
uch second=1,minute=1,hour=1,year=1,month=1,date=1,day=1;
uch clock[]={0};
uch DisCash[]={0x00,0x30,0x09,0x16,0x01,0x03,0x09};
/////往1302寫入1Byte數據////////////////////////
void RTInputByte(uch d)
{
uch i;
TRISC=0x00;
for(i=8; i>0; i--)
{
&nbs
[admin via 研發互助社區 ] PIC16F877A萬年曆程序已經有2131次圍觀
http://cocdig.com/docs/show-post-42104.html
