t6963c的c51程序

/***********************************/
/* LCM（RT-240128TA）顯示程序????? */
/* LCM 控制芯片 T6963C 帶32KRAM??? */
/* MCU 型號: STC 89C52RD2????????? */
/* 時鐘頻率: 11.0592 MHz?????????? */
/* 接口方式: 直接接口（總線方式）? */
/* 開發環境: Keil C51 V7.03??????? */
/* 開發日期: 2006.07.01??????????? */
/* 程序編寫: liu1234?????????????? */
/***********************************/
#define t6963c_c 1
＃i nclude "t6963c3.h"
uint txthome,grhome;
/**********************************
//= 函數原型: uchar check_cmd_st()
//= 功??? 能: 查詢是否可讀寫命令和數據的狀態
//= 參??? 數:
//= 返 回 值: 非0不忙,否則忙
//= 函數性質：私有函數
**********************************/
uchar check_cmd_st(void) // 狀態位STA1,STA0 判斷（讀寫指令和讀寫數據）
{
??? uchar i;
??? for(i=100;i>0;i--)
??? {
??????? if((LCMCP & 0x03) == 0x03)
??????? break;
??? }
??? return i; // 若返回零，說明錯誤
}

/**********************************
//= 函數原型: uchar check_ar_st
//= 功??? 能: 查詢是否可數據自動讀狀態
//= 參??? 數:
//= 返 回 值: 非0不忙,否則忙
//= 函數性質：私有函數
**********************************/
uchar check_ar_st(void) // 狀態位ST2 判斷（數據自動讀狀態）
{
??? uchar i;
??? for(i=100;i>0;i--)
??? {
??????? if((LCMCP & 0x04) == 0x04)
??????? break;
??? }
??? return i; // 若返回零，說明錯誤
}

/**********************************
//= 函數原型: uchar check_aw_st
//= 功??? 能: 查詢是否可數據自動寫狀態
//= 參??? 數:
//= 返 回 值: 非0不忙,否則忙
//= 函數性質：私有函數
**********************************/
uchar check_aw_st(void) // 狀態位ST3 判斷（數據自動寫狀態）
{
??? uchar i;
??? for(i=100;i>0;i--)
??? {
??????? if((LCMCP & 0x08) == 0x08)
??????? break;
??? }
??? return i; // 若返回零，說明錯誤
}

/**********************************
//= 函數原型: uchar check_scrPeek_st()
//= 功??? 能: 查詢是否可屏讀/屏拷貝狀態狀態
//= 參??? 數:
//= 返 回 值: 非0不忙,否則忙
//= 函數性質：私有函數
**********************************/
uchar check_scrPeek_st(void) // 狀態位ST6 判斷（屏讀/屏拷貝狀態）
{
??? uchar i;
??? for(i=100;i>0;i--)
??? {
??????? if((LCMCP & 0x40) == 0x40)
??????? break;
??? }
??? return i; // 若返回零，說明錯誤
}

/**********************************
//= 函數原型: uchar wr_cmd_2(uchar uCmd,uint uPar)
//= 功??? 能: 給T6963C寫帶雙參數的指令
//= 參??? 數:
//= 返 回 值: 返回0 成功,否則忙
//= 函數性質：私有函數
**********************************/
uchar wr_cmd_2(uchar uCmd,uint uPar) // 寫雙參數的指令
{
??? if(check_cmd_st() == 0)??? return 1;
??? LCMDP = (uchar)(uPar& 0xFF);//先寫低字節,再寫高字節
??? if(check_cmd_st() == 0)??? return 2;
??? LCMDP = (uchar)(uPar>>8);
??? if(check_cmd_st() == 0)??? return 3;
??? LCMCP = uCmd;
??? return 0; // 返回0 成功
}

/**********************************
//= 函數原型: uchar wr_cmd_1(uchar uCmd,uchar uPar1)
//= 功??? 能: 給T6963C寫帶單參數的指令
//= 參??? 數:
//= 返 回 值: 返回0 成功,否則忙
//= 函數性質：私有函數
**********************************/
uchar wr_cmd_1(uchar uCmd,uchar uPar) // 寫單參數的指令
{
??? if(check_cmd_st() == 0)??? return 1;
??? LCMDP = uPar;
??? if(check_cmd_st() == 0)??? return 2;
??? LCMCP = uCmd;
??? return 0; // 返回0 成功
}

/**********************************
//= 函數原型: uchar wr_cmd_0(uchar uCmd)
//= 功??? 能: 給T6963C寫無參數的指令
//= 參??? 數:
//= 返 回 值: 返回0 成功,否則忙
//= 函數性質：私有函數
**********************************/
uchar wr_cmd_0(uchar uCmd) // 寫無參數的指令
{
??? if(check_cmd_st() == 0)??? return 1;
??? LCMCP = uCmd;
??? return 0; // 返回0 成功
}

/**********************************
//= 函數原型: uchar wr_data(uchar uData)
//= 功??? 能: 給T6963C寫一次數據
//= 參??? 數:
//= 返 回 值: 返回0 成功,否則忙
//= 函數性質：私有函數
**********************************/
uchar wr_data(uchar uData) // 寫一次數據
{
??? if(check_cmd_st() == 0)??? return 1;
??? LCMDP = uData;
??? return 0; // 返回0 成功
}

/**********************************
//= 函數原型: uchar awr_data(uchar uData)
//= 功??? 能: 給T6963C寫一個地址增加自動連續數據
//= 參??? 數:
//= 返 回 值: 返回0 成功,否則忙
//= 函數性質：私有函數
**********************************/
uchar awr_data(uchar uData) // 自動寫數據
{
??? if(check_aw_st() == 0)??? return 1;
??? LCMDP = uData;
??? return 0; // 返回0 成功
}

/**********************************
//= 函數原型: uchar ard_data(uchar uData)
//= 功??? 能: 從T6963C讀一個地址增加自動連續數據
//= 參??? 數:
//= 返 回 值: 返回0 成功,否則忙
//= 函數性質：私有函數
**********************************/
uchar ard_data(void) // 自動讀數據
{
??? if(check_ar_st() == 0)??? return 1;
??? return LCMDP;
}

/**********************************
//= 函數原型: void char_addr_Pointer_Set(uchar urow, uchar ucol)
//= 功??? 能: 根據字符的行列設置vram地址
//= 參??? 數:
//= 返 回 值:
//= 函數性質：私有函數
**********************************/
void char_addr_Pointer_Set(uchar urow, uchar ucol)
{
??? uint iPos;
??? iPos = urow * 30 + ucol + txthome;
??? wr_cmd_2(LC_ADD_POS,iPos);
}

/**********************************
//= 函數原型: Clr_char_Scr(void)
//= 功??? 能: 清除當前文本屏幕
//= 參??? 數:
//= 返 回 值:
//= 函數性質：公有函數
**********************************/
void Clr_char_Scr(void)//文本屏可以在內存中保持很多屏
{
??? uint i;
//??? char_addr_Pointer_Set(0,0);//從0行0列開始
??? char_addr_Pointer_Set(2,0);//從0行0列開始
??? wr_cmd_0(LC_AUT_WR); // 自動寫
//??? for(i=0;i<16*30;i++) //16行30列字符
??? for(i=0;i<14*30;i++) //16行30列字符
??? {
??????? awr_data(0x00); // 寫數據空白
??? }
??? wr_cmd_0(LC_AUT_OVR); // 自動寫結束
??? char_addr_Pointer_Set(0,0); // 重置地址指針
}

/**********************************
//= 函數原型: Clr_lcdram(void)
//= 功??? 能: 清除所有的顯示內存
//= 參??? 數:
//= 返 回 值:
//= 函數性質：私有函數
**********************************/
void Clr_lcdram(void)
{
??? uint i;
??? wr_cmd_2(LC_ADD_POS,0x0000); // 設置地址指針0
??? wr_cmd_0(LC_AUT_WR); // 自動寫
??? for(i=0;i<=DISRAM_SIZE;i++)
??? {
??????? awr_data(0x00); // 寫數據
??? }
??? wr_cmd_0(LC_AUT_OVR); // 自動寫結束
??? wr_cmd_2(LC_ADD_POS,0x0000); // 重置地址指針
}

/**********************************
//= 函數原型: reset_lcm(void)
//= 功??? 能: 復位液晶模塊
//= 參??? 數:
//= 返 回 值:
//= 函數性質：私有函數
**********************************/
void reset_lcm(void)
{
??? LCMRESET = 0;
??? _nop_();
??? _nop_();
??? LCMRESET=0XFF;
}

/**********************************
//= 函數原型: void lcm_init(void)
//= 功??? 能: 初始化液晶模塊
//= 參??? 數:
//= 返 回 值:
//= 函數性質：公有函數
**********************************/
void lcm_init(void)
{
??? reset_lcm();//復位

??? wr_cmd_2(LC_TXT_HOME,TXTSTART); // 文本顯示區首地址
??? wr_cmd_2(LC_TXT_AREA,30); // 文本顯示區寬度30列
??? txthome = TXTSTART;

??? wr_cmd_2(LC_GRH_HOME,GRSTART); // 圖形顯示區首地址
??? wr_cmd_2(LC_GRH_AREA,30); // 圖形顯示區寬度30列
??? grhome = GRSTART;

??? wr_cmd_2(LC_CGR_OFFSET,CGRAMSTART >> 11);//CGRAM 偏移地址設置

??? wr_cmd_0(LC_MOD_XOR|0x08); // 顯示方式設置,異或,字符全部用RAM區域生成
??? wr_cmd_0(LC_DIS_SW |0x0c); // 顯示開關設置,圖文混和模式

??? Clr_lcdram();//清除內存

}

/**********************************
//= 函數原型: Pixel(unsigned char PointX,unsigned char PointY, bit Mode)
//= 功??? 能: 在指定坐標位置顯示一個點
//= 參??? 數: 坐標,顯示點或清除點
//= 返 回 值:
//= 函數性質：私有函數
//= 如果顯示屏超過了256*256,請修改這個函數 PointX,PointY的類型
//= Mode 1:顯示 0:清除該點
**********************************/
Pixel(unsigned char PointX,unsigned char PointY, bit Mode)
{
??? unsigned int StartAddr;
??? unsigned char dat;
??? StartAddr=(uint)PointX*30 + PointY/8 + grhome;
??? dat=LC_BIT_OP+7-PointY%8; //生產位操作命令畫點的數據
??? if(Mode) dat=dat|0x08;
??? wr_cmd_2(LC_ADD_POS,StartAddr);//設置該點所在單元地址
??? wr_cmd_0(dat); // 利用位操作命令畫點
}

/**********************************
//= 函數原型: void line( unsigned char x1, unsigned char y1, unsigned char x2, unsigned char y2, bit Mode)
//= 功??? 能: 劃線函數
//= 參??? 數: 坐標1,坐標2,顯示點或清除點
//= 返 回 值:
//= 函數性質：私有函數
//= 其它:顯示點陣不超過255*255
/**********************************/

void line( unsigned char y1,unsigned char x1, unsigned char y2,unsigned char x2,? bit Mode)
{
??? unsigned char x,y;
??? float k,b;
??? if( abs(y1-y2) <= abs(x1-x2) ) // |k|<=1
??? {
??????? k=((float)y2-y1) / ((float)x2-x1) ;
??????? b=y1-k*x1;
??????? if( x1 <= x2 )
??????? {
??????????? for(x=x1;x<=x2;x++)
??????????? {
??????????????? y=(uchar)(k*x+b);
??????????????? Pixel(x, y, Mode);
??????????? }
??????? }
??????? else
??????? {
??????????? for(x=x2;x<=x1;x++)
??????????? {
??????????????? y=(uchar)(k*x+b);
??????????????? Pixel(x, y, Mode);
??????????? }
??????? }
??? }
??? else // abs(y1-y2) > abs(x1-x2) |K|>1
??? {
??????? k=((float)x2-x1) / ((float)y2-y1) ;
??????? b=x1-k*y1;
??????? if( y1 <= y2 )
??????? {
??????????? for(y=y1;y<=y2;y++)
??????????? {
??????????????? x=(uchar)(k*y+b);
??????????????? Pixel( x , y,Mode );
??????????? }
??????? }
??????? else
??????? {
??????????? for(y=y2;y<=y1;y++)
??????????? {
??????????????? x=(uchar)(k*y+b);
??????????????? Pixel( x , y,Mode );
??????????? }
??????? }
??? }
}

/**********************************
//= 函數原型: void ShowChar(uchar row,uchar col,uchar ch)
//= 功??? 能: 在指定行列顯示8*16字符
//= 參??? 數: 坐標行,坐標列,字符串指針
//= 返 回 值:
//= 函數性質：公有函數
//=其它:所有可顯示字符不超過128個,否則本函數有溢出的可能
**********************************/
void showchar(uchar col,uchar row,uchar *chp)
{
??? #define hzp chp
??? uchar char_sequence_number;
??? uchar ascii_num;
??? row/=8;col/=8;
??? while (*chp != '\0')
??? {
??????? if (*chp<0x80)//西文
??????? {
??????????? for (char_sequence_number=0;ASCII_SUB_INDEX[char_sequence_number]!='\0';char_sequence_number++)
??????????? {
??????????????? if (ASCII_SUB_INDEX[char_sequence_number]==*chp)
??????????????? {
??????????????????? chp++;
??????????????????? break;
??????????????? }

??????????? }
??????????? if(ASCII_SUB_INDEX[char_sequence_number]=='\0'){chp++;char_sequence_number=1;}

??????????? char_sequence_number*=2;//一個ASCII字符占兩個8*8字符
??????????? //寫字符上半部分
??????????? char_addr_Pointer_Set(row,col);//設置Vram地址
??????????? wr_data(char_sequence_number); //寫數據
??????????? wr_cmd_0(LC_UNCHANGED_WR);???? //寫命令

??????????? //寫字符下半部分
??????????? row+=1;//下半部分在下一行

??????????? char_addr_Pointer_Set(row,col);//設置Vram地址
??????????? wr_data(char_sequence_number+1); //寫數據
??????????? wr_cmd_0(LC_UNCHANGED_WR);???? //寫命令

??????????? //行列地址自動指向下個字符位
??????????? row-=1; col+=1;
??????????? if(col==30){row+=2;col=0;}
??????? }
??????? else//中文
??????? {
??????????? for (char_sequence_number=0;HZ_SUB_INDEX[char_sequence_number]!='\0';char_sequence_number+=2)
??????????? {
??????????????? if (HZ_SUB_INDEX[char_sequence_number]==*hzp)
??????????????? {?? hzp++;
??????????????????? if (HZ_SUB_INDEX[char_sequence_number+1]==*hzp)
??????????????????? {hzp++;
??????????????????????? break;
??????????????????? }
??????????????????? else
??????????????????? {
??????????????????????? hzp--;
??????????????????? }
??????????????? }

??????????? }
??????????? if(HZ_SUB_INDEX[char_sequence_number]=='\0'){hzp+=2;char_sequence_number=0;}

??????????? char_sequence_number>>=1;//一個漢字兩個字符位

??????????? for (ascii_num=0;ASCII_SUB_INDEX[ascii_num]!='\0';ascii_num++);//計算ASCII字符個數

??????????? char_sequence_number=ascii_num*2+char_sequence_number*4;//一個漢字字符占四個8*8字符
??????????? //寫漢字左上角
??????????? char_addr_Pointer_Set(row,col);//設置Vram地址
??????????? wr_data(char_sequence_number); //寫數據
??????????? wr_cmd_0(LC_UNCHANGED_WR);???? //寫命令

??????????? //寫漢字左下角
??????????? row+=1;//左下角下一行

??????????? char_addr_Pointer_Set(row,col);//設置Vram地址
??????????? wr_data(char_sequence_number+1); //寫數據
??????????? wr_cmd_0(LC_UNCHANGED_WR);???? //寫命令

??????????? //寫漢字右上角
??????????? row-=1;col+=1;//右上角上一行,下一列
??????????? char_addr_Pointer_Set(row,col);//設置Vram地址
??????????? wr_data(char_sequence_number+2); //寫數據
??????????? wr_cmd_0(LC_UNCHANGED_WR);???? //寫命令

??????????? //寫漢字右下角
??????????? row+=1;//右下角下一行
??????????? char_addr_Pointer_Set(row,col);//設置Vram地址
??????????? wr_data(char_sequence_number+3); //寫數據
??????????? wr_cmd_0(LC_UNCHANGED_WR);???? //寫命令

??????????? row-=1; col+=1;???????????????? //指向下一漢字位置
??????????? if(col==30){row+=2;col=0;}
??????? }
??? }
}

/**********************************
//= 函數原型: void ShowChar(uchar row,uchar col)
//= 功??? 能: 在指定行列反顯一個字符8*16
//= 參??? 數: 行,列
//= 返 回 值:
//= 函數性質：公有函數
**********************************/
void negative_showchar(uchar col,uchar row,uchar n,bit attribute)
{
?? uint Addr;
?? uchar line,dat,i;
?? row/=8;col/=8;
?? dat=0;//不反顯數據
?? if (attribute)dat=0xff;//反顯數據
?? for(i=0;i?? {
//??????? for(line=0;line<16;line++)
?????? for(line=1;line<15;line++)
?????? {

???????? Addr=(uint)(row*8+line)*30 + col+i+grhome;//一row占8line,一line30個字節.一列1字節圖
???????? wr_cmd_2(LC_ADD_POS,Addr);//設置白線開始地址
???????? wr_data(dat);//畫一條白線
???????? wr_cmd_0(LC_UNCHANGED_WR);
?????? }
?? }
}
/**********************************
//= 函數原型: void fill_CGRAM(void)
//= 功??? 能: 填充CGRAM數據
//= 參??? 數:
//= 返 回 值:
//= 函數性質：私有函數
**********************************/
void fill_CGRAM(void)
{
??? uint i,char_sequence_number;
??? uint hz_adder;
??? uchar code *p;
??? //處理ASCII點陣
??? for (char_sequence_number=0;ASCII_SUB_INDEX[char_sequence_number]!='\0';char_sequence_number++)
??? {
??????? for(i=0;ASCII_LIB_INDEX[i]!='\0';i++)//從總表中定位要顯示字符的位置
??????? {
??????????? if (ASCII_SUB_INDEX[char_sequence_number]==ASCII_LIB_INDEX[i])
??????????? {
??????????????? break;
??????????? }
??????? }
???????
??????? if(ASCII_LIB_INDEX[i]=='\0'){i=1;}//字符不存在,則裝載第一字符,非0個

??????? i=i*16;//每個ASCII字符16個字節
??????? p = &ASCII_DOT_LIB[i];

??????? wr_cmd_2(LC_ADD_POS,CGRAMSTART+char_sequence_number*16);//設置CGRAM開始地址
??????? wr_cmd_0(LC_AUT_WR);
??????? for(i=0;i<16;i++)
??????? {
??????????? awr_data(*p++); // 寫數據
??????? }
??????? wr_cmd_0(LC_AUT_OVR); // 自動寫結束
??? }

??? hz_adder = CGRAMSTART+char_sequence_number*16;
??? //處理漢字點陣
??? for (char_sequence_number=0;HZ_SUB_INDEX[char_sequence_number]!='\0';char_sequence_number+=2)
??? {
??????? for(i=0;HZ_LIB_INDEX[i]!='\0';i+=2)//從總表中定位要顯示字符的位置
??????? {
??????????? if ((HZ_SUB_INDEX[char_sequence_number]==HZ_LIB_INDEX[i])&&(HZ_SUB_INDEX[char_sequence_number+1]==HZ_LIB_INDEX[i+1]))
??????????? {
??????????????? break;
??????????? }
??????? }
??????? if(HZ_LIB_INDEX[i]=='\0'){i=0;}
??????? i=i*16;//每個hz占32個字節
??????? p = &HZ_DOT_LIB[i];

??????? wr_cmd_2(LC_ADD_POS,hz_adder+char_sequence_number*16);//設置CGRAM開始地址
??????? wr_cmd_0(LC_AUT_WR);
??????? for(i=0;i<32;i++)
??????? {
??????????? awr_data(*p++); // 寫數據
??????? }
??????? wr_cmd_0(LC_AUT_OVR); // 自動寫結束
??? }
}