3d8光立方源代码

ti

#include

#define uchar unsigned char

uchar t,i,k,a,s;

***it d1=P0^4;

***it d2=P0^6;

***it q0=P0^0;

***it q1=P0^1;

***it q2=P0^2;

***it q3=P0^3;

***it key=P0^5;

void delay(uchar z)

{

uchar x,y;

for(x=z;x>0;x--)

for(y=11;y>0;y--);

}

void yi()

{

P0=0xff;d1=0;d2=1;P1=0xa5;delay(8);P1=0xb5;delay(8);P1=0xc5;delay(8);P1=0xd5;delay(8);P1=0xe5;delay(8);P1=0xf5;delay(8);

}

void er()

{

P0=0xff;d1=1;d2=0;

P1=0x00;delay(8);P1=0x03;delay(8);P1=0x04;delay(8);P1=0x07;delay(8);P1=0x0e;delay(8);

P1=0x0e;delay(8);P1=0x0f;delay(8);

d1=0;d2=1;

P1=0x00;delay(8);P1=0x10;delay(8);P1=0x20;delay(8);P1=0x30;delay(8);P1=0x50;delay(8);P1=0x90;delay(8);

P1=0xa0;delay(8);P1=0xc0;delay(8);P1=0xf0;delay(8);

}

void san()

{

P0=0xff;d1=1;d2=0;

P1=0x00;delay(8);P1=0x03;delay(8);P1=0x04;delay(8);P1=0x07;delay(8);P1=0x0e;delay(8);

d1=0;d2=1;

P1=0x00;delay(8);P1=0x10;delay(8);P1=0x20;delay(8);P1=0x30;delay(8);P1=0x40;delay(8);P1=0x50;delay(8);P1=0x90;delay(8);

P1=0xa0;delay(8);P1=0xc0;delay(8);P1=0xf0;delay(8);

}

void si()

{

P0=0xff;d1=1;d2=0;

P1=0x00;delay(8);P1=0x01;delay(8);P1=0x02;delay(8);P1=0x03;delay(8);P1=0x07;delay(8);

d1=0;d2=1;

P1=0x00;delay(8);P1=0x10;delay(8);P1=0x20;delay(8);P1=0x30;delay(8);P1=0x40;delay(8);P1=0x50;delay(8);P1=0xc0;delay(8);

}

void qi()

{

P0=0xff;d1=1;d2=0;

P1=0x03;delay(8);P1=0x04;delay(8);

d1=0;d2=1;

P1=0x00;delay(8);P1=0x10;delay(8);P1=0x20;delay(8);P1=0x30;delay(8);P1=0x40;delay(8);P1=0x50;delay(8);P1=0xf0;delay(8);

}

void ba()

{

P0=0xff;d1=1;d2=0;

P1=0x00;delay(8);P1=0x01;delay(8);P1=0x02;delay(8);P1=0x03;delay(8);P1=0x04;delay(8);P1=0x07;delay(8);P1=0x0e;delay(8);

P1=0x0e;delay(8);P1=0x0f;delay(8);

d1=0;d2=1;

P1=0x00;delay(8);P1=0x10;delay(8);P1=0x20;delay(8);P1=0x30;delay(8);P1=0x40;delay(8);P1=0x50;delay(8);P1=0x90;delay(8);

P1=0xa0;delay(8);P1=0xc0;delay(8);P1=0xf0;delay(8);

}

void jiu()

{

P0=0xff;d1=1;d2=0;

P1=0x00;delay(8);P1=0x01;delay(8);P1=0x02;delay(8);P1=0x03;delay(8);P1=0x04;delay(8);P1=0x07;delay(8);P1=0x0e;delay(8);

P1=0x0e;delay(8);

d1=0;d2=1;

P1=0x00;delay(8);P1=0x10;delay(8);P1=0x20;delay(8);P1=0x30;delay(8);P1=0x40;delay(8);P1=0x50;delay(8);P1=0x90;delay(8);

P1=0xa0;delay(8);P1=0xc0;delay(8);P1=0xf0;delay(8);

}

void bayiqi()

{

switch(t)

{

case 0: P0=0xff;P2=0xfe;ba();break;delay(1);

case 1: P2=0xfd;ba();break;delay(1);

case 2: P2=0xfb;ba();break;delay(1);

case 3: P2=0xf7;ba();break;delay(1);

case 4: P2=0xef;ba();break;delay(1);

case 5: P2=0xf7;ba();break;delay(1);

case 6: P2=0xfb;ba();break;delay(1);

case 7: P2=0xfd;ba();break;delay(1);

case 8: P2=0xfe;ba();break;delay(1);

case 9: P2=0xfe;yi();break;delay(1);

case 10: P2=0xfd;yi();break;delay(1);

case 11: P2=0xfb;yi();break;delay(1);

case 12: P2=0xf7;yi();break;delay(1);

case 13: P2=0xef;yi();break;delay(1);

case 14: P2=0xf7;yi();break;delay(1);

case 15: P2=0xfb;yi();break;delay(1);

case 16: P2=0xfd;yi();break;delay(1);

case 17: P2=0xfe;yi();break;delay(1);

case 18: P2=0xfe;qi();break;delay(1);

case 19: P2=0xfd;qi();break;delay(1);

case 20: P2=0xfb;qi();break;delay(1);

case 21: P2=0xf7;qi();break;delay(1);

case 22: P2=0xef;qi();break;delay(1);

case 23: P2=0xf7;qi();break;delay(1);

case 24: P2=0xfb;qi();break;delay(1);

case 25: P2=0xfd;qi();break;delay(1);

case 26: P2=0xfe;qi();break;delay(1);

}

void yisanyisi()

{

switch(t)

{

case 0: P0=0xff;P2=0xfe;yi();break;delay(1);

case 1: P2=0xfd;yi();break;delay(1);

case 2: P2=0xfb;yi();break;delay(1);

case 3: P2=0xf7;yi();break;delay(1);

case 4: P2=0xef;yi();break;delay(1);

case 5: P2=0xf7;yi();break;delay(1);

case 6: P2=0xfb;yi();break;delay(1);

case 7: P2=0xfd;yi();break;delay(1);

case 8: P2=0xfe;yi();break;delay(1);

case 9: P2=0xfe;yi();break;delay(1);

case 10: P2=0xfd;san();break;delay(1);

case 11: P2=0xfb;san();break;delay(1);

case 12: P2=0xf7;san();break;delay(1);

case 13: P2=0xef;san();break;delay(1);

case 14: P2=0xf7;san();break;delay(1);

case 15: P2=0xfb;san();break;delay(1);

case 16: P2=0xfd;san();break;delay(1);

case 17: P2=0xfe;san();break;delay(1);

case 18: P2=0xfe;yi();break;delay(1);

case 19: P2=0xfd;yi();break;delay(1);

case 20: P2=0xfb;yi();break;delay(1);

case 21: P2=0xf7;yi();break;delay(1);

case 22: P2=0xef;yi();break;delay(1);

case 23: P2=0xf7;yi();break;delay(1);

case 24: P2=0xfb;yi();break;delay(1);

case 25: P2=0xfd;yi();break;delay(1);

case 26: P2=0xfe;yi();break;delay(1);

case 27: P2=0xfe;si();break;delay(1);

case 28: P2=0xfd;si();break;delay(1);

case 29: P2=0xfb;si();break;delay(1);

case 30: P2=0xf7;si();break;delay(1);

case 31: P2=0xef;si();break;delay(1);

case 32: P2=0xf7;si();break;delay(1);

case 33: P2=0xfb;si();break;delay(1);

case 34: P2=0xfd;si();break;delay(1);

case 35: P2=0xfe;si();break;delay(1);

}

void xin()

{

P0=0xff;d1=1;d2=0;

P1=0x03;delay(8);P1=0x05;delay(8);P1=0x09;delay(8);P1=0x0a;delay(8);P1=0x0b;delay(8);P1=0x0f;delay(8);

P1=0x02;delay(8);P1=0x01;delay(8);P1=0x00;delay(8);P1=0x06;delay(8);P1=0x07;delay(8);P1=0x0f;delay(8);

d1=0;d2=1;

P1=0x00;delay(8);P1=0x40;delay(8);P1=0x90;delay(8);P1=0xa0;delay(8);P1=0xe0;delay(8);q1=0;delay(8);q2=0;delay(8);q3=0;delay(8);

P1=0x10;delay(8);P1=0x20;delay(8);P1=0x30;delay(8);P1=0xb0;delay(8);P1=0xc0;delay(8);P1=0xd0;delay(8);P1=0x80;delay(8);

}

void shanxin()

{

switch(t)

{

case 0: P2=0xfe;xin();break;delay(1);

case 1: P2=0xfd;xin();break;delay(1);

case 2: P2=0xfb;xin();break;delay(1);

case 3: P2=0xf7;xin();break;delay(1);

case 4: P2=0xef;xin();break;delay(1);

case 5: P2=0xf7;xin();break;delay(1);

case 6: P2=0xfb;xin();break;delay(1);

case 7: P2=0xfd;xin();break;delay(1);

}

void qierjiu()

{

switch(t)

{

case 0: P0=0xff;P2=0xfe;qi();break;delay(1);

case 1: P2=0xfd;qi();break;delay(1);

case 2: P2=0xfb;qi();break;delay(1);

case 3: P2=0xf7;qi();break;delay(1);

case 4: P2=0xef;qi();break;delay(1);

case 5: P2=0xf7;qi();break;delay(1);

case 6: P2=0xfb;qi();break;delay(1);

case 7: P2=0xfd;qi();break;delay(1);

case 8: P2=0xfe;qi();break;delay(1);

case 9: P2=0xfe;er();break;delay(1);

case 10: P2=0xfd;er();break;delay(1);

case 11: P2=0xfb;er();break;delay(1);

case 12: P2=0xf7;er();break;delay(1);

case 13: P2=0xef;er();break;delay(1);

case 14: P2=0xf7;er();break;delay(1);

case 15: P2=0xfb;er();break;delay(1);

case 16: P2=0xfd;er();break;delay(1);

case 17: P2=0xfe;er();break;delay(1);

case 18: P2=0xfe;jiu();break;delay(1);

case 19: P2=0xfd;jiu();break;delay(1);

case 20: P2=0xfb;jiu();break;delay(1);

case 21: P2=0xf7;jiu();break;delay(1);

case 22: P2=0xef;jiu();break;delay(1);

case 23: P2=0xf7;jiu();break;delay(1);

case 24: P2=0xfb;jiu();break;delay(1);

case 25: P2=0xfd;jiu();break;delay(1);

case 26: P2=0xfe;jiu();break;delay(1);

}

void ii()

{

P0=0xff;d1=1;d2=0;P1=0x04;delay(8);

d1=0;d2=1;

P1=0x04;delay(8);P1=0x54;delay(8);P1=0x94;delay(8);P1=0xa4;delay(8);P1=0xb4;delay(8);P1=0xc4;delay(8);P1=0xd4;delay(8);

P1=0xe4;delay(8);P1=0xf4;delay(8);

}

void ll()

{

P0=0xff;d1=1;d2=0;

P1=0x50;delay(8);P1=0x51;delay(8);P1=0x52;delay(8);P1=0x53;delay(8);P1=0x5f;delay(8);P1=0x5e;delay(8);

d1=0;d2=1;

P1=0x5e;delay(8);P1=0x9e;delay(8);P1=0xae;delay(8);

}

void oo()

{

P0=0xff;d1=1;d2=0;

P1=0x04;delay(8);P1=0x02;delay(8);P1=0x0a;delay(8);P1=0x0b;delay(8);P1=0x0f;delay(8);

d1=0;d2=1;

P1=0x10;delay(8);P1=0x40;delay(8);P1=0x90;delay(8);P1=0xa0;delay(8);P1=0xf0;delay(8);q2=0;delay(8);q3=0;delay(8);

}

void vv()

{

P0=0xff;d1=1;d2=0;

P1=0x08;delay(8);P1=0x09;delay(8);P1=0x0a;delay(8);P1=0x0b;delay(8);P1=0x0f;delay(8);

d1=0;d2=1;

P1=0x90;delay(8);;P1=0xa0;delay(8);P1=0x40;delay(8);q0=0;delay(8);q1=0;delay(8);q2=0;delay(8);q3=0;delay(8);

}

void ee()

{

P0=0xff;d1=1;d2=0;

P1=0x00;delay(8);P1=0x01;delay(8);P1=0x02;delay(8);P1=0x03;delay(8);P1=0x0f;delay(8);P1=0x0e;delay(8);P1=0x04;delay(8);

P1=0x07;delay(8);

d1=0;d2=1;

P1=0xc0;delay(8);P1=0x30;delay(8);P1=0xf0;delay(8);P1=0x00;delay(8);P1=0x50;delay(8);P1=0x90;delay(8);P1=0xa0;delay(8);

}

void yy()

{

P0=0xff;d1=1;d2=0;

P1=0x08;delay(8);P1=0x02;delay(8);P1=0x06;delay(8);P1=0x07;delay(8);

d1=0;d2=1;

P1=0x07;delay(8);P1=0x97;delay(8);P1=0x87;delay(8);P1=0xe7;delay(8);

}

void uu()

{

P0=0xff;d1=1;d2=0;

P1=0x08;delay(8);P1=0x09;delay(8);P1=0x0a;delay(8);P1=0x0b;delay(8);P1=0x0c;delay(8);P1=0x0e;delay(8);

d1=0;d2=1;

P1=0x00;delay(8);P1=0x10;delay(8);P1=0x20;delay(8);P1=0x30;delay(8);P1=0x40;delay(8);P1=0xa0;delay(8);P1=0x90;delay(8);

}

void iloveyou()

{

switch(t)

{

case 0: P0=0xff;P2=0xfe;ii();break;delay(1);

case 1: P2=0xfd;ii();break;delay(1);

case 2: P2=0xfb;ii();break;delay(1);

case 3: P2=0xf7;ii();break;delay(1);

case 4: P2=0xef;ii();break;delay(1);

case 5: P2=0xf7;ii();break;delay(1);

case 6: P2=0xfb;ii();break;delay(1);

case 7: P2=0xfd;ii();break;delay(1);

case 8: P2=0xfe;ii();break;delay(1);

case 9: P2=0xfe;ll();break;delay(1);

case 10: P2=0xfd;ll();break;delay(1);

case 11: P2=0xfb;ll();break;delay(1);

case 12: P2=0xf7;ll();break;delay(1);

case 13: P2=0xef;ll();break;delay(1);

case 14: P2=0xf7;ll();break;delay(1);

case 15: P2=0xfb;ll();break;delay(1);

case 16: P2=0xfd;ll();break;delay(1);

case 17: P2=0xfe;ll();break;delay(1);

case 18: P2=0xfe;oo();break;delay(1);

case 19: P2=0xfd;oo();break;delay(1);

case 20: P2=0xfb;oo();break;delay(1);

case 21: P2=0xf7;oo();break;delay(1);

case 22: P2=0xef;oo();break;delay(1);

case 23: P2=0xf7;oo();break;delay(1);

case 24: P2=0xfb;oo();break;delay(1);

case 25: P2=0xfd;oo();break;delay(1);

case 26: P2=0xfe;oo();break;delay(1);

case 27: P2=0xfe;vv();break;delay(1);

case 28: P2=0xfd;vv();break;delay(1);

case 29: P2=0xfb;vv();break;delay(1);

case 30: P2=0xf7;vv();break;delay(1);

case 31: P2=0xef;vv();break;delay(1);

case 32: P2=0xf7;vv();break;delay(1);

case 33: P2=0xfb;vv();break;delay(1);

case 34: P2=0xfd;vv();break;delay(1);

case 35: P2=0xfe;vv();break;delay(1);

case 36: P2=0xfe;ee();break;delay(1);

case 37: P2=0xfd;ee();break;delay(1);

case 38: P2=0xfb;ee();break;delay(1);

case 39: P2=0xf7;ee();break;delay(1);

case 40: P2=0xef;ee();break;delay(1);

case 41: P2=0xf7;ee();break;delay(1);

case 42: P2=0xfb;ee();break;delay(1);

case 43: P2=0xfd;ee();break;delay(1);

case 44: P2=0xfe;ee();break;delay(1);

case 45: P2=0xfe;yy();break;delay(1);

case 46: P2=0xfd;yy();break;delay(1);

case 47: P2=0xfb;yy();break;delay(1);

case 48: P2=0xf7;yy();break;delay(1);

case 49: P2=0xef;yy();break;delay(1);

case 50: P2=0xf7;yy();break;delay(1);

case 51: P2=0xfb;yy();break;delay(1);

case 52: P2=0xfd;yy();break;delay(1);

case 53: P2=0xfe;yy();break;delay(1);

case 54: P2=0xfe;oo();break;delay(1);

case 55: P2=0xfd;oo();break;delay(1);

case 56: P2=0xfb;oo();break;delay(1);

case 57: P2=0xf7;oo();break;delay(1);

case 58: P2=0xef;oo();break;delay(1);

case 59: P2=0xf7;oo();break;delay(1);

case 60: P2=0xfb;oo();break;delay(1);

case 61: P2=0xfd;oo();break;delay(1);

case 62: P2=0xfe;oo();break;delay(1);

case 63: P2=0xfe;uu();break;delay(1);

case 64: P2=0xfd;uu();break;delay(1);

case 65: P2=0xfb;uu();break;delay(1);

case 66: P2=0xf7;uu();break;delay(1);

case 67: P2=0xef;uu();break;delay(1);

case 68: P2=0xf7;uu();break;delay(1);

case 69: P2=0xfb;uu();break;delay(1);

case 70: P2=0xfd;uu();break;delay(1);

case 71: P2=0xfe;uu();break;delay(1);

}

void shui()

{

switch(t)

{

case 0: P0=0xff;d1=1;d2=0;P1=0x05;P2=0xfe;break;delay(1);

case 1: d1=1;d2=0;P1=0x05;P2=0xfd;break;delay(1);

case 2: d1=1;d2=0;P1=0x05;P2=0xfb;break;delay(1);

case 3: d1=1;d2=0;P1=0x05;P2=0xf7;break;delay(1);

case 4: d1=1;d2=0;P1=0x05;P2=0xef;break;delay(1);

case 5: d1=1;d2=0;P1=0x05;P2=0xf7;break;delay(1);

case 6: d1=1;d2=0;P1=0x05;P2=0xfb;break;delay(1);

case 7: d1=1;d2=0;P1=0x05;P2=0xfd;break;delay(1);

case 8: d1=1;d2=0;P1=0x05;P2=0xfe;break;delay(1);

case 9: d1=1;d2=0;P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfe;break;delay(1);

case 10: d1=1;d2=0;P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfd;break;delay(1);

case 11: d1=1;d2=0;P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfb;break;delay(1);

case 12: d1=1;d2=0;P1=0x03;delay(8);P1=0x05;delay(8);P2=0xf7;break;delay(1);

case 13: d1=1;d2=0;P1=0x03;delay(8);P1=0x05;delay(8);P2=0xef;break;delay(1);

case 14: d1=1;d2=0;P1=0x03;delay(8);P1=0x05;delay(8);P2=0xf7;break;delay(1);

case 15: d1=1;d2=0;P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfb;break;delay(1);

case 16: d1=1;d2=0;P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfd;break;delay(1);

case 17: d1=1;d2=0;P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfe;break;delay(1);

case 18: d1=1;d2=0;P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfe;break;delay(1);

case 19: d1=1;d2=0;P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfd;break;delay(1);

case 20: d1=1;d2=0;P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfb;break;delay(1);

case 21: d1=1;d2=0;P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xf7;break;delay(1);

case 22: d1=1;d2=0;P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xef;break;delay(1);

case 23: d1=1;d2=0;P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xf7;break;delay(1);

case 24: d1=1;d2=0;P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfb;break;delay(1);

case 25: d1=1;d2=0;P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfd;break;delay(1);

case 26: d1=1;d2=0;P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfe;break;delay(1);

case 27: d1=1;d2=0;P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfe;break;delay(1);

case 28: d1=1;d2=0;P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfd;break;delay(1);

case 29: d1=1;d2=0;P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfb;break;delay(1);

case 30: d1=1;d2=0;P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xf7;break;delay(1);

case 31: d1=1;d2=0;P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xef;break;delay(1);

case 32: d1=1;d2=0;P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xf7;break;delay(1);

case 33: d1=1;d2=0;P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfb;break;delay(1);

case 34: d1=1;d2=0;P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfd;break;delay(1);

case 35: d1=1;d2=0;P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfe;break;delay(1);

case 36: d1=1;d2=0;P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfe;break;delay(1);

case 37: d1=1;d2=0;P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfd;break;delay(1);

case 38: d1=1;d2=0;P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfb;break;delay(1);

case 39: d1=1;d2=0;P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xf7;break;delay(1);

case 40: d1=1;d2=0;P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xef;break;delay(1);

case 41: d1=1;d2=0;P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xf7;break;delay(1);

case 42: d1=1;d2=0;P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfb;break;delay(1);

case 43: d1=1;d2=0;P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfd;break;delay(1);

case 44: d1=1;d2=0;P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfe;break;delay(1);

case 45: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfe;break;delay(1);

case 46: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfd;break;delay(1);

case 47: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfb;break;delay(1);

case 48: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xf7;break;delay(1);

case 49: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xef;break;delay(1);

case 50: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xf7;break;delay(1);

case 51: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfb;break;delay(1);

case 52: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfd;break;delay(1);

case 53: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);P2=0xfe;break;delay(1);

case 54: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P2=0xfe;break;delay(1);

case 55: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P2=0xfd;break;delay(1);

case 56: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P2=0xfb;break;delay(1);

case 57: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P2=0xf7;break;delay(1);

case 58: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P2=0xef;break;delay(1);

case 59: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P2=0xf7;break;delay(1);

case 60: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P2=0xfb;break;delay(1);

case 61: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P2=0xfd;break;delay(1);

case 62: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P2=0xfe;break;delay(1);

case 63: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P2=0xfe;break;delay(1);

case 64: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P2=0xfd;break;delay(1);

case 65: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P2=0xfb;break;delay(1);

case 66: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P2=0xf7;break;delay(1);

case 67: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P2=0xef;break;delay(1);

case 68: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P2=0xf7;break;delay(1);

case 69: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P2=0xfb;break;delay(1);

case 70: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P2=0xfd;break;delay(1);

case 71: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P2=0xfe;break;delay(1);

case 72: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);P2=0xfe;break;delay(1);

case 73: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);P2=0xfd;break;delay(1);

case 74: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);P2=0xfb;break;delay(1);

case 75: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);;P2=0xf7;break;delay(1);

case 76: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);P2=0xef;break;delay(1);

case 77: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);P2=0xf7;break;delay(1);

case 78: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);P2=0xfb;break;delay(1);

case 79: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);P2=0xfd;break;delay(1);

case 80: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);P2=0xfe;break;delay(1);

case 81: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);P2=0xfe;break;delay(1);

case 82: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);P2=0xfd;break;delay(1);

case 83: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);P2=0xfb;break;delay(1);

case 84: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);P2=0xf7;break;delay(1);

case 85: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);P2=0xef;break;delay(1);

case 86: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);P2=0xf7;break;delay(1);

case 87: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);P2=0xf7;break;delay(1);

case 88: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);P2=0xfd;break;delay(1);

case 89: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);P2=0xfe;break;delay(1);

case 90: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);P2=0xfe;break;delay(1);

case 91: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);P2=0xfd;break;delay(1);

case 92: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);P2=0xfb;break;delay(1);

case 93: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);P2=0xf7;break;delay(1);

case 94: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);P2=0xef;break;delay(1);

case 95: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);P2=0xf7;break;delay(1);

case 96: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);P2=0xf7;break;delay(1);

case 97: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);P2=0xfd;break;delay(1);

case 98: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);P2=0xfe;break;delay(1);

case 99: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P2=0xfe;break;delay(1);

case 100: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P2=0xfd;break;delay(1);

case 101: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P2=0xfb;break;delay(1);

case 102: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P2=0xf7;break;delay(1);

case 103: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P2=0xef;break;delay(1);

case 104: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P2=0xf7;break;delay(1);

case 105: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P2=0xfb;break;delay(1);

case 106: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P2=0xfd;break;delay(1);

case 107: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P2=0xfe;break;delay(1);

case 108: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P1=0x00;delay(8);P2=0xfe;break;delay(1);

case 109: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P1=0x00;delay(8);P2=0xfd;break;delay(1);

case 110: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P1=0x00;delay(8);P2=0xfb;break;delay(1);

case 111: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P1=0x00;delay(8);P2=0xf7;break;delay(1);

case 112: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P1=0x00;delay(8);P2=0xef;break;delay(1);

case 113: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P1=0x00;delay(8);P2=0xf7;break;delay(1);

case 114: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P1=0x00;delay(8);P2=0xfb;break;delay(1);

case 115: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P1=0x00;delay(8);P2=0xfd;break;delay(1);

case 116: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);

d1=0;d2=1;P1=0x90;delay(8);P1=0xa0;delay(8);P1=0x40;delay(8);q3=0;delay(8);q2=0;delay(8);q1=0;delay(8);P1=0x00;delay(8);P2=0xfe;break;delay(1);

case 117: d1=1;d2=0;P1=0x0f;delay(8);P1=0x0b;delay(8);P1=0x0a;delay(8);P1=0x09;delay(8);P1=0x03;delay(8);P1=0x05;delay(8);