串行12864.c

带字库的串行12864调试程序 已通过本人测试 比较好用

#include <reg52.h>
#include <stdlib.h>
#include <intrins.h>
#include <stdio.h>

sbit CS =P1^0;
sbit SID=P1^1;
sbit SCK=P1^2;


unsigned char code AC_TABLE[]={
0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,     //第一行汉字位置
0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,     //第二行汉字位置
0x88,0x89,0x8a,0x8b,0x8c,0x8d,0x8e,0x8f,     //第三行汉字位置
0x98,0x99,0x9a,0x9b,0x9c,0x9d,0x9e,0x9f,     //第四行汉字位置
};
unsigned char code str1[]="一片孤城万仞山，一片孤城万仞山。羌笛何须怨杨柳，春风不度玉门关。";


//串口发送一个字节
void SendByte(unsigned char Dbyte)
{
  unsigned char i;
  for(i=0;i<8;i++)
  {
      SCK = 0;
      Dbyte=Dbyte<<1;     //左移一位
      SID = CY;         //移出的位给SID
      SCK = 1;
      SCK = 0;
  }
}

//串口接收一个字节
//仅在读取数据的时候用到
//而读出的数据是一次只能读出4bit的
unsigned char ReceiveByte(void)
{
  unsigned char i,temp1,temp2;
  temp1=temp2=0;
  for(i=0;i<8;i++)
  {
      temp1=temp1<<1;
      SCK = 0;
      SCK = 1;         
      SCK = 0;
      if(SID) temp1++;
  }
  for(i=0;i<8;i++)
  {
      temp2=temp2<<1;
      SCK = 0;
      SCK = 1;
      SCK = 0;
      if(SID) temp2++;
  }
  return ((0xf0&temp1)+(0x0f&temp2));
}

void CheckBusy( void )
{
  do   SendByte(0xfc);     //11111,RW(1),RS(0),0
  while(0x80&ReceiveByte());     //BF(.7)=1 Busy
}

void WriteCommand( unsigned char Cbyte )
{
  CS = 1;
  CheckBusy();
  SendByte(0xf8);         //11111,RW(0),RS(0),0
  SendByte(0xf0&Cbyte);     //高四位
  SendByte(0xf0&Cbyte<<4);//低四位(先执行<<)
  CS = 0;
}

void WriteData( unsigned char Dbyte )
{
  CS = 1;
  CheckBusy();
  SendByte(0xfa);         //11111,RW(0),RS(1),0
  SendByte(0xf0&Dbyte);     //高四位
  SendByte(0xf0&Dbyte<<4);//低四位(先执行<<)
  CS = 0;
}

unsigned char ReadData( void )
{
  CheckBusy();
  SendByte(0xfe);         //11111,RW(1),RS(1),0
  return ReceiveByte();
}

void Delay(unsigned int MS)
{
  unsigned char us,usn;
  while(MS!=0)         //for 12M
      { usn = 2;
          while(usn!=0)
              {
                  us=0xf5;
                  while (us!=0){us--;};
                  usn--;
              }
          MS--;
      }
}



void LcmInit( void )
{
  WriteCommand(0x30);     //8BitMCU,基本指令集合
  WriteCommand(0x03);     //AC归0,不改变DDRAM内容
  WriteCommand(0x0C);     //显示ON,游标OFF,游标位反白OFF
  WriteCommand(0x01);     //清屏,AC归0
  WriteCommand(0x06);     //写入时,游标右移动
}

//文本区清RAM函数
void LcmClearTXT( void )
{
  unsigned char i;
  WriteCommand(0x30);     //8BitMCU,基本指令集合
  WriteCommand(0x80);     //AC归起始位
  for(i=0;i<64;i++)
    WriteData(0x20);
}

//图形区和文本区显示在两个不同的RAM区
//图形区清RAM函数
void LcmClearBMP( void )
{
  unsigned char i,j;
  WriteCommand(0x34);     //8Bit扩充指令集,即使是36H也要写两次
  WriteCommand(0x36);     //绘图ON,基本指令集里面36H不能开绘图
  for(i=0;i<32;i++)         //12864实际为256x32
  {
      WriteCommand(0x80|i);     //行位置
      WriteCommand(0x80);     //列位置
      for(j=0;j<32;j++)         //256/8=32 byte
          WriteData(0);
  }
}

void PutStr(unsigned char row,unsigned char col,unsigned char *puts)
{
  WriteCommand(0x30);     //8BitMCU,基本指令集合
  WriteCommand(AC_TABLE[8*row+col]);     //起始位置
  while(*puts != '\0')     //判断字符串是否显示完毕
  {
      if(col==8)         //判断换行
      {         //若不判断,则自动从第一行到第三行
          col=0;
          row++;
      }
      if(row==4) row=0;     //一屏显示完,回到屏左上角
      WriteCommand(AC_TABLE[8*row+col]);
      WriteData(*puts);     //一个汉字要写两次
      puts++;
      WriteData(*puts);
      puts++;
      col++;
  }
}

void PutBMP(unsigned char *puts)
{
  unsigned int x=0;
  unsigned char i,j;
  WriteCommand(0x34);     //8Bit扩充指令集,即使是36H也要写两次
  WriteCommand(0x36);     //绘图ON,基本指令集里面36H不能开绘图
  for(i=0;i<32;i++)         //12864实际为256x32
  {
      WriteCommand(0x80|i);     //行位置
      WriteCommand(0x80);     //列位置
      for(j=0;j<16;j++)     //256/8=32 byte
      {         //列位置每行自动增加
          WriteData(puts[x]);
          x++;
      }
  }
  for(i=0;i<32;i++)         //12864实际为256x32
  {
      WriteCommand(0x80|i);     //行位置
      WriteCommand(0x88);     //列位置
      for(j=0;j<16;j++)     //256/8=32 byte
      {         //列位置每行自动增加
          WriteData(puts[x]);
          x++;
      }
  }
}

void convert(unsigned char line)
{
  unsigned char i,j;
  WriteCommand(0x34);     //8Bit扩充指令集,即使是36H也要写两次
  WriteCommand(0x36);     //绘图ON,基本指令集里面36H不能开绘图
  LcmClearBMP();
switch(line)
{
case 0:for(i=0;i<16;i++)         //12864实际为256x32
  {
      WriteCommand(0x80|i);     //行位置
      WriteCommand(0x80);     //列位置
      for(j=0;j<16;j++)     //256/8=32 byte
      {         //列位置每行自动增加
          WriteData(0xff);             
      }
  }
  break;
case 1:for(i=0;i<16;i++)         //12864实际为256x32
  {
      WriteCommand(0x80|i+16);     //行位置
      WriteCommand(0x80);     //列位置
      for(j=0;j<16;j++)     //256/8=32 byte
      {         //列位置每行自动增加
          WriteData(0xff);             
      }
  }
  break;
case 2:for(i=0;i<16;i++)         //12864实际为256x32
  {
      WriteCommand(0x80|i);     //行位置
      WriteCommand(0x88);     //列位置
      for(j=0;j<16;j++)     //256/8=32 byte
      {         //列位置每行自动增加
          WriteData(0xff);             
      }
  }
  break;
case 3:for(i=0;i<16;i++)         //12864实际为256x32
  {
      WriteCommand(0x80|i+16);     //行位置
      WriteCommand(0x88);     //列位置
      for(j=0;j<16;j++)     //256/8=32 byte
      {         //列位置每行自动增加
          WriteData(0xff);             
      }
  }
  break;
default :break;
}
}
void main( void )
{
  Delay(100);     //等待复位
  LcmInit();
  LcmClearTXT();
  LcmClearBMP();
  PutStr(0,0,str1);
  while(1)
  {

  };
}