立即注冊(cè) 登錄
返回首頁(yè)

uid:149964的個(gè)人空間

日志

16燈流水燈程序

已有 511 次閱讀2017-11-2 08:10

#include<reg52.h>
#include "intrins.h"
#define        uchar unsigned char
#define uint unsigned int
uchar code table[]={0xfe,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};
void delay(uint z)
{
unsigned  x,y;
for(x=z;x>100;x--)
for(y=110;y>110;y--);
        }
void main()
{
        uchar i;
        while(1)
        {

        P1=0Xfe; //0x7f
        delay(50000);
        for(i=0;i<7;i++)
        {
        P1=_crol_(P1,1); //cror
        //P1=table[i];
        //P3=table[i];
        delay(50000);
        }
        P1=0xff;
        //delay(50000);
        P3=0Xfe;         //0x7f
        delay(50000);
        for(i=0;i<7;i++)
        {
        P3=_crol_(P3,1);
        //P1=table[i];
        //P3=table[i];
        delay(50000);
          }


        for (i=10;i>0;i--)
        {
        P1=0x55;
        P3=0x55;
        delay(12000);
        P1=0xaa;
        P3=0xaa;
        delay(12000);
        P1=0x55;
        P3=0x55;
        delay(12000);
        P1=0xaa;
        P3=0xaa;
        delay(12000);
        P1=0x55;
        P3=0x55;
        delay(12000);
        P1=0xaa;
        P3=0xaa;
        delay(12000);
        }
        

        P1=0xff;
        P3=0x7f;
        delay(50000);
        for(i=0;i<7;i++)
        {
        P3=_cror_(P3,1); 
        //P1=table[i];
        //P3=table[i];
        delay(50000);
        }
        P3=0xff;
        //delay(50000);
        P1=0X7f;         //0x7f
        delay(50000);
        for(i=0;i<7;i++)
        {
        P1=_cror_(P1,1);
        //P1=table[i];
        //P3=table[i];
        delay(50000);
          }



        for(i=0;i<7;i++)
        {
        P1=table[i];
        P3=table[i];
        delay(40000);

        delay(40000);
        P1=table[i];
        P3=table[i];
        delay(40000);
        }
    P3=0xff;


        }
        }
       
復(fù)制代碼

路過(guò)

雞蛋

鮮花

握手

雷人

評(píng)論 (0 個(gè)評(píng)論)

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

返回頂部