標(biāo)題: 單片機(jī)心形燈仿真源碼，四五種效果 [打印本頁(yè)]
作者: yin...    時(shí)間: 2018-10-14 14:44
標(biāo)題: 單片機(jī)心形燈仿真源碼，四五種效果
心形燈，四五種效果仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）



#include <REG52.H>    //包含51頭文件
#include <intrins.h> //使用左移右移頭文件
#define uint unsigned int
#define uchar unsigned char //宏定義

void delay_ms(uint x)    //毫秒級(jí)延時(shí)函數(shù)
{
    uint y;
    for(;x>0;x--)
    for(y=110;y>0;y--);   
}

void main()    //主函數(shù)
{
    uchar i,aa;
    uint k;
    while(1)
    {
//-------------順時(shí)針流動(dòng)2次------------//   
        for(k=0;k<2;k++)   
        {
            aa=0xFE;
            for(i=0;i<8;i++)
            {
                P0=aa;
                aa=_crol_(aa,1); //crol是左移
                delay_ms(100);
            }
            P0=0xFF;
            aa=0xFE;
            for(i=0;i<8;i++)
            {
                P2=aa;
                aa=_crol_(aa,1);
                delay_ms(100);
            }
            P2=0xFF;
            aa=0xFE;
            for(i=0;i<8;i++)
            {
                P3=aa;
                aa=_crol_(aa,1);
                delay_ms(100);
            }
            P3=0xFF;
            aa=0xFE;
            for(i=0;i<8;i++)
            {
                P1=aa;
                aa=_crol_(aa,1);
                delay_ms(100);
            }
            aa=P1=0xFF;
        }
        P0=~0x00;
        P1=~0x00;
        P2=~0x00;
        P3=~0x00; //與P3=0xFF;相同
        delay_ms(500);
   
    //----------------逆時(shí)針流動(dòng)2次--------------//
        for(k=0;k<2;k++)   
        {
            for(i=0;i<8;i++)
            {
                P1=~(0x80>>i);
                delay_ms(100);
            }
            P1=0xFF;
            for(i=0;i<8;i++)
            {
                P3=~(0x80>>i);
                delay_ms(100);
            }
            P3=0xFF;
            for(i=0;i<8;i++)
            {
                P2=~(0x80>>i);
                delay_ms(100);
            }
            P2=0xFF;
            for(i=0;i<8;i++)
            {
                P0=~(0x80>>i);
                delay_ms(100);
            }
            P0=0xFF;
        }
        P0=~0x00;
        P1=~0x00;
        P2=~0x00;
        P3=~0x00;
        delay_ms(500);
   
    //---------------------上到下畫愛心--------------//   
        for(k=0;k<2;k++)
        {
            for(i=0;i<8;i++)
            {
                P0=~(0x01<<i);
                P1=~(0x80>>i);
                delay_ms(100);
            }
            P1=0xFF;
            P0=0xFF;
            for(i=0;i<8;i++)
            {
                P2=~(0x01<<i);
                P3=~(0x80>>i);
                delay_ms(100);
            }
            P3=0xFF;
            P2=0xFF;   
        }
        P0=~0x00;
        P1=~0x00;
        P2=~0x00;
        P3=~0x00;
        delay_ms(500);
   
    //----------------下到上畫愛心---------------//
        for(k=0;k<2;k++)     
        {
            for(i=0;i<8;i++)
            {
                P3=~(0x01<<i);
                P2=~(0x80>>i);
                delay_ms(100);
            }
            P2=0xFF;
            P3=0xFF;
            for(i=0;i<8;i++)
            {
                P1=~(0x01<<i);
                P0=~(0x80>>i);
                delay_ms(100);
            }
            P1=0xFF;
            P0=0xFF;   
        }   
        P0=~0x00;
        P1=~0x00;
        P2=~0x00;
        P3=~0x00;
        delay_ms(500);

//-----------------循環(huán)5次閃爍---------------//
        for(k=0;k<5;k++)
        {
            P0=0x00;
            P1=0x00;
            P2=0x00;
            P3=0x00;
            delay_ms(500);
            P0=~0x00;
            P1=~0x00;
            P2=~0x00;
            P3=~0x00;    //與P3=0xFF一樣
            delay_ms(500);
        }
    }
}

心形燈.zip

77.89 KB, 下載次數(shù): 45, 下載積分: 黑幣 -5





歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1