#include <absacc.h>
#include <reg51.h>
#include <string.h>
#include <stdarg.h>
#include <stdio.h>
#include <zifu.c>
#include <hz.c>
#define ulong unsigned long
#define uint unsigned int
#define uchar unsigned char
#define LC_CUR_POS 0x21 // 光標位置設置
#define LC_CGR_POS 0x22 // CGRAM偏置地址設置
#define LC_ADD_POS 0x24 // 地址指針位置
#define LC_TXT_STP 0x40 // 文本區首址
#define LC_TXT_WID 0x41 // 文本區寬度
#define LC_GRH_STP 0x42 // 圖形區首址
#define LC_GRH_WID 0x43 // 圖形區寬度
#define LC_MOD_OR 0x80  // 顯示方式：邏輯“或”
#define LC_MOD_XOR 0x81 // 顯示方式：邏輯“異或”
#define LC_MOD_AND 0x82 // 顯示方式：邏輯“與”
#define LC_MOD_TCH 0x83 // 顯示方式：文本特征
#define LC_DIS_SW 0x9B  // 顯示開關：D0=1/0:光標閃爍啟用/禁用；
                                  // D1=1/0:光標顯示啟用/禁用；
                                  // D2=1/0:文本顯示啟用/禁用；
                                  // D3=1/0:圖形顯示啟用/禁用；
#define LC_CUR_SHP 0xA0 // 光標形狀選擇：0xA0-0xA7 表示光標占的行數
#define LC_AUT_WR 0xB0  // 自動寫設置
#define LC_AUT_RD 0xB1  // 自動讀設置
#define LC_AUT_OVR 0xB2 // 自動讀/寫結束
#define LC_INC_WR 0xC0  // 數據一次寫，地址加1
#define LC_INC_RD 0xC1  // 數據一次讀，地址加1
#define LC_DEC_WR 0xC2  // 數據一次寫，地址減1
#define LC_DEC_RD 0xC3  // 數據一次讀，地址減1
#define LC_NOC_WR 0xC4  // 數據一次寫，地址不變
#define LC_NOC_RD 0xC5  // 數據一次讀，地址不變
#define LC_SCN_RD 0xE0  // 屏讀
#define LC_SCN_CP 0xE8  // 屏拷貝
#define LC_BIT_OP 0xF0  // 位操作：D0-D2：定義D0-D7 位；D3：1 置位；0：清除


#define LCMDW XBYTE[0x7AFF] // 數據口
#define LCMCW XBYTE[0x7BFF] // 命令口
void key(void);
uchar xdata rbuf[500];
uchar xdata tbuf[88];

uint  r_in;
uchar  c,q;
uchar  a,b;
uchar  key_flag;
uchar x,y;
uchar t=0;
uchar gCurRow,gCurCol; 
uint d,g,n,h;
uchar uRow,uCol;
uint i,e,f;

uchar fnGetRow(void)
{
return gCurRow;
}
uchar fnGetCol(void)
{
return gCurCol;
}
void fnST01(void)      // 狀態位STA1,STA0 判斷（讀寫指令和讀寫數據）
{uchar sta; 
do{ sta=LCMCW & 0x03; }
while(sta!=0x03); 

}

/*void fnST2(void)     // 狀態位ST2 判斷（數據自動讀狀態）
{
uchar sta; 
do{ sta=LCMCW & 0x04; }
while(sta!=0x04);
}*/
                  
void fnST3(void)           // 狀態位ST3 判斷（數據自動寫狀態）
{
uchar sta; 
do{ sta=LCMCW & 0x08; }
while(sta!=0x08);
}
uchar fnST6(void)           // 狀態位ST6 判斷（屏讀/屏拷貝狀態）
{
uchar i;
for(i=10;i>0;i--)
{
if((LCMCW & 0x40) == 0x40)
break;
}
return i; // 若返回零，說明錯誤
}


void fnPR1(uchar uCmd,uchar uPar1,uchar uPar2) // 寫雙參數的指令
{
fnST01(); 
LCMDW = uPar1;
fnST01(); 
LCMDW = uPar2;
fnST01(); 
LCMCW = uCmd;

}
void fnPR11(uchar uCmd,uchar uPar1) // 寫單參數的指令

{
fnST01(); 
LCMDW = uPar1;
fnST01(); 
LCMCW = uCmd;
}
void  fnPR12(uchar uCmd)       // 寫無參數的指令
{fnST01(); 
LCMCW = uCmd;
}
void  fnPR13(uchar uData)     // 寫數據
{fnST01(); 
LCMDW = uData;
}
/*uchar fnPR2(void)            // 讀數據
{fnST01(); 
return LCMDW;
}*/
// 設置當前地址
void fnSetPos(uchar urow, uchar ucol)
{
uint iPos;
iPos = urow * 30 + ucol;                                       
fnPR1(LC_ADD_POS,iPos & 0xFF,iPos / 256);
gCurRow = urow;
gCurCol = ucol;
}
// 設置當前顯示行、列
void cursor(uchar uRow, uchar uCol)       
{
fnSetPos(uRow * 16, uCol);
}
//指針設置
void Text_Curser(uchar x3,uchar y3)
{fnPR1(0x21,x3,y3);

a=x3;
b=y3;}


// 清屏
void cls(void)
{
uint i;
fnPR1(LC_ADD_POS,0x00,0x00);  // 置地址指針
fnPR12(LC_AUT_WR);            // 自動寫
for(i=0;i<240*128;i++)
{
fnST3();
fnPR13(0x00);                 // 寫數據
}
fnPR12(LC_AUT_OVR);           // 自動寫結束
fnPR1(LC_ADD_POS,0x00,0x00);  // 重置地址指針
gCurRow = 0;                  // 置地址指針存儲變量
gCurCol = 0;
}


// LCM 初始化
void fnLCMInit(void)
{

fnPR1(LC_TXT_STP,0xDF,0x01) ;   // 文本顯示區首地址
fnPR1(0x41,0x1E,0x00);          // 文本顯示區寬度
fnPR1(LC_GRH_STP,0x00,0x00);    // 圖形顯示區首地址
fnPR1(LC_GRH_WID,0x1E,0x00);    // 圖形顯示區寬度
fnPR12(0xA0);                   // 光標形狀
fnPR12(0x80);                   // 顯示方式設置
fnPR12(0x9F);                   // 顯示開關設置
cls();

}
//延時
void shortdelay(uint tt)
{ uchar i;
  while(tt)
  {i=100;
   while(i) 
   i--;
   tt--;};
   }
//顯示一個字符

void dchar(uchar x,uchar y,uchar a)
{uchar j,uRow,uCol;
for(j=0;j<16;j++)
{
uRow=y;
uCol=x;
fnSetPos(uRow*16+j,uCol);
uRow = fnGetRow();
uCol = fnGetCol();
fnPR12(LC_AUT_WR);
fnPR13(ASC_MSK[(a-0x20)*16+j]);
fnPR12(LC_AUT_OVR);
}
}
//顯示字符串
void dstring(uchar x,uchar y,uchar *ptr)
{
char c1;
uchar i,j,uLen,uRow,uCol;
uLen=strlen(ptr);
for(i=0;i<uLen;i++)
{c1 =ptr[i];
for(j=0;j<16;j++)
{uRow=y;
uCol=x;
fnSetPos(uRow*16+j,uCol);
uRow = fnGetRow();
uCol = fnGetCol(); 
fnPR12(LC_AUT_WR);
fnPR13(ASC_MSK[(c1-0x20)*16+j]);
fnPR12(LC_AUT_OVR);}
if(x<29)
{x++;}
else 
{y++;x=0;}}

}
//顯示漢字
void dhz(uchar x,uchar y,uchar *shz)
{uint  length=0,no,k;
 uchar uRow,uCol;
  while (*(shz+length)!='\0')
  {length++;}
 for(no=0;no<length/2;no++)
  {uint j,find=0;
   for(j=0;j<sizeof(hzinx)/2;j++)
    {if(hzinx[j*2]==*(shz+no*2)&&hzinx[j*2+1]==*(shz+no*2+1))
	{find=1;break;}}

for(k=0;k<16;k++)
{uRow=y;
uCol=x+no*2;
fnSetPos(uRow*16+k,uCol);
uRow = fnGetRow();
uCol = fnGetCol(); 
fnPR12(LC_AUT_WR);
fnPR13(zimo[j*32+2*k]);
fnPR12(LC_AUT_OVR);
x++;
fnPR12(LC_AUT_WR);
fnPR13(zimo[j*32+2*k+1]);
fnPR12(LC_AUT_OVR);
x--;}
}}



//歡迎使用
void welcom(void)
{ 
dhz(5,2,"歡迎使用激光陀螺");
dhz(7,3,"捷聯慣導系統");
dstring(8,4,"welcom");}



//主函數
void main(void) 
{
fnLCMInit();

welcom();
shortdelay(5000);

}