/*lcd.c   */
#include <stdio.h>
//IO定義
ioport unsigned int port8000;
ioport unsigned int port8001;
//函數定義
extern void InitMcBSP0(void);
extern void ms_delay(int);
extern void send_0(void);
extern void send_1(void);
extern void send_2(void);
extern void send_end(void);
extern void INT3_ISR(void);
extern void InitC5402(void);
extern void write_command(void);
extern void write_data(void);
extern void OpenMcBSP(void);
extern void CloseMcBSP(void);
extern void READAD50(void);
extern void Int(void);
extern void init_lcm(void);
extern void ddram_clear(void);
interrupt void key_int();
interrupt void timer();
void  gdram_clear(void);
void  set_gdram_addr(unsigned int addr);
void  gdram_draw(void);
void  gdram_disp(void);
void  gdram_write_word(unsigned int fir_word,unsigned int sec_word); 
void  setup_expand_mode(void);
//void  display_led(void);
void  dram_check(void);
void  dram_error(void);
void  gdram_intial(unsigned char *DPTR0);
void send_byte( unsigned char out_byte);
void write7279(unsigned int cmd,unsigned int dta);
void long_delay(void);
void short_delay(void);
void Initial_menu(unsigned char *DPTR1);
void Initial_menu0(void);
void Initial_menu1(void);
void SetDAdress(unsigned int Daddr);
void SetDCdata(unsigned int Ddata0,unsigned int Ddata1);
void Menuhelp1(void);
void Menuhelp2(void);
void Menuhelp3(void);
void Menuhelp4(void);
void Menuhelp5(void);
void Menuhelp6(void);
void Experience1(void);
void Experience2(void);
void Experience3(void);
//***HD7279定義指令***
#define CMD_RESET 0xa4
#define CMD_TEST  0xbf
#define DECODE0 0x80
#define DECODE1 0xc8
#define CMD_READ 0x15
#define UNDECODE 0x90
#define RTL_CYCLE 0xa3
#define RTR_CYCLE 0xa2
#define RTL_UNCYL 0xa1
#define RTR_UNCYL 0xa0
#define ACTCTL 0x98
#define SEGON 0xe0
#define SEGOFF 0xc0
#define BLINKCTL 0x88
#define INPUT   0x111
#define AC0  0x80
#define AC1  0x90
#define AC2  0x88
#define AC3  0x98


//變量定義
unsigned int byteout;
unsigned int  gdram_cur_x;
unsigned int  gdram_cur_y;
unsigned int bmp_width;
unsigned int bmp_height;
unsigned int *a=(unsigned int *)0x0015;
unsigned char *data=(unsigned char *)0x1023;
unsigned int temp;
unsigned int R0,R1,R2,R3;
unsigned char *DPTR;
unsigned int timer0=0;
unsigned char key_a=0x22,key_b=0x22,down_key=0,up_key=0,page=2,help1_down=5,first=0;
unsigned int i=0,j=0,k=0,l=0,m=0,n=0,p=0xff,switch_key=2,help1=2,port,menuhelp=0;
int  DataAd50[128];
int  Binary[8]={0xc0,0x60,0x30,0x18,0x0c,0x06,0x03,0x01};
int *DataAd50_1=(int *)0x110;
unsigned char Menu0[4][16] = {0xa2,0xe5,0xa1,0xa2,0xa3,0xc9,0xa3,0xcf,0xca,0xb5,0xd1,0xe9,0xa1,0xa0,0xa1,0xa0,
                              0xa2,0xe7,0xa1,0xa2,0xb2,0xbd,0xbd,0xf8,0xb5,0xe7,0xbb,0xfa,0xca,0xb5,0xd1,0xe9,
                              0xa2,0xe6,0xa1,0xa2,0xd6,0xd0,0xb6,0xcf,0xca,0xb5,0xd1,0xe9,0xa1,0xa0,0xa1,0xa0,
                              0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0};
unsigned char Menu1[4][16] = {0xa2,0xe8,0xa1,0xa2,0xb5,0xe7,0xbb,0xfa,0xce,0xc2,0xbf,0xd8,0xca,0xb5,0xd1,0xe9,
                              0xa2,0xea,0xa1,0xa2,0xb8,0xdf,0xcd,0xa8,0xc2,0xcb,0xb2,0xa8,0xca,0xb5,0xd1,0xe9,
							  0xa2,0xe9,0xa1,0xa2,0xb5,0xcd,0xcd,0xa8,0xc2,0xcb,0xb2,0xa8,0xca,0xb5,0xd1,0xe9,
							  0xa1,0xb6,0xb7,0xb5,0xbb,0xd8,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0};
unsigned char Menu_help1[4][16] = {0xa1,0xa0,0xa1,0xa0,0xb0,0xb4,0x4b,0x32,0x2d,0x4b,0x39,0x00,0xbc,0xfc,0xa3,0xac,
                                   0xb1,0xe4,0xbb,0xaf,0xa1,0xa3,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,
                                   0xb9,0xdb,0xb2,0xec,0xb5,0xc6,0x4c,0x45,0x44,0x37,0x2d,0x4c,0x45,0x44,0x31,0x34,                                 
                                   0xa1,0xb6,0xb7,0xb5,0xbb,0xd8,0xa1,0xa0,0xa1,0xa0,0xd4,0xcb,0xd0,0xd0,0xa1,0xb7};
unsigned char Menu_help2[4][16]= { 0xbd,0xd3,0xcf,0xdf,0x3a,0x4a,0x38,0x2d,0x4a,0x33,0xa3,0xac,0xa1,0xa0,0xa1,0xa0,
                                   0xb2,0xa8,0xd0,0xce,0xcf,0xd4,0xca,0xbe,0xa1,0xa3,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,
                                   0xb0,0xb4,0x4b,0x31,0xbc,0xfc,0xa3,0xac,0xb9,0xdb,0xb2,0xec,0xd2,0xba,0xbe,0xa7,                                 
                                   0xa1,0xb6,0xb7,0xb5,0xbb,0xd8,0xa1,0xa0,0xa1,0xa0,0xd4,0xcb,0xd0,0xd0,0xa1,0xb7};
unsigned char Menu_help3[4][16]= { 0xbd,0xd3,0xcf,0xdf,0x3a,0x00,0xb2,0xa6,0xc2,0xeb,0xbf,0xaa,0xb9,0xd8,0x53,0x34,
                                   0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,
                                   0xb5,0xc4,0xb5,0xda,0xd2,0xbb,0xce,0xbb,0xa3,0xba,0xd6,0xc3,0x4f,0x4e,0xa1,0xa3,                                
                                   0xa1,0xb6,0xb7,0xb5,0xbb,0xd8,0xa1,0xa0,0xa1,0xa0,0xd4,0xcb,0xd0,0xd0,0xa1,0xb7};
unsigned char Menu_help4[4][16]= { 0xbd,0xd3,0xcf,0xdf,0x3a,0x58,0x46,0x49,0x4e,0x2d,0x58,0x46,0x4f,0x55,0x54,0x2c,
                                   0x53,0x35,0xc1,0xbd,0xce,0xbb,0xb6,0xbc,0xd6,0xc3,0x4f,0x4e,0xa1,0xa3,0xa1,0xa0,
                                   0x53,0x34,0xb5,0xc4,0xb5,0xda,0xd2,0xbb,0xce,0xbb,0xd6,0xc3,0x4f,0x4e,0x2c,0x00,                          
                                   0xa1,0xb6,0xb7,0xb5,0xbb,0xd8,0xa1,0xa0,0xa1,0xa0,0xd4,0xcb,0xd0,0xd0,0xa1,0xb7};
unsigned char Menu_help5[4][16]= { 0xbd,0xd3,0xcf,0xdf,0x3a,0x49,0x4e,0x2d,0x4f,0x55,0x54,0x31,0xa3,0xac,0xa1,0xa0,
                                   0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,
                                   0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,                                 
                                   0xa1,0xb6,0xb7,0xb5,0xbb,0xd8,0xa1,0xa0,0xa1,0xa0,0xd4,0xcb,0xd0,0xd0,0xa1,0xb7};
unsigned char Menu_help6[4][16]= {  0xbd,0xd3,0xcf,0xdf,0x3a,0x49,0x4e,0x2d,0x4f,0x55,0x54,0x31,0xa3,0xac,0xa1,0xa0,
                                   0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,
                                   0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,0xa1,0xa0,                                 
                                   0xa1,0xb6,0xb7,0xb5,0xbb,0xd8,0xa1,0xa0,0xa1,0xa0,0xd4,0xcb,0xd0,0xd0,0xa1,0xb7};

unsigned char Databack[64][16];
unsigned char clear[64][16];
unsigned char icon[64][16] = {  
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x1e, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0f, 0xf0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x1f, 0xff, 0xff, 0xe0, 0x0, 0x0, 0x07, 0xff, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x1f, 0xff, 0xff, 0xf0, 0x0, 0x07, 0xff, 0xf0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x3f, 0xff, 0xff, 0xf0, 0x03, 0xff, 0xfe, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x3f, 0xff, 0xff, 0xf3, 0xff, 0xff, 0xe0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x3f, 0xff, 0xfe, 0x0f, 0xff, 0xff, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x7f, 0xfe, 0x0, 0x0f, 0xff, 0xf0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x3e, 0x0, 0x0, 0x0,
  0x0, 0x7f, 0x0, 0x0, 0x0f, 0xff, 0x80, 0x0, 0x0, 0x0, 0x0, 0x0, 0x41, 0x0, 0x0, 0x0,
  0x0, 0x78, 0x0, 0x0, 0x0f, 0xf8, 0x0, 0x0, 0x20, 0x0, 0x0, 0x40, 0xfc, 0x80, 0x0, 0x0,
  0x0, 0x7c, 0x0, 0x0, 0x0f, 0xc0, 0x0, 0x0, 0x60, 0x0, 0x01, 0xc0, 0xa6, 0x80, 0x0, 0x0,
  0x0, 0xfe, 0x0, 0x0, 0x0e, 0x0, 0x0, 0x0, 0xe0, 0x0, 0x01, 0xc1, 0x22, 0x0, 0x0, 0x0,
  0x0, 0xfe, 0x0, 0x0, 0x10, 0x0, 0x0, 0x0, 0xe0, 0x0, 0x01, 0x81, 0x26, 0x40, 0x0, 0x0,
  0x0, 0xfe, 0x0, 0x0, 0xf0, 0x0, 0x0, 0x0, 0xe0, 0x0, 0x01, 0x81, 0x3c, 0x40, 0x0, 0x0,
  0x01, 0xfe, 0x0, 0x01, 0xf0, 0x0, 0x0, 0x0, 0xc0, 0x0, 0x01, 0x81, 0x24, 0x40, 0x0, 0x0,
  0x01, 0xfe, 0x0, 0x39, 0xf0, 0x0, 0x0, 0x0, 0xc0, 0x0, 0x03, 0x80, 0x22, 0x80, 0x0, 0x0,
  0x01, 0xfc, 0x0, 0xf9, 0xf0, 0x0, 0x0, 0x0, 0xc0, 0x0, 0x03, 0x80, 0xe3, 0x80, 0x0, 0x0,
  0x01, 0xfc, 0x07, 0xf1, 0xf0, 0x0, 0x0, 0x01, 0xc0, 0x0, 0x03, 0x80, 0x41, 0x0, 0x0, 0x0,
  0x03, 0xfc, 0x1f, 0xf1, 0xf0, 0x0, 0x0, 0x01, 0xc0, 0x0, 0x03, 0x0, 0x3e, 0x0, 0x0, 0x0,
  0x03, 0xf8, 0xff, 0xf3, 0xf0, 0x0, 0x0, 0x01, 0x80, 0x0, 0x03, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x03, 0xfb, 0xff, 0xf3, 0xf0, 0x0, 0x0, 0x01, 0x80, 0x0, 0x03, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x03, 0xff, 0xff, 0xf3, 0xf0, 0x0, 0x0, 0x01, 0x80, 0x0, 0x07, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x07, 0xff, 0xff, 0xe3, 0xf0, 0x0, 0x0, 0x03, 0x80, 0x02, 0x07, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x07, 0xff, 0xff, 0xe3, 0xf0, 0x1c, 0x03, 0xc3, 0x9c, 0x07, 0x06, 0x30, 0x08, 0x0, 0xc0, 0x1c,
  0x07, 0xff, 0xff, 0xe7, 0xf0, 0x3c, 0x05, 0xc3, 0x3c, 0x0f, 0x06, 0x78, 0x18, 0x19, 0xc0, 0x3e,
  0x0f, 0xff, 0xff, 0xe7, 0xf0, 0xdc, 0x0d, 0xc3, 0x7c, 0x13, 0x06, 0xf0, 0x38, 0x1b, 0xc0, 0x4e,
  0x0f, 0xff, 0xff, 0xe7, 0xf0, 0x8c, 0x19, 0x83, 0x18, 0x31, 0x06, 0x70, 0x30, 0x3b, 0xc0, 0xce,
  0x0f, 0xff, 0xff, 0xc7, 0xf1, 0x9c, 0x19, 0x03, 0x18, 0x30, 0x0e, 0x30, 0x30, 0x39, 0xc0, 0x8c,
  0x1f, 0xff, 0xff, 0xcf, 0xf1, 0x18, 0x30, 0x07, 0x18, 0x38, 0x0e, 0x70, 0x70, 0x39, 0xc1, 0x8c,
  0x1f, 0xff, 0xff, 0xcf, 0xf3, 0x18, 0x30, 0x07, 0x38, 0x3c, 0x0e, 0x60, 0x70, 0x31, 0x81, 0x98,
  0x1f, 0xff, 0xff, 0xcf, 0xf3, 0x30, 0x30, 0x07, 0x30, 0x3c, 0x0c, 0x60, 0x60, 0x31, 0x83, 0x98,
  0x1f, 0xff, 0xff, 0xcf, 0xf3, 0x20, 0x70, 0x06, 0x30, 0x1e, 0x0c, 0x60, 0x60, 0x73, 0x83, 0xb0,
  0x3f, 0xff, 0xff, 0x8f, 0xf3, 0xc0, 0x70, 0x06, 0x30, 0x0e, 0x1c, 0xe0, 0x60, 0x63, 0x83, 0x80,
  0x3f, 0xff, 0xff, 0x9f, 0x73, 0x80, 0x70, 0x06, 0x70, 0x0c, 0x1c, 0xe0, 0xe0, 0x63, 0x03, 0x80,
  0x3f, 0xff, 0xff, 0x98, 0x33, 0xc0, 0x78, 0x0e, 0x7c, 0x0c, 0x18, 0xf0, 0xe0, 0x63, 0x03, 0xc0,
  0x3f, 0xff, 0xff, 0x80, 0xf3, 0xfc, 0x7f, 0x8c, 0x7c, 0x78, 0x18, 0xf8, 0xf8, 0xe3, 0x83, 0xfc,
  0x7f, 0xff, 0xff, 0x1f, 0xf3, 0xf0, 0x3e, 0x0c, 0x70, 0x70, 0x10, 0xe0, 0x70, 0xc3, 0xc1, 0xf8,
  0x7f, 0xff, 0xff, 0xff, 0xf0, 0x0, 0x0, 0x0, 0x0, 0x60, 0x0, 0x0, 0x0, 0x03, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
  0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0
};

//主函數
void main(void)
{
   for(i=0;i<64;i++)
   {
      for(j=0;j<16;j++)
         {
            Databack[i][j]=0x0;
         }
   }
   for(i=0;i<64;i++)
   {
      for(j=0;j<16;j++)
          {
            clear[i][j]=0x0;
          }
   }
    InitC5402();
  // OpenMcBSP();
    init_lcm();
    ddram_clear();
    //DPTR=&clear[0][0];
    //gdram_intial(DPTR);
    InitMcBSP0(); 
    DPTR=&icon[0][0];
    gdram_intial(DPTR);
    long_delay();
    long_delay();
    long_delay();
      init_lcm();
      ddram_clear();
      Initial_menu1();
      send_byte(CMD_TEST);//測試指令顯示,點亮所有數碼管
      long_delay();       //長延時
	  send_byte(CMD_RESET);//清除顯示
	  long_delay();
     //譯碼方式1及左移指令測試
	  write7279(DECODE1,0);
	  long_delay();
	  SetDCdata(0xa1,0xad);
      send_byte(RTL_UNCYL);
	  long_delay();
	  write7279(DECODE1,1);
	  long_delay();
	  SetDCdata(0xa1,0xad);
      send_byte(RTL_UNCYL);
	  long_delay();
	  SetDCdata(0xa1,0xad);
	  write7279(DECODE1,2);
	  long_delay();
      send_byte(RTL_UNCYL);
	  long_delay();
	  write7279(DECODE1,3);
	  long_delay();
	  SetDCdata(0xa1,0xad);
      send_byte(RTL_UNCYL);
	  long_delay();
	  write7279(DECODE1,4);
	  long_delay();
      send_byte(RTL_UNCYL);
	  long_delay();
	  SetDCdata(0xa1,0xad);
	  write7279(DECODE1,5);
	  long_delay();
      send_byte(RTL_UNCYL);
	  long_delay();
	  write7279(DECODE1,6);
	  long_delay();
	  SetDCdata(0xa1,0xad);
      send_byte(RTL_UNCYL);
	  long_delay();
	  write7279(DECODE1,7);
	  long_delay();
      send_byte(RTL_UNCYL);
	  long_delay();
	  SetDCdata(0xa1,0xad);
	  write7279(DECODE1,8);
	  long_delay();
      send_byte(RTL_UNCYL);
	  long_delay();
	  SetDCdata(0xa1,0xad);
	  write7279(DECODE1,9);
	  long_delay();
	 // SetDCdata(0xa1,0xad);
      send_byte(RTL_UNCYL);
	  long_delay();
      send_byte(CMD_RESET);
      long_delay();
     // SetDCdata(0xa1,0xad);
      
    // DPTR=&icon_1[0][0];
      //gdram_intial(DPTR);
      //display_led();

      Int();
      init_lcm();
      ddram_clear();
      Initial_menu0();
      
 while (1)
{                 

       if(key_a==0x04)
          {
            key_a=0x22;
            down_key++;
            if(down_key==4)
            {
               down_key=0;
            }
            switch(down_key)
	        {
	        case 1 :  SetDAdress(AC0);
                      *a=0x0f; 
                      write_command();
                      switch_key=2;
                      asm(" NOP ");
                      asm(" NOP ");
                      asm(" NOP ");
                      break;
            case 2 :  SetDAdress(AC1);
                      *a=0x0f;
                      write_command();
                      switch_key=3;
                      asm(" NOP ");
                      asm(" NOP ");
                      asm(" NOP ");
                      break;
            case 3 :  SetDAdress(AC2);
                      *a=0x0f;
                      write_command();
                      switch_key=4;
                      asm(" NOP ");
                      asm(" NOP ");
                      asm(" NOP ");
                      break;
            /*case 4 : if(page==0) 
                     {
                      SetDAdress(AC3+7);
                      *a=0x0f;
                      write_command();
                      switch_key=0;
                      //page=1;
                     }
                      else if(page==1)
                      {
                       SetDAdress(AC3);
                       *a=0x0f;
                       write_command();
                       switch_key=1;
                      }
                      asm(" NOP ");
                      asm(" NOP ");
                      asm(" NOP ");
                      break;*/
             }      
          }  
           else if(key_a==0x06)
               { 
               key_a=0x22;
                 if(down_key==0)
                 {
                  ;
                 }
                 {   
                 down_key--;
                 }
                 
                switch(down_key)
	                {
	                case 1 :  SetDAdress(AC0);
                              *a=0x0f; 
                              write_command();
                              switch_key=2;
                              asm(" NOP ");
		                      asm(" NOP ");
		                      asm(" NOP ");
                              break;
                    case 2 :  SetDAdress(AC1);
                              *a=0x0f;
                              write_command();
                              switch_key=3;
                              asm(" NOP ");
		                      asm(" NOP ");
		                      asm(" NOP ");
                              break;
                    case 3 :  SetDAdress(AC2);
                              *a=0x0f;
                              write_command();
                              switch_key=4;
                              asm(" NOP ");
		                      asm(" NOP ");
		                      asm(" NOP ");
                              break;
                   /* case 4 :   if(page==0) 
                                {
                                SetDAdress(AC3+7);
                                *a=0x0f;
                                write_command();
                                switch_key=0;
                                }
                               else if(page==1)
                                {
                                SetDAdress(AC3);
                                *a=0x0f;
                                write_command();
                                switch_key=1;
                                }
                              asm(" NOP ");
		                      asm(" NOP ");
		                      asm(" NOP ");
                                break;*/
                   }    
              }
       switch(switch_key)
        {
        case 0 : if (page==0 && key_a==0x00)
                 {key_a=0x22;
                 Initial_menu1();
                 }
                 asm(" NOP ");
		         asm(" NOP ");
		         asm(" NOP ");
                 break;
        case 1 : if (page==1 && key_a==0x00)
                 {
                 key_a=0x22;
                 Initial_menu0();
                 }
                 asm(" NOP ");
		         asm(" NOP ");
		         asm(" NOP ");
                 break;
        case 2 : if (page==0 && key_a==0x00)
                 {
                 key_a=0x22;
                 Menuhelp1();
                 menuhelp=1;
                 }
                 else if (page==1 && key_a==0x00)
                 {
                 key_a=0x22;
                 Menuhelp4();
                 menuhelp=4;
                 }
                 asm(" NOP ");
		         asm(" NOP ");
		         asm(" NOP ");
                 break;  
        case 3 : if (page==0 && key_a==0x00)
                 {
                 key_a=0x22;
                 Menuhelp2();
                 menuhelp=2;
                 }
                 else if(page==1 && key_a==0x00)
                 {
                 key_a=0x22;
                 Menuhelp5();
                 menuhelp=5;
                 }
                 asm(" NOP ");
		         asm(" NOP ");
		         asm(" NOP ");
                 break; 
        case 4 : if(page==0 && key_a==0x00)
                 {
                 key_a=0x22;
                 Menuhelp3();
                 menuhelp=3;
                 }
                 else if (page==1 && key_a==0x00)
                 {
                 key_a=0x22;
                 Menuhelp6();
                 menuhelp=6;
                 
                 }
                 asm(" NOP ");
		         asm(" NOP ");
		         asm(" NOP ");
         		 break;
                }
       if (key_a==0x01)
       
       {
           key_a=0x22;
           help1_down++;
           if (help1_down==2)
              {
               help1_down=0;
              }
           if(menuhelp>0 && menuhelp<7)
           {
               if (help1_down==0)
                  {   
                    SetDAdress(AC3);