/*
**長沙太陽人電子有限公司SMG12864總線接口參考程序(KS0108)
**電話:  0731-4167806,4167808
**E-mail: www@sunman.cn
**Create by :譚超  E-mail: tanchao_1@126.com
**最后修改 :  2005年3月2日
**版本說明: 帶顯示矩形框、線、點子程序。
*/

//[字符圖象輸出文件=hzk.c]
//[字體名稱=宋體]
//[字體大小=16]
//[字節方向=垂直]
//[字位順序=從低到高]

#include <reg51.h>
#include <math.h>
#include <hzk.c>

unsigned char data Lcd_CurrentX,Lcd_CurrentY,Lcd_Mask;
unsigned char code LeftMask[]={0xff,0xfe,0xfc,0xf8,0xf0,0xe0,0xc0,0x80};
unsigned char code RightMask[]={0xff,0x01,0x03,0x07,0x0f,0x1f,0x3f,0x7f};
unsigned char code Mask1[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};
unsigned char code Mask2[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80};

//前兩位由5個口線決定，見SMG12864說明書 基本操作時序
//Epin—p2.7 R/W—p2.1 cs1—p2.3 cs2—p2.2 RS—p2.0
unsigned char xdata Lcd_Chip1_Cmd_W_Reg _at_ 0x8800;
unsigned char xdata Lcd_Chip2_Cmd_W_Reg _at_ 0x8400;
unsigned char xdata Lcd_Chip1_Data_W_Reg _at_ 0x8900;
unsigned char xdata Lcd_Chip2_Data_W_Reg _at_ 0x8500;
unsigned char xdata Lcd_Chip1_Data_R_Reg _at_ 0x8b00;
unsigned char xdata Lcd_Chip2_Data_R_Reg _at_ 0x8700;
unsigned char xdata Lcd_Chip1_Sta_R_Reg _at_ 0x8a00;
unsigned char xdata Lcd_Chip2_Sta_R_Reg _at_ 0x8600;

#define LCD_CMD_COL  0x40
#define LCD_CMD_PAGE 0xB8
#define LCD_CMD_ON   0x3F
#define LCD_CMD_OFF  0x3E
#define LCD_CMD_STARTLINE 0xC0
#define LCD_LEFT 0
#define LCD_TOP  0
#define LCD_RIGHT 127
#define LCD_BOTTOM 63

//延時子程序
void delay(unsigned int t)
{  unsigned int i,j;
   for(i=0;i<t;i++)
      for(j=0;j<10;j++)
         ;
}

//片1測忙
void lcdwaitidle1(void)
{  while(((Lcd_Chip1_Sta_R_Reg)&0x80)==0x80);
}

//片2測忙
void lcdwaitidle2(void)
{  while(((Lcd_Chip2_Sta_R_Reg)&0x80)==0x80);
}

//寫指令代碼到片1
void lcdwc1(unsigned char cmdcode)
{  lcdwaitidle1();
   Lcd_Chip1_Cmd_W_Reg=cmdcode;
}

//寫指令代碼到片2
void lcdwc2(unsigned char cmdcode)
{  lcdwaitidle2();
   Lcd_Chip2_Cmd_W_Reg=cmdcode;
}

//寫數據到片1
void lcdwd1(unsigned char dispdata)
{  lcdwaitidle1();
   Lcd_Chip1_Data_W_Reg=dispdata;
}

//寫數據到片2
void lcdwd2(unsigned char dispdata)
{  lcdwaitidle2();
   Lcd_Chip2_Data_W_Reg=dispdata;
}

//讀片1數據
unsigned char lcdrd1(void)
{  lcdwaitidle1();
   return Lcd_Chip1_Data_R_Reg;
}

//讀片2數據
unsigned char lcdrd2(void)
{  lcdwaitidle2();
   return Lcd_Chip2_Data_R_Reg;
}

//寫指令代碼
void lcdwc(unsigned char cmdcode)
{  if((Lcd_CurrentX)<0x40)
      lcdwc1(cmdcode);
   else
      lcdwc2(cmdcode);
}

//寫數據
void lcdwd(unsigned char dispdata)
{  if(Lcd_CurrentX<64)
      lcdwd1(dispdata);
   else
      lcdwd2(dispdata);
}

//內部數據地址指針定位
void lcdpos(void)
{  lcdwc(LCD_CMD_COL|(Lcd_CurrentX&0x3f));      //設置地址列指針
   lcdwc(LCD_CMD_PAGE|((Lcd_CurrentY/8)&0x7));  //設置地址頁指針
}

//讀數據
unsigned char lcdrd(void)
{  unsigned char i;
   lcdpos();
   if(Lcd_CurrentX<64)
   {  i=lcdrd1();
      i=lcdrd1();        //讀兩次
   }
   else
   {  i=lcdrd2();
      i=lcdrd2();
   }
   lcdpos();
   return i;
}

//當前坐標移動到下一個點
void lcdcursornext(void)
{  Lcd_CurrentX++;
   if(Lcd_CurrentX>LCD_RIGHT)
   {  Lcd_CurrentX=LCD_LEFT;
      Lcd_CurrentY+=8;
      if(Lcd_CurrentY>LCD_BOTTOM)
         Lcd_CurrentY=LCD_TOP;
   }
}

void displaybyte(unsigned char dispdata)
{  lcdpos();         //內部數據地址指針定位
   lcdwd(dispdata);  //寫數據
   lcdcursornext();  //當前坐標移動到下一個點
}

//整屏顯示
void lcdfill(unsigned char FillData)
{  for(Lcd_CurrentX=LCD_LEFT,Lcd_CurrentY=LCD_TOP;1;)
   {  displaybyte(FillData);
      if((Lcd_CurrentX==LCD_LEFT)&&(Lcd_CurrentY==LCD_TOP))
         break;
   }
}

//初始化
void lcdreset()
{  lcdwc1(LCD_CMD_ON);
   lcdwc2(LCD_CMD_ON);               //開顯示
   lcdwc1(LCD_CMD_STARTLINE);
   lcdwc2(LCD_CMD_STARTLINE); //設置顯示初始行
}

#include <display.c>
#include <point.c>

main()
{  while(1)
   {  lcdreset();      //初始化
      lcdfill(0xff);   //整屏顯示
      delay(5000);
      lcdfill(0);    //清屏
      delay(5000);
      put_str_xy(0,0,"長沙太陽人電子有限公司");
      delay(5000);
   }
}