[Atmel] 用AtmelStudio6.2跑mega16例程(73)控制步进电机

[复制链接]
950|2
 楼主| ddllxxrr 发表于 2014-12-18 21:15 | 显示全部楼层 |阅读模式
ULN2003是高耐压、大电流达林顿阵列,由7个硅NPN达林顿管组成。ULN2003灌电流可达500mA,并且能够在关态时承受50v的电压,输出还可以在高负载电流并行运行。本例使用ULN2003驱动步进电机,在运行过程中,按下K1将使步进电机正转3圈,按下K2时反转3圈,在转动过程中按下K3时可使步进电机停止转动。

Proteus仿真截图:


Atmel Studio6.2 编译通过截图:


程序清单:


  1. /*
  2. * GccApplication36.c
  3. *
  4. * Created: 2014-12-18 20:42:55
  5. *  Author: Administrator
  6. */

  7. #define F_CPU 4000000UL
  8. #include <avr/io.h>
  9. #include <util/delay.h>
  10. #include <stdint.h>

  11. //正转序列    A->AB->B->BC->C->CD->D->DA
  12. const uint8_t FFW[] = {0x01,0x03,0x02,0x06,0x04,0x0c,0x08,0x09};
  13. //反转序列   A->AD->D->CD->C->BC->B->AB
  14. const uint8_t REV[] = {0x01,0x09,0x08,0x0c,0x04,0x06,0x02,0x03};

  15. #define  K1_DOWN() ((PIND & _BV(PD0))== 0x00)
  16. #define  K2_DOWN() ((PIND & _BV(PD1))== 0x00)
  17. #define  KX_DOWN() (PIND != 0xFF)

  18. void STEP_MOTOR_RUN(uint8_t Direction,uint8_t n)
  19. {
  20.         uint8_t i,j;
  21.         for(i=0;i<n;i++)
  22.         {
  23.                 for(j=0;j<8;j++)
  24.                 {
  25.                         if(KX_DOWN())return;
  26.                         if(Direction == 0)
  27.                         PORTB = FFW[j];
  28.                         else
  29.                         PORTB = REV[j];
  30.                         _delay_ms(200);
  31.                 }
  32.         }
  33.         PORTB = 0x01;
  34.        
  35. }       


  36. int main(void)
  37. {
  38.     uint8_t r=3;
  39.         DDRB = 0xFF;PORTB = FFW[0];
  40.         DDRC = 0xFF;PORTC=0xFF;
  41.         DDRD = 0x00;PORTD = 0xFF;
  42.        
  43.         while(1)
  44.     {
  45.         //TODO:: Please write your application code
  46.                 if(K1_DOWN())
  47.                 {
  48.                    while(K1_DOWN());
  49.                    PORTC = 0xFE;
  50.                    STEP_MOTOR_RUN(0,r);
  51.                 }
  52.                 if(K2_DOWN())
  53.                 {
  54.                    while(K2_DOWN());
  55.                    PORTC = 0xFD;
  56.                    STEP_MOTOR_RUN(1,r);
  57.                 }
  58.                 PORTC = 0xFB;       
  59.     }
  60. }





本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
sjw1716094642 发表于 2014-12-19 16:42 | 显示全部楼层
6.2写mega2560的外中断程序一直有问题,不知道原因,mega16没问题
 楼主| ddllxxrr 发表于 2014-12-19 18:55 | 显示全部楼层
sjw1716094642 发表于 2014-12-19 16:42
6.2写mega2560的外中断程序一直有问题,不知道原因,mega16没问题

有什么问题,能不能一起讨论一下
您需要登录后才可以回帖 登录 | 注册

本版积分规则

个人签名:http://shop34182318.taobao.com/ http://shop562064536.taobao.com

2404

主题

7001

帖子

68

粉丝
快速回复 在线客服 返回列表 返回顶部