C-Txt Dosyasında Bulunan Kelimeleri ve Sayıları Ayrı Ayrı Dosyalara Ayıran Program

#include <stdio.h>
#include <stdlib.h>
int main(){
    FILE *dosya,*sayi,*yazi;
    char input[20],karakter1,karakter2;
    printf("Dosya ismini giriniz: ");
    gets(input);
    dosya=fopen(input,"r");
    sayi=fopen("sayilar.txt","w+");
    yazi=fopen("yazilar.txt","w+");
    karakter2=fgetc(dosya);
    while(karakter2!=EOF){
        karakter1=fgetc(dosya);
        if(karakter2>47 && karakter2<58){
            fputc(karakter2,sayi);
            if(karakter1<48 || karakter1>57)
                fputc(' ',sayi);
        }else if((karakter2>64 && karakter2<91)||(karakter2>96 && karakter2<123)){
            fputc(karakter2,yazi);
            if(!((karakter1>64 && karakter1<91)||(karakter1>96 && karakter1<123)))
                fputc(' ',yazi);
        }
        karakter2=karakter1;
    }
    fclose(dosya);
    fclose(sayi);
    fclose(yazi);
    system("pause");
    return 0;
}