新聞中心

        EEPW首頁 > 嵌入式系統 > 設計應用 > LED流星雨C51程序

        LED流星雨C51程序

        作者: 時間:2016-11-29 來源:網絡 收藏
        P1口上接8個led燈可以實現流星雨效果,測試成功.

        #include
        #define uchar unsigned char
        #define led P1
        bit flag=0;
        uchar code lshift[3]={0x07,0x03,0x01};
        uchar code shift[7]={0x80,0xc0,0xe0,0xf0,0xf8,0xfc,0xfe};
        //imitate PWM data
        uchar code sta0[100]={ 0x0f,0x8f,0x8f,0x8f,0x8f,0x8f,0x8f,0x8f,0x8f,0x8f,
        0xcf,0xcf,0xcf,0xcf,0xcf,0xcf,0xcf,0xcf,0xcf,0xcf,
        0xcf,0xcf,0xcf,0xcf,0xcf,0xcf,0xcf,0xcf,0xcf,0xcf,
        0xcf,0xcf,0xcf,0xef,0xef,0xef,0xef,0xef,0xef,0xef,
        0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,
        0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,
        0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,
        0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,
        0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,
        0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef,0xef
        };
        //functions statement
        void delay(uchar ms);
        uchar exchg(uchar dat);
        //main function
        void main()
        {
        uchar i,j,k,x,sdata;
        while(1)
        {
        for(k=1;k<8;k++)
        for(i=0;i<22;i++)
        for(j=0;j<100;j++)
        {
        sdata=(sta0[j]>>k)|shift[k-1];
        if(flag==1) led=exchg(sdata);
        else led=sdata;
        }
        for(x=1;x<4;x++)
        for(i=0;i<22;i++)
        for(j=0;j<100;j++)
        {
        sdata=( sta0[j]<<(4-x) )|lshift[x-1];
        if(flag==1) led=exchg(sdata);
        else led=sdata;
        }


        }
        }
        void delay(uchar ms)
        {
        uchar n;
        while(ms--)
        {
        for(n=125;n>0;n--);
        }
        }
        uchar exchg(uchar dat) //對字節的高位和低位進行互換!
        {
        uchar temp;
        temp=
        ((dat&0x01)<<7)|
        ((dat&0x02)<<5)|
        ((dat&0x04)<<3)|
        ((dat&0x08)<<1)|
        ((dat&0x10)>>1)|
        ((dat&0x20)>>3)|
        ((dat&0x40)>>5)|
        ((dat&0x80)>>7);
        return temp;
        }

        本文引用地址:http://www.104case.com/article/201611/323367.htm


        關鍵詞: LED流星雨C51程

        評論


        技術專區

        關閉
        主站蜘蛛池模板: 阿拉尔市| 肥东县| 阿城市| 上蔡县| 驻马店市| 庆安县| 闸北区| 崇左市| 玉环县| 鱼台县| 突泉县| 于都县| 鄄城县| 炎陵县| 江川县| 麻江县| 唐山市| 丰县| 金平| 黎城县| 台北市| 扶风县| 梁平县| 常州市| 深泽县| 安仁县| 乌拉特后旗| 蓝山县| 新巴尔虎右旗| 东光县| 东方市| 桐乡市| 沙田区| 南澳县| 屏东县| 潞城市| 太仆寺旗| 渑池县| 南召县| 石阡县| 宁蒗|