- 8
- 0
- 约1.51千字
- 约 2页
- 2019-10-15 发布于江西
- 举报
// 实验二十三 步进电机控制
#include reg51.h
#define Astep 0x01
#define Bstep 0x02
#define Cstep 0x04
#define Dstep 0x08
unsigned char dly_c;
void delay()
{
unsigned char tt,cc;
cc = dly_c;
tt = 0x0;
do{
do {
}while(--tt);
}while(--cc);
}
void main()
{
unsigned char state=1,count=0;
int n=0;
dly_c = 170;
// 双四拍工作方式
while(n++!=100) // 步计数器100步
{
P1 = Astep+Bstep;
delay();
P1 = Bstep+Cstep;
delay();
P1 = Cstep+Dstep;
delay();
P1 = Dstep+Astep;
delay();
if(dly_c20state==1)
dly_c-=6;
if(dly_c==20count25)
{
state=2;
count++;
}
if(state==2count==25)
{
state=3;
count=0;
}
if(state==3dly_c170)
dly_c+=6;
if(state==3dly_c==170)
state=1;
}
//delay();
// 单四拍工作方式
while(n--!=0)
{ P1 = Dstep+Astep;
P1=P1|0x80;
delay();
P1 = Cstep+Dstep;
P1=P1|0x80;
delay();
P1 = Bstep+Cstep;
P1=P1|0x80;
delay();
P1 = Astep+Bstep;
P1=P1|0x80;
delay();
if(dly_c20state==1)
dly_c-=6;
if(dly_c==20count25)
{
state=2;
count++;
}
if(state==2count==25)
{
state=3;
count=0;
}
if(state==3dly_c170)
dly_c+=6;
if(state==3dly_c==170)
state=1;
}
}
您可能关注的文档
最近下载
- 年产2万吨碳酸锂项目(吸附剂车间竣工环保验收监测调查报告.docx VIP
- 2025年高考湖南卷物理真题试卷.pdf VIP
- 生物安全培训.doc VIP
- 圣兴化工年产1万吨硝酸镁、2万吨水溶肥、1万吨硝酸钙、2万吨太阳能熔盐、5万吨农业(工业)硝酸钾及5.4万吨氯化镁溶液项目环评.doc VIP
- DB37T 4983—2025 无人机半航空瞬变电磁探测技术规程.pdf
- 2026春沪教版七年级英语下册单词衡水体字帖.pdf VIP
- 25HNTJ026 锯齿形装配式混凝土剪力墙结构施工图制图规则及构造详图 T_HNKCSJ 025-2025.docx VIP
- 25HNTJ025 刚节点装配式混凝土框架结构施工图制图规则及构造详图 T_HNKCSJ 024-2025.docx VIP
- 25HNTJ025 低能耗集成装配式多层房屋构造 T_HNKCSJ 023-2025.docx VIP
- 催眠引导语合集元式催眠.docx VIP
原创力文档

文档评论(0)