基于PIC16F877A单片机设计的万年历程序
/*----------------------------------------------------*/
//写显示数据
//dat:显示数据
void WriteData(unsigned char dat)
{
CheckState();
DI=1; //写数据
RW=0;
PORTB=dat;
E=1;
E=0;
}
/*---------------------------------------------------*/
//写指令
//command:操作LCD的指令
void WriteCommand(unsigned char dat)
{
CheckState();
RW=0; //写指令
PORTB=dat;
E=1;
E=0;
}
/*---------------------------------------------------*/
//设定页地址----X:0--7
void SetLine(unsigned char line)
{
line=line0x07; //0
//设定列地址----Y:0--63
void SetColumn(unsigned char column)
{
column=column0x3f; //0
//设定开始行
void SetStartLine(unsigned char startline)
{
startline=startline0x3f; //0
//开关显示
//1:开显示 0:关显示
void SetOnOff(unsigned char state)
{
state=state|0x3e;
WriteCommand(state);
}
/*--------------------------------------------------*/
//选择屏幕
//screen: 1:左屏 2:右屏
void SlectScreen(unsigned char screen)
{
switch(screen)
{
case 1: CSA=0;
CSB=1;//左屏
break;
case 2: CSA=1;
CSB=0;//右屏
break;
}
}
/*--------------------------------------------------*/
//清屏
//screen: 1:左屏 2:右屏
void ClearScreen(unsigned char screen)
{
unsigned char i,j;
SlectScreen(screen);
for(i=0;i
//显示一个16X16的汉字
void Show16X16(unsigned char line,unsigned char column,const unsigned char *pt)
{
unsigned char i,column_temp;
column_temp=column;
SlectScreen(1); //选通左屏
SetColumn(column); //设置起始列
SetLine(line); //设置行
for(i=0;i=64) //如果列>=64，则选通右屏
{
SlectScreen(2);
column=column%64; //设置右屏起始列
SetColumn(column);
SetLine(line);
}
WriteData(*pt); //写数据
*pt++;//
column++;
}
SlectScreen(1);
SetLine(line+1); //设置汉字下半部分显示页
column=column_temp;
SetColumn(column);
for(i=0;i=64)
{
SlectScreen(2);
column=column%64;
SetColumn(column);
SetLine(line+1);
}
WriteData(*pt);
*pt++;
column++;
}
}
/*-------------------------------------------------------*/
//显示一个16X16的汉字带上划线
void Show16X16_2(unsigned char line,unsigned char column,const unsigned char *pt)
{
unsigned char i,column_temp;
column_temp=column;
SlectScreen(1); //选通左屏
SetColumn(column); //设置起始列
SetLine(line); //设置行
for(i=0;i=64) //如果列>=64，则选通右屏
{
SlectScreen(2);
column=column%64; //设置右屏起始列
SetColumn(column);
SetLine(line);
}
WriteData(*pt|0x01); //写数据
*pt++;
column++;
}
SlectScreen(1);
SetLine(line+1); //设置汉字下半部分显示页
column=column_temp;
SetColumn(column);
for(i=0;i=64)
{
SlectScreen(2);
column=column%64;
SetColumn(column);
SetLine(line+1);
}
WriteData(*pt);
*pt++;
column++;
}
}
/*-------------------------------------------------------*/
//显示一个16X16的汉字带下划线
void Show16X16_3(unsigned char line,unsigned char column,const unsigned char *pt)
{
unsigned char i,column_temp;
column_temp=column;
SlectScreen(1); //选通左屏
SetColumn(column); //设置起始列
SetLine(line); //设置行
for(i=0;i=64) //如果列>=64，则选通右屏
{
SlectScreen(2);
column=column%64; //设置右屏起始列
SetColumn(column);
SetLine(line);
}
WriteData(*pt); //写数据
*pt++;
column++;
}
SlectScreen(1);
SetLine(line+1); //设置汉字下半部分显示页
column=column_temp;
SetColumn(column);
for(i=0;i=64)
{
SlectScreen(2);
column=column%64;
SetColumn(column);
SetLine(line+1);
}
WriteData(*pt|0x80);
*pt++;
column++;
}
}
/*-------------------------------------------------------*/
//显示一个8X16的字符
void Show8X16(unsigned char line,unsigned char column,const unsigned char *pt)
{
unsigned char i,column_temp;
column_temp=column;
SlectScreen(1); //选通左屏
SetColumn(column); //设置起始列
SetLine(line); //设置行
for(i=0;i=64) //如果列>=64，则选通右屏
{
SlectScreen(2);
column=column%64; //设置右屏起始列
SetColumn(column);
SetLine(line);
}
WriteData(*pt); //写数据
*pt++;
column++;
}
SlectScreen(1);
SetLine(line+1); //设置汉字下半部分显示页
column=column_temp;
SetColumn(column);
for(i=0;i=64)
{
SlectScreen(2);
column=column%64;
SetColumn(column);
SetLine(line+1);
}
WriteData(*pt);
*pt++;
column++;
}
}
/*-------------------------------------------------------*/
//显示一个8X16的字符带上划线
void Show8X16_2(unsigned char line,unsigned char column,const unsigned char *pt)
{
unsigned char i,column_temp;
column_temp=column;
SlectScreen(1); //选通左屏
SetColumn(column); //设置起始列
SetLine(line); //设置行
for(i=0;i=64) //如果列>=64，则选通右屏
{
SlectScreen(2);
column=column%64; //设置右屏起始列
SetColumn(column);
SetLine(line);
}
WriteData(*pt|0x01); //写数据
*pt++;
column++;
}
SlectScreen(1);
SetLine(line+1); //设置汉字下半部分显示页
colu mn=column_temp;
SetColumn(column);
for(i=0;i=64)
{
SlectScreen(2);
column=column%64;
SetColumn(column);
SetLine(line+1);
}
WriteData(*pt);
*pt++;
column++;
}
}
评论