/*******************************************
程序名： 1602液晶屏时钟程序
编写时间： 2015年10月4日
硬件支持： LCD1602液晶屏 STC12C4052AD 外部12MHZ晶振
接线定义： DB0_DB7 --> P1^0 --P1^7
RS = P3 ^ 2;
RW = P3 ^ 3;
E = P3 ^ 4;
功能：测试LCD1602的显示，显示时间，http://990487026.blog.51cto.com/ ，Welcome to linux Debian VS Redhat
*******************************************/
#include // 包含头文件 //
typedef unsigned char uint8; // 无符号8位整型变量 //
#define LCD1602_DB0_DB7 P1 // 定义LCM2402的数据总线
sbit LCD1602_RS = P3 ^ 2; // 定义LCM2402的RS控制线
sbit LCD1602_RW = P3 ^ 3; // 定义LCM2402的RW控制线
sbit LCD1602_E = P3 ^ 4; // 定义LCM2402的E控制线
sbit LCD1602_Busy = P1 ^ 7; // 定义LCM2402的测忙线（与LCD1602_DB0_DB7关联）
//设置日、月、年、周、时、分、秒和温度存放区
data unsigned char TIME_DD,TIME_MO,TIME_YY,TIME_WW,TIME_HH,TIME_MM,TIME_SS;
data bit DAY_BIT = 0;//天数增加标志位（用于日期进位的启动）
data unsigned char DIS_BIT = 0; //多种信息的切换显示
data unsigned char cou = 0; // 软计数器,对10ms时基信号累加到1s
// 定义LCM2402指令集 // （详细请见技术手册）
#define CMD_clear 0x01 // 清除屏幕
#define CMD_back 0x02 // DDRAM回零位
#define CMD_dec1 0x04 // 读入后AC（指针）减1，向左写
#define CMD_add1 0x06 // 读入后AC（指针）加1，向右写
#define CMD_dis_gb1 0x0f // 开显示_开光标_开光标闪烁
#define CMD_dis_gb2 0x0e // 开显示_开光标_关光标闪烁
#define CMD_dis_gb3 0x0c // 开显示_关光标_关光标闪烁
#define CMD_OFF_dis 0x08 // 关显示_关光标_关光标闪烁
#define CMD_set82 0x38 // 8位总线_2行显示
#define CMD_set81 0x30 // 8位总线_1行显示（上边行）
#define CMD_set42 0x28 // 4位总线_2行显示
#define CMD_set41 0x20 // 4位总线_1行显示（上边行）
#define lin_1 0x80 // 4位总线_1行显示（上边行）
#define lin_2 0xc0 // 4位总线_1行显示（上边行）
void DELAY_MS (unsigned int a) {
unsigned int i;
while ( --a != 0 ) {
for (i=0;i<=600;i++);
}
}
// LCM2402测忙，若LCM2402处于忙状态，本函数将等待至非忙状态 //
void LCD1602_TestBusy(void){
LCD1602_DB0_DB7 = 0xff; //设备读状态
LCD1602_RS = 0;
LCD1602_RW = 1;
LCD1602_E = 1;
while(LCD1602_Busy); //等待LCM不忙
LCD1602_E = 0; //
}
// 写指令程序 //
void LCD1602_WriteCMD(uint8 LCD1602_command) {
LCD1602_TestBusy();
LCD1602_DB0_DB7 = LCD1602_command;
LCD1602_RS = 0;
LCD1602_RW = 0;
LCD1602_E = 1;
DELAY_MS(15); // 修改延时，改变显示速度
LCD1602_E = 0;
}
// 写数据程序 //
void LCD1602_WriteData(uint8 LCD1602_data){
LCD1602_TestBusy();
LCD1602_DB0_DB7 = LCD1602_data;
LCD1602_RS = 1;
LCD1602_RW = 0;
LCD1602_E = 1;
DELAY_MS(15); // 修改延时，改变显示速度
LCD1602_E = 0;
}
// 打印字符串程序 （本函数调用指针函数）长度48字符之内
// 第一行位置 0x00~0x17 第二行位置 0x40~0x57
// 应用举例：print(0x80,"haha"); //在第一行第一位处从左向右打印haha字符串
void print(uint8 a,uint8 *str){
LCD1602_WriteCMD(a | 0x80);
while(*str != '\0'){
LCD1602_WriteData(*str++);
}
*str = 0;
}
// 打印单字符程序 //
// 第一行位置 0x00~0x17 第二行位置 0x40~0x57
// 应用举例：print(0xc0,0x30); //在第二行第一位处打印字符“0”
void print2(uint8 a,uint8 t){
LCD1602_WriteCMD(a | 0x80);
LCD1602_WriteData(t);
}
// 定义小汉字 可写入8个自字义字符，写入后可用其CGRAM代码直接提取显示。
uint8 code Xword[]={
0x18,0x18,0x07,0x08,0x08,0x08,0x07,0x00, //℃，代码 0x00
0x00,0x00,0x00,0x00,0xff,0x00,0x00,0x00, //一，代码 0x01
0x00,0x00,0x00,0x0e,0x00,0xff,0x00,0x00, //二，代码 0x02
0x00,0x00,0xff,0x00,0x0e,0x00,0xff,0x00, //三，代码 0x03
0x00,0x00,0xff,0xf5,0xfb,0xf1,0xff,0x00, //四，代码 0x04
0x00,0xfe,0x08,0xfe,0x0a,0x0a,0xff,0x00, //五，代码 0x05
0x00,0x04,0x00,0xff,0x00,0x0a,0x11,0x00, //六，代码 0x06
0x00,0x1f,0x11,0x1f,0x11,0x11,0x1f,0x00, //日，代码 0x07
};
void CgramWrite(void) { // 装入CGRAM //
uint8 i;
LCD1602_WriteCMD(0x06); // CGRAM地址自动加1
LCD1602_WriteCMD(0x40); // CGRAM地址设为00处
for(i=0;i<64;i++) {
LCD1602_WriteData(Xword[i]);// 按数组写入数据
}
}
// LCM2402初始化 //（使用者可自定义，加 * 号程序行必须保留但可修改）
void LCD1602_Init(void){
LCD1602_WriteCMD(CMD_set82); //* 显示模式设置：显示2行，每个字符为5*7个像素
LCD1602_WriteCMD(CMD_clear); // 显示清屏
LCD1602_WriteCMD(CMD_back); //* 数据指针指向第1行第1个字符位置
LCD1602_WriteCMD(CMD_add1); // 显示光标移动设置：文字不动，光标右移
LCD1602_WriteCMD(CMD_dis_gb3); // 显示开及光标设置：显示开，光标开，闪烁开
CgramWrite(); // 向CGRAM写入自定义字符
}
bit IsLeapYear(void){ //计算本年是否是润年
unsigned int a;
a = 2000+TIME_YY;//加2000表示成完整的年
if((a%4==0 && a%100!=0)||(a%400==0)){ //润年的计算公式
return 1;//是润年返回1
}else{
return 0;//不是润年返回0
}
}
void month_day(void){
unsigned char mon_day[]={31,28,31,30,31,30,31,31,30,31,30,31};
TIME_DD++;//天加1
TIME_WW++;//星期值加1
if(TIME_WW > 7){
TIME_WW = 1;//时期值限定
}
if(TIME_DD > mon_day[TIME_MO-1]){//检查天是否大于当月的最大值
if(IsLeapYear()&&TIME_MO==2){ //计算本月是否是润年的2月份
TIME_DD = 29;//如果是润年又是2月，则天为29
}else{
TIME_DD = 1; //否则就等于1
TIME_MO++;//月加1
if(TIME_MO > 12){
TIME_MO = 1; //如果月大于12则月等于1
TIME_YY++;//年加1 （公历年无限积加）
}
}
}
}
void init (void){ //上电初始化
TMOD = 0x11; // 定时/计数器0,1工作于方式1
TH0 = 0x3c; // 预置产生50ms时基信号
TL0 = 0xb0;
EA = 1; // 开总中断
ET0 = 1; // 定时/计数器0允许中断
TR0 = 1; // 开闭定时/计数器0
TIME_DD = 4; //时间在首次使用的值，之后会在EEPROM自动记录上一天的值
TIME_MO = 10; //初始时间：2009年5月18日周一，20时13分40秒
TIME_YY = 15;
TIME_WW = 1;
TIME_HH = 0;
TIME_MM = 0;
TIME_SS = 0;
}
//显示项目 时间部分 在第一行全行显示时间
void RealTime_Display(void){
print(0x80,"20");
print2(0x82,TIME_YY/10+0x30);
print2(0x83,TIME_YY%10+0x30);
print(0x84,"/"); // 显示年
print2(0x85,TIME_MO/10+0x30);
print2(0x86,TIME_MO%10+0x30);
print(0x87,"/"); // 显示月
print2(0x88,TIME_DD/10+0x30);
print2(0x89,TIME_DD%10+0x30);
print(0x8b,"["); // 显示[
print2(0x8c,TIME_WW%10); //星期
print(0x8d,"]"); // 显示]
print2(0x40,TIME_HH/10+0x30);//小时
print2(0x41,TIME_HH%10+0x30);
print(0x42,":"); // 显示cgram第一个字模"："
print2(0x43,TIME_MM/10+0x30);//分钟
print2(0x44,TIME_MM%10+0x30);
print(0x45,"."); // 显示cgram第一个字模"."
print2(0x46,TIME_SS/10+0x30);//秒
print2(0x47,TIME_SS%10+0x30);
if(DAY_BIT == 1){ //检查天数是否更新，是则计算公历
month_day();//计算公历日期
DAY_BIT = 0;//计算完成后将日期变更标志位置0
}
}
void main (void){
init();//初始化
LCD1602_Init();//LCM2402初始化
while(1){
LCD1602_Init();
RealTime_Display();
DELAY_MS (2000);
LCD1602_WriteCMD(CMD_clear);
print(0x80,"http://990487026"); //在第一行第一位处从左向右打印http://990487026字符串
print(0x40,".blog.51cto.com/"); //在第二行第一位处从左向右打印.blog.51cto.com/字符串
DELAY_MS (2000);
LCD1602_WriteCMD(CMD_clear);
print(0x80,"Welcome to linux"); //在第一行第一位处从左向右打印Welcome to linux字符串
print(0x40,"Debian VS Redhat"); //在第二行第一位处从左向右打印Debian Linux 字符串
DELAY_MS (2000);
LCD1602_WriteCMD(CMD_clear);
}
}
void tiem0(void) interrupt 1{ // T/C0中断服务程序(产生50ms时基信号)
cou++; // 软计数器加1
if(cou > 19){ // 计数值到100(1s)
cou = 0; // 软计数器清零
TIME_SS++; // 秒计数器加1(进位10ms*100=1s)
if(TIME_SS > 59){ // 秒计数值到60
TIME_SS = 0; // 秒计数器清零
TIME_MM++; // 分计数器加1(进位60s=1m)
if(TIME_MM > 59){ // 分计数到60
TIME_MM = 0; // 分计数器清零
TIME_HH++; // 时计数器加1(进位60m=1h)
if(TIME_HH > 23){ // 时计数到23
TIME_HH = 0; // 时计数器清零
DAY_BIT = 1; //天增加标志位
}
}
}
}
TH0 = 0x3c; // 重置定时常数
TL0 = 0xb0;
} 接线图：
显示结果：
