Program To Create a Com Project

#include<graphics.h>
#include<constream.h>
#include<dos.h>
void main()
{
int gm, gd = DETECT;
initgraph(&gd,&gm,"\\tc\\bgi");
int si,top,s;
for(si=50,s=150,top=400;s<313;si++)
 {
 setfillstyle(9,1);
 setcolor(2);
 sector(s,s-75,90,180,si,si);
 sector(top+75,top,270,360,si,si);
 sector(top+75,s-75,90,0,si,si);
 sector(s,top,180,270,si,si);
 s+=1; top-=1;
 setfillstyle(1,4);
 setcolor(4);
 sector(s,s-75,90,180,si,si);
 sector(top+75,top,270,360,si,si);
 sector(top+75,s-75,90,0,si,si);
 sector(s,top,180,270,si,si);
}


 setcolor(0);
 setlinestyle(3,0,3);
for(int i=0;i<=220;i+=1)
 {delay(10);
 line(420,i+150,470,i+150);}
for( i=0;i<=170;i+=1)
 {delay(10);
 line(350,i+150,400,i+150);  }
for( i=0;i<=50;i+=1)
 {delay(10);
 line(400,i+320,210,i+320);}
for( i=0;i<=170;i+=1)
 {delay(10);
 line(278,i+150,328,i+150); }
for( i=0;i<=170;i+=1)
 {delay(10);
 line(206,i+150,256,i+150);}
for( i=0;i<=50;i+=1)
 {delay(10);
 line(182,i+226,210,i+226);}
for( i=0;i<=126;i+=1)
 {delay(10);
 line(135,i+150,185,i+150);}

for( i=0;i<=30;i+=1)
 {delay(10);
 line(338,i+70,369,i+70);}
for( i=0;i<=30;i+=1)
 {delay(10);
 line(290,i+70,320,i+70);  }
for( i=0;i<=30;i+=1)
 {delay(10);
 line(242,i+70,275,i+70);}
for( i=0;i<=30;i+=1)
 {delay(10);
 line(372,i+100,242,i+100);}
for( i=0;i<=30;i+=1)
 {delay(10);
 line(290,i+30,320,i+30);
}

for( si=50, s=150,top=402;s<315;si++)
 { setfillstyle(1,0);
 setcolor(0);
 sector(s,s-75,90,180,si,si);
 sector(top+75,top,270,360,si,si);
 sector(top+75,s-75,90,0,si,si);
 sector(s,top,180,270,si,si);
 s+=1; top-=1;}
 delay(100);
 setcolor(8);
}