您好,歡迎訪問貴州眾熠電子科技有限公司官網!
17385464037
18798802230
貴州眾熠電子科技有限公司
您的位置: 首頁>>新聞中心>>解決方案
聯系我們

貴州眾熠電子科技有限公司

地址:貴州省貴陽市烏當區高新路205號
電話:17385464037

咨詢熱線 18798802230

警示燈爆閃燈源程序

發布時間:2023-02-05 人氣: 72

#include "pic.h"

__CONFIG(034);

#define INT8U  unsigned char

#define INT16U unsigned int


const INT8U LEDCODE0[]={0xed,0xed,0xed,0xed,0xed,0xed,0xde,0xde,0xde,0xde,0xde,0xde,};

const INT8U LEDCODE1[]={0xcc,0xcc,0xcc,0xcc,0xcc,0xcc,};


void MCU_Init(void);

void Display(void);

void LED_Delay(INT16U j);

 


void main()

{

MCU_Init();

while(1)

{

Display();

}

}


void MCU_Init() 

{

TRISIO=0x00;

GPIO=0x00;

ANSEL=0x00;

    WPU=0x00;

    IOC=0x00;

    

}



void Display()

{

INT8U i,k;

   for(k=0;k<3;k++)

{

for(i=0;i<sizeof(LEDCODE0);i++)

{


GPIO=LEDCODE0[i];

        LED_Delay(60);

GPIO=0xff;

LED_Delay(50);

}

}

    for(k=0;k<3;k++)

{

   for(i=0;i<sizeof(LEDCODE1);i++)

{

GPIO=LEDCODE1[i];

        LED_Delay(60);

GPIO=0xff;

LED_Delay(50);

}

}


}


void LED_Delay(INT16U j)

{

 INT16U a,b;

 for(a=j;a>0;a--)

 for(b=70;b>0;b--);

}


推薦資訊

?
18798802230
久久精品国产免费久久-精品国产成人网站一区二区波多-欧美日韩日逼视频-在线无码自慰亚洲高清