/*01 Display Character A*/

void setup()
{
  volatile char *dirf,*dirl;
  Serial.begin(9600);
  volatile char *outf,*outl;
  dirf=0x30;dirl=0x10A;
  outf=0x31;outl=0x10B;
  *dirf=0xFF;*dirl=0xFF;
  volatile unsigned char arrf[8][8]={0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
                                     0xc3,0xc3,0xc3,0xc3,0xdb,0xff,0xe7,0xc3,
                                     0xff,0xff,0xc0,0xff,0xff,0xc0,0xff,0xff,
                                     0xc0,0xc0,0xc0,0xc0,0xc0,0xc0,0xff,0xff,
                                     0x1f,0x3f,0x60,0x60,0x60,0x60,0x3f,0x1f,
                                     0x3c,0x7e,0xc3,0xdb,0xdb,0xc3,0x7e,0x3c,
                                     0x81,0xc3,0xe7,0xff,0xdb,0xc3,0xc3,0xc3,
                                     0xff,0xff,0xc0,0xff,0xff,0xc0,0xff,0xff,
                                     };
  volatile char arrl[8]={0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe};
  volatile unsigned char del[8]={0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00};
  while(1)
  {
    volatile int i,r;
    volatile long j,c;
    c=50;
    for(r=0;r<7;r++)
    {
      for(int k=0; k<8; k++)
      {
        while(c-- > 0)
        {
          for(i=0;i<8;i++)
          {
            *outl=arrl[i];
            arrf[r+1][7-i]=((arrf[r+1][7-i])>>6)
            *outf=((arrf[r+1][7-i] << (k)));
            for(j=0;j<1000;j++);
            *outf=0x00;
            *outl=0xff;
          }
        }
        c=50;
      }
    
    }
  }
}

void loop() {}