单片机心形灯程序

1、#include#define uchar unsigned charuchar flag=200;/uchar code tab1=0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f,0xff;/ uchar code tab2=0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe,0xff;/ uchar code tab3=0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80,0x00;/ uchar code tab4=0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01,0x00

2、;/ uchar code tab5=0x00,0x80,0xc0,0xe0,0xf0,0xf8,0xfc,0xfe,0xff;uchar code tab6=0x00,0x01,0x03,0x07,0x0f,0x1f,0x3f,0x7f,0xff;uchar code tab7=0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe;uchar code tab8=0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f;uchar code tab11=0xfe,0xfc,0xf8,0xf0,0xe0,0xc0,0x80,0x00,0xff;/

3、 uchar code tab22=0x7f,0x3f,0x1f,0x0f,0x07,0x03,0x01,0x00,0xff;uchar code tab33=0x80,0xc0,0xe0,0xf0,0xf8,0xfc,0xfe,0xff;uchar code tab44=0x01,0x03,0x07,0x0f,0x1f,0x3f,0x7f,0xff;uchar code tab55=0x80,0xc0,0xe0,0xf0,0xf8,0xfc,0xfe,0xff,0xff;/p1/uchar code tabp1=0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe,

4、0xff;/ uchar code tabp2=0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f,0xff;/ uchar code tabp3=0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01,0x00;/ uchar code tabp4=0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80,0x00;/ uchar code tabp5=0x00,0x01,0x03,0x07,0x0f,0x1f,0x3f,0x7f,0xff;/ uchar code tabp6=0x00,0x80,0xc0,0xe0,

5、0xf0,0xf8,0xfc,0xfe,0xff;uchar code tabp7=0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f;uchar code tabp8=0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe;uchar code tabp11=0x7f,0x3f,0x1f,0x0f,0x07,0x03,0x01,0x00,0xff;uchar code tabp22=0xfe,0xfc,0xf8,0xf0,0xe0,0xc0,0x80,0x00,0xff;uchar code tabp33=0x01,0x03,0x07,0x

6、0f,0x1f,0x3f,0x7f,0xff;uchar code tabp44=0x80,0xc0,0xe0,0xf0,0xf8,0xfc,0xfe,0xff;uchar code tabp55=0x01,0x03,0x07,0x0f,0x1f,0x3f,0x7f,0xff,0xff;/void shansuo();void xl();/void delay(void)unsigned char m,n;for(m=0;mflag;m+)for(n=0;n250;n+);/void hy1(void) /90unsigned char i;for(i=0;i8;i+)p0=tab11i;p1

7、=tabp22i;p2=tab11i;p3=tab22i;delay();for(i=0;i0;flag=flag-50)p0=0xff;p1=0xff;p2=0xff;p3=0xff;for(i=0;i8;i+)p0=tab11i;delay();for(i=0;i8;i+)p2=tab11i;delay();for(i=0;i8;i+)p3=tab22i;delay();for(i=0;i8;i+)p1=tabp22i;delay();flag=250;/void hy3(void) /360unsigned char i;flag=50;p0=0x00;p1=0x00;p2=0x00;p

8、3=0x00;for(i=0;i8;i+)p0=tab44i;delay();for(i=0;i8;i+)p2=tab44i;delay();for(i=0;i8;i+)p3=tab33i;delay();for(i=0;i8;i+)p1=tabp33i;delay();flag=150;/void hy4(void) /90unsigned char i;for(i=0;i8;i+)p1=tabp11i;p0=tab22i;p3=tab11i;p2=tab22i;delay();for(i=0;i9;i+)p1=tabp6i;p0=tab5i;p3=tab6i;p2=tab5i;delay(

9、);/void hy2_1(void) /90unsigned char i;flag=200;p0=0xff;p1=0xff;p2=0xff;p3=0xff;for(i=0;i9;i+)p0=tab11i;delay();flag=110;for(i=0;i9;i+)p2=tab11i;delay();flag=80;for(i=0;i9;i+)p3=tab22i;delay();flag=80;for(i=0;i9;i+)p1=tabp22i;delay();/void hy2_2(void) /180unsigned char i;p0=0xff;p1=0xff;p2=0xff;p3=0

10、xff;for(i=0;i8;i+)p0=tab11i;delay();for(i=0;i8;i+)p2=tab11i;delay();p0=0xff;p2=0xff;for(i=0;i8;i+)p3=tab22i;delay();for(i=0;i8;i+)p1=tabp22i;delay();p1=0xff;p3=0xff;/void hy2_3(void) /180unsigned char i;p0=0xff;p1=0xff;p2=0xff;p3=0xff;for(i=0;i8;i+)p0=tab11i;p1=tabp11i;delay();for(i=0;i8;i+)p2=tab11

11、i;p3=tab11i;delay();/flag=100;for(i=0;i8;i+)p2=tab33i;p3=tab33i;delay();for(i=0;i8;i+)p0=tab33i;p1=tabp33i;delay();flag=200;/void hy2_4(void) /360unsigned char i;p0=0xff;p1=0xff;p2=0xff;p3=0xff;for(i=0;i8;i+)p0=tab11i;p3=tab22i;delay();for(i=0;i8;i+)p2=tab11i;p1=tabp22i;delay();/flag=100;for(i=0;i8;

12、i+)p0=tab44i;p3=tab5i;delay();for(i=0;i8;i+)p2=tab44i;p1=tabp5i;delay();flag=200;/void hy5(void) /unsigned char i;for(i=0;i8;i+)p0=tab8i;p1=tabp8i;delay();p0=0xff;p1=0xff;for(i=0;i8;i+)p2=tab8i;p3=tab8i;delay();p2=0xff;p3=0xff;for(i=0;i8;i+)p2=tab7i;p3=tab7i;delay();p2=0xff;p3=0xff;for(i=0;i8;i+)p0=

13、tab7i;p1=tabp7i;delay();p0=0xff;p1=0xff;/void jr(void)/unsigned char i;for(i=0;i9;i+) /8p0=tab1i;p1=tabp1i;p2=tab2i;p3=tab2i;delay();for(i=0;i9;i+)p0=tab2i;p1=tabp2i;p2=tab1i;p3=tab1i;delay();/for(i=0;i9;i+)p0=tab1i;p1=tabp1i;p2=tab2i;p3=tab2i;delay();for(i=0;i9;i+)p0=tab2i;p1=tabp2i;p2=tab1i;p3=tab

14、1i;delay();xl(); /xl(); /for(i=0;i9;i+)p0=tab3i; p1=tabp3i;p2=tab4i; p3=tab4i;delay();for(i=0;i9;i+)p0=tab4i;p1=tabp4i;p2=tab3i;p3=tab4i;delay();/for(i=0;i9;i+)p0=tab1i;p1=tabp1i;p2=tab2i; p3=tab2i;delay();for(i=0;i9;i+)p0=tab4i;p1=tabp4i;p2=tab3i;p3=tab3i;delay();/for(i=0;i9;i+)p0=tab3i; p1=tabp3i;

15、p2=tab4i;p3=tab4i;delay();for(i=0;i9;i+)p0=tab2i;p1=tabp2i;p2=tab1i;p3=tab1i;delay();/void azzy(void) /unsigned char i;flag=200;for(i=0;i8;i+)p2=0xff;p3=0xff;p1=tabp1i;p0=tab1i;delay();for(i=0;i9;i+)p1=0xff;p0=0xff;p2=tab1i;p3=tab1i;delay();/void azyy(void) /youunsigned char i;for(i=0;i8;i+)p0=0xff;

16、p1=0xff;p2=tab2i;p3=tab2i;delay();for(i=0;i9;i+)p0=tab2i;p1=tabp2i;delay();/void led_flow1(void)unsigned char i;for(i=0;i9;i+)p2=0;p3=0;p1=tabp3i;p0=tab3i;delay();for(i=0;i9;i+)p2=tab3i;p3=tab3i;delay();/void lzyy(void) /unsigned char i;for(i=0;i9;i+)p0=0x00;p1=0x00;p2=tab4i;p3=tab4i;delay();for(i=0

17、;i9;i+)p0=tab4i;p1=tabp4i;delay();/void shansuo(void)/uchar i;for(i=0;i3;i+)p0=0xff;p1=0xff;p2=0xff;p3=0xff;delay();delay();p0=0x00;p1=0x00;p2=0x00;p3=0x00;delay();delay();void xl(void)/uchar i;for(i=0;i3;i+)p0=0xaa;p1=0x55;p2=0xaa;p3=0xaa;delay();delay();p0=0x55;p1=0xaa;p2=0x55;p3=0x55;delay();dela

18、y();/void sxb(void)/unsigned char i;p0=0xff;p1=0xff;p2=0x00;p3=0x00;delay();delay();delay();delay();for(i=0;i8;i+)p0=tab11i;p1=tabp11i;delay();for(i=0;i8;i+)p0=tab11i;p1=tabp11i;delay();for(i=0;i8;i+)p0=tab11i;p1=tabp11i;delay();for(i=0;i3;i+)p0=0x00;p1=0x00;delay();delay();p0=0xff;p1=0xff;delay();d

19、elay();p0=0x00;p1=0x00;p2=0xff;p3=0xff;delay();delay();delay();delay();for(i=0;i8;i+)p2=tab11i;p3=tab11i;delay();for(i=0;i8;i+)p2=tab11i;p3=tab11i;delay();for(i=0;i8;i+)p2=tab11i;p3=tab11i;delay();for(i=0;i3;i+)p2=0x00;p3=0x00;delay();delay();p2=0xff;p3=0xff;delay();delay();/void jc(void)/uchar i;for(i=0;i0;flag=flag-10)for(i=0;i8;i+)p2=0xff;p3=0xff;p1=tabp1i;p0=tab1i;delay();for(i=0;i9;i+)p1=0xff;p0=0xff;p2=tab1i;p3=tab1i;delay();flag=10;for(i1=0;i130;i1+)for(i=0;i8;i+)p2=0xff;p3=0xff;p1=tabp1i;p0=tab1i;delay();for(i=0;i9;i+)p1=0xff;p0=0xff;p2=tab1i;p3=tab1i;delay();