Вылетает Kibor при сборке большого запускного файла

int i;
string Name="G";
int Endl=0;
if (fopen ("c:\Test.txt", "w")!=0)
{
for(i=0; i<999; i++)
{
fwrite("int "+Name+format(i)+";");
Endl++;
if(Endl==10){fwrite(ENDL);Endl=0;}
}
fwrite(ENDL);
fwrite("/^/int "+Name+format(i)+";");
fclose();
}
start("c:\Test.txt");

int G0;int G1;int G2;int G3;int G4;int G5;int G6;int G7;int G8;int G9;

int G[10];