Не работает графический режим BGI в Builder C++ 6

#include<stdio.h>
#include<windows.h>
#include<stdlib.h>
#include<math.h>
#include<conio.h>
#include<dos.h>
#include<graphics.h>
#define PI M_PI
void help(void)
{
int gdriver = DETECT, gmode, errorcode;
  initgraph(&gdriver, &gmode,"C:\BGI");
  errorcode = graphresult();
  if(errorcode != grOk){
    printf("Graphics error: %s\n", grapherrormsg(errorcode));
    printf("Press any key to halt:");
    getch();
    exit(1);
 
restorecrtmode();
    clrscr();
    textmode(BW80);
    textcolor(3);
        printf("  1-турбіна ");
    printf("\n");
    printf("  2-генератор ");
    printf("\n");
    printf("  3-конденсатор ");
    printf("\n");
    printf("  4-конденсат ");
    printf("\n");
    printf("  5-живлячий насос");
    printf("\n");
    printf("  6-циркуляційний насос ");
    printf("\n");
    printf("  7-реактор ");
    printf("\n");
    printf("  8-працюючі канали ");
    printf("\n");
    printf("  9-парогенератор ");
    printf("\n");
      printf("\t\t\t          ");
 textcolor(3+BLINK );
       printf("\n\t\t\t");
       cprintf("  натиснiть будь-яку клавiшу");
       getch();
   setgraphmode(getgraphmode());
 
}
 
void draw1(int x0,int y0)
{
 unsigned char color[16]={0,4,2,6,1,5,3,7,8,12,10,14,9,13,11,15};
 struct bmpinfo
 {
 char h1,h2;
 unsigned long
 size,reserved,offset,b,width,height;
 unsigned int plans,bpp;
 };
bmpinfo info;
FILE *f;
int x,y;
unsigned char b;
unsigned char bh;
unsigned char bl;
int nb;
int np;
int i,j;
if((f=fopen("191.bmp","rb"))==NULL)
printf("-1");
//return -1;
fread(&info,sizeof(info),1,f);
if(info.bpp!=4)
printf("-2");
//return -2;
x=x0;
y=y0+info.height;
nb=(info.width/8)*4;
if((info.width/8)!=4)nb+=4;
fseek(f,info.offset,SEEK_SET);
for(i=0;i<=info.height;i++)
{
np=0;
for(j=4;j<nb;j++)
{
b=fgetc(f);
if(np<info.width)
{
bh=b>>4;
putpixel(x,y,color[bh]);
x++;
np++;
}
if (np<info.width)
{
bl=b&15;
putpixel(x,y,color[bl]);
x++;
np++;
}
}
x=x0;
y--;
}
fclose(f);
}
 
void draw(int x0,int y0)
{
 unsigned char color[16]={0,4,2,6,1,5,3,7,8,12,10,14,9,13,11,15};
 struct bmpinfo
 {
 char h1,h2;
 unsigned long
 size,reserved,offset,b,width,height;
 unsigned int plans,bpp;
 };
bmpinfo info;
FILE *f;
int x,y;
unsigned char b;
unsigned char bh;
unsigned char bl;
int nb;
int np;
int i,j;
if((f=fopen("58.bmp","rb"))==NULL)
printf("-1");
//return -1;
fread(&info,sizeof(info),1,f);
if(info.bpp!=4)
printf("-2");
//return -2;
x=x0;
y=y0+info.height;
nb=(info.width/8)*4;
if((info.width/8)!=4)nb+=4;
fseek(f,info.offset,SEEK_SET);
for(i=0;i<=info.height;i++)
{
np=0;
for(j=4;j<nb;j++)
{
b=fgetc(f);
if(np<info.width)
{
bh=b>>4;
putpixel(x,y,color[bh]);
x++;
np++;
}
if (np<info.width)
{
bl=b&15;
putpixel(x,y,color[bl]);
x++;
np++;
}
}
x=x0;
y--;
}
fclose(f);
}
 
void Pidgotovka(void);
void *saucer;
int size;
float h,a,p,s;
void main()
{
int STEP=100;
 char c,vub;
 int  X,y,k,q=1,i;
 int gdriver=DETECT,gmode,errorcode;
 initgraph(&gdriver,&gmode,"C:\BGI");
 errorcode=graphresult();
 if(errorcode !=grOk)
  {
    printf("graphics error:%s\n",grapherrormsg(errorcode));
    printf("Press any kay to halt:");
    getch();
    exit(1);
  }  // сторінка про дані
     restorecrtmode();
    clrscr();
    textmode(BW80);
    textcolor(7);
    cprintf(L"                     Мiнiстерство освiти i науки, молоді та спорту України");
    printf("\n");
    cprintf(L"               Національний унiверситет водного господарства та природокористування");
    printf("\n");
    cprintf("                     Кафедра електротехнiки i автоматики");
    printf("\n\n\n\n\n");
    textcolor(4 + BLINK);
    printf("                                ");
    cprintf("РОЗРАХУНКОВО-ГРАФІЧНА РОБОТА");
    printf("\n");
    textcolor(7);
    printf("\t\t");
    cprintf(" з курсу:\"Програмування та алгоритмiчнi мови\"");
    printf("\n");
    textcolor(7);
    printf("\t\t");
    cprintf("  на тему:\"відображення мнемосхеми та");
    printf("\n");
    printf("\t\t\t ");
    cprintf(" технологічного процесу атомної електричної ");
    printf("\n");
    printf("\t\t\t ");
    cprintf(" станції з водяним реакторм ");
    printf("\t\t\t ");
    printf("\n\n\n\n\n\n");
    textcolor(2);
    printf("\t\t\t\t\t\t");
    cprintf("Виконав студент І курсу");
    printf("\n");
    printf("\t\t\t\t\t\t");
    cprintf("групи АУТП-11");
    printf("\n");
    printf("\t\t\t\t\t\t");
    cprintf("Рудаков В.Н.");
    printf("\n\n\n\n");
       printf("\t\t\t          ");
       textcolor(58);
       cprintf("Рівне, 2011");
       textcolor(GREEN + BLINK );
       printf("\n\t\t\t");
       cprintf("  натиснiть будь-яку клавiшу");
       getch();
   textcolor(GREEN );
 
   setgraphmode(getgraphmode());
 
  poch:
  q=1;
 X=140;
 y=110;
Pidgotovka();
   // меню
   setfillstyle(1,7);
    setcolor(2);
 
   bar3d(225,125 ,377,170,0,0);
     outtextxy(230, 145, "  Показати завдання");
 
   bar3d(225,225 ,377,270,0,0);
   outtextxy(226,245," Умовні позначення");
 
      bar3d(225,325 ,377,370,0,0);
      outtextxy(285, 349, "exit");
 
 
 // переміщення в меню
  do
   {
 
    putimage(X+240,y,saucer,XOR_PUT);
    putimage(X,y,saucer,XOR_PUT);
    c=getch();
    putimage(X+240,y,saucer,XOR_PUT);
    putimage(X,y,saucer,XOR_PUT);
     switch(c)
    {
      case 80:  y+=STEP;q++;if(y==410){y=110 ;q=1;}break;
      case 72:      y-=STEP;q--;if(y==10){y=310;q=3;}break;
      case 13:      if(q==2){help();goto poch;}
                if(q==3)goto popa;if(q==1){
      draw1(5,-2);
// пар іде до генератору
while(!kbhit())
{
for(i=266;i>151;i-=10)
 {
 setcolor(15);
 line(144,i,144,i-10);
 delay(150);
 setcolor(10);
 line(144,i,144,i-10);
 }
// пар іде до генератору
 for(i=139;i>52;i-=10)
  {
  setcolor(15);
  line(i,145,i-10,145);
  delay(150);
  setcolor(10);
  line(i,145,i-10,145);
  }
//  в реакторі
for(i=145;i<=256;i+=10)
 {
 setcolor(15);
  line(100,i,100,i+10);
 line(72,i,72,i+10);
 line(48,i,48,i+10);
 delay(150);
 setcolor(10);
 line(100,i,100,i+10);
 line(72,i,72,i+10);
 line(48,i,48,i+10);
 }
// -------------гаряча пара----------------
for(i=256;i>79;i-=10)
 {
 setcolor(4);
 line(91,i,91,i+10);
 line(65,i,65,i+10);
 line(40,i,40,i+10);
 delay(150);
 setcolor(10);
 line(91,i,91,i+10);
 line(65,i,65,i+10);
 line(40,i,40,i+10);
 }
 for(i=40;i<=220;i+=10)
 {
 setcolor(4);
 line(i,78,i+10,78);
 delay(150);
 setcolor(10);
line(i,78,i+10,78);
  }
for(i=220;i>185;i-=10)
 {
 setcolor(15);
 line(i,136,i+10,136);
 delay(150);
 setcolor(10);
 line(i,136,i+10,136);
 }
 
 for(i=56;i>31;i-=5)
 {
 setcolor(4);
 line(236,i,236,i-5);
 delay(150);
 setcolor(10);
line(236,i,236,i-5);
  }
  for(i=236;i<350;i+=10)
 {
 setcolor(4);
 line(i,29,i+10,29);
 delay(150);
 setcolor(10);
line(i,29,i+10,29);
   }
 for(i=31;i<75;i+=5)
 {
 setcolor(4);
 line(358,i,358,i+5);
 delay(150);
 setcolor(10);
 line(358,i,358,i+5);
  }
  for(k=0,i=0;k<4;i++)
 {
 setcolor(10);
 if(i>10) line(359,75+i-10,417,75+i-10);
 line(359,75+i,417,75+i);
 delay(50);
 setcolor(0);
 line(359,75+i,417,75+i);
 if(i>10) line(359,75+i-10,417,75+i-10);
 if(i>58){i=0;k++; }
 }
  for(i=138;i<190;i+=5)
 {
 setcolor(4);
 line(418,i,418,i+5);
 delay(100);
 setcolor(10);
line(418,i,418,i+5);
   }
  for(i=265;i<310;i+=5)
 {
 setcolor(15);
 line(420,i,420,i+5);
 delay(100);
 setcolor(10);
line(420,i,420,i+5);
   }
 
  for(i=420;i>330;i-=10)
 {
 setcolor(15);
 line(i,310,i-10,310);
 delay(150);
 setcolor(10);
line(i,310,i-10,310);
   }
  for(i=285;i>255;i-=10)
 {
 setcolor(15);
 line(i,309,i-10,309);
 delay(150);
 setcolor(10);
line(i,309,i-10,309);
   }
 
   for(i=309;i>160;i-=10)
 {
 setcolor(15);
 line(252,i,252,i-10);
 delay(100);
 setcolor(10);
line(252,i,252,i-10);
   }
   for(i=138;i<275;i+=10)
 {
 setcolor(15);
 line(191,i,191,i+10);
 delay(150);
 setcolor(10);
 line(191,i,191,i+10);
  }
 for(i=191;i>165;i-=5)
 {
 setcolor(15);
 line(i,285,i-5,285);
 delay(100);
 setcolor(10);
 line(i,285,i-5,285);
 }
 
 }
 
    goto poch; }
    }
 
 
   }   while(c!=27);
 popa:
 free(saucer);
 closegraph();
}
 
void Pidgotovka(void )
{
 draw(0,-2);
 size=imagesize(140,100,200,160);
 saucer=malloc(size);
 getimage(140,100,200,160,saucer);
 putimage(140,100,saucer,XOR_PUT);
}}

/*
    Функция rus может используется для вывода сообщений
    на русском языке в консольных программах.
 
    Пример использования:
                printf( rus("Скорость: %3.2f км/час"), v);
        printf( rus("У лукоморья дуб зеленый\n") );
*/
 
char* rus(char* st)
{
        unsigned char* p = st;  // при объявлении символов как char русские буквы
                                 // кодируются отрицательными числами
    while ( *p )
    {
        if (*p >= 192) // здесь русская буква
                 if (*p <= 239)  //  А,Б, ... Я,а,б, ... п
 
                       *p -= 64;
                 else // р ...я
                       *p -= 16;
 
            p++;
        }
    return st;
}

setlocale(LC_ALL, "Russian");
// или
setlocale(LC_ALL, "russian_russia.1251");
// можно после main