#include <stdio.h>
#include <string.h>
main(int argc, char *argv[]){
FILE *f, *nfile;
char c;
char path[50];
char nfile_path[50];
if (argc == 1){
printf("\nDwse to onoma tou arxeiou pros anagnwsh : ");
scanf("%s", path);
}
else
strcpy(path, argv[1]);
f = fopen(path, "r"); //anoigma arxeiou
if (!f){ //elegxos uparkshs/swstou anoigmatos arxeiou
printf("\n\nTo arxeio %s de brethike\n\n", path);
return;
}
printf("\nDwse to onoma tou arxeiou pou tha dhmiourgithei : ");
scanf("%s", nfile_path);
nfile = fopen(nfile_path, "w");
while(!feof(f)){
fscanf(f, "%c", &c);
switch (c){
case -63 : c = 65; break; //Alpha kefalaio
case -62 : c = 66; break;
case -61 : c = 71; break;
case -60 : c = 68; break;
case -59 : c = 69; break;
case -58 : c = 90; break;
case -57 : c = 72; break;
case -56 : c = 56; break;
case -55 : c = 73; break;
case -54 : c = 75; break;
case -53 : c = 76; break;
case -52 : c = 77; break;
case -51 : c = 78; break;
case -50 : c = 51; break;
case -49 : c = 79; break;
case -48 : c = 80; break;
case -47 : c = 82; break;
case -45 : c = 83; break;
case -44 : c = 84; break;
case -43 : c = 89; break;
case -42 : c = 70; break;
case -41 : c = 88; break;
case -40 : c = 74; break;
case -39 : c = 79; break; //omega kefalaio
case -31 : c = 97; break; //Alpha mikro
case -30 : c = 98; break;
case -29 : c = 103; break;
case -28 : c = 100; break;
case -27 : c = 101; break;
case -26 : c = 122; break;
case -25 : c = 105; break;
case -24 : c = 56; break;
case -23 : c = 105; break;
case -22 : c = 107; break;
case -21 : c = 108; break;
case -20 : c = 109; break;
case -19 : c = 110; break;
case -18 : c = 51; break;
case -17 : c = 111; break;
case -16 : c = 112; break;
case -15 : c = 114; break;
case -13 : c = 115; break;
case -12 : c = 116; break;
case -11 : c = 117; break;
case -10 : c = 102; break;
case -9 : c = 120; break;
case -8 : c = 121; break;
case -7 : c = 119; break; //omega mikro
case -94 : c = 65; break; //Alpha kefalaio me tono
case -72 : c = 69; break; //epsilon kefalaio me tono
case -71 : c = 72; break; //hta kefalaio me tono
case -70 : c = 73; break; //giota kefalaio me tono
case -68 : c = 79; break; //omikron kefalaio me tono
case -66 : c = 89; break; //upsilon kefalaio me tono
case -65 : c = 79; break; //wmega kefalaio me tono
case -36 : c = 97; break; //Alpha mikro me tono
case -35 : c = 101; break; //epsilon mikro me tono
case -34 : c = 104; break; //hta mikro me tono
case -33 : c = 105; break; //giota mikro me tono
case -4 : c = 111; break; //omikron mikro me tono
case -3 : c = 117; break; //upsilon mikro me tono
case -2 : c = 119; break; //wmega mikro me tono
case -6 : c = 105; break; //giota mikro me dialitika
case -64 : c = 105; break; //giota mikro me tono kai dialitika
case -5 : c = 117; break; //upsilon mikro me dialitika
case -14 : c = 115; break; //sigma teliko
default : break;
}
fprintf(nfile, "%c", c);
}
fclose(f);
fclose(nfile);
}