51单片机《凉凉》高潮部分代码

#include"reg52.h"

   sbit b=P1^0; //此引脚接蜂鸣器
  
   
  
void d(int i)
{ 
     while(i--);
 }
      
     void main()
{  int a=1000; 
   
      while(a>1)
    {
     b=~b;
     a--;
     d(60);
    }
    a=1000 ; 
    d(1000)  ;
        while(a>1)
    {
     b=~b;
     a--;
     d(39);
    }
     a=1000; 
    d(1000)  ;
        while(a>1)
    {
     b=~b;
     a--;
     d(39);
    }
    a=1000; 
    d(1000)  ;
        while(a>1)
    {
     b=~b;
     a--;
     d(45);
    }
     a=1000; 
    d(1000)  ;     
    while(a>1)
    {
     b=~b;
     a--;
     d(39);
    }
     a=10