122x32c.c

12232液晶控制（sed1520）驱动程序

#include <reg51.h>
#include <intrins.h>
#include "122x32h.h"

#define uchar unsigned char
#define uint  unsigned int
#define NOP() _nop_();

uchar dot_buffer[32];					//点阵缓存区
uchar disp_buffer[4];   				//ram数据显示缓存区

void lcd_init(void);					//LCD初始化
void lcd_clr(void);                     //LCD清屏
void wait_ready(void);					//等待ready
void draw_bmp(uchar col,uchar layer,uchar width,uchar *bmp);	
                                        //点阵码显示输出
void disp_one_ascii(uchar col,uchar layer,uchar ascii_code,uchar mode);
                                        //单个ascci码输出(ascii_code为ascii编码)
void disp_ram_data(uchar col,uchar layer,uchar n,uchar mode);   
                                        //ram数据(数字)显示输出
void dprintf(uchar col,uchar layer,uchar *buf,uchar mode);     
                                        //通用混合字串显示
										
typedef struct data_gb16				//汉字字模数据结构
{
	uchar index[2];
	uchar zimo[32]; 
};

struct data_gb16 code hz16[] = 
{
"延",	0x00,0x84,0xC4,0xA4,0x94,0x8C,0x00,0xE4,
		0x04,0x04,0xFC,0x42,0x63,0x42,0x00,0x00,
		0x80,0x44,0x28,0x10,0x2C,0x43,0x40,0x4F,
		0x48,0x48,0x4F,0x48,0x4C,0x68,0x20,0x00,
"时",	0x00,0xFC,0x84,0x84,0x84,0xFE,0x14,0x10,
		0x90,0x10,0x10,0x10,0xFF,0x10,0x10,0x00,
		0x00,0x3F,0x10,0x10,0x10,0x3F,0x00,0x00,
		0x00,0x23,0x40,0x80,0x7F,0x00,0x00,0x00		
};
// !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz
//7B开始为自定义字符
uchar code ascii[] = {
//前面0x20(32个)ASCII码为控制命令       //本程序中不用 
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,//   
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x38,0xFC,0xFC,0x38,0x00,0x00,//!
0x00,0x00,0x00,0x0D,0x0D,0x00,0x00,0x00,
0x00,0x0E,0x1E,0x00,0x00,0x1E,0x0E,0x00,//"
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x20,0xF8,0xF8,0x20,0xF8,0xF8,0x20,0x00,//#
0x02,0x0F,0x0F,0x02,0x0F,0x0F,0x02,0x00,
0x38,0x7C,0x44,0x47,0x47,0xCC,0x98,0x00,//$
0x03,0x06,0x04,0x1C,0x1C,0x07,0x03,0x00,
0x30,0x30,0x00,0x80,0xC0,0x60,0x30,0x00,//%
0x0C,0x06,0x03,0x01,0x00,0x0C,0x0C,0x00,
0x80,0xD8,0x7C,0xE4,0xBC,0xD8,0x40,0x00,//&
0x07,0x0F,0x08,0x08,0x07,0x0F,0x08,0x00,
0x00,0x10,0x1E,0x0E,0x00,0x00,0x00,0x00,//'
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0xF0,0xF8,0x0C,0x04,0x00,0x00,//(
0x00,0x00,0x03,0x07,0x0C,0x08,0x00,0x00,
0x00,0x00,0x04,0x0C,0xF8,0xF0,0x00,0x00,//)
0x00,0x00,0x08,0x0C,0x07,0x03,0x00,0x00,
0x80,0xA0,0xE0,0xC0,0xC0,0xE0,0xA0,0x80,//*
0x00,0x02,0x03,0x01,0x01,0x03,0x02,0x00,
0x00,0x80,0x80,0xE0,0xE0,0x80,0x80,0x00,//+
0x00,0x00,0x00,0x03,0x03,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,//,
0x00,0x00,0x10,0x1E,0x0E,0x00,0x00,0x00,
0x80,0x80,0x80,0x80,0x80,0x80,0x80,0x00,//-
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,//.
0x00,0x00,0x00,0x0C,0x0C,0x00,0x00,0x00,
0x00,0x00,0x00,0x80,0xC0,0x60,0x30,0x00,///
0x0C,0x06,0x03,0x01,0x00,0x00,0x00,0x00,
0xF8,0xFC,0x04,0xC4,0x24,0xFC,0xF8,0x00,//0
0x07,0x0F,0x09,0x08,0x08,0x0F,0x07,0x00,
0x00,0x10,0x18,0xFC,0xFC,0x00,0x00,0x00,//1
0x00,0x08,0x08,0x0F,0x0F,0x08,0x08,0x00,
0x08,0x0C,0x84,0xC4,0x64,0x3C,0x18,0x00,//2
0x0E,0x0F,0x09,0x08,0x08,0x0C,0x0C,0x00,
0x08,0x0C,0x44,0x44,0x44,0xFC,0xB8,0x00,//3
0x04,0x0C,0x08,0x08,0x08,0x0F,0x07,0x00,
0xC0,0xE0,0xB0,0x98,0xFC,0xFC,0x80,0x00,//4
0x00,0x00,0x00,0x08,0x0F,0x0F,0x08,0x00,
0x7C,0x7C,0x44,0x44,0xC4,0xC4,0x84,0x00,//5
0x04,0x0C,0x08,0x08,0x08,0x0F,0x07,0x00,
0xF0,0xF8,0x4C,0x44,0x44,0xC0,0x80,0x00,//6
0x07,0x0F,0x08,0x08,0x08,0x0F,0x07,0x00,
0x0C,0x0C,0x04,0x84,0xC4,0x7C,0x3C,0x00,//7
0x00,0x00,0x0F,0x0F,0x00,0x00,0x00,0x00,
0xB8,0xFC,0x44,0x44,0x44,0xFC,0xB8,0x00,//8
0x07,0x0F,0x08,0x08,0x08,0x0F,0x07,0x00,
0x38,0x7C,0x44,0x44,0x44,0xFC,0xF8,0x00,//9
0x00,0x08,0x08,0x08,0x0C,0x07,0x03,0x00,
0x00,0x00,0x00,0x30,0x30,0x00,0x00,0x00,//:
0x00,0x00,0x00,0x06,0x06,0x00,0x00,0x00,
0x00,0x00,0x00,0x30,0x30,0x00,0x00,0x00,//;
0x00,0x00,0x08,0x0E,0x06,0x00,0x00,0x00,
0x00,0x80,0xC0,0x60,0x30,0x18,0x08,0x00,//<
0x00,0x00,0x01,0x03,0x06,0x0C,0x08,0x00,
0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x00,//=
0x02,0x02,0x02,0x02,0x02,0x02,0x02,0x00,
0x00,0x08,0x18,0x30,0x60,0xC0,0x80,0x00,//>
0x00,0x08,0x0C,0x06,0x03,0x01,0x00,0x00,
0x18,0x1C,0x04,0xC4,0xE4,0x3C,0x18,0x00,//?
0x00,0x00,0x00,0x0D,0x0D,0x00,0x00,0x00,
0xF0,0xF8,0x08,0xC8,0xC8,0xF8,0xF0,0x00,//@
0x07,0x0F,0x08,0x0B,0x0B,0x0B,0x01,0x00,
0xE0,0xF0,0x98,0x8C,0x98,0xF0,0xE0,0x00,//A
0x0F,0x0F,0x00,0x00,0x00,0x0F,0x0F,0x00,
0x04,0xFC,0xFC,0x44,0x44,0xFC,0xB8,0x00,//B
0x08,0x0F,0x0F,0x08,0x08,0x0F,0x07,0x00,
0xF0,0xF8,0x0C,0x04,0x04,0x0C,0x18,0x00,//C
0x03,0x07,0x0C,0x08,0x08,0x0C,0x06,0x00,
0x04,0xFC,0xFC,0x04,0x0C,0xF8,0xF0,0x00,//D
0x08,0x0F,0x0F,0x08,0x0C,0x07,0x03,0x00,
0x04,0xFC,0xFC,0x44,0xE4,0x0C,0x1C,0x00,//E
0x08,0x0F,0x0F,0x08,0x08,0x0C,0x0E,0x00,
0x04,0xFC,0xFC,0x44,0xE4,0x0C,0x1C,0x00,//F
0x08,0x0F,0x0F,0x08,0x00,0x00,0x00,0x00,
0xF0,0xF8,0x0C,0x84,0x84,0x8C,0x98,0x00,//G
0x03,0x07,0x0C,0x08,0x08,0x07,0x0F,0x00,
0xFC,0xFC,0x40,0x40,0x40,0xFC,0xFC,0x00,//H
0x0F,0x0F,0x00,0x00,0x00,0x0F,0x0F,0x00,
0x00,0x00,0x04,0xFC,0xFC,0x04,0x00,0x00,//I
0x00,0x00,0x08,0x0F,0x0F,0x08,0x00,0x00,
0x00,0x00,0x00,0x04,0xFC,0xFC,0x04,0x00,//J
0x07,0x0F,0x08,0x08,0x0F,0x07,0x00,0x00,
0x04,0xFC,0xFC,0xC0,0xF0,0x3C,0x0C,0x00,//K
0x08,0x0F,0x0F,0x00,0x01,0x0F,0x0E,0x00,
0x04,0xFC,0xFC,0x04,0x00,0x00,0x00,0x00,//L
0x08,0x0F,0x0F,0x08,0x08,0x0C,0x0E,0x00,
0xFC,0xFC,0x38,0x70,0x38,0xFC,0xFC,0x00,//M
0x0F,0x0F,0x00,0x00,0x00,0x0F,0x0F,0x00,
0xFC,0xFC,0x38,0x70,0xE0,0xFC,0xFC,0x00,//N
0x0F,0x0F,0x00,0x00,0x00,0x0F,0x0F,0x00,
0xF0,0xF8,0x0C,0x04,0x0C,0xF8,0xF0,0x00,//O
0x03,0x07,0x0C,0x08,0x0C,0x07,0x03,0x00,
0x04,0xFC,0xFC,0x44,0x44,0x7C,0x38,0x00,//P
0x08,0x0F,0x0F,0x08,0x00,0x00,0x00,0x00,
0xF8,0xFC,0x04,0x04,0x04,0xFC,0xF8,0x00,//Q
0x07,0x0F,0x08,0x0E,0x3C,0x3F,0x27,0x00,
0x04,0xFC,0xFC,0x44,0xC4,0xFC,0x38,0x00,//R
0x08,0x0F,0x0F,0x00,0x00,0x0F,0x0F,0x00,
0x18,0x3C,0x64,0x44,0xC4,0x9C,0x18,0x00,//S
0x06,0x0E,0x08,0x08,0x08,0x0F,0x07,0x00,
0x00,0x1C,0x0C,0xFC,0xFC,0x0C,0x1C,0x00,//T
0x00,0x00,0x08,0x0F,0x0F,0x08,0x00,0x00,
0xFC,0xFC,0x00,0x00,0x00,0xFC,0xFC,0x00,//U
0x07,0x0F,0x08,0x08,0x08,0x0F,0x07,0x00,
0xFC,0xFC,0x00,0x00,0x00,0xFC,0xFC,0x00,//V
0x01,0x03,0x06,0x0C,0x06,0x03,0x01,0x00,
0xFC,0xFC,0x00,0x80,0x00,0xFC,0xFC,0x00,//W
0x03,0x0F,0x0E,0x03,0x0E,0x0F,0x03,0x00,
0x0C,0x3C,0xF0,0xC0,0xF0,0x3C,0x0C,0x00,//X
0x0C,0x0F,0x03,0x00,0x03,0x0F,0x0C,0x00,
0x00,0x3C,0x7C,0xC0,0xC0,0x7C,0x3C,0x00,//Y
0x00,0x00,0x08,0x0F,0x0F,0x08,0x00,0x00,
0x1C,0x0C,0x84,0xC4,0x64,0x3C,0x1C,0x00,//Z
0x0E,0x0F,0x09,0x08,0x08,0x0C,0x0E,0x00,
0x80,0x80,0x80,0x80,0xe0,0xC0,0x80,0x00,//->0x5b(自定义显示字符) 
0x01,0x01,0x01,0x01,0x07,0x03,0x01,0x00
//0x5c开始可以加入其他的自定义字符
};


void send_mi(uchar instruction)
{  
   	clr_E2();                   //关S    
    set_E1();                   //开M	
	wait_ready();
    clr_A0();				    //指令
    clr_WR();				    //写触发	
	NOP();
	lcd_data = instruction;     //指令码
	NOP();	
    clr_E1();                   //关M
}

void send_md(uchar c)
{
	clr_E2();                   //关S
    set_E1();                   //开M
	wait_ready();	
    set_A0();				    //数据
    clr_WR();				    //写触发	
    NOP();
    lcd_data = c;               //数据
    NOP();	
    clr_E1();                   //关M
}

void send_si(uchar instruction)
{     
	clr_E1();                   //关M
    set_E2();                   //开S
	wait_ready();         
    clr_A0();				    //指令
    clr_WR();				    //写触发    
	NOP();
    lcd_data=instruction;       //指令码
    NOP();	
    clr_E2();                   //关S
}

void send_sd(uchar c)
{
	clr_E1();
    set_E2();		
	wait_ready();	
    set_A0();   				//数据
    clr_WR();				    //写触发    
    lcd_data = c;
	NOP();
    clr_E2();
}

void wait_ready(void)
{
//  DDRA = 0x00;                 //PA口输入
	lcd_data = 0xff;
	clr_A0();                      //指令
   	set_WR();                    //读
	NOP();                           
	while(lcd_data & status_busy); //读入LCD状态,1=忙,一直等待LCD内部操作完成
//	DDRA = 0xff;	               //重新置PA口输出
}


void lcd_init(void)
{
    send_mi(reset);						//复位m-left,s-right
	send_si(reset);

    send_mi(disp_off);					//关闭显示
	send_si(disp_off);

    send_mi(dynamic_driver);			//动态驱动
	send_si(dynamic_driver);

    send_mi(clk32);			            //32占空比
	send_si(clk32);

    send_mi(adc_select);				//clockwise
	send_si(adc_select);

    send_mi(mode_write);				//写模式
	send_si(mode_write);
    
    send_mi(col_addr_set);
	send_mi(disp_start_line);			//归回零列,设定显示起始行首
    send_si(col_addr_set);
	send_si(disp_start_line);
    
    send_mi(disp_on);                   //开显示
	send_si(disp_on);  
}

void lcd_clr(void)
{
    uchar i, page;
	for (page=0;page<4;page++)
    {
    	send_mi(page_addr_set|page);
		send_si(page_addr_set|page);
    	send_mi(0);                     //主窗口设置为0列
		send_si(0);                     //从窗口设置为0列               
    	for (i=0;i<62;i++)
    	{
	    	send_md(0x00);
			send_sd(0x00);
		}
    }
}     

void set_page(uchar page)
{
    send_mi(page_addr_set|page);
    send_si(page_addr_set|page);
}


void set_address(uchar address)
{
    send_mi(address&0x7F);  //&0x7F,考虑到防止越限
    send_si(address&0x7F);
}


void putchar_l(uchar c)
{
    send_md(c);
}


void putchar_r(uchar c)
{
    send_sd(c);
}    

void draw_bmp(uchar col,uchar layer,uchar width,uchar *bmp)
{
    uchar x;        
	uchar address;                  //address表示显存的物理地址
	uchar p=0;     	   
    uchar page=0;
	uchar window=0;  			    //page表示上下两页,window表示左右窗口(0左,1右)
    if (layer) page=2;              //左-主窗口,右-从窗口
    
    for (x=col; x<col+width; x++)
    {   
	    if (x>121)return;           //防止显示乱码
        if (x>60)					//左右窗口定位
		{
			window=1;               //右-从窗口
			address=x%61;
		}
        else
		    address=x;              //主窗口输出  

        set_page(page);             //上层数据输出
        set_address(address);
        
        if (window) 				
          putchar_r(bmp[p]);        
        else 
          putchar_l(bmp[p]);        

        set_page(page+1);           //下层数据输出
        set_address(address);       //列保持不变 
        
        if (window) 				
           putchar_r(bmp[p+width]);     
		else 
           putchar_l(bmp[p+width]);       

        p++;
    }
}


void disp_one_ascii(uchar col,uchar layer,uchar ascii_code,uchar mode)
{
	uchar i;
	for(i=0;i<16;i++)                //ASCII码显示占用16个字节
	{   
		if(mode)dot_buffer[i]=~ascii[(ascii_code-0x20)*16 + i];
	    else    dot_buffer[i]= ascii[(ascii_code-0x20)*16 + i]; 
	}  
	draw_bmp(col,layer,8,dot_buffer);
}

void disp_ram_data(uchar col,uchar layer,uchar n,uchar mode)
{
     while(n--)
	 {
		if(mode)disp_one_ascii(col,layer,disp_buffer[n]+0x30,1);
		else    disp_one_ascii(col,layer,disp_buffer[n]+0x30,0);
		col += 8;
	 }
}


void dprintf(uchar col,uchar layer,uchar *ptr,uchar mode)
{
	uchar c1,c2;
	uchar i,j,k;
	uchar ulen;
	//uchar ucol,ulayer,umode;
	uchar ucol,ulayer;
    ulen = 0; 
	ucol = col;   
	ulayer = layer;
	
	while (ptr[ulen]!= 0)ulen++;		   //探测字串长度
    i=0;
	while(i<ulen)
	{
		c1 = ptr[i];
		c2 = ptr[i+1];
      
		if(c1 <=128)					  //ASCII
		{   
		        if(mode)disp_one_ascii(ucol,ulayer,c1,1);
				else    disp_one_ascii(ucol,ulayer,c1,0);
				ucol+=8;
				i++;                      //ASCII码的处理
		}
		else							  //中文
		{
			    for(j=0;j<sizeof(hz16)/sizeof(hz16[0]);j++)  				                        
			    {                         //查找定位当前汉字的点阵区
				    if((c1 == hz16[j].index[0]) && (c2 == hz16[j].index[1]))
					break;
			    }
			    for(k=0;k<32;k++)
				{   if(mode)dot_buffer[k]=~hz16[j].zimo[k];
				    else    dot_buffer[k]= hz16[j].zimo[k];
				}	
			    draw_bmp(ucol,ulayer,16,dot_buffer);
			    ucol+=16;
				i+=2;                     //中文的处理
		}
	}
}	

////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
void main(void)
{	
   uchar i;
   uint  j;

   for(i=0;i<10;i++)for(j=1;j;j++);       //开机延时
   lcd_init(); 
   lcd_clr();                                 
   dprintf(10,1,"I AM CHINESE!",0);       //说明/在up  行从第10列开始显示/正常显示
   disp_ram_data(10,0,2,1);               //说明/在dowm行从第10列开始显示/反白显示
   while(1); 
}