3d8光立方源代码
#include<reg52.h>
#define uchar unsigned char
uchar t,i,k,a,s;
sbit d1=P0^4;
sbit d2=P0^6;
sbit q0=P0^0;
sbit q1=P0^1;
sbit q2=P0^2;
sbit q3=P0^3;
sbit 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);
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);P1=0xe0;delay(8);
P2=0xfe;break;delay(1);
case 118: 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);P1=0xe0;delay(8);
P2=0xfd;break;delay(1);
case 119: 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);P1=0xe0;delay(8);
P2=0xfb;break;delay(1);
case 120: 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);P1=0xe0;delay(8);
P2=0xf7;break;delay(1);
case 121: 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);P1=0xe0;delay(8);
P2=0xef;break;delay(1);
case 122: 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);P1=0xe0;delay(8);
P2=0xff;break;delay(1);
case 123: 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);P1=0xe0;delay(8);
P2=0xef;break;delay(1);
case 124: 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);P1=0xe0;delay(8);
P2=0xff;break;delay(1);
case 125: 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);P1=0xe0;delay(8);
P2=0xef;break;delay(1);
case 126: 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);P1=0xe0;delay(8);
P2=0xff;break;delay(1);
case 127: 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);P1=0xe0;delay(8);
P2=0xef;break;delay(1);
case 128: 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);P1=0xe0;delay(8);
P2=0xff;break;delay(1);
case 129: 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);P1=0xe0;delay(8);
P2=0xef;break;delay(1);
}
}
void main()
{
TMOD=0x01;EA=1;ET0=1;TR0=1;
TH0=(65533-50000)/256;
TL0=(65533-50000)%256;
t=0;i=0;
while(1)
{
//shui();
switch(k)
{
case 0: a=8;shanxin();break;delay(1);
case 1: a=27;bayiqi();break;delay(1);
case 2: a=72;iloveyou();break;delay(1);
case 3: a=36;yisanyisi();break;delay(1);
case 4: a=27;qierjiu();break;delay(1);
case 5: a=130;shui();break;delay(1);
}
}
}
void Timer0() interrupt 1
{
i++;//t++;
if(i==2)
{
i=0;t++;
}
if(t==a)
t=0;
if(key==0)
{
delay(100);
if(key==0)
{
t=0;
k++;
if(k==6)
k=0;
}
while(！key);
}
}
好啊
只是编译不能通过啊，小编，
多谢小编，好好学习一下
哥来 你也顺便给个原理图，也知道你接的是什么啊
下来看看
淡定不了了
没有原理图，只能用来做参考了.谢谢
没有原理图，只能用来做参考了.谢谢
没有相关原理啊
好东西 谢谢啊
很好很好
没硬件啊
好家伙！那长一段啊！
小编辛苦了，谢谢。
哎呀呀这程序真是太吓人了
好长啊！
没有相关原理啊
可以给原理图吗?
就是没有注释啊