#include <reg52.h>
#include <stdio.h>
#include <math.h>
#define uint unsigned int
#define uchar unsigned char
sbit P1_0=P1^0;
sbit P1_1=P1^1;
sbit P1_2=P1^2;

unsigned char code th0_30[100]={256,256,256,256,256,256,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,256,256,256,256,256,256,
256,256,256,256,256,256,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,256,256,256,256,256,256} ;

uchar th1_30[100]={256,256,256,256,256,256,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,256,256,256,256,256,256,
256,256,256,256,256,256,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,256,256,256,256,256,256} ;
   
uchar code tl0_30[100]={246,225,204,184,164,144,125,106,88,71,54,38,23,9,251,239,228,218,209,202,195,190,186,184,182,182,
184,186,190,195,202,209,218,228,239,251,9,23,38,54,71,88,106,125,144,164,184,204,225,246,
246,225,204,184,164,144,125,106,88,71,54,38,23,9,251,239,228,218,209,202,195,190,186,184,182,182,
184,186,190,195,202,209,218,228,239,251,9,23,38,54,71,88,106,125,144,164,184,204,225,246}  ;

uchar code tl1_30[100]={189,210,230,251,15,34,54,72,91,108,125,141,156,170,183,196,207,217,225,233,239,245,249,251,252,252,
251,249,245,239,233,225,217,207,196,183,170,156,141,125,108,91,72,54,34,15,251,230,210,189,
189,210,230,251,15,34,54,72,91,108,125,141,156,170,183,196,207,217,225,233,239,245,249,251,252,252,
251,249,245,239,233,225,217,207,196,183,170,156,141,125,108,91,72,54,34,15,251,230,210,189} ;
   

uchar code th0_40[100]={256,256,256,256,256,256,256,256,256,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,256,256,256,256,256,256,256,256,256};

uchar code th1_40[100]={255,255,255,255,255,255,255,255,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,255,255,255,255,255,255,255,255,
255,255,255,255,255,255,255,255,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,255,255,255,255,255,255,255,255} ;  

uchar code tl0_40[100]={248,233,217,202,187,172,158,144,130,117,104,92,81,70,60,51,43,36,29,23,18,15,12,10,9,9,10,12,
15,18,23,29,36,43,51,60,70,81,92,104,117,130,144,158,172,187,202,217,233,248,
248,233,217,202,187,172,158,144,130,117,104,92,81,70,60,51,43,36,29,23,18,15,12,10,9,9,10,12,
15,18,23,29,36,43,51,60,70,81,92,104,117,130,144,158,172,187,202,217,233,248}  ; 

uchar code tl1_40[100]={14,29,45,60,75,90,104,118,132,145,158,170,181,192,202,211,219,226,233,239,244,247,250,252,253,
253,252,250,247,244,239,233,226,219,211,202,192,181,170,158,145,132,118,104,90,75,60,45,29,14, 
14,29,45,60,75,90,104,118,132,145,158,170,181,192,202,211,219,226,233,239,244,247,250,252,253,
253,252,250,247,244,239,233,226,219,211,202,192,181,170,158,145,132,118,104,90,75,60,45,29,14} ;  

   
   
uchar code th0_50[100]={256,256,256,256,256,256,256,256,256,256,256,255,255,255,255,255,255,255,255,255,255,255,255,255,
255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,255,255,255,255,255,255,255,255,255,255,255,255,255,
255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,256,256,256,256,256,256,256,256,256,256,256}  ;
  
uchar code th1_50[]={255,255,255,255,255,255,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,255,255,255,255,255,255,
255,255,255,255,255,255,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,255,255,255,255,255,255}  ;
   
uchar code tl0_50[]={250,237,225,213,201,189,177,166,155,145,135,125,116,108,100,92,86,80,74,70,66,63,60,59,58,58,
59,60,63,66,70,74,80,86,92,100,108,116,125,135,145,155,166,177,189,201,213,225,237,250,
250,237,225,213,201,189,177,166,155,145,135,125,116,108,100,92,86,80,74,70,66,63,60,59,58,58,
59,60,63,66,70,74,80,86,92,100,108,116,125,135,145,155,166,177,189,201,213,225,237,250}  ;
  
uchar code tl1_50[]={62,75,87,99,111,123,135,146,157,167,177,187,196,204,212,220,226,232,238,242,246,249,252,253,
254,254,253,252,249,246,242,238,232,226,220,212,204,196,187,177,167,157,146,135,123,111,99,87,75,62,
62,75,87,99,111,123,135,146,157,167,177,187,196,204,212,220,226,232,238,242,246,249,252,253,
254,254,253,252,249,246,242,238,232,226,220,212,204,196,187,177,167,157,146,135,123,111,99,87,75,62};

   

uchar code th0_60[]={256,256,256,256,256,256,256,256,256,256,256,256,256,256,255,255,255,255,255,255,255,255,255,
255,255,255,255,255,255,255, 255,255,255,255,255,255,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,255,255,255,255,255,255,255,255,255,
255,255,255,255,255,255,255, 255,255,255,255,255,255,256,256,256,256,256,256,256,256,256,256,256,256,256,256} ;

uchar code th1_60[]={255,255,255,255,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,255,255,255,255,
255,255,255,255,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,255,255,255,255} ;

uchar code tl0_60[]={251,240,230,220,210,200,190,181,172,163,155,147,139,132,126,120,114,109,105,101,98,95,93,92,91,
91,92,93,95,98,101,105,109,114,120,126,132,139,147,155,163,172,181,190,200,210,220,230,240,251,
251,240,230,220,210,200,190,181,172,163,155,147,139,132,126,120,114,109,105,101,98,95,93,92,91,
91,92,93,95,98,101,105,109,114,120,126,132,139,147,155,163,172,181,190,200,210,220,230,240,251} ;

uchar code tl1_60[]={95,105,115,125,135,145,155,164,173,182,190,198,206,213,220,226,231,236,241,245,248,250,252,254,
254,254,254,252,250,248,245,241,236,231,226,220,213,206,198,190,182,173,164,155,145,135,125,115,105,95,
95,105,115,125,135,145,155,164,173,182,190,198,206,213,220,226,231,236,241,245,248,250,252,254,
254,254,254,252,250,248,245,241,236,231,226,220,213,206,198,190,182,173,164,155,145,135,125,115,105,95} ;



uchar code th0_70[]={256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,255,255,255,255,255,255,
255,255,255,255,255,255,255,255,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,255,255,255,255,255,255,
255,255,255,255,255,255,255,255,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256};

uchar code th1_70[]={255,255,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,255,255,
255,255,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,255,255} ;

uchar code tl0_70[]={252,243,234,225,217,208,200,192,184,177,169,162,156,150,144,139,134,130,126,123,120,118,116,115,
115,115,115,116,118,120,123,126,130,134,139,144,150,156,162,169,177,184,192,200,208, 217,225,234,243,252,
252,243,234,225,217,208,200,192,184,177,169,162,156,150,144,139,134,130,126,123,120,118,116,115,
115,115,115,116,118,120,123,126,130,134,139,144,150,156,162,169,177,184,192,200,208, 217,225,234,243,252};

uchar code tl1_70[]={118,126,135,144,153,161,169,177,185,193,200,207,213,219,225,230,235,239,243,246,249,251,253,254,
254,254,254,253,251,249,246,243,239,235,230,225,219,213,207,200,193,185,177,169,161, 153,144,135,126,118, 
118,126,135,144,153,161,169,177,185,193,200,207,213,219,225,230,235,239,243,246,249,251,253,254,          
254,254,254,253,251,249,246,243,239,235,230,225,219,213,207,200,193,185,177,169,161, 153,144,135,126,118};
   
  

uchar code th0_80[]={256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256}  ;

uchar code th1_80[]={256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256};

uchar code tl0_80[]={252,244,237,229,221,214,207,200,193,186,180,174,169,163,158,154,150,146,142,140,137,135,134,133,
132,132,133,134,135,137,140,142,146,150,154,158,163,169,174,180,186,193,200,207,214, 221,229,237,244,252,
252,244,237,229,221,214,207,200,193,186,180,174,169,163,158,154,150,146,142,140,137,135,134,133,
132,132,133,134,135,137,140,142,146,150,154,158,163,169,174,180,186,193,200,207,214, 221,229,237,244,252};
   
uchar code tl1_80[]={135,143,150,158,166,173,180,187,194,201,207,213,218,224,229,233,237,241,245,247,250,252,253,254,
255,255,254,253,252,250, 247,245,241,237,233,229,224,218,213,207,201,194,187,180,173,166,158,150,143,135,
135,143,150,158,166,173,180,187,194,201,207,213,218,224,229,233,237,241,245,247,250,252,253,254,
255,255,254,253,252,250, 247,245,241,237,233,229,224,218,213,207,201,194,187,180,173,166,158,150,143,135} ;
  

   
 
uchar code th0_90[]={256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256};

uchar code th1_90[]={256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256};

uchar code tl0_90[]={253,246,239,232,225,219,212,206,200,194,189,183,178,174,169,165,161,158,155,153,150,149,147,147,
146,146,147,147,149,150,153,155,158,161,165,169,174,178,183,189,194,200,206,212,219,225,232,239,246,253,
253,246,239,232,225,219,212,206,200,194,189,183,178,174,169,165,161,158,155,153,150,149,147,147,
146,146,147,147,149,150,153,155,158,161,165,169,174,178,183,189,194,200,206,212,219,225,232,239,246,253};   

uchar code tl1_90[]={148,155,162,169,176,182,189,195,201,207,212,218,223,227,232,236,240,243,246,248,250,252,254,254,
255,255,254,254,252,250, 248,246,243,240,236,232,227,223,218,212,207,201,195,189,182, 176,169,162,155,148,  
148,155,162,169,176,182,189,195,201,207,212,218,223,227,232,236,240,243,246,248,250,252,254,254,
255,255,254,254,252,250, 248,246,243,240,236,232,227,223,218,212,207,201,195,189,182, 176,169,162,155,148}; 



uchar code th0_100[]={256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256};

uchar code th1_100[]={256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256};

uchar code tl0_100[]={253,247,241,234,228,222,217,211,206,200,195,191,186,182,178,174,171,168,165,163,161,159,158,157,
157,157,157,158,159,161,163,165,168,171,174,178,182,186,191,195,200,206,211,217,222, 228,234,241,247,253,