C Programlama Kelime Üretme

#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
#include <string.h>
#include <time.h>
int main()
{
 system("COLOR 1D");
 printf("\n......................Program amaci Rastgele kelimeler uretmektedir..........\n");
 FILE *dosya;
 printf("\nCikmak icin 1  sayisina basiniz.\n\n");
 
 char karkter,dizi[100],i=0,j;
 int deger=0;
 while(deger!=1)
 {
  dizi[0]=(rand()%25)+65;
  if((dosya=fopen("kelime.txt","w"))==NULL)
  {
   printf("Dosya acilmamistir!!");
   exit(0); 
  }
  for(i=1;i<100;i++)
  {
   karkter=(rand()%25)+65;
   dizi[i]=karkter;
   if((dizi[i-1]!='A' && dizi[i]!='A') &&  (dizi[i-1]!='E' && dizi[i]!='E') && (dizi[i-1]!='I' && dizi[i]!='I') && (dizi[i-1]!='O' && dizi[i]!='O') && (dizi[i-1]!='U' &&  dizi[i]!='U'))
   {
     dizi[i-1]=32;
     karkter=(rand()%25)+65;
     dizi[i]=karkter;
      
   }
  }
    fprintf(dosya,"%s",dizi);
     printf("%s\n",dizi);
     printf("\nCikmak icin 1 basiniz\n");
     scanf("%d",°er);
 
 } 
 
 system("pause");
 return 0;
}