0x00,0x00,0x00,0x00,0x0F,0x9F,0xFE,0x0F,0xE0,0x00,0x01,0x00,0x00,0x00,0x00,0x0C,
0x00,0x00,0x0C,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x0F,0x8F,0xF8,0x0F,0xE0,0x00,0x01,0x00,0x00,0x00,0x00,0x08,0x00,0x00,
0x0C,0x00,0x00,0x00,0x00,0x00,0x30,0x00,0x00,0x00,0x00,0x60,0x00,0x0E,0x00,0x00,
0x0F,0x87,0xC0,0x1F,0xC0,0x00,0x00,0x00,0x00,0x00,0x00,0x08,0x18,0x00,0x18,0x00,
0x00,0x78,0x00,0x00,0x20,0x00,0x00,0x00,0x03,0xF0,0x00,0x0E,0x00,0x00,0x07,0x88,
0x00,0x1F,0xC0,0x00,0x06,0x00,0x00,0x00,0x00,0x0A,0xFC,0x00,0x37,0x80,0x03,0xFC,
0x00,0x40,0x20,0x00,0x01,0xE0,0x0F,0x00,0x00,0x0C,0x00,0x00,0x07,0x80,0x00,0x1F,
0xC0,0x00,0x03,0x07,0x00,0x00,0x00,0x7E,0xF0,0x00,0x79,0x80,0x07,0x18,0x00,0x60,
0x38,0x00,0x7F,0xF0,0x01,0x80,0x00,0x0C,0x00,0x00,0x07,0x80,0x3C,0x1F,0xC0,0x00,
0x03,0x83,0x80,0x00,0x00,0x78,0x20,0x00,0x29,0x80,0x00,0x10,0x00,0x67,0xFC,0x0F,
0xFC,0x00,0x1F,0xFE,0x00,0x0C,0x00,0x00,0x07,0xC7,0xFF,0x3F,0x80,0x03,0x01,0x87,
0x80,0x00,0x00,0x1C,0x4C,0x00,0x2D,0x80,0x04,0x70,0x00,0x07,0xE0,0x0E,0x1C,0x00,
0x63,0x81,0x00,0x0C,0x00,0x00,0x03,0xFF,0xFF,0xBF,0x80,0x01,0x80,0xC8,0x00,0x00,
0x00,0x2E,0x4E,0x00,0x25,0x80,0x07,0xF0,0x00,0x06,0x20,0x00,0x1C,0x00,0x0D,0xF8,
0x00,0x0C,0x00,0x00,0x03,0xFF,0xFF,0xBF,0x80,0x01,0xC0,0xFC,0x00,0x00,0x00,0x3F,
0xC4,0x00,0x3F,0x80,0x07,0x00,0x00,0x41,0xA0,0x00,0x32,0x00,0x0B,0xC8,0x01,0x8C,
0x18,0x00,0x01,0xFF,0xFF,0xFF,0x00,0x01,0xC0,0x7C,0x00,0x00,0x00,0x78,0x00,0x00,
0x3F,0xF8,0x04,0x00,0x40,0x61,0x20,0x00,0x73,0x80,0x0B,0xE8,0x01,0x8C,0x18,0x00,
0x01,0xFF,0xFF,0xFF,0x00,0x01,0xE0,0xF8,0x00,0x00,0x00,0x08,0x38,0x03,0xFC,0x88,
0x0C,0x00,0x40,0x40,0x20,0x00,0xC3,0x80,0x05,0xD0,0x01,0x0C,0x10,0x00,0x00,0xFC,
0x00,0xFE,0x00,0x01,0xF9,0xF8,0x00,0x00,0x00,0x1E,0xF0,0x06,0x26,0x80,0x0C,0x00,
0x40,0x42,0x20,0x00,0x83,0x00,0x02,0xF0,0x01,0x1F,0xF0,0x00,0x00,0xF0,0x00,0xFE,
0x00,0x03,0xEB,0x70,0x00,0x00,0x00,0x78,0x70,0x00,0x24,0x80,0x0C,0x00,0xC0,0x21,
0xE0,0x03,0x87,0x00,0x00,0x80,0x01,0xFF,0xF0,0x00,0x00,0x00,0x00,0x7C,0x00,0x2F,
0xCC,0xF2,0x00,0x00,0x01,0x88,0x20,0x00,0x60,0x80,0x06,0x03,0xC0,0x30,0x20,0x06,
0x26,0x00,0x07,0xF0,0x00,0xFE,0x30,0x00,0x00,0x00,0x00,0x78,0x00,0x1F,0x8D,0xF2,
0x00,0x00,0x00,0x08,0xFE,0x00,0x60,0x80,0x07,0xFF,0xC1,0xFF,0x00,0x08,0x1C,0x00,
0x00,0xC4,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x20,0x00,0x1F,0x9F,0xFB,0x00,0x00,
0x00,0x0B,0x01,0x00,0xC0,0x80,0x01,0xFF,0x80,0xC7,0xFF,0x00,0x18,0x00,0x0F,0xFE,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x07,0xBF,0xFB,0x00,0x00,0x00,0x08,
0x00,0x01,0x07,0x80,0x00,0x00,0x00,0x00,0x3F,0x00,0x08,0x00,0x30,0x02,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x03,0xDF,0x3E,0x00,0x00,0x00,0x08,0x00,0x00,
0x01,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x03,0xDA,0x6E,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x07,0x9B,0xEC,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x07,0x19,0xCE,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x06,
0x19,0xDB,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x06,0x18,0xB3,
0x10,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x10,0x01,0x90,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xF0,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x70,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x30,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x10,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
};

void delay(uint nnn)
{
  uint mmm;
  while(nnn-->0)
  for(mmm=0;mmm<1000;mmm++){}
}

void wcomd(uint c)         /* Command write routine */
{
  uint i=DELAY;
  while(i)i--;
  ARD=1;CD=1;AWR=0;CE=1;P1=c;CE=0;CE=1;AWR=1;CD=0;
}

void wdata1(uint d)        /* Data write (1 byte) routine */
{
  uint i=DELAY;
  while(i)i--;
  ARD=1;CD=0;AWR=0;CE=1;P1=d;CE=0;CE=1;AWR=1;CD=1;
}

void wdata2(d1,d2)          /* Data write (2 byte) routine */
uint d1,d2;
{
  uint i=DELAY,temdat1=0,temdat2=0;
  uint temweix,temweiy;
  temdat1=d1,temdat2=d2;
  while(temdat1>255)
  { temdat1=temdat1-256;
    temdat2++;
  }
  temweix=temdat1;
  temweiy=temdat2;
  while(i)i--;
  ARD=1;CD=0;AWR=0;CE=1;P1=temweix;CE=0;CE=1;AWR=1;CD=1;
  ARD=1;CD=0;AWR=0;CE=1;P1=temweiy;CE=0;CE=1;AWR=1;CD=1;
}

void wcode(x,y,z)
uint x,y,z;
{
  wdata2(x,y);
  wcomd(z);
}

void initial()
{
  RST=1;RST=0;delay(1);RST=1;
  wcode(0x00,0x00,0x40);    /* Text home address set = 0000H */
  wcode(0x00,0x00,0x42);    /* Graphic home address set = 0000H */
  wcode(30,0x00,0x41);      /* Text area set = 30 columns */
  wcode(30,0x00,0x43);      /* Graphic area set = 30 columns */
  wcomd(0x80);              /* (Mode set)"OR" mode,internal character generater mode */
  wcode(0x02,0x00,0x22);    /* Offset register set */
}

void dispgra(uint gwzx,uint gwzy,xchar *str,uint gnum)
{
  uint i=0,j=0;
  wcomd(0x98);              /* (Display mode)Text off,graphics on,cursor off */
  wcode(gwzx,gwzy,0x24);    /* Address at 0 line,0 column */
  wcomd(0xb0);              /* Awron (data auto write set) */
  for(i=0;i<3840;i++)
  { wdata1(str[i]);}        /* Write display data */
  wcomd(0xb2);              /* Awroff (auto reset) */
}
void dispdot(uint xx,uint yy)
{
  uint i=0,j=0;
  wcomd(0x98);
  wcode(0,0,0x24);
  wcomd(0xb0);
  for(j=0;j<64;j++)
  {
    for(i=0;i<30;i++)
    { wdata1(xx);}
    for(i=0;i<30;i++)
    { wdata1(yy);}
  }
  wcomd(0xb2);
}

void main(void)
{
  initial();
  while(1)
  {
    dispgra(0,0,hm1,3840);
    delay(150);
    dispgra(0,0,hm2,3840);
    delay(150);
/*    dispdot(0xaa,0xaa);
    delay(100);
    dispdot(0x55,0x55);
    delay(100);
/*    dispdot(0xaa,0x55);
    delay(100);
    dispdot(0x55,0xaa);
    delay(100);
    dispdot(0xff,0x00);
    delay(100);
    dispdot(0x00,0xff);
    delay(100);
    dispdot(0xff,0xff);
    delay(100);
    dispdot(0x00,0x00);
    delay(100);*/
    }
}