希望步进电机28BYJ-48每次转动90度

想求这个程序，预期希望电机每次转动90度，SPEED最好为1  ，有想法联系QQ1130011026
  #include

***it led=P1^0;

***it A1=P2^0; //定义步进电机连接端口
***it B1=P2^1;
***it C1=P2^2;
***it D1=P2^3;
  

  #define uchar unsigned char
#define uint  unsigned int
#define Coil_A1 {A1=1;B1=0;C1=0;D1=0;}//A相通电，其他相断电
#define Coil_B1 {A1=0;B1=1;C1=0;D1=0;}//B相通电，其他相断电
#define Coil_C1 {A1=0;B1=0;C1=1;D1=0;}//C相通电，其他相断电
#define Coil_D1 {A1=0;B1=0;C1=0;D1=1;}//D相通电，其他相断电
#define Coil_AB1 {A1=1;B1=1;C1=0;D1=0;}//AB相通电，其他相断电
#define Coil_BC1 {A1=0;B1=1;C1=1;D1=0;}//BC相通电，其他相断电
#define Coil_CD1 {A1=0;B1=0;C1=1;D1=1;}//CD相通电，其他相断电
#define Coil_DA1 {A1=1;B1=0;C1=0;D1=1;}//D相通电，其他相断电
#define Coil_OFF {A1=0;B1=0;C1=0;D1=0;}//全部断电
  
void  zhengzhuan()
{
  unsigned int j=0;
  Speed=3;  
  led=0;//转动
   j=512; //旋转一周时间
Coil_OFF
while(j--)  //正向
  {         
     Coil_A1                //遇到Coil_A1  用{A1=1;B1=0;C1=0;D1=0;}代替
     DelayMs(Speed);         //改变这个参数可以调整电机转速 ,
                             //数字越小，转速越大,力矩越小
     Coil_B1
     DelayMs(Speed);
     Coil_C1
     DelayMs(Speed);
     Coil_D1
     DelayMs(Speed);
  }
}
void  fanzhuan()
{
  unsigned int j=0;
  Speed=3;  
  led=1;//反向
  Coil_OFF
  j=512;
  while(j--)//反向
  {
     Coil_D1                //遇到Coil_A1  用{A1=1;B1=0;C1=0;D1=0;}代替
     DelayMs(Speed);         //改变这个参数可以调整电机转速 ,
                         //数字越小，转速越大,力矩越小
     Coil_C1
     DelayMs(Speed);
     Coil_B1
     DelayMs(Speed);
     Coil_A1
     DelayMs(Speed);
  }
}
想求这个程序，预期希望电机每次转动90度，SPEED最好为1  ，有想法联系QQ1130011026 求大家帮忙