步进电机驱动程序C语言.doc

/*;步进电机驱动程序;步进电机型号：70BC340-D ,步距角1.5/3*/#include #define uchar unsigned char#define uint unsigned int#define ulong unsigned longsbit dj_a = P10;sbit dj_b = P11;sbit dj_c = P12;sbit gd_s = P33;sbit key_s = P34;sbit key_j = P35;sbit dog = P30;uchar bdata flg;sbit s_bit = flg0;sbit j_bit = flg1;uchar data bzjs=0; /计时单元uchar data dqdjbz=0; /当前电机步骤uchar data djzt=0; /电机状态01=升 10=降 00=保uchar data dqdjabc=0x06;uchar data key=0x30; /键值/定时单元uchar data sh=0;uchar data sl=0;/脉冲宽度uchar code s_sj=5; / 升时每拍时间为5毫秒uchar code j_sj=7; / 降时每拍时间为7毫秒/电机步骤代码uchar code dj6=0x06,0x04,0x05,0x01,0x03,0x02;/=void delay10ms(void) uchar i,j; for(i=0;i12;i+) for(j=0;j(s_sj-1) bzjs = 0; dqdjbz+; if(dqdjbz5) dqdjbz = 0; djzt = 0x01; dqdjabc = djdqdjbz; if(j_bit) bzjs+; if(bzjs(j_sj-1) bzjs = 0; if(dqdjbz0) dqdjbz-; else dqdjbz = 5; djzt = 0x10; dqdjabc = djdqdjbz; if(s_bit=0)&(j_bit=0) bzjs = 0; if(djzt=0x01) switch(dqdjbz) case 1:dqdjbz = 2; break; case 3:dqdjbz = 4; break; case 5:dqdjbz = 0; break; if(djzt=0x10) switch(dqdjbz) case 1:dqdjbz = 0; break; case 3:dqdjbz = 2; break; case 5:dqdjbz = 4; break; djzt = 0; dqdjabc = djdqdjbz; djzt = 0x00; P1 = dqdjabc;void main(void) P1 = 0xff; P3 = 0xff; TMOD = 0x11; TH0 = 0xfc; TL0 = 0x73; TR0 = 1; ET0 = 1; dqdjbz = 0x00; P1 = 0x06; dqdjabc = 0x06; flg = 0; EA = 1; while(1) key = P3 & 0x30; if(key != 0) delay10ms(); key = P3 & 0x30; /key = 0x20; switch(key) case 0x20:s_bit = 1; j_bit = 0; break; case 0x10:j_bit = 1; s_bit = 0; break; case 0x30:s_bit = 0; j_bit =