欢迎来到天天文库
浏览记录
ID:40794736
大小:34.50 KB
页数:5页
时间:2019-08-07
《单片机控制步进马达单双八拍1》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、/**************************************************************************************标题:步进电机试验一****通过本例程了解步进马达使用及驱动程序编写**;单双八拍工作方式:**;A-AB-B-BC-C-CD-D-DA(即一个脉冲,转3.75度)****请学员一定要消化掉本例程***********************************************************************************
2、*****/#include"reg52.h"//MotorsbitF1=P1^0;sbitF2=P1^1;sbitF3=P1^2;sbitF4=P1^3;/////////////////////////////////////////步进电机驱动unsignedcharMotorStep=0;unsignedintMotorTimer=0;unsignedintMotorDelay,Speed=1,TIM,CT;/******************************************************初始化
3、马达*******************************************************/voidInitMotor(){F1=1;F2=1;F3=1;F4=1;}voidSetMotor(){//if(Speed==0)return;MotorDelay=Speed;switch(MotorStep){case0:if(TIM)//A{F1=0;//0xf1F2=1;F3=1;F4=1;MotorStep=1;TIM=0;}break;case1://ABif(TIM){F1=0;//0xf3F2=0;
4、F3=1;F4=1;MotorStep=2;TIM=0;}break;case2://Bif(TIM){F1=1;F2=0;//0xf2F3=1;F4=1;MotorStep=3;TIM=0;}break;case3://BCif(TIM){F1=1;F2=0;//0xf6F3=0;F4=1;MotorStep=4;TIM=0;}break;case4://Cif(TIM){F1=1;F2=1;//0xf4F3=0;F4=1;MotorStep=5;TIM=0;}break;case5://CDif(TIM){F1=1;F2=1;
5、//0xfcF3=0;F4=0;MotorStep=6;TIM=0;}break;case6://Dif(TIM){F1=1;F2=1;//0xf8F3=1;F4=0;MotorStep=7;TIM=0;}break;case7://DAif(TIM){F1=0;F2=1;//0xf9F3=1;F4=0;MotorStep=0;TIM=0;}break;}}voidsystem_Ini(){TMOD
6、=0x11;TH0=0xDC;//11.0592MTL0=0x00;IE=0x8A;TR0=1;}main(){system_Ini
7、();InitMotor();while(1){SetMotor();}}/***************************************************定时中断延时*************************************************/voidTzd(void)interrupt1{TH0=0xfe;//11.0592TL0=0x33;if(CT++==10){TIM=1;CT=0;}}
此文档下载收益归作者所有