找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 6777|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

51單片機步進電機控制源程序

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:625113 發(fā)表于 2019-11-23 22:04 | 只看該作者 |只看大圖 回帖獎勵 |倒序瀏覽 |閱讀模式


單片機源程序如下:
  1. #include<reg52.h>
  2. sbit KEY0=P0^0;
  3. sbit KEY1=P0^1;
  4. sbit KEY2=P0^2;
  5. sbit KEY3=P0^3;
  6. sbit KEY4=P0^4;
  7. unsigned char a[]={0x01,0x02,0x04,0x08};
  8. unsigned char b[]={0x08,0x04,0x02,0x01};
  9. unsigned char c[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8}; //共陽數(shù)碼管

  11. unsigned char i,s=0,f=0;
  12. unsigned char k=200;
  13. unsigned char l=4;

  15. void delay(unsigned int t)
  16. {
  17.         unsigned char j,b;
  18.         b=t;
  19.         while(b--)
  20.         {
  21.                 for (j=0;j<125;j++);
  22.         }
  23. }


  26. void key()
  27. {P0=0x1f;
  28.         if(P0!=0x1f)
  29.         {
  30.                 delay(30);
  31.                 if(P0!=0x1f)
  32.                 {delay(30);
  33.                 if(KEY0==0){s=1;}
  34.                 if(KEY1==0){f=1;}
  35.         if(KEY4==0){s=0;f=0;}
  36.             if(KEY2==0)
  37.                 {if(l>1)l--;}
  38.                 if(KEY3==0)
  39.                   {if(l<7)l++;}
  40.            }
  41.         }
  42. }


  45. void speed()
  46.          
  47.          {
  48.          switch(l)
  49.                         {   case 7:k=50;P1=c[l];break;
  50.                                 case 6:k=100;P1=c[l];break;
  51.                                 case 5:k=150;P1=c[l];break;
  52.                                 case 4:k=200;P1=c[l];break;
  53.                                 case 3:k=250;P1=c[l];break;
  54.                                 case 2:k=300;P1=c[l];break;
  55.                                 case 1:k=350;P1=c[l];break;
  56.                         }
  57.         }

  59. void main()
  60. {
  61.         while(1)
  62.    {
  63.         key();
  64.         while(s>0)
  65.           {speed();
  66.                         for(i=0;i<4;i++)
  67.                                 {
  68.                                         P2=b[i];
  69.                                         delay(k);
  70.                                         key();
  71.                                 }
  72.                                 delay(100);
  73.                                 key();
  74.           }
  75.          while(f>0)
  76.          {
  77.         speed();
  78.                         for(i=0;i<4;i++)
  79.                                 {
  80.                                         P2=a[i];
  81.                                         delay(k);
  82.                                         key();
  83.                                 }
  84.                                 delay(100);
  85.                                 key();               
  86.           }
  87.   }
  88. }
復(fù)制代碼

所有資料51hei提供下載:
步進電機.zip (43.11 KB, 下載次數(shù): 85)

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏5 分享淘帖 頂頂 踩踩
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

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

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

快速回復(fù) 返回頂部 返回列表