#include <absacc.h>
 #include <reg51.h>
 #define uchar  unsigned char
 #define COM8155 XBYTE[0x7ff0]
 #define PA8155  XBYTE[0x7ff1]
 #define PC8155  XBYTE[0x7ff3]
sbit BUSY=P3^3;
uchar code tbhead[40]={0x1c,0x26,0x20,0x20,0x20,0x20,0xc4,0xea,0x20,0x20,
                       
                       0xd4,0xc2,0xb7,0xdd,0xb5,0xe7,0xbb,0xb0,0xb7,0xd1,

                       0x0a,0xb5,0xa5,0xce,0xbb,0x20,0x20,0xb3,0xa4,0xcd,

                       0xbe,0x20,0x20,0x20,0x20,0xca,0xd0,0xbb,0xb0,0xa0};
 
uchar tl1=40;
uchar code tb1[5]={0xb4,0xa6,0x20,0x20,0x20};
uchar tl2=5;
uchar code tb2[2]={0x20,0x20};
uchar idata bcd[18];
uchar tl3;

void  prt(uchar d) 
{ PA8155=d;
  PC8155=0x00;
  PC8155=0x01;
  while(BUSY);
}

void numb(uchar n)
{
 prt(0x30+((bcd[n]&0xf0)>>4));
 prt(0x30+(bcd[n]&0x0f));
}

void main(void)
{
  COM8155=0x0f;
  EA=1;
  EX1=1;
  while(1);
}

void int1(void) interrupt 2 using 1
 {
  uchar  i,j,line,k=0;
  EA=0;
  for(i=0;i<tl1;i++)
    prt(tbhead[i]);
  tl3=0; line=0;
 do
 { 
    prt(tl3+0x81); /* code:0x81,0x82,0x83 */
    for(i=0;i<tl2;i++) 
      prt(tb1[i]);
    for(i=0;i<2;i++)
    {
     j=2;
     do{
     numb(k);
     }while(--j);
     prt(0x2e); /* '.' */
     numb(k);
     for(j=0;j<2;j++)
     prt(tb2[j]); /* space */
    }
    prt(0x0a);
    tl3++;
 } while((++line)^0x03!=0);
  
  EA=1;
  EX1=0;
}