LCD數(shù)字時鐘proteus仿真文件及程序詳細注釋

ID:117061 · 發(fā)表于 2016-4-27 15:15

希望能幫助到大家

/***************************************************/
#include<reg51.h> //包含單片機寄存器的頭文件
#include<intrins.h> //包含_nop_()函數(shù)定義的頭文件
#define uchar unsigned char
#define uint unsigned int
uchar temp,count=0;
/***********************************************************************
以下是DS1302芯片的操作程序
************************************************************************/
uchar code digit[10]={"0123456789"}; //定義字符數(shù)組顯示數(shù)字
uchar *digit1[]={"SUN","MON","TUS","WEN","THU","FRI","SAT"}; //周日，周一到周六
sbit DATA=P3^7; //位定義1302芯片的接口，數(shù)據(jù)輸出端定義在P1.1引腳
sbit RST=P3^5; //位定義1302芯片的接口，復位端口定義在P1.1引腳
sbit SCLK=P3^6; //位定義1302芯片的接口，時鐘輸出端口定義在P1.1引腳
sbit key1=P3^0; //停止按鈕
sbit key2=P3^1; //開始按鈕
sbit add=P2^4; //加值
sbit subtract=P2^5;//減值
sbit tiaoshi=P3^4; //定位
/*****************************************************
函數(shù)功能：延時若干微秒
入口參數(shù)：n
***************************************************/
void delaynus(uchar n)
{
uchar i;
for(i=0;i<n;i++)
;
}
/*****************************************************
函數(shù)功能：向1302寫一個字節(jié)數(shù)據(jù)
入口參數(shù)：x
***************************************************/
void Write1302(uchar dat)
{
uchar i;
SCLK=0; //拉低SCLK，為脈沖上升沿寫入數(shù)據(jù)做好準備
delaynus(2); //稍微等待，使硬件做好準備
for(i=0;i<8;i++) //連續(xù)寫8個二進制位數(shù)據(jù)
{
DATA=dat&0x01; //取出dat的第0位數(shù)據(jù)寫入1302
delaynus(2); //稍微等待，使硬件做好準備
SCLK=1; //上升沿寫入數(shù)據(jù)
delaynus(2); //稍微等待，使硬件做好準備
SCLK=0; //重新拉低SCLK，形成脈沖
dat>>=1; //將dat的各數(shù)據(jù)位右移1位，準備寫入下一個數(shù)據(jù)位
}
}
/*****************************************************
函數(shù)功能：根據(jù)命令字，向1302寫一個字節(jié)數(shù)據(jù)
入口參數(shù)：Cmd，儲存命令字；dat，儲存待寫的數(shù)據(jù)
***************************************************/
void WriteSet1302(uchar Cmd,uchar dat)
{
RST=0; //禁止數(shù)據(jù)傳遞
SCLK=0; //確保寫數(shù)居前SCLK被拉低
RST=1; //啟動數(shù)據(jù)傳輸
delaynus(2); //稍微等待，使硬件做好準備
Write1302(Cmd); //寫入命令字
Write1302(dat); //寫數(shù)據(jù)
SCLK=1; //將時鐘電平置于已知狀態(tài)
RST=0; //禁止數(shù)據(jù)傳遞
}
/*****************************************************
函數(shù)功能：從1302讀一個字節(jié)數(shù)據(jù)
入口參數(shù)：x
***************************************************/
uchar Read1302(void)
{
uchar i,dat;
delaynus(2); //稍微等待，使硬件做好準備
for(i=0;i<8;i++) //連續(xù)讀8個二進制位數(shù)據(jù)
{
dat>>=1; //將dat的各數(shù)據(jù)位右移1位，因為先讀出的是字節(jié)的最低位
if(DATA==1) //如果讀出的數(shù)據(jù)是1
dat|=0x80; //將1取出，寫在dat的最高位
SCLK=1; //將SCLK置于高電平，為下降沿讀出
delaynus(2); //稍微等待
SCLK=0; //拉低SCLK，形成脈沖下降沿
delaynus(2); //稍微等待
}
return dat; //將讀出的數(shù)據(jù)返回
}
/*****************************************************
函數(shù)功能：根據(jù)命令字，從1302讀取一個字節(jié)數(shù)據(jù)
入口參數(shù)：Cmd
***************************************************/
uchar ReadSet1302(uchar Cmd)
{
uchar dat;
RST=0; //拉低RST
SCLK=0; //確保寫數(shù)居前SCLK被拉低
RST=1; //啟動數(shù)據(jù)傳輸
Write1302(Cmd); //寫入命令字
dat=Read1302(); //讀出數(shù)據(jù)
SCLK=1; //將時鐘電平置于已知狀態(tài)
RST=0; //禁止數(shù)據(jù)傳遞
return dat; //將讀出的數(shù)據(jù)返回
}
/*****************************************************
函數(shù)功能：設置ds1302是否寫保護
入口參數(shù)：flag
***************************************************/
void setprotect(bit flag)//設置保護
{
if(flag)
WriteSet1302(0x8e,0x80);//寫入保護指令
else
WriteSet1302(0x8e,0x00);//寫入不保護指令
}
/*****************************************************
函數(shù)功能：設置ds1302是否工作
入口參數(shù)：flag
***************************************************/
void stoptime(bit flag) // 是否將時鐘停止
{
uchar dat;
dat=ReadSet1302(0x81);
setprotect(0);
if(flag)
WriteSet1302(0x80, dat|0x80);
else
WriteSet1302(0x80, dat&0x7f);
}
/*****************************************************
函數(shù)功能： 1302進行初始化設置
***************************************************/
void Init_DS1302(void)
{
stoptime(0); //根據(jù)寫狀態(tài)寄存器命令字，寫入不保護指令
WriteSet1302(0x80,((0/10)<<4|(0%10))); //根據(jù)寫秒寄存器命令字，寫入秒的初始值
WriteSet1302(0x82,((0/10)<<4|(0%10))); //根據(jù)寫分寄存器命令字，寫入分的初始值
WriteSet1302(0x84,((12/10)<<4|(12%10))); //根據(jù)寫小時寄存器命令字，寫入小時的初始值
WriteSet1302(0x86,((01/10)<<4|(01%10))); //根據(jù)寫日寄存器命令字，寫入日的初始值
WriteSet1302(0x88,((06/10)<<4|(06%10))); //根據(jù)寫月寄存器命令字，寫入月的初始值
WriteSet1302(0x8c,((10/10)<<4|(10%10))); //根據(jù)寫小時寄存器命令字，寫入小時的初始值
WriteSet1302(0x8a,0x01); //根據(jù)寫小時寄存器命令字，寫入小時的初始值
}
/*******************************************************************************
以下是對液晶模塊的操作程序
*******************************************************************************/
sbit RS=P2^0; //寄存器選擇位，將RS位定義為P2.0引腳
sbit RW=P2^1; //讀寫選擇位，將RW位定義為P2.1引腳
sbit E=P2^2; //使能信號位，將E位定義為P2.2引腳
sbit BF=P1^7; //忙碌標志位，，將BF位定義為P0.7引腳
/*****************************************************
函數(shù)功能：延時1ms
(3j+2)*i=(3×33+2)×10=1010(微秒)，可以認為是1毫秒
***************************************************/
void delay1ms()
{
unsigned char i,j;
for(i=0;i<10;i++)
for(j=0;j<33;j++)
;
}
/*****************************************************
函數(shù)功能：延時若干毫秒
入口參數(shù)：n
***************************************************/
void delaynms(unsigned char n)
{
unsigned char i;
for(i=0;i<n;i++)
delay1ms();
}
/*****************************************************
函數(shù)功能：判斷液晶模塊的忙碌狀態(tài)
返回值：result。result=1，忙碌;result=0，不忙
***************************************************/
bit BusyTest(void)
{
bit result;
RS=0; //根據(jù)規(guī)定，RS為低電平，RW為高電平時，可以讀狀態(tài)
RW=1;
E=1; //E=1，才允許讀寫
_nop_(); //空操作
_nop_();
_nop_();
_nop_(); //空操作四個機器周期，給硬件反應時間
result=BF; //將忙碌標志電平賦給result
E=0; //將E恢復低電平
return result;
}
/*****************************************************
函數(shù)功能：將模式設置指令或顯示地址寫入液晶模塊
入口參數(shù)：dictate
***************************************************/
void WriteInstruction (uchar dictate)
{
while(BusyTest()==1); //如果忙就等待
RS=0; //根據(jù)規(guī)定，RS和R/W同時為低電平時，可以寫入指令
RW=0;
E=0; //E置低電平(根據(jù)表8-6，寫指令時，E為高脈沖，
// 就是讓E從0到1發(fā)生正跳變，所以應先置"0"
_nop_();
_nop_(); //空操作兩個機器周期，給硬件反應時間
P1=dictate; //將數(shù)據(jù)送入P0口，即寫入指令或地址
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四個機器周期，給硬件反應時間
E=1; //E置高電平
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四個機器周期，給硬件反應時間
E=0; //當E由高電平跳變成低電平時，液晶模塊開始執(zhí)行命令
}
/*****************************************************
函數(shù)功能：指定字符顯示的實際地址
入口參數(shù)：x
***************************************************/
void WriteAddress(uchar x)
{
WriteInstruction(x|0x80); //顯示位置的確定方法規(guī)定為"80H+地址碼x"
}
/*****************************************************
函數(shù)功能：將數(shù)據(jù)(字符的標準ASCII碼)寫入液晶模塊
入口參數(shù)：y(為字符常量)
***************************************************/
void WriteData(uchar y)
{
while(BusyTest()==1);
RS=1; //RS為高電平，RW為低電平時，可以寫入數(shù)據(jù)
RW=0;
E=0; //E置低電平(根據(jù)表8-6，寫指令時，E為高脈沖，
// 就是讓E從0到1發(fā)生正跳變，所以應先置"0"
P1=y; //將數(shù)據(jù)送入P0口，即將數(shù)據(jù)寫入液晶模塊
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四個機器周期，給硬件反應時間
E=1; //E置高電平
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四個機器周期，給硬件反應時間
E=0; //當E由高電平跳變成低電平時，液晶模塊開始執(zhí)行命令
}
/*****************************************************
函數(shù)功能：對LCD的顯示模式進行初始化設置
***************************************************/
void LcdInitiate(void)
{
delaynms(15); //延時15ms，首次寫指令時應給LCD一段較長的反應時間
WriteInstruction(0x38); //顯示模式設置：16×2顯示，5×7點陣，8位數(shù)據(jù)接口
delaynms(5); //延時5ms　，給硬件一點反應時間
WriteInstruction(0x38);
delaynms(5); //延時5ms　，給硬件一點反應時間
WriteInstruction(0x38); //連續(xù)三次，確保初始化成功
delaynms(5); //延時5ms　，給硬件一點反應時間
WriteInstruction(0x0c); //顯示模式設置：顯示開，無光標，光標不閃爍
delaynms(5); //延時5ms　，給硬件一點反應時間
WriteInstruction(0x06); //顯示模式設置：光標右移，字符不移
delaynms(5); //延時5ms　，給硬件一點反應時間
WriteInstruction(0x01); //清屏幕指令，將以前的顯示內(nèi)容清除
delaynms(5); //延時5ms　，給硬件一點反應時間
}
/**************************************************************
以下是1302數(shù)據(jù)的顯示程序
**************************************************************/
/*****************************************************
函數(shù)功能：顯示秒
入口參數(shù)：x
***************************************************/
void DisplaySecond(uchar x)
{
uchar i,j;
i=x/10; //取十位
j=x%10; //取個位
WriteAddress(0x49); //寫顯示地址,將在第2行第10列開始顯示
WriteData(digit[i]); //將十位數(shù)字的字符常量寫入LCD
WriteData(digit[j]); //將個位數(shù)字的字符常量寫入LCD
delaynms(50); //延時1ms給硬件一點反應時間
}
/*****************************************************
函數(shù)功能：顯示分鐘
入口參數(shù)：x
***************************************************/
void DisplayMinute(uchar x)
{
uchar i,j;
i=x/10; //取十位
j=x%10; //取個位
WriteAddress(0x46); //寫顯示地址,將在第2行第7列開始顯示
WriteData(digit[i]); //將十位數(shù)字的字符常量寫入LCD
WriteData(digit[j]); //將個位數(shù)字的字符常量寫入LCD
delaynms(50); //延時1ms給硬件一點反應時間
}
/*****************************************************
函數(shù)功能：顯示小時
入口參數(shù)：x
***************************************************/
void DisplayHour(unsigned char x)
{
uchar i,j;
i=x/10; //取十位
j=x%10; //取個位
WriteAddress(0x43); //寫顯示地址,將在第2行第4列開始顯示
WriteData(digit[i]); //將十位數(shù)字的字符常量寫入LCD
WriteData(digit[j]); //將個位數(shù)字的字符常量寫入LCD
delaynms(50); //延時1ms給硬件一點反應時間
}
/*****************************************************
函數(shù)功能：顯示日
入口參數(shù)：x
***************************************************/
void DisplayDay(uchar x)
{
uchar i,j;
i=x/10; //取十位
j=x%10; //取個位
WriteAddress(0x09); //寫顯示地址,將在第1行第10列開始顯示
WriteData(digit[i]); //將十位數(shù)字的字符常量寫入LCD
WriteData(digit[j]); //將個位數(shù)字的字符常量寫入LCD
delaynms(50); //延時1ms給硬件一點反應時間
}
/*****************************************************
函數(shù)功能：顯示星期
入口參數(shù)：x
***************************************************/
void DisplayWeek(uchar x)
{ uchar i;
WriteAddress(0x0c); //寫顯示地址,將在第1行第13列開始顯示
for(i=0;i<3;i++)
WriteData(digit1[x][i]);
delaynms(50);
}
/*****************************************************
函數(shù)功能：顯示月
入口參數(shù)：x
***************************************************/
void DisplayMonth(uchar x)
{
uchar i,j;
i=x/10; //取十位
j=x%10; //取個位
WriteAddress(0x06); //寫顯示地址,將在第1行10第列開始顯示
WriteData(digit[i]); //將十位數(shù)字的字符常量寫入LCD
WriteData(digit[j]); //將個位數(shù)字的字符常量寫入LCD
delaynms(50); //延時1ms給硬件一點反應時間
}
/*****************************************************
函數(shù)功能：顯示年
入口參數(shù)：x
***************************************************/
void DisplayYear(uchar x)
{
uchar i,j;
i=x/10; //取十位
j=x%10; //取個位
WriteAddress(0x01); //寫顯示地址,將在第1行第7列開始顯示
WriteData(digit[2]);
WriteData(digit[0]);
WriteData(digit[i]); //將十位數(shù)字的字符常量寫入LCD
WriteData(digit[j]); //將個位數(shù)字的字符常量寫入LCD
delaynms(50); //延時1ms給硬件一點反應時間
}
/*****************************************************
函數(shù)功能：液晶顯示年月日以及時間
***************************************************/
void displaytime()
{
uchar second,minute,hour,day,month,year,week; //分別儲存苗、分、小時，日，月，年
uchar ReadValue; //儲存從1302讀取的數(shù)據(jù)
WriteAddress(0x05); //寫年月分隔符的顯示地址，顯示在第1行第9列
WriteData('-'); //將字符常量寫入LCD
WriteAddress(0x08); //寫月日分隔符的顯示地址，顯示在第1行第12列
WriteData('-'); //將字符常量寫入LCD
WriteAddress(0x45); //寫小時與分鐘分隔符的顯示地址，顯示在第2行第6列
WriteData(':'); //將字符常量寫入LCD
WriteAddress(0x48); //寫分鐘與秒分隔符的顯示地址，顯示在第2行第9列
WriteData(':'); //將字符常量寫入LCD
while(1)
{
ReadValue = ReadSet1302(0x81); //從秒寄存器讀數(shù)據(jù)
second =((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉化
DisplaySecond(second); //顯示秒
ReadValue = ReadSet1302(0x83); //從分寄存器讀
minute =((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉化
DisplayMinute(minute); //顯示分
ReadValue = ReadSet1302(0x85); //從時寄存器讀
hour =((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉化
DisplayHour(hour); //顯示小時
ReadValue = ReadSet1302(0x87); //從日寄存器讀
day =((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉化
DisplayDay(day); //顯示日
ReadValue = ReadSet1302(0x8b); //從星期寄存器讀
week =((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉化
DisplayWeek(week); //顯示星期
ReadValue = ReadSet1302(0x89); //從月寄存器讀
month =((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉化
DisplayMonth(month); //顯示月
ReadValue = ReadSet1302(0x8d); //從年寄存器讀
year =((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉化
DisplayYear(year); //顯示年
}
}
/*****************************************************
函數(shù)功能：主函數(shù)
***************************************************/
void main(void)
{
LcdInitiate(); //將液晶初始化
Init_DS1302(); //將1302初始化
IT0=1; //外部中斷0
EX0=1;
IT1=1;
EX1=1;
EA=1;
displaytime(); //顯示時間
}
/*****************************************************
函數(shù)功能：中斷函數(shù)，實現(xiàn)時間的啟停
***************************************************/
void int0() interrupt 0 //外部中斷0
{
if(key1==0)
{
stoptime(1);
}
else if(key2==0)
{
stoptime(0);
}
}
/*****************************************************
函數(shù)功能：中斷函數(shù)，實現(xiàn)時間參數(shù)的調整
***************************************************/
void Setkey() interrupt 2//外部中斷1，調整時間
{
if(tiaoshi==0)
{
count=count+1;
if(count==4)count=0;
}
else if(add==0)
{
switch(count)
{
case 1:
temp=ReadSet1302(0x85);
temp=((temp&0x70)>>4)*10 + (temp&0x0F);
temp=temp+1;
if(temp>=24)temp=0;
temp=(temp/10)<<4|temp%10;
WriteSet1302(0x84,temp);
break;
case 2:
temp=ReadSet1302(0x83);
temp=((temp&0x70)>>4)*10 + (temp&0x0F);
temp=temp+1;
if(temp>=60)temp=0;
temp=(temp/10)<<4|temp%10;
WriteSet1302(0x82,temp);
break;
case 3:
temp=ReadSet1302(0x81);
temp=((temp&0x70)>>4)*10 + (temp&0x0F);
temp=temp+1;
if(temp>=0x60)temp=0;
temp=(temp/10)<<4|temp%10;
WriteSet1302(0x80,temp);
}
while (add==0);
}
else if(subtract==0)
{
switch(count)
{
case 1:
temp=ReadSet1302(0x85);
temp=((temp&0x70)>>4)*10 + (temp&0x0F);
temp=temp-1;
if(temp<=0)temp=23;
temp=(temp/10)<<4|temp%10;
WriteSet1302(0x84,temp);
break;
case 2:
temp=ReadSet1302(0x83);
temp=((temp&0x70)>>4)*10 + (temp&0x0F);
temp=temp-1;
if(temp<=0)temp=59;
temp=(temp/10)<<4|temp%10;
WriteSet1302(0x82,temp);
break;
case 3:
temp=ReadSet1302(0x81);
temp=((temp&0x70)>>4)*10 + (temp&0x0F);
temp=temp-1;
if(temp<=0)temp=59;
temp=(temp/10)<<4|temp%10;
WriteSet1302(0x80,temp);
}
while (subtract==0);
}
}