ocm12864.c

自己花了很长时间编写的单片机开发板程序

#include <at89x52.h>
#include <stdio.h>
#include <absacc.h>
#include <intrins.h>
#include <ocm12864.h>
#include <lcd_code.h>
#include <xbyte.h>

#define disp_off   0x3e
#define disp_on    0x3f
#define disp_x     0xb8
#define disp_z     0xc0
#define disp_y     0x40
#define comm       0
#define dat        1
#define data_ora   XBYTE[0x8000]      //MCU P1<------> LCM

sbit di = P1^2; //Data or Instrument Select,H:写数据,L:写指令
sbit rw = P1^1;  //Write or Read,H:read,L:write
sbit e  = P1^0;  //读写使能

//sbit bf = P0^7;
//sbit res= P0^4;



//void chk_busy (void);
void clrscr();
void delay (uchar us)
{
  while(us--);
}
/*--------------写LCD----------*/
void wr_lcd (uchar dat_comm,uchar content)
{
  //chk_busy ();
  COM8255=0x80;				  //PA输出，PB输出
  if (dat_comm==1)            //di=dat_comm;	//DI=PB5
   {
     PB8255=0x2f;              //di=1  rw=0  e=1
	 data_ora=content; 
	 PB8255=0x6f;
	 ;
	 ;
	 PB8255=0X2f;
	}
  else 
    { 
      PB8255=0x0f;		      //di=0 rw=0 e=1	//RW=PB4
      data_ora=content;  
      PB8255=0x4f;                           //e=1;			//e=PB6
	  ;
      ;
      PB8255&=0x0f;               //e=0;
	}
  
}  
/*void chk_busy (void)
{
  data_ora=0xff;
  di=0;
  rw=1;
  ;
  e=1;
 // while(bf||res==1);
  e=0;
}

/*--------------读LCD数据---------------
uchar rd_lcd ()
{
  uchar rddata;
  chk_busy ();
  di=1;
  rw=1;
  e=1;
  ;
  rddata=data_ora;
  e=0;
  return rddata;
} */

/*--------------写点阵------------------*/
void lat_disp (uchar data1)
{
  uchar i,j;
  cs1=1;cs2=1;
  wr_lcd (comm,disp_on);
  for(j=0;j<8;j++)
  {
    wr_lcd (comm,disp_x+j);
    //wr_lcd (comm,disp_z);
    wr_lcd (comm,disp_y);
    for(i=0;i<64;i++)
    {
      wr_lcd (dat,data1);
    //  wr_lcd (dat,data2);
    }
  }
}
 /*--------------显示图片----------------
void img_disp (uchar code *img,uchar l,uchar r)
{
  uchar i,j;
  for(j=0;j<8;j++)
  {	
    cs1=l;cs2=r;
    wr_lcd (comm,disp_on);
    wr_lcd (comm,disp_x+j);
    wr_lcd (comm,disp_z);
    wr_lcd (comm,disp_y);
    for(i=0;i<64;i++)
      wr_lcd (dat,img[j*64+i]);
	    
   
  }
} */

/*---------------指定位置(x,y)显示row_xl行(每行row_yl个)汉字(大小xl*yl)--------------*/		   

void chn_disp (uchar x,uchar y,uchar xl,uchar yl,uchar row_xl,uchar row_yl,uchar code *chn)
{
  uchar i,j,k,l,a;
  wr_lcd (comm,disp_on);
  for(l=0;l<row_xl;l++)
  {
    for(k=0;k<row_yl;k++)
    {
      for(j=0;j<xl;j++)
      {
        wr_lcd (comm,disp_x+x+l*xl+j);
        //wr_lcd (comm,disp_z);
        wr_lcd (comm,disp_y+y+k*yl);
        a=l*xl*yl*row_yl+k*xl*yl+j*yl;
        for(i=0;i<yl;i++)
          wr_lcd (dat,chn[a+i]);
      }
    }
  }
} 
/*------------------初始化-----------------*/
void init_lcd (void)
{
  delay(20);
  cs1=1;
  cs2=1;
  //wr_lcd (comm,disp_off);
  wr_lcd (comm,disp_on);
}
/*---------------清屏-----------------*/
void clrscr()
{
  lat_disp(0x00);
}
/*-----------------反白方式显示汉字------------------*/
void chn_fdisp (uchar x,uchar y,uchar xl,uchar yl,uchar row_xl,uchar row_yl,uchar code *chn)
{
  uchar i,j,k,l,a;
  wr_lcd (comm,disp_on);
  for(l=0;l<row_xl;l++)
  {
    for(k=0;k<row_yl;k++)
    {
      for(j=0;j<xl;j++)
      {
        wr_lcd (comm,disp_x+x+l*xl+j);
        //wr_lcd (comm,disp_z);
        wr_lcd (comm,disp_y+y+k*yl);
        a=l*xl*yl*row_yl+k*xl*yl+j*yl;
        for(i=0;i<yl;i++)
          wr_lcd (dat,~chn[a+i]);
      }
    }
  }
}
/*-------- 在 CS屏上(X ,Y )位置显示数字 Num----------*/  
void num_disp(bit cs,uchar x,uchar y,uchar Num)
{ 
   cs1=cs;
   cs2=~cs;
   switch(Num)
	    { 
		  case 0: { chn_disp(x,y,2,8,1,1,hz_zero); }     break; 
		  case 1: { chn_disp(x,y,2,8,1,1,hz_one); }      break;   
		  case 2: { chn_disp(x,y,2,8,1,1,hz_two); }      break;
		  case 3: { chn_disp(x,y,2,8,1,1,hz_three);}     break;
		  case 4: { chn_disp(x,y,2,8,1,1,hz_four);}      break;
		  case 5: { chn_disp(x,y,2,8,1,1,hz_five);}      break;
		  case 6: { chn_disp(x,y,2,8,1,1,hz_six);}       break;
		  case 7: { chn_disp(x,y,2,8,1,1,hz_seven);}     break;
		  case 8: { chn_disp(x,y,2,8,1,1,hz_eight);}     break;
		  case 9: { chn_disp(x,y,2,8,1,1,hz_nine);}      break; 
		  case 10: { chn_disp(x,y,2,8,1,1,hz_A);}        break;
		  case 11: { chn_disp(x,y,2,8,1,1,hz_B);}        break;
		  case 12: { chn_disp(x,y,2,8,1,1,hz_C);}        break;
		  case 13: { chn_disp(x,y,2,8,1,1,hz_D);}        break;
		  case 14: { chn_disp(x,y,2,8,1,1,hz_E);}        break;
		  case 15: { chn_disp(x,y,2,8,1,1,hz_F);}        break; 		  
		 }
}