基于DS1302写的12864LCD时钟程序

1、以下是我写的12864LCD并行口时钟显示程序，时钟用按键可调/*12864.h头文件*/#ifndef _12864_h#define _12864_h/*包含头文件*/#include<reg51.h>#include"string.h"#include"DS1302.h"/*定义I/0口*/#define LCD12864_DATA P0sbit LCD12864_E = P27;sbit LCD12864_RW = P25;sbit LCD12864_RS = P26;sbit LCD12864_RET= P20;sbit LCD12

2、864_PSB =P22; /*声明全局函数*/void Delay1ms(unsigned int); /声明延时函数void BusyChk_12864(void); /声明忙检测函数void WrCom(unsigned char); /声明写入命令函数/unsigned char ReDat(void); /声明读数据函数void WrDat(unsigned char); /声明写数据函数void LcdInit(void); /12864初始化函数void SetAddress(unsigned char ,unsigned char); /设置地址转换void DisplaySt

3、ring(unsigned char ,unsigned char,unsigned char *p);/行显示字符void DisplayTime();void DisplayDay();void DisplayWeek();#endif/*12864.c*/#include"12864.h"/* 函 数 名 : Delay1ms* 函数功能 : 延时函数，延时1ms* 输 入 : c* 输 出 e : 无* 说 名 : 该函数是在12MHZ晶振下，12分频单片机的延时。*/void Delay1ms(unsigned int i) /误差 0us unsigned ch

4、ar a;for (i; i>0; i-) for (a=199;a>0;a-) ; /*函数名字：void BusyChk()函数功能：12864LCD忙检测* 输 入 : 无* 输 出 : 无*/void BusyChk(void) unsigned int timeout=0; LCD12864_E=0; /E=0 使能关闭 LCD12864_RS=0; /0 指令；1 数据 LCD12864_RW=1; /1 读数据；0写数据 Delay1ms(50); /延时100ms LCD12864_E=1; /1 开使能，读数据 while(LCD12864_DATA &

5、0x80) && +timeout);/判断 1表示内部在工作； 0表示正常 LCD12864_E=0; /E=0 使能关闭/*函数名字：void WrDat(usnigned char data)函数功能：写入数据* 输 入 : data* 输 出 : 无*/void WrDat(unsigned char bTemp)BusyChk();/忙检测LCD12864_E=0; /E=0 使能关闭 LCD12864_RS=1; /0 指令；1 数据 LCD12864_RW=0; /1 读数据；0写数据LCD12864_E=1; /E=1 使能打开LCD12864_DATA=bTe

6、mp;/写入数据Delay1ms(10); /延时100msLCD12864_E=0; /E=0 使能关闭/*函数名字：void WrCom(usnigned char com)函数功能：写入命令* 输 入 : com* 输 出 : 无*/void WrCom(unsigned char com) BusyChk(); LCD12864_E=0; /E=0 使能关闭 LCD12864_RS=0; /0 指令；1 数据 LCD12864_RW=0; /1 读数据；0写数据LCD12864_E=1; /E=0 使能打开LCD12864_DATA=com;/写入数据Delay1ms(10); /延时

7、100msLCD12864_E=0; /E=0 使能关闭/*函数名字：unsigned char ReData(void)函数功能：读数据* 输 入 : 无* 输 出 : data*/unsigned char ReData(void)/ unsigned char bTempt;/BusyChk();/LCD12864_DATA=0xFF;/ LCD12864_E=0; /E=0 使能关闭/ LCD12864_RS=1; /0 指令；1 数据/ LCD12864_RW=1; /1 读数据；0写数据/LCD12864_E=1; /E=0 使能打开/bTempt=LCD12864_DATA;/读

8、出数据/Delay1ms(100); /延时100ms/LCD12864_E=0; /E=0 使能关闭/return bTempt;/*函数名字：void LcdInit(void)函数功能：初始化* 输 入 : 无* 输 出 : 无*/void LcdInit() LCD12864_RS=0; /0 指令；1 数据 LCD12864_RW=0; /1 读数据；0写数据 LCD12864_E=1; /E=1 使能打开 LCD12864_PSB=1;/1为并行模式，0为串行模式 LCD12864_RET=1; Delay1ms(50); LCD12864_RET=0;/低电平复位 Delay1m

9、s(300); LCD12864_RET=1;/恢复高电平 WrCom(0x30); /基本指令用0x30,扩展指令用0x34 Delay1ms(20); WrCom(0x30); WrCom(0x0C); /显示开，光标关/ WrCom(0x14); /光标位置右移一个位置 WrCom(0x01); /清屏 WrCom(0x06); /进入模式 指针加1，屏幕不移动 /*函数名字：void SetAddress(unsigned char x,unsigned char y)函数功能：初始化* 输 入 : 行、数据* 输 出 : 无*/void SetAddress(unsigned cha

10、r x,unsigned char y) unsigned char bAddress;switch(y)case 1: bAddress=0x80+x;break;case 2: bAddress=0x90+x;break;case 3: bAddress=0x88+x;break;case 4: bAddress=0x98+x;break;default: break;WrCom(bAddress);/*函数名字：void DisplayString(unsigned char x,unsigned char y, unsigned)函数功能：初始化* 输 入 : 行、数据* 输 出 :

11、无*/void DisplayString(unsigned char x,unsigned char y,unsigned char *add) unsigned char i;i=strlen(add);SetAddress(x,y);while(i-) WrDat(*(add+);/*函数名字：void DisplayTime()函数功能：显示时间* 输 入 : 行、数据* 输 出 : 无*/void DisplayTime() WrCom(0x88); WrDat('0'+(TIME2/10); WrDat('0'+(TIME2%10); Display

12、String(1,3,":");WrDat('0'+(TIME1/10);WrDat('0'+(TIME1%10);WrDat(':');WrDat('0'+(TIME0/10);WrDat('0'+(TIME0%10);/*函数名字：void DisplayDay()函数功能：显示时间* 输 入 : 行、数据* 输 出 : 无*/void DisplayDay() WrCom(0x80);WrDat('0'+2);WrDat('0'+0);WrDat('

13、0'+(TIME6/10);WrDat('0'+(TIME6%10);DisplayString(2,1,"年");WrDat('0'+(TIME4/10);WrDat('0'+(TIME4%10);DisplayString(4,1,"月");WrDat('0'+(TIME3/10);WrDat('0'+(TIME3%10);DisplayString(6,1,"日");/*函数名字：void DisplayWeek()函数功能：显示时间* 输

14、入 : 行、数据* 输 出 : 无*/void DisplayWeek() switch(TIME5) case 1: DisplayString(0,2,"星期:Mo");break; case 2: DisplayString(0,2,"星期:Tu");break; case 3: DisplayString(0,2,"星期:We");break; case 4: DisplayString(0,2,"星期:Th");break; case 5: DisplayString(0,2,"星期:Fr&qu

15、ot;);break; case 6: DisplayString(0,2,"星期:Sa");break; case 7: DisplayString(0,2,"星期:Su");break; /*DS1302.h*/#ifndef _DS1302_h#define _DS1302_h/*包含头文件*/#include<reg51.h>#include<intrins.h>/*定义I/O口*/sbit DSIO=P34;sbit RST= P35;sbit SCLK=P36;/*声明全局变量*/extern unsigned cha

16、r TIME7;/-声明全局函数-/void Ds1302Write(unsigned char addr, unsigned char dat);unsigned char Ds1302Read(unsigned char addr);void Ds1302Init();void Ds1302ReadTime();unsigned char changeBCD_Variable(unsigned char );unsigned char changeVariable_BCD(unsigned char );#endif/*DS1302.c*/#include"DS1302.h&qu

17、ot; /-DS1302写入和读取时分秒的地址命令-/-秒分时日月周年 最低位读写位;-/unsigned char code READ_RTC_ADDR7 = 0x81, 0x83, 0x85, 0x87, 0x89, 0x8b, 0x8d; unsigned char code WRITE_RTC_ADDR7 = 0x80, 0x82, 0x84, 0x86, 0x88, 0x8a, 0x8c;/* 函 数 名 : Ds1302Write* 函数功能 : 向DS1302命令（地址+数据）* 输 入 : addr,dat* 输 出 : 无*/void Ds1302Write(unsigned

18、 char addr, unsigned char dat)unsigned char n;RST = 0;_nop_();SCLK = 0;/先将SCLK置低电平。_nop_();RST = 1; /然后将RST(CE)置高电平。_nop_();for (n=0; n<8; n+)/开始传送八位地址命令DSIO = addr & 0x01;/数据从低位开始传送addr >>= 1;SCLK = 1;/数据在上升沿时，DS1302读取数据_nop_();SCLK = 0;_nop_();for (n=0; n<8; n+)/写入8位数据DSIO = dat &a

19、mp; 0x01;dat >>= 1;SCLK = 1;/数据在上升沿时，DS1302读取数据_nop_();SCLK = 0;_nop_(); RST = 0;/传送数据结束_nop_();/* 函 数 名 : Ds1302Read* 函数功能 : 读取一个地址的数据* 输 入 : addr* 输 出 : dat*/unsigned char Ds1302Read(unsigned char addr)unsigned char n,dat,dat1;RST = 0;_nop_();SCLK = 0;/先将SCLK置低电平。_nop_();RST = 1;/然后将RST(CE)置

20、高电平。_nop_();for(n=0; n<8; n+)/开始传送八位地址命令DSIO = addr & 0x01;/数据从低位开始传送addr >>= 1;SCLK = 1;/数据在上升沿时，DS1302读取数据_nop_();SCLK = 0;_nop_();_nop_();for(n=0; n<8; n+)/读取8位数据dat1 = DSIO;/从最低位开始接收dat = (dat>>1) | (dat1<<7);SCLK = 1;_nop_();SCLK = 0;/ _nop_();RST = 0;_nop_();/以下为DS1

21、302复位的稳定时间,必须的。SCLK = 1;_nop_();DSIO = 0;_nop_();DSIO = 1;_nop_();return dat;/* 函 数 名 : Ds1302Init* 函数功能 : 初始化DS1302.* 输 入 : 无* 输 出 : 无*/void Ds1302Init()unsigned char n;Ds1302Write(0x8E,0X00); /关闭写保护功能for (n=0; n<7; n+)/写入7个字节的时钟信号：分秒时日月周年Ds1302Write(WRITE_RTC_ADDRn,TIMEn);Ds1302Write(0x8E,0x80)

22、; /打开写保护功能/* 函 数 名 : Ds1302ReadTime* 函数功能 : ReadTime* 输 入 : 无* 输 出 : 无*/void Ds1302ReadTime()unsigned char n; for (n=0; n<7; n+)/写入7个字节的时钟信号：分秒时日月周年TIMEn=Ds1302Read(READ_RTC_ADDRn);TIMEn=changeBCD_Variable(TIMEn);/*/*BCD码转换成十进制*/unsigned char changeBCD_Variable(unsigned char data1) unsigned char

23、i=0,j=0; i=data1&0xf0; i>>=4; j=data1&0x0f; data1=i*10+j; return data1;/*十进制转换成BCD*/unsigned char changeVariable_BCD(unsigned char data2)unsigned char i=0,j=0;i=data2/10; i<<=4; j=data2%10; data2=i+j;return data2;/*key.h*/#ifndef _Key_h#define _Key_h#include<reg51.h>#includ

24、e"12864.h"/*定义I/O口*/#define GPIO_KEY P1/*声明全局变量*/extern unsigned char keyvalue;/*声明全局函数*/void KeyDown();unsigned char keycurrent(unsigned char ,int);void toolmode();#endif/*key.c*/#include"Key.h"/* 函 数 名 : keyvalue* 函数功能 : 矩阵按键值* 输 入 : 无* 输 出 : keyvalue*/const char code ValueList

25、= /下限 上限 0, 59, /秒 1, 59, /分 1, 12, /时 1, 31, /日 1, 12, /月 1, 7, /周 1, 99 / 年 ;/*矩阵按键扫描*/void KeyDown(void)GPIO_KEY=0x0f;if(GPIO_KEY!=0x0f)Delay1ms(3); if(GPIO_KEY!=0x0f) switch(GPIO_KEY) case 0x07: keyvalue=1; break; case 0x0b: keyvalue=2; break; case 0x0d: keyvalue=3; break; case 0x0e: keyvalue=4;

26、 break; GPIO_KEY=0xf0; switch(GPIO_KEY) case 0x70: keyvalue=keyvalue;break; case 0xb0: keyvalue+=4; break; case 0xd0: keyvalue+=8; break; case 0xe0: keyvalue+=12;break; while(GPIO_KEY!=0xf0) Delay1ms(3); unsigned char keycurrent(unsigned char value,int i) if(value=2) keyvalue=0; TIMEi+; if(TIMEi>

27、ValueList2*i+1) TIMEi=ValueList2*i; if(value=3) keyvalue=0; TIMEi-; if(TIMEi<=ValueList2*i) TIMEi=ValueList2*i+1; return TIMEi;/*按键处理，调节时间*/void toolmode(void) unsigned char n; keyvalue=0; WrCom(0x01); /清屏 WrCom(0x02); /复位 Ds1302ReadTime();/读ds1302中数值 / TIME0=0x00; while(1) /年设置 WrCom(0x80); WrDa

28、t('2'); WrDat('0'); WrDat('0'+TIME6/10); WrDat('0'+(TIME6%10); DisplayString(2,1,"年"); KeyDown(); /按键扫描 keycurrent(keyvalue,6); if(keyvalue=1) keyvalue=0; break; if(keyvalue=4) /进入月设置 keyvalue=0; break; while(1) /月份设置 WrCom(0x80+3); WrDat('0'+(TIME4/

29、10); WrDat('0'+(TIME4%10); DisplayString(4,1,"月"); KeyDown(); keycurrent(keyvalue, 4); if(keyvalue=1) keyvalue=0; goto EXIT_toolmode; if(keyvalue=4)/进入日期设置 keyvalue=0; break; while(1)/日期设置 WrCom(0x80+5); WrDat('0'+(TIME3/10); WrDat('0'+(TIME3%10); DisplayString(6,1,

30、"日"); KeyDown(); keycurrent(keyvalue, 3); if(keyvalue=1) keyvalue=0; goto EXIT_toolmode; if(keyvalue=4) /进入周设置 keyvalue=0; break; while(1) /周设置 DisplayWeek(); KeyDown(); keycurrent(keyvalue,5); if(keyvalue=1) keyvalue=0; goto EXIT_toolmode; if(keyvalue=4)/进入时间设计 keyvalue=0; break; while(1)/时间设置 WrCom(0x88); WrDat('0'+(TIME2/1