программа работает на турбо си, но в дев си не работает

[Sofia SLON]

#include<graphics.h>
#include<stdio.h>
#include<conio.h>
#include<math.h>
#include<dos.h>
#define R "C:\\TC\\bgi"
void vector(int a, int l)
{
#define G 0.0174532
int x0,y0;
int x1,y1;
x0 = getx();
y0 = gety();
x1 = x0+l*cos(a*G);
y1 = y0-l*sin(a*G);
lineto(x1,y1);
}
void clock()
{
int x0=100,y0=190;
int d = 50;
int s = 0;
int m = 0;
int as = 90;
int am = 90;
setfillstyle(XHATCH_FILL, YELLOW);
fillellipse(x0,y0,90,90);
setfillstyle(SOLID_FILL, YELLOW);
fillellipse(x0,y0,70,70);
setcolor(RED);
outtextxy(x0-7,y0-65,"12");
outtextxy(x0,y0+60,"6");
outtextxy(x0+60,y0,"3");
outtextxy(x0-65,y0,"9");
outtextxy(x0+35,y0-50,"1");
outtextxy(x0+55,y0-30,"2");
outtextxy(x0+50,y0+30,"4");
outtextxy(x0+30,y0+50,"5");
outtextxy(x0-30,y0+52,"7");
outtextxy(x0-54,y0+30,"8");
outtextxy(x0-43,y0-50,"11");
outtextxy(x0-60,y0-26,"10");
settextstyle(TRIPLEX_FONT, HORIZ_DIR,88);
outtextxy(x0-90,y0-50,",");
settextstyle(TRIPLEX_FONT, HORIZ_DIR,88);
outtextxy(x0+90,y0-200,",");
setfillstyle(SOLID_FILL, WHITE);
bar(x0+240,y0,210,135);
do
{
moveto(x0,y0);
setcolor(BLACK);
vector (as,d);
moveto(x0,y0);
setcolor(RED);
vector(am,d-10);
delay(1000);
setcolor(YELLOW);
moveto(x0,y0);
vector(as,d);
moveto(x0,y0);
vector(am,d-10);
s++;
if (s>60)
{ 
m++;
s=0;
am-=6;
if(am<0)
am=354;
}
while (!kbhit());
}
int main (void)
{
int gd=DETECT;
int gm;
int errorcode;
initgraph(&gd,&gm, R);
errorcode=graphresult();
if (errorcode==grOk)
{
clock();
closegraph();
}
else
{
printf("OSHIBKA: %d\n", errorcode);
getch();
}
}
}

эта программа работает на турбо си, но в дев си не работает((((
выдает кучу ошибок
что мне делать
??????
я хочу дальше ривовать графику на дев си, тк турбо часто глючит(((((

[Smogg]

#include<dos.h>

DOS?