CA24064B (T6963c)keilc51示例程序
發布: 2007-10-25 17:00 | 作者: | 來源: | 查看: 14次 

CA24064B (T6963c)keilc51示例程序

//                    CA24064
//***************************************************************************
//*  Create by :Ssmart   2004/12/01       KeilC V7.0                           *
//***************************************************************************
//連線表:  CPU=89C52                                                        *
//C/D=P2.0           /CE=P2.7            FS=P3.5         /WR=/WR   /RD=/RD  *
//FOSC=12MHz         D0-D7=P0.0-P0.7     /RSET=/(CPU RSET)                  *
//***************************************************************************
#include <reg52.h>
#include <intrins.h>
#include <stdio.h>

#define uint  unsigned int
#define uchar unsigned char
#define Graphic            1
#define TXT            0
#define LcmLengthDots            240
#define LcmWidthDots            64

char xdata LcmDataPort _at_ 0x0000;
char xdata LcmCmdPort  _at_ 0x0100;
sbit FS = P3^5;
sbit Key= P3^4;

uchar code bmp1[];
uchar code str1[];

//指令&數據讀寫狀態
void CheckRWCD(void)
{
     while((LcmCmdPort & 0x03) != 0x03);      //低電平忙
}
//數據自動寫狀態
void CheckAutoWrite(void)
{
     while((LcmCmdPort & 0x08) == 0);      //低電平忙
}
//屏讀/屏考貝出錯狀態
void CheckScreen(void)
{      
     while(LcmCmdPort & 0x40);      //1出錯,0正確
}
//一個數據子寫入函數
void LcmWriteData(uchar uData)                        
{
     LcmDataPort = uData;
}
//一個數據讀出函數
uchar LcmReadData( void )
{
     uchar uData;
     uData = LcmDataPort;
     return uData;
}
//無參數指令寫入函數
void LcmWriteCommand(uchar Command)                  
{
     CheckRWCD();                        //檢測指令讀寫狀態
     LcmCmdPort = Command;
}
//單參數指令寫入函數
void LcmWriteCommandWith1Par(uchar Parameter,uchar Command)
{
     CheckRWCD();                        //檢測指令讀寫狀態
     LcmDataPort = Parameter;
     CheckRWCD();
     LcmCmdPort = Command;
}
//雙參數指令寫入函數
void LcmWriteCommandWith2Par(uchar Parameter1,uchar Parameter2,uchar Command)
{
     CheckRWCD();                        //檢測指令讀寫狀態
     LcmDataPort = Parameter1;
     CheckRWCD();
     LcmDataPort = Parameter2;
     CheckRWCD();
     LcmCmdPort = Command;
}
//LCM初始化函數
void LcmInit( void )
{
     LcmWriteCommandWith2Par(0x00,0x00,0x40);      //設置文本顯示區首地址
     LcmWriteCommandWith2Par(LcmLengthDots/8,0x00,0x41);      //設置文本顯示區寬度
     LcmWriteCommandWith2Par(0x00,0x08,0x42);      //設置圖形顯示區首地址0x0800
     LcmWriteCommandWith2Par(LcmLengthDots/8,0x00,0x43);      //設置圖形顯示區寬度
     LcmWriteCommand(0xA7);                  //設置光標形狀 8x8方塊
     LcmWriteCommand(0x81);                  //顯示方式設置 文本xor圖形(異或)
     LcmWriteCommand(0x9C);                  //顯示開關設置 文本開,圖形開,光標閃爍關
}
//延時函數
void Delay(uint MS)
{
     uchar us,usn;
     while(MS!=0)                        //12M Crystal
     { 
           usn = 2;
           while(usn!=0)
           {
                 us=0xf2;
                 while (us!=0){us--;};
                 usn--;
           }
           MS--;
     }
}
//通過按鍵設定延時函數
void DelayKey(unsigned char HalfSecond)
{                              //Delay_key加入時間參數0.5秒一級
     unsigned int i;
     for(i=0;i<50*HalfSecond;i++)            //12M Crystal
     {
           if(Key==0)
           {
                 Delay(20);
                 while(Key==0) {Delay(20);}
                 break;
           }
           Delay(10);
     }
}
//清顯示存儲器函數
void LcmClear( uchar FillByte )
{
     uint i = 8192;      //此處僅清8K RAM,如果您32K RAM都使用,請修改i=32768(后面也要改)
     if(FillByte)      //注意如果填充ff時,如果RAM僅使用了8K,那么8192次會寫入到文本區
     {                  //會形成亂碼.(24064出廠時候默認將R7斷開,即默認使用8KRAM)
           i -= 2*1024;//所以如果填入ff時候要扣除2K的文本區
             LcmWriteCommandWith2Par(0x00,0x08,0x24);      //填充0xff時候要在圖形區
     }
     else
           LcmWriteCommandWith2Par(0x00,0x00,0x24);
     LcmWriteCommand(0xB0);                  //進入自動寫
     while(i--)
     {
           CheckAutoWrite();
           LcmWriteData( FillByte );
     }
     LcmWriteCommand(0xB2);                  //退出自動寫
}
//設定顯示地址函數
void LocateXY(uchar x,uchar y,uchar mode)
{
     uint  temp;
     temp= LcmLengthDots/8*y + x;
     if(mode)                        //mode=1為Graphic
     {                              //如果圖形模式要加上圖形區首地址0x0800
           temp+=0x0800;
     }
     LcmWriteCommandWith2Par(temp&0xff,temp/256,0x24);
}
//顯示一個ASCII碼函數
void PutChar(uchar x,uchar y,uchar CharByte)
{
     LocateXY(x,y,TXT);
     LcmWriteCommandWith1Par(CharByte,0xC4);
}
//顯示一個字符串函數
void PutString(uchar x,uchar y,uchar *str)
{
     while(*str != 0)
     {
           if(x> 29)            //自動換行
           {
                 x=0;
                 y++;
           }
           PutChar(x,y,*str);
           ++x;
           ++str;
     }
}
//顯示一副圖片函數
void DisplayOneBmp(uchar *puts)
{
     uchar i,j;
     uint  X=0;
     LocateXY(0,0,Graphic);
     LcmWriteCommand(0xB0);                  //進入自動寫
     for(i=0;i<LcmWidthDots;i++)
     {
           for(j=0;j<LcmLengthDots/8;j++)
           {
                 CheckAutoWrite();
                 LcmWriteData(puts[X]);
                 X++;
           }
     }
     LcmWriteCommand(0xB2);                  //退出自動寫
}
//反顯一副圖片函數
void ReverseOneBmp( void )
{                              //利用數據一次讀寫操作
     uchar i,j,X;            //只能對一段RAM取反
     LocateXY(0,0,Graphic);
     for(i=0;i<LcmWidthDots;i++)
     {
           for(j=0;j<LcmLengthDots/8;j++)
           {
                 LcmWriteCommand(0xC5);      //讀數據,地址不變
                 CheckRWCD();
                 X = LcmReadData();
                 X = ~X;
                 LcmWriteCommandWith1Par(X,0xC0);
           }
     }
}
//屏讀功能演示
void ScreenReadDemo( void )
{                              //利用屏讀
                             //能對當前屏幕反顯,包括合成內容(本函數僅讀文本到圖形)
                             //但是寫入后的內容都在圖形區
                             //可以將文本區內容讀出以圖形方式寫到圖形區
     uchar i,j,X;
                             //使用屏讀屏考時候必須設置寬度為40(硬件已決定)
                             //所以如確定要用到屏讀屏考的話最后初始化時就設40