简易万年历

实验七设计性实验

一．实验题目：简易万年历

二．功能说明：

2014年06月12日

12 : 00 : 00 30oC

液晶屏上显示即时的日期、时间和温度，且日期和时间可调节。三．编程思想：

编程采用模块化思想，将程序分为几个模块，即液晶屏模块、数字温度传感器模块、定时器模块等。

定义端口，使日期和时间各位可调。

四．程序清单：

LCD.c文件

#include

#include

unsigned char code number_X[]=

{ //宽x高=8x16,纵向字节倒序

0x00,0xE0,0x10,0x08,0x08,0x10,0xE0,0x00, //0

0x00,0x0F,0x10,0x20,0x20,0x10,0x0F,0x00,

0x00,0x10,0x10,0xF8,0x00,0x00,0x00,0x00, //1

0x00,0x20,0x20,0x3F,0x20,0x20,0x00,0x00,

0x00,0x70,0x08,0x08,0x08,0x88,0x70,0x00, //2

0x00,0x30,0x08,0x88,0x88,0x48,0x30,0x00, //3 0x00,0x18,0x20,0x20,0x20,0x11,0x0E,0x00,

0x00,0x00,0xC0,0x20,0x10,0xF8,0x00,0x00, //4 0x00,0x07,0x04,0x24,0x24,0x3F,0x24,0x00,

0x00,0xF8,0x08,0x88,0x88,0x08,0x08,0x00, //5 0x00,0x19,0x21,0x20,0x20,0x11,0x0E,0x00,

0x00,0xE0,0x10,0x88,0x88,0x18,0x00,0x00, //6 0x00,0x0F,0x11,0x20,0x20,0x11,0x0E,0x00,

0x00,0x38,0x08,0x08,0xC8,0x38,0x08,0x00, //7 0x00,0x00,0x00,0x3F,0x00,0x00,0x00,0x00,

0x00,0x70,0x88,0x08,0x08,0x88,0x70,0x00, //8 0x00,0x1C,0x22,0x21,0x21,0x22,0x1C,0x00,

0x00,0xE0,0x10,0x08,0x08,0x10,0xE0,0x00, //9 0x00,0x00,0x31,0x22,0x22,0x11,0x0F,0x00,

0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, // . 0x00,0x00,0x00,0x00,0x00,0x60,0x60,0x00,

0x00,0x80,0x80,0x80,0x80,0x80,0x80,0x00, //-

0x00,0x01,0x01,0x01,0x01,0x01,0x01,0x00,

0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, //nop 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,

0x00,0x00,0x00,0xC0,0xC0,0x00,0x00,0x00, //：

};

/***********************************

*函数：void LCD_WriteCommandE1(unsigned char com) *功能：写指令代码子程序(E1)

***********************************/

void LCD_WriteCommandE1(unsigned char com)

{

while(CRADD1 & 0x80);

CW ADD1 = com;

}

/***********************************

*函数：void LCD_WriteCommandE1(unsigned char com) *功能：写显示数据子程序(E1)

***********************************/

void LCD_WriteDataE1(unsigned char dat)

{

while(CRADD1 & 0x80);

DWADD1 = dat;

}

/***********************************

*函数：void WriteCommandE2(unsigned char com) *功能：写指令代码子程序(E2)

***********************************/

void LCD_WriteCommandE2(unsigned char com) {

while(CRADD2 & 0x80);

CW ADD2 = com;

}

/***********************************

*函数：void WriteCommandE2(unsigned char com) *功能：写显示数据子程序(E2)

***********************************/

void LCD_WriteDataE2(unsigned char dat)

{

while(CRADD2 & 0x80);

DWADD2 = dat;

}

/*********************************

*函数：void LCD_Init()

*功能：LCD初始化程序

*********************************/ void LCD_Init()

{

LCD_WriteCommandE1(0xe2);

LCD_WriteCommandE2(0xe2);

LCD_WriteCommandE1(0xa4);

LCD_WriteCommandE2(0xa4);

LCD_WriteCommandE1(0xa9);

LCD_WriteCommandE2(0xa9);

LCD_WriteCommandE1(0xa0);

LCD_WriteCommandE2(0xa0);

LCD_WriteCommandE1(0xc0);

LCD_WriteCommandE2(0xc0);

LCD_WriteCommandE1(0xaf);

LCD_WriteCommandE2(0xaf);

}

/********************************* *函数：void LCD_Clear()

*功能：清屏

*********************************/ void LCD_Clear(void)

{

unsigned char i,j;

for(i=0;i<4;i++)

{

LCD_WriteCommandE1(i+0xb8);

LCD_WriteCommandE2(i+0xb8);

LCD_WriteCommandE1(0x00);

LCD_WriteCommandE2(0x00);

for(j=0;j<0x50;j++)

{

LCD_WriteDataE1(0x00);

LCD_WriteDataE2(0x00);

}

}

}

/********************************************************* *函数：void display_cn(unsigned char lin,unsigned int col,unsigned int len,unsigned char *p)

*功能：显示汉字

**********************************************************/ void display_cn(unsigned char lin,unsigned int col,unsigned int

len,unsigned char *p)

{

unsigned int seg,i,j;

unsigned char a,L,n;

switch(lin)

{

case 0: n=0xba;break;

case 1: n=0xb8;break;

}

for(i=0;i

{

for(j=0;j<2;j++)

{

L=col;

LCD_WriteCommandE1(n+j);

LCD_WriteCommandE2(n+j);

for(seg=0;seg<16;seg++)

{

if (L < 61) // 为左半屏显示区域(E1) {

a = L;

LCD_WriteCommandE1(a);

LCD_WriteDataE1(*p++);

}

else

{

a = L-61;

LCD_WriteCommandE2(a);

LCD_WriteDataE2(*p++);

}

L++;

}

}

col=col+16;

}

}

/********************************************************* *函数：void display_number()

*功能：显示数字

**********************************************************/ void display_number(unsigned char lin,unsigned int col,unsigned char num)

{

unsigned int seg,j;

unsigned char a,L,n,k;

switch(lin)

{

case 0: n=0xba;break;

case 1: n=0xb8;break;

}

k=num*16;

for(j=0;j<2;j++)

{

L=col;

LCD_WriteCommandE1(n+j);

LCD_WriteCommandE2(n+j);

for(seg=0;seg<8;seg++)

{

if (L < 61) // 为左半屏显示区域(E1) {

a = L;

LCD_WriteCommandE1(a);

LCD_WriteDataE1(number_X[k++]);

}

else

{

a = L-61;

LCD_WriteCommandE2(a);

LCD_WriteDataE2(number_X[k++]);

}

L++;

}

}

}

/********************************************************* *函数：void display_unsigned_int(unsigned char lin,unsigned int col,unsigned int dat)

*功能：显示显示无符号整型数

**********************************************************/ void display_unsigned_int(unsigned char lin,unsigned int col,unsigned int dat)

{

unsigned int seg;

unsigned char k[4];

k[3]=dat%10;

k[2]=((dat/10)%10);

k[1]=((dat/100)%10);

k[0]=((dat/1000)%10);

if(k[0]==0) {k[0]=12;}

if((k[0]==12)&&(k[1]==0)){ k[0]=12;k[1]=12;}

if((k[0]==12)&&(k[1]==12)&&(k[2]==0)){k[0]=12;k[1]=12;k[2]=12;} for(seg=0;seg<4;seg++)

{

display_number(lin,col,k[seg]);

col=col+10;

}

}

/********************************************************* *函数：void display_signed_int(unsigned char lin,unsigned int col,signed int dat)

*功能：显示有符号整型数

**********************************************************/ void display_signed_int(unsigned char lin,unsigned int col,signed int dat)

{

unsigned int seg;

unsigned char k[5],a;

k[0]=12;

if(dat<0)

{

dat=(~dat)+1;

k[0]=11;

}

k[4]=dat%10;

k[3]=((dat/10)%10);

k[2]=((dat/100)%10);

k[1]=((dat/1000)%10);

a=k[0];

if(k[1]==0) {k[0]=12;k[1]=a;}

if((k[1]==a)&&(k[2]==0)){ k[0]=12;k[1]=12;k[2]=a;}

if((k[1]==12)&&(k[2]==a)&&(k[3]==0)){k[0]=12;k[1]=12;k[2]=12;k[3] =a;}

for(seg=0;seg<5;seg++)

{

display_number(lin,col,k[seg]);

col=col+10;

}

}

/********************************************************* *函数：void display_unsigned_char(unsigned char lin,unsigned int

col,unsigned int dat)

*功能：显示显示无符号2位数

**********************************************************/ void display_unsigned_char(unsigned char lin,unsigned int col,unsigned char dat)

{

unsigned int seg;

unsigned char k[3];

k[1]=dat%10;

k[0]=((dat/10)%10);

for(seg=0;seg<2;seg++)

{

display_number(lin,col,k[seg]);

col=col+10;

}

}

LCD.h文件

#include

#include

#ifndef __LCD__

#define __LCD__

#define CW ADD1 XBYTE[0x8000] // 写指令代码地址(E1)

#define DW ADD1 XBYTE[0x8001] // 写显示数据地址(E1)

#define CRADD1 XBYTE[0x8002] // 读状态字地址(E1)

#define DRADD1 XBYTE[0x8003] // 读显示数据地址(E1)

#define CW ADD2 XBYTE[0x8004] // 写指令代码地址(E2)

#define DW ADD2 XBYTE[0x8005] // 写显示数进地址(E2)

#define CRADD2 XBYTE[0x8006] // 读状态字地址(E2)

#define DRADD2 XBYTE[0x8007] // 读显示数据地址(E2)

extern void LCD_Init();

extern void display_cn(unsigned char lin,unsigned int col,unsigned int len,unsigned char *p);

extern void display_signed_int(unsigned char lin,unsigned int col,signed int dat);

extern void display_unsigned_int(unsigned char lin,unsigned int col,unsigned int dat);

extern void display_unsigned_char(unsigned char lin,unsigned int col,unsigned char dat);

extern void LCD_Clear(void);

#endif

DS18B20.c文件

#include

#include "string.h"

#include "intrins.h"

#include "DS18B20.h"

sbit DQ=P3^0;

/********************************************************* *函数：void delay(unsigned int uSeconds)

*功能：延时

**********************************************************/ void delay(unsigned int uSeconds)

{

for(;uSeconds>0;uSeconds--);

}

/********************************************************* *函数：unsigned char ow_reset(void)

*功能：复位

**********************************************************/ unsigned char ow_reset(void)

{

unsigned char xdata presence;

DQ = 0;

delay(48);

DQ = 1;

delay(7);

presence = DQ;

delay(48);

return(presence);

}

/********************************************************* *函数：unsigned char read_byte(void)

*功能：从1-wire 总线上读取一个字节

**********************************************************/ unsigned char read_byte(void)

{

unsigned char i;

unsigned char value = 0;

for (i=8;i>0;i--)

{

value>>=1;

DQ = 0;

DQ = 1;

_nop_();

_nop_();

_nop_();

_nop_();

_nop_();

if(DQ)

value|=0x80;

delay(7);

}

return(value);

// pull DQ low to start read timeslot

// then rlease DQ

// read DQ data at 1 to 15us,here delay 6us;

// wait for rest of timeslot,72us

}

/********************************************************* *函数：void write_byte(char val)

*功能：向1-WIRE 总线上写一个字节

**********************************************************/ void write_byte(char val)

{

unsigned char i;

for (i=8; i>0; i--)// writes byte, one bit at a time

{

DQ = 0;// pull DQ low to start timeslot

DQ = val&0x01;

delay(7);// hold value for remainder timeslot,here 72us

DQ = 1;

val=val/2;

}

delay(5);

}

/********************************************************* *函数：float Read_Temperature(void)

*功能：读取温度

**********************************************************/ float Read_Temperature(void)

{

unsigned char Hdata,Ldata,b;

int a;

bit flag;

float x,y,z;

ow_reset();

write_byte(0xCC);// Skip ROM

write_byte(0xBE);// Read Scratch Pad

delay(100);

Ldata=read_byte();// Low byte first

Hdata=read_byte();// High byte after

ow_reset();

write_byte(0xCC);//Skip ROM

write_byte(0x44); // Start Conversion

a=Hdata*256+Ldata;

x=(float)(Ldata&0x0f);

x=x/16;

if(a<0)flag=1;

else flag=0;

b=a>>4;

z=(float)(b);

if(flag==1)

{

b=~b+1;

z=(float)(b);

z=0-z;

}

y=z+x;

return y;

}

DS18B20.h文件

#ifndef __DS18B20__

#define __DS18B20__

extern float Read_Temperature(void);

#endif

MCU.c文件

#include

#include "MCU.h"

/********************************************************* *函数：timer0_init(void)；

*功能：启动定时器0

**********************************************************/ void timer0_init(void)

{//ok

TMOD|=0x01;//Timer0 is 16 bits timer, timer1 is Baud rate generator