Транслітерація україномовних текстів латинськими літерами

Додаток

Текст програми

#include

#include

#include

#include

char ktl1(char s);

char ktl(char s);

void main(void)

{

m:

clrscr();

printf("\t\t\t Љ“ђЋ‚Ђ ђЋЃЋЂ вҐг:\n\n");

printf("\t\t\"абiвҐажiп гЄахўЁе ⥪бвiў\"\n\n");

printf("\n 1)ђЎв дЁ");

printf("\n 2)‚ўҐҐп ЄўiвгаЁ");

printf("\n 3)‚Ёеi ЇаЈаЁ");

printf("\n 4)ЏiЄЄ ЄаЁбвгўзҐўi=)");

printf("\n\n\t‚ўҐiвм Ґа ЇгЄвг ");

int k;

switch(k=getch()){

case 1: clrscr();

char c,res1;

FILE *fp,*fp1;

if((fp=fopen("E:\\input.txt","r"))==NULL)

{

puts("‚еiЁ д Ґ Ґ");getch();

exit(1);

}

if((fp1=fopen("E:\\output.txt","w"))==NULL)

{

puts("ERROR");getch();

exit(1);

}

puts("ҐЄбв, й iбвЁўбп г дi\n");

rewind(fp);

while(!feof(fp))

{

c=fgetc(fp);

putc(c,stdout);

res1=ktl1(c);

fputc(res1,fp1);

}

fclose(fp1);

fclose(fp);

getch();

goto m;

break;

case 2:

clrscr();

printf("‚ўҐiвм аҐзҐп гЄа. iвҐаЁ: ");

char x[256];

gets(x);

for(int i=0;i<strlen(x);i++){

x[i]=ktl(x[i]);

}

printf("\nабiвҐажiп: %s",x);

getch();

goto m;

break;

case 3: exit(0);

case 4: clrscr();

puts("\n\t„п аЎвЁ дЁ ЇваiЎ бЇҐаиг г ЄаҐi ЁбЄ бвўаЁвЁ");

puts("д iҐҐ include.txt, ўЁеiЁ д ЎгҐ бвўаҐ ЇаЈао");

puts("ўввЁз. ЏаЁ ўўҐҐi ⥪бвг i ЄўiвгаЁ вЁбгвЁ Right Shift.");

getch();

break;

}

}

char ktl(char s)

{

char res;

switch (s) {

case 0: res = 0;break;

case 1: res = 1;break;

case 2: res = 2;break;

case 3: res = 3;break;

case 4: res = 4;break;

case 5: res = 5;break;

case 6: res = 6;break;

case 7: res = 7;break;

case 8: res = 8;break;

case 9: res = 9;break;

case Ђ: res = A;break;

case Ѓ: res = B;break;

case ‚: res = V;break;

case ѓ: res = H;break;

case „: res = D;break;

case …: res = E;break;

case т: res = р;break;

case †: res = *;break;

case ‡: res = Z;break;

case I: res = I;break;

case ф: res = |;break;

case ‰: res = J;break;

case Љ: res = K;break;

case ‹: res = L;break;

case Њ: res = M;break;

case Ќ: res = N;break;

case Ћ: res = O;break;

case Џ: res = P;break;

case ђ: res = R;break;

case : res = S;break;

case : res = T;break;

case “: res = Y;break;

case ”: res = F;break;

case : res = X;break;

case : res = C;break;

case : res = 4;break;

case ˜: res = W;break;

case ™: res = #;break;

case ћ: res = @;break;

case џ: res = 9;break;

case : res = a;break;

case Ў: res = b;break;

case ў: res = v;break;

case Ј: res = h;break;

case : res = d;break;

case Ґ: res = e;break;

case у: res = с;break;

case : res = *;break;

case : res = z;break;

case Ё: res = u;break;

case i: res = i;break;

case х: res = |;break;

case : res = j;break;

case Є: res = k;break;

case : res = l;break;

case : res = m;break;

case : res = n;break;

case : res = o;break;

case Ї: res = p;break;

case а: res = r;break;

case б: res = s;break;

case в: res = t;break;

case г: res = y;break;

case д: res = f;break;

case е: res = x;break;

case ж: res = c;break;

case з: res = 4;break;

case и: res = w;break;

case й: res = #;break;

case м: res = 6;break;

case о: res = @;break;

case п: res = 9;break;

case : res = ;break;

case ,: res = ,;break;

case .: res = .;break;

case -: res = -;break;

case :: res = :;break;

case ;: res = ;;break;

case ?: res = ?;break;

case !: res = !;break;

default: res = NULL;

}

return res;

}

char ktl1(char s)

{

char res1;

switch(s){

case 0: res1 = 0;break;

case 1: res1 = 1;break;

case 2: res1 = 2;break;

case 3: res1 = 3;break;

case 4: res1 = 4;break;

case 5: res1 = 5;break;

case 6: res1 = 6;break;

case 7: res1 = 7;break;

case 8: res1 = 8;break;

case 9: res1 = 9;break;

case А: res1 = A;break;

case Б: res1 = B;break;

case В: res1 = V;break;

case Г: res1 = H;break;

case Д: res1 = D;break;

case Е: res1 = E;break;

case Є: res1 = Ё;break;

case Ж: res1 = *;break;

case З: res1 = Z;break;

case І: res1 = I;break;

case Ї: res1 = |;break;

case Й: res1 = J;break;

case К: res1 = K;break;

case Л: res1 = L;break;

case М: res1 = M;break;

case Н: res1 = N;break;

case О: res1 = O;break;

case П: res1 = P;break;

case Р: res1 = R;break;

case С: res1 = S;break;

case Т: res1 = T;break;

case У: res1 = Y;break;

case Ф: res1 = F;break;

case Х: res1 = X;break;

case Ц: res1 = C;break;

case Ч: res1 = 4;break;

case Ш: res1 = W;break;

case Щ: res1 = #;break;

case Ю: res1 = @;break;

case Я: res1 = 9;break;

case а: res1 = a;break;

case б: res1 = b;break;

case в: res1 = v;break;

case г: res1 = h;break;

case д: res1 = d;break;

case е: res1 = e

• Назад
• 1
• 2
• 3
• 4
• Далее