/*128*64液晶模块驱动程序 ,HD61202驱动
创建时间:07.1.6
功能描述:循环显示李白的诗歌共8行,指定反白显示*/
#include <at89x51.h>
//#include <intrins.h>
#define uchar unsigned char
#define uint unsigned int
#define lcm P1
sbit p_csl=P2^4;
sbit p_csr=P2^3;
sbit p_di=P2^2;
sbit p_rw=P2^1;
sbit p_e=P2^0;
sbit p_rst=P2^7;
uchar code HZ[];
uchar code Ez[];
/*****函数声明********/
void delay(uint k);
void wcode(uchar c,uchar csl,uchar csr);
void wdata(uchar c,uchar csl,uchar csr);
void set_statrline(uchar i);
void set_xy(uchar x,uchar y);
void dison_off(uchar o);
void reset();
void lcd_init(void);
void lw(uchar x,uchar y,uchar dd);//写数据函数
void disp_Hz(uchar xx,uchar yy,uchar n,uchar fb);//显示汉字
void disp_Ez(uchar xx,uchar yy,uchar n,uchar fb);
//延时
void delay(uint k)
{ uint i;
for(;k>0;k--)
{ for(i=0;i<124;i++)
{;}
}
}
//
//LCM忙判断
void lcd_busy(void)
{ p_di=0;
p_rw=1;
/*lcm=0xff;
while(1)
{ p_e=1;
if(lcm<0x80)
break;
p_e=0;
}
p_e=0;*/
}
//写指令到LCM
void wcode(uchar c,uchar csl,uchar csr)
{ p_csl=csl;
p_csr=csr;
lcd_busy();
p_di=0;
p_rw=0;
lcm=c;//将变量C赋予LCM
p_e=1;
p_e=0;
}
//写数据到LCM子函数
void wdata(uchar c,uchar csl,uchar csr)
{ p_csl=csl;
p_csr=csr;
lcd_busy();
p_di=1;
p_rw=0;
lcm=c;//将变量C赋予LCM
p_e=1;
p_e=0;
}
//设定起始行
void set_startline(uchar i)
{ i=0xc0+i;
wcode(i,1,1);
}
//定位X方向,Y方向
void set_xy(uchar x,uchar y)
{ x=x+0x40;
y=y+0xb8;
wcode(x,1,1);
wcode(y,1,1);
}
//屏幕开启、关闭
void dison_off(uchar o)
{ o=o+0x3e; //o为1为开,为0是关
wcode(o,1,1);
}
//复位子函数
void reset()
{//delay(1000);
p_rst=0;
delay(20);
p_rst=1;
delay(20);
}
//LCM初始化
void lcd_init(void)
{ uchar x,y;
reset();
dison_off(0);
for(y=0;y<8;y++)
{ for(x=0;x<128;x++)
lw(x,y,0);
}
dison_off(1);
set_startline(0);
}
//写数据到LCM
void lw(uchar x,uchar y,uchar dd)
{ if(x>=64)
{ set_xy(x-64,y);
wdata(dd,0,1);
}
else
{ set_xy(x,y);
wdata(dd,1,0);
}
}
//显示汉字子函数
void disp_Hz(uchar xx,uchar yy,uchar n,uchar fb)//xx为该行第xx个字,共8字,yy为第几行,共8行。
{ uchar i,dx;
for(i=0;i<16;i++)
{ dx=HZ[2*i+n*32]; //2*i为选择偶数行,因其为列扫描
if(fb)
dx=255-dx;//反白显示
lw(xx*16+i,yy,dx);
dx=HZ[(2*i+1)+n*32];
if(fb)
dx=255-dx;
lw(xx*16+i,yy+1,dx);
}
}
void disp_Ez(uchar xx,uchar yy,uchar n,uchar fb)//显示数字或英语
{ uchar i,dx;
for(i=0;i<8;i++)
{ dx=Ez[2*i+n*16];
if(fb)
dx=255-dx;
lw(xx*8+i,yy,dx);//
dx=Ez[(2*i+1)+n*16];
if(fb)
dx=255-dx;
lw(xx*8+i,yy+1,dx);
}
}
/*****主函数****/
void main()
{ uchar loop,i,y;//
uchar fb;
lcd_init();
delay(300);
for(loop=0;loop<2;loop++)//菜单
{
disp_Hz(loop+1,0,loop+64,1);
disp_Ez(13,0,10,0);
disp_Ez(14,0,8,0);
}
while(1)
{for(i=0;i<8;i++)
{ disp_Ez(12,0,i+1,0);
if(i<3)
{ if(i!=0)fb=0;
else fb=1;
for(loop=0;loop<8;loop++)//行1
{ disp_Hz(loop,2,loop,fb);
}
}
if(i<4)
{ if(i!=1)fb=0;
else fb=1;
if(i==3)y=2;
else y=4;
for(loop=0;loop<8;loop++)//2
{
disp_Hz(loop,y,loop+8,fb);
} }
if(i<5)
{ if(i!=2)fb=0;
else fb=1;
if((i==0)||(i==1)||(i==2))
y=6;
if(i==3)y=4;
if(i==4)y=2;
for(loop=0;loop<8;loop++)//3
{
disp_Hz(loop,y,loop+16,fb);//第一屏结束,每屏显示3行
}
}
if(i>=3)
{ if(i!=3)fb=0;
else fb=1;//
if(i==3)y=6;
if(i==4)y=4;
if(i==5)y=2;
for(loop=0;loop<8;loop++)//行4
{ disp_Hz(loop,y,loop+24,fb);
}
}
if(i>=4)
{ if(i!=4)fb=0;
else fb=1;//
if(i==4)y=6;
if(i==5)y=4;
if(i==6)y=2;
for(loop=0;loop<8;loop++)//5
{
disp_Hz(loop,y,loop+32,fb);//y=1时
} }
if(i>=5)
{ if(i!=5)fb=0;
else fb=1;
if(i==5)y=6;
if(i==6)y=4;
if(i==7)y=2;
for(loop=0;loop<8;loop++)//6
{
disp_Hz(loop,y,loop+40,fb);
}
}
if(i>=6)
{ if(i!=6)fb=0;
else fb=1;
if(i==6)y=6;
if(i==7)y=4;
for(loop=0;loop<8;loop++)//行7
{disp_Hz(loop,y,loop+48,fb);
}
}
if(i==7)
{ if(i!=7)fb=0;
else fb=1;
for(loop=0;loop<8;loop++)//8
{
disp_Hz(loop,6,loop+56,fb);//y=1时
} }
delay(600);
}
}
}
uchar code HZ[]=
{0x40,0x40,0x40,0x40,0x20,0x42,0x20,0x42,0x50,0x4A,0x48,0x72,0x44,0x42,0xC3,0x7F,
0x44,0x42,0x48,0x62,0x50,0x5A,0x50,0x42,0x20,0x42,0x60,0x40,0x20,0x40,0x00,0x00,/*"金",0*/
0x00,0x00,0xFE,0xFF,0x22,0x02,0x5A,0x04,0x86,0x43,0x10,0x48,0x94,0x24,0x74,0x22,
0x94,0x15,0x1F,0x09,0x34,0x15,0x54,0x23,0x94,0x60,0x94,0xC0,0x10,0x40,0x00,0x00,/*"陵",1*/
0x04,0x00,0x64,0x00,0x24,0x81,0x24,0x41,0x24,0x21,0x2F,0x19,0xE4,0x07,0x24,0x01,
0x24,0x01,0x24,0x41,0x2F,0x81,0x24,0x7F,0x24,0x00,0x64,0x00,0x24,0x00,0x00,0x00,/*"劳",2*/
0x04,0x00,0x64,0x00,0x24,0x81,0x24,0x41,0x24,0x21,0x2F,0x19,0xE4,0x07,0x24,0x01,
0x24,0x01,0x24,0x41,0x2F,0x81,0x24,0x7F,0x24,0x00,0x64,0x00,0x24,0x00,0x00,0x00,/*"劳",3*/
0x40,0x40,0x41,0x20,0xC6,0x1F,0x00,0x20,0x40,0x40,0x48,0x48,0x49,0x44,0x4E,0x43,
0xF8,0x40,0x4C,0x41,0x4B,0x42,0x48,0x4C,0x48,0x40,0x40,0x40,0x00,0x40,0x00,0x00,/*"送",4*/
0x00,0x08,0x18,0x08,0x04,0x05,0x84,0x04,0x44,0xFC,0x7C,0x46,0xA5,0x46,0x26,0x45,
0x24,0x45,0xA4,0x46,0x64,0x46,0x24,0xFE,0x14,0x04,0x0C,0x0C,0x04,0x04,0x00,0x00,/*"客",5*/
0x00,0x00,0x40,0x40,0x30,0x48,0x12,0x48,0xDC,0x4B,0x54,0x4A,0x50,0x4A,0x5F,0x7E,
0x50,0x4A,0x50,0x4A,0xD8,0x4B,0x16,0x48,0x54,0x48,0x38,0x48,0x10,0x40,0x00,0x00,/*"堂",6*/
0x00,0x00,0x00,0x00,0x00,0x58,0x00,0x38,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*",",7*/
0x02,0x80,0x02,0x80,0x82,0x83,0xBA,0x42,0xAA,0x4A,0xAF,0x5B,0xAA,0x2A,0xBA,0x2A,
0xAA,0x2A,0xAF,0x5B,0xAA,0x4A,0xBA,0x42,0x82,0x83,0x02,0x80,0x00,0x80,0x00,0x00,/*"蔓",8*/
0x04,0x08,0x04,0x08,0x04,0x08,0xE4,0x0B,0xA4,0x0A,0xBF,0x0A,0xA4,0x0A,0xA4,0xFE,
0xA4,0x0A,0xBF,0x0A,0xA4,0x0A,0xE4,0x0B,0x04,0x08,0x04,0x08,0x04,0x08,0x00,0x00,/*"草",9*/
0x00,0x00,0x04,0x00,0x04,0xFE,0xF4,0x02,0x84,0x1A,0xCC,0x16,0xAD,0x12,0x96,0x13,
0x94,0x12,0xAC,0x16,0xCC,0x1A,0x84,0x72,0xF4,0x82,0x06,0x7E,0x04,0x00,0x00,0x00,/*"离",10*/
0x00,0x00,0x04,0x00,0x04,0xFE,0xF4,0x02,0x84,0x1A,0xCC,0x16,0xAD,0x12,0x96,0x13,
0x94,0x12,0xAC,0x16,0xCC,0x1A,0x84,0x72,0xF4,0x82,0x06,0x7E,0x04,0x00,0x00,0x00,/*"离",11*/
0x00,0x01,0x80,0x40,0x60,0x40,0x1E,0x41,0x10,0x41,0x10,0x41,0x10,0x41,0x10,0x41,
0xFF,0x7F,0x12,0x41,0x10,0x41,0x10,0x41,0x98,0x41,0x10,0x61,0x00,0x40,0x00,0x00,/*"生",12*/
0x40,0x40,0x42,0x20,0xCC,0x1F,0x00,0x20,0x04,0x40,0x04,0x40,0xE5,0x5F,0xB6,0x4A,
0xAC,0x4A,0xA4,0x4A,0xA6,0x4A,0xE5,0x5F,0x04,0x40,0x04,0x40,0x00,0x40,0x00,0x00,/*"道",13*/
0x40,0x00,0x20,0x00,0xF8,0x7F,0x07,0x00,0x82,0x00,0x64,0x41,0x2C,0x31,0x34,0x0F,
0x65,0x05,0xA6,0x05,0x34,0x25,0x2C,0x45,0xA4,0x3D,0x74,0x01,0x20,0x00,0x00,0x00,/*"傍",14*/
0x00,0x00,0x00,0x18,0x00,0x24,0x00,0x24,0x00,0x18,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*"。",15*/
0x08,0x00,0x08,0x00,0x08,0x00,0x08,0x7F,0x08,0x21,0x08,0x21,0x08,0x21,0xFF,0x21,
评论0
最新资源