Kodovani cestiny

[Jan Koudelka]

From:	MX%"owl@[194.108.128.75]"  1-JUN-1995 13:54:03.40
To:	MX%"xkoudel1 at cs.felk.cvut.cz"
CC:
Subj:	Tabulky

Return-Path: <owl@[194.108.128.75]>
Received: from ns.felk.cvut.cz by cs.felk.cvut.cz (MX V4.1 AXP) with SMTP; Thu,
          01 Jun 1995 13:54:00 MET_DST
Received: from [194.108.128.75] ([194.108.128.75]) by ns.felk.cvut.cz
          (8.6.11/8.6.9) with ESMTP id NAA23777 for <xkoudel1 at cs.felk.cvut.cz>;
          Thu, 1 Jun 1995 13:53:58 +0200
Received: (from owl at localhost) by [194.108.128.75] (8.6.11/8.6.9) id NAA00100;
          Thu, 1 Jun 1995 13:54:02 +0200
Date: Thu, 1 Jun 1995 13:54:02 +0200 (MET DST)
From: Petr Titera <owl@[194.108.128.75]>
To: xkoudel1 at cs.felk.cvut.cz
Subject: Tabulky
Message-ID: <Pine.LNX.3.91.950601135015.95B-100000@[194.108.128.75]>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII



Tabulky jsou delany timto zpusobem

   index pole - znak ze vstupniho texty
   vysledek   - stejny znak (co do vyznamu) v jinem kodovani


char *volba[] = { "li", "il", "ik", "ia", "i7", "ki", "kl", "lk",
"k7", "ka", "l7", "la" ,"kk","ii","ll"} ;
FILE *from, *to;
unsigned char line[BUFSIZ];
unsigned short tab[128];


 /* konverze PC latin  -> ISO latin 2   */

unsigned short tabli[128]= {
 199,252,233,226,228,249,230,231,179,235,213,245,238,172,196,198,
 201,197,229,244,246,165,181,166,182,214,220,171,187,163,215,232,
 225,237,243,250,161,177,174,190,202,234,32,188,200,186,32,32,
 32,32,32,124, 43,193,194,204,170, 43,124, 43, 43,175,191, 43,
 43, 43, 43, 43, 45, 43,195,227, 43, 43, 43, 43, 43, 45, 43,164,
 240,208,207,203,239,210,205, 85,236, 43, 43,32,32,222,217,32,
 211,223,212,209,241,242,169,185,192,218,224,219,253,221,254,180,
 173,189,184,183,162,167,247,178,176,168,255,251,216,248,32,160
 };


 /* konverze ISO latin 2 -> PC latin    */

unsigned short tabil[128]= {
 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,
 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,
 255,164,244,157,207,149,151,245,249,230,184,155,141,240,166,189,
 248,165,247,136,239,150,152,243,242,231,173,156,171,241,167,190,
 232,181,182,198,142,145,143,128,172,144,168,211,183,214, 73,210,
 209,227,213,224,226,138,153,158,252,222,233,235,154,237,221,225,
 234,160,131,199,132,146,134,135,159,130,169,137,216,161,140,212,
 208,228,229,162,147,139,148,246,253,133,163,251,129,236,238,250
 };



 /* konverze ISO latin 2 -> keybcs2 */

 unsigned short tabik[128] = {
 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,
 144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159,
 160,161,162,163,164,156,166,167,168,155,170,134,172,173,146,175,
 176,177,178,179,180,140,182,183,184,168,186,159,188,189,145,191,
 171,143,194,195,142,138,198,199,128,144,202,203,137,139,206,133,
 208,209,165,149,167,213,153,215,158,166,151,219,154,157,222,223,
 170,160,226,227,132,141,230,231,135,130,234,235,136,161,238,131,
 240,241,164,162,147,245,148,247,169,150,163,251,129,152,254,255
 };


 /* konverze ISO latin 2 -> ASCII   */

unsigned short tabia[128] = {
 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,
 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,
 32, 65,32,32,32, 76, 83,32,32, 83, 83, 84, 90,32, 90, 90,
 45, 97,32,32, 44,108,115,32, 39,115,115,116,122,126,122,122,
 82, 65, 65, 65, 65, 76, 67, 67, 67, 69, 69, 69, 69, 73, 73, 68,
 68, 78, 78, 79, 79, 79, 79,32, 82, 85, 85, 85, 85, 89, 84,32,
 114, 97, 97, 97, 97,108, 99, 99, 99,101,101,101,101,105,105,100,
 100,110,110,111,111,111,111, 43,114,117,117,117,117,121,116, 61
 };


 /* konverze ISO latin 2 -> Sys7    */

 unsigned short tabi7[128] = {
 137,159,142,147,138,145,232,139,158,157,189,234,188,190,128,231,
 131,236,235,153,154,238,243,242,249,133,134,225,187,248,219,233,
 135,146,151,156,203,187,241,239,228,225,218,232,52,164,235,200,
 32,32,32,32,32,188,32,32,32,228,32,233,32,32,236,32,
 217,231,32,32,128,189,32,32,137,131,32,32,157,234,32,145,
 32,32,197,238,239,32,133,32,219,241,242,32,134,248,32,32,
 218,135,194,112,138,190,117,160,139,142,79,182,158,146,69,147,
 61,43,203,151,153,73,154,126,222,243,156,195,159,249,165,255
 };




 /* konverze keybcs2 -> ISO latin 2 */
 unsigned short tabki[128] = {
 200,252,233,239,228,207,171,232,236,204,197,205,181,229,196,193,
 201,190,174,244,246,211,249,218,253,214,220,169,165,221,216,187,
 225,237,243,250,242,210,217,212,185,248,224,192,172,173,174,175,
 176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191,
 192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207,
 208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223,
 224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239,
 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255
 };

 /* konverze keybcs2 -> PC latin 2  */

 unsigned short tabkl[128] = {
 172,129,130,212,132,210,155,159,216,183,145,214,150,146,142,181,
 144,167,166,147,148,224,133,233,236,153,154,230,149,237,252,156,
 160,161,162,163,229,213,222,226,231,253,234,232,172,173,174,175,
 176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191,
 192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207,
 208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223,
 224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239,
 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255
 };


 /* konverze PC latin 2 -> keybcs2  */

unsigned short tablk[128] = {
 128,129,130,131,132,150,134,135,136,137,138,139,140,141,142,143,
 144,138,141,147,148,156,140,151,152,153,154,134,159,157,158,135,
 160,161,162,163,164,165,146,145,168,169,170,171,128,173,174,175,
 176,177,178,179,180,143,182,137,184,185,186,187,188,189,190,191,
 192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207,
 208,209,133,211,131,165,139,215,136,217,218,219,220,221,166,223,
 149,225,167,227,228,164,155,168,171,151,170,235,152,157,238,239,
 240,241,242,243,244,245,246,247,248,249,250,251,158,169,254,255
 };


 /* konverze  keybcs2 -> Sys7   */

unsigned short tabk7[128] = {
 137,159,142,147,138,145,232,139,158,157,189,234,188,190,128,231,
 131,236,235,153,154,238,243,242,249,133,134,225,187,248,219,233,
 135,146,151,156,203,197,241,239,228,222,218,217,52,164,235,200,
 32,32,32,32,32,188,32,32,32,228,32,233,32,32,236,32,
 217,231,32,32,128,189,32,32,137,131,32,32,157,234,32,145,
 32,32,197,238,239,32,133,32,219,241,242,32,134,248,32,32,
 218,135,194,112,138,190,117,160,139,142,79,182,158,146,69,147,
 61,43,203,151,153,73,154,126,222,243,156,195,159,249,165,255
 };


 /* konverze  keybcs2 -> ASCII  */

unsigned short tabka[128] = {
 67,117,101,100,97,68,84,99,101,69,76,73,108,108,65,65,
 69,122,90,111,111,79,117,85,121,79,85,83,76,89,82,116,
 97,105,111,117,110,78,85,79,115,114,114,82,90,32,90,90,
 45,97,32,32,44,108,115,32,39,115,115,116,122,126,122,122,
 82,65,65,65,65,76,67,67,67,69,69,69,69,73,73,68,
 68,78,78,79,79,79,79,32,82,85,85,85,85,89,84,32,
 114,97,97,97,97,108,99,99,99,101,101,101,101,105,105,100,
 100,110,110,111,111,111,111,43,114,117,117,117,117,121,116,61
 };


 /* konverze PC latin 2 -> Sys7 */

unsigned short tabl7[128] = {
 32,159,142,194,138,243,117,160,32,182,32,73,69,52,128,32,
 131,189,190,153,154,187,188,241,32,133,134,232,233,156,32,139,
 135,146,151,156,146,32,235,236,32,79,32,32,137,32,32,32,
 32,32,32,124,43,231,32,157,218,43,124,43,43,200,32,43,
 43,43,43,43,45,43,32,112,43,43,43,43,43,45,43,203,
 61,32,145,32,147,197,234,85,158,43,43,32,32,32,241,32,
 238,32,239,32,43,203,225,228,217,242,218,32,249,248,165,32,
 164,32,32,32,151,239,126,32,32,228,255,195,219,222,32,135
 };


 /* konverze PC latin 2 -> ASCII    */

unsigned short tabla[128] = {
 67,117,101,97,97,117,99,99,32,101,79,111,105,90,65,67,
 69,76,108,111,111,76,108,83,115,79,85,84,116,32,32,99,
 97,105,111,117,65,97,90,122,69,101,32,122,67,115,32,32,
 32,32,32,124,43,65,65,69,83,43,124,43,43,90,122,43,
 43,43,43,43,45,43,65,97,43,43,43,43,43,45,43,32,
 100,68,68,69,100,78,73,85,101,43,43,32,32,84,85,32,
 79,32,79,78,110,110,83,115,82,85,114,85,121,89,116,44,
 32,126,39,32,32,32,43,32,45,32,61,117,82,114,32,32
 };