#include <reg51.h>

#define PD1  61        //  122/2 分成左右兩半屏(122x32)

unsigned char Column;
unsigned char Page_ ;  // 頁地址寄存器 D1,DO:頁地址
unsigned char Code_ ;  // 字符代碼寄存器

unsigned char Command; // 指令寄存器
unsigned char LCDData; // 數據寄存器

xdata unsigned char CWADD1 _at_ 0x8000;   // 寫指令代碼地址(E1)
xdata unsigned char DWADD1 _at_ 0x8001;   // 寫顯示數據地址(E1)
xdata unsigned char CRADD1 _at_ 0x8002;   // 讀狀態字地址(E1)
xdata unsigned char DRADD1 _at_ 0x8003;   // 讀顯示數據地址(E1)

xdata unsigned char CWADD2 _at_ 0x8004;   // 寫指令代碼地址(E2)
xdata unsigned char DWADD2 _at_ 0x8005;   // 寫顯示數進地址(E2)
xdata unsigned char CRADD2 _at_ 0x8006;   // 讀狀態字地址(E2)
xdata unsigned char DRADD2 _at_ 0x8007;   // 讀顯示數據地址(E2)

//英文字模庫    8x8 點陣
code unsigned char EETAB[][8]={
        {0x38,0x44,0x44,0x44,0x44,0x44,0x38,0x00},  // 0
        {0x10,0x30,0x50,0x10,0x10,0x10,0x7c,0x00},  // 1
        {0x38,0x44,0x04,0x08,0x10,0x20,0x7c,0x00},  // 2
        {0x78,0x84,0x04,0x38,0x04,0x84,0x78,0x00}}; // 3

// 中文字模庫   16x16點陣
code unsigned char CCTAB[][32] ={
        {0x00,0x04,0xe4,0x24,0x24,0x64,0xb4,0x2f, // 南
         0x24,0xa4,0x64,0x24,0x24,0xe6,0x04,0x00,
         0x00,0x00,0x7f,0x04,0x05,0x05,0x05,0x7f,
         0x05,0x05,0x05,0x25,0x44,0x3f,0x00,0x00},

        {0x00,0x04,0x04,0xe4,0x24,0x24,0x25,0x26, // 京
         0x24,0x24,0x24,0xe4,0x06,0x04,0x00,0x00,
         0x00,0x20,0x10,0x19,0x0D,0x41,0x81,0x7f,
         0x01,0x01,0x05,0x0d,0x38,0x10,0x00,0x00},

        {0x00,0x80,0x60,0xf8,0x07,0x0a,0x28,0x28, // 偉
         0x28,0xff,0x28,0x28,0x28,0x28,0x00,0x00,
         0x01,0x00,0x00,0xfF,0x00,0x01,0x01,0x01,
         0x01,0xff,0x01,0x21,0x41,0x3f,0x00,0x00},

        {0x08,0x08,0x89,0xce,0x28,0x18,0x02,0x7a, // 福
         0x4a,0x4a,0x4a,0x4a,0x4a,0x7a,0x02,0x00,
         0x02,0x01,0x00,0xff,0x01,0x02,0xff,0x49,
         0x49,0x49,0x7f,0x49,0x49,0x49,0xff,0x00}};

// 1.寫指令代碼子程序(E1)
void WriteCommandE1()
{
  while(CRADD1 & 0x80);
  CWADD1 = Command;
}

// 2.寫顯示數據子程序(E1)
void WriteDataE1()
{
  while(CRADD1 & 0x80);
  DWADD1 = LCDData;
}

// 3.讀顯示數據子程序(E1)
void ReadDataE1()
{
  while(CRADD1 & 0x80);
  LCDData = DRADD1;
}

// 4.寫指令代碼子程序(E2)
void WriteCommandE2()
{
  while(CRADD2 & 0x80);
  CWADD2 = Command;
}

// 5.寫顯示數據子程序(E2)
void WriteDataE2()
{
  while(CRADD2 & 0x80);
  DWADD2 = LCDData;
}

// 6.讀顯示數據子程序(E2)
void ReadDataE2()
{
  while(CRADD2 & 0x80);
  LCDData = DRADD2;
}

// 初始化程序
void Init()
{
  Command = 0xe2;
  WriteCommandE1();
  WriteCommandE2();

  Command = 0xa4;
  WriteCommandE1();
  WriteCommandE2();

  Command = 0xa9;
  WriteCommandE1();
  WriteCommandE2();

  Command = 0xa0;
  WriteCommandE1();
  WriteCommandE2();

  Command = 0xc0;
  WriteCommandE1();
  WriteCommandE2();

  Command = 0xaf;
  WriteCommandE1();
  WriteCommandE2();
}

// 清屏
void Clear()
{
  unsigned char i,j;

  i = 0;
  do {

    Command = (i + 0xb8); // 頁地址設置
    WriteCommandE1();
    WriteCommandE2();

    Command = 0x00;      // 列地址設置為"0"
    WriteCommandE1();
    WriteCommandE2();

    j = 0x50;            // 一頁清 80個字節
    do {
      LCDData = 0x00;    // 顯示數據為"0"
      WriteDataE1();
      WriteDataE2();
    }while(--j !=0);     // 頁內字節清零循環

  }while(++i !=4);       // 頁地址暫存器加一
                         // 顯示區清零循環
}

// 延時程序
void Delay()
{
  unsigned char i,j;
  i = 20;
  j = 0;
  do{
    do{
    }while(--j !=0);
  }while( --i != 0 );
}

// 中文顯示子程序
void WriteCHN16x16()
{
  unsigned char i,j,k;

  i = 0;
  j = 0;
  while(j<2) {
    Command = ((Page_ + j) & 0x03) | 0xb8;   // 設置頁地址
    WriteCommandE1();
    WriteCommandE2();
    k = Column;                   // 列地址值
    while(k < Column + 16){
      if (k < PD1) {              // 為左半屏顯示區域(E1)
        Command = k;
        WriteCommandE1();         // 設置列地址值
        LCDData = CCTAB[Code_][i]; // 取漢字字模數據
        WriteDataE1();            // 寫字模數據
      } else{                     // 為右半屏顯示區域(E2)
        Command = k-PD1;
        WriteCommandE2();         // 設置列地址值
        LCDData = CCTAB[Code_][i]; // 取漢字字模數據
        WriteDataE2();            // 寫字模數據
      };

      i++;
      if( ++k >= PD1 * 2) break;  // 列地址是否超出顯示范圍
    } ;
    j++;
  };
}

//  中文顯示程序
void main()
{
  Init();
  Clear();

  Page_ = 0x02;
  Column = 0x00;
  Code_ = 0x00;
  WriteCHN16x16();

  Page_ = 0x02;
  Column = 0x10;
  Code_ = 0x01;
  WriteCHN16x16();

  Page_ = 0x02;
  Column = 0x20;
  Code_ = 0x02;
  WriteCHN16x16();


  Page_ = 0x02;
  Column = 0x30;
  Code_ = 0x03;
  WriteCHN16x16();

  while(1);

}