標題: 52單片機k1 k2 控制52單片機燈 hex+keilc語言程序 [打印本頁]

作者: 啊洲呀    時間: 2021-1-31 19:03
標題: 52單片機k1 k2 控制52單片機燈 hex+keilc語言程序
k1 k2 控制52單片機燈

單片機源程序如下:
  1. #include<reg52.h>
  2. #include<intrins.h>

  3. #define uchar unsigned char//數(shù)據(jù)定義類型
  4. #define uint unsigned int

  5. #define LED P0
  6. sbit K1=P1^0;
  7. sbit K2=P1^1;
  8. void delayms(uchar ms);

  9. void main(void)
  10. {
  11.          LED=0xfe; //讓最后一個燈亮
  12.          while(1)
  13.          {
  14.            if(K1==0)
  15.            { delayms(10);//延時消抖
  16.            if(K1==0)
  17.            {while(K1==0);        //松開才跳出循環(huán)
  18.            LED = _cror_(LED,1);          //右移一位
  19.            }
  20.            }
  21.           
  22.            if(K2==0)
  23.            { delayms(10);//延時消抖
  24.            if(K2==0)
  25.            {while(K2==0);        //松開才跳出循環(huán)
  26.            LED = _crol_(LED,1);          //左移一位
  27.           
  28.            }
  29.            }
  30.          }       
  31. }
  32. void delayms(uchar ms)//延時子程序
  33. {
  34.           uchar i;
  35.           while(ms--)
  36.           {
  37.              for(i=0;i<120;i++);
  38.                 }
  39. }
復(fù)制代碼

所有資料51hei提供下載:
K1K2控制.rar (74.67 KB, 下載次數(shù): 8)





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