/*$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$

Module	????:	240128		128X240dots??COB?LCD?module
InterfaCS???:???8080??8?BIT?Bus
soft????????:???KeilC51?Ver7.0
Written?by??:???OJC	
Control?IC??:???RA8806
Date????????:???2009.08.30
------------------------------------------------------------------
Note:
1.Parallel?bus?drive?programme.

2.Default?Crystal?12.000Mhz.

3.This?is?a?new?program.

&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&*/

#include?
#include?
#include?

#define?uchar?unsigned?char
#define?uint??unsigned?int
uchar?temp;
sbit?CD??=P3^0;
sbit?WR0??=P3^1;
sbit?RD0??=P3^2;
sbit?CS??=P3^3;
sbit?REST=P3^6;???
sbit?BUSY=P3^4;
sbit?BINT=P3^5;

#define?lcd_data?P1

//================================================================
void?DELAY_CLS（void）;
void?LCD_Clear（void）;
void?delay_ms（uint?ms_value）;
void?delay_us（uchar?us_value）;
void?wr_data（uchar?wdata）;
void?wr_cmd（uchar?cmd）;	
void?display（uchar?fst?uchar??snd）;

void?LCD_Graphic（void）;
void?init_cpu（void?）;
void?init_lcd（void）;
void?disp_Graphic（）;
void?LCD_Test（void）;
void?disp_fangkuang（void?）;
void?disp_fangkuang1（void?）;
void?LCD_GotoXY（uchar?x?uchar?y）;
void?Gray_Mode（void）;

void?Fill_PNTR_to_DPRAM（void）;
void?Access_2Page（）;
void?LCD_Clear（）;
void?Only_Show_Page1（void）;
void?Print_Hex（uchar?buf）;
void?Access_Page1（void）?;

void?SendStr（uchar?code?*ptString）;
void?Show_Two_layer（void）?;
void?XOR_Two_layer（void）?;
void?OR_Two_layer（）;
void?LCD_Text（）;


void?disp_Graphic1（）?;
void?disp_Graphic2（）?;
void?disp_Graphic3（）?;


//----------------------------------------------------------------

void?delay_us（uchar?us_value）	//delay?about?1?us
{
	while（us_value--）
	{
		_nop_（）;
		_nop_（）;
	}
}

//----------------------------------------------------------------

void?delay_ms（uint?ms_value）	//delay?about?1?ms
{
	uint?k;

	for（k=0;k	{
		delay_us（200）;
	}
}

//----------------------------------------------------------------

void?wr_cmd（uchar?cmd）
{


	lcd_data?=?cmd;
?????	CS=0;
????	RD0?=?1;
		CD?=?1;		
	
		WR0?=?0;
	delay_us（2）;?
		WR0?=?1;
		CS?=?1;
}

//----------------------------------------------------------------

void?wr_data（uchar?wdata）
{
???while（!BUSY）;	


	lcd_data?=?wdata;?
?????	CS=0;
????	RD0?=?1;
		CD?=?0;		
	
		WR0?=?0;
	delay_us（2）;?
		WR0?=?1;
		CS?=?1;
}

//----------------------------------------------------------------

void?DELAY_CLS（）

{
???	delay_ms（1000）;
????LCD_Clear（）;
?
}

//----------------------------------------------------------------

uchar?LCD_DataRead1（uchar?cmd）
{
		uchar?Data;
		wr_cmd（cmd）;
		lcd_data?=?0xff;
	??	WR0?=?1;
	???	CS?=?0;
	???	CD??=?0;
	??	RD0?=?0;
	??	Data?=?lcd_data;
	??	RD0?=?1;	
	???	CS?=?1;			
	???	CD?=?1;
		return?Data;
}

//---------------------------------------------------------

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2011-07-26?20:38??dddfgg\
?????目錄???????????0??2011-07-26?20:19??dddfgg\2010?new?RA8806-240128???2010.08.12\
?????目錄???????????0??2011-07-26?20:19??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\
?????目錄???????????0??2011-07-26?12:39??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\
?????文件???????33585??2011-07-26?20:33??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\240128
?????文件???????17407??2011-07-26?20:31??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\240128.c
?????文件???????16600??2011-07-26?20:33??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\240128.hex
?????文件??????????44??2011-07-26?20:33??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\240128.lnp
?????文件???????32533??2011-07-26?20:33??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\240128.LST
?????文件???????39482??2011-07-26?20:33??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\240128.M51
?????文件???????38323??2011-07-26?20:33??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\240128.OBJ
?????文件????????1375??2011-07-26?20:33??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\240128.Opt
?????文件???????33268??2011-07-26?20:33??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\240128.plg
?????文件????????1670??2011-07-26?20:33??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\240128.Uv2
?????文件????????1534??2011-07-26?12:39??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\240128_Opt.Bak
?????文件????????2119??2011-07-26?12:39??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\240128_Uv2.Bak
?????文件???????21812??2011-07-26?20:33??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\clip.h
?????目錄???????????0??2011-07-21?22:36??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\PIC\
?????文件???????19764??2010-06-02?00:30??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\PIC\6666.c
?????文件???????19765??2010-06-02?00:33??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\PIC\77777.c
?????文件???????19764??2010-06-02?00:34??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\PIC\8888.c
?????文件???????92214??2010-05-11?19:54??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\PIC\CH.bmp
?????文件???????25600??2011-07-21?22:36??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\PIC\Thumbs.db
?????文件???????19762??2009-08-13?15:07??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\PIC\川航科技.c
?????文件????????4158??2009-08-13?14:52??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\PIC\未命名240128.bmp
?????文件????????4158??2010-04-27?16:00??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\PIC\梯形.bmp
?????文件????????4158??2010-06-04?22:07??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\PIC\漢字反顯.bmp
?????文件????????4158??2010-05-06?20:05??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\PIC\波形.bmp
?????文件???????19762??2009-08-13?15:06??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\PIC\演示程序.c
?????文件????????4158??2010-07-14?11:22??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\PIC\演示程序2.bmp
?????文件????????4158??2011-01-02?00:29??dddfgg\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\2010?new?RA8806-240128???2010.08.12\PIC\觸摸圖片.bmp
............此處省略37個文件信息